- umask($old_umask);
- stream_set_blocking($thiz->list, $thiz->blocking_mode); # Set the stream to non-blocking
-
- if (($thiz->in = fopen("php://stdin", "r")) === FALSE) {
- return(FALSE);
- }
-
- $thiz->main_loop = FALSE;
-
- return ($thiz);
- }
-
- function run()
- {
- if ($this->main_loop) {
- return (FALSE);
- }
-
- $this->main_loop = TRUE;
-
- while ($this->main_loop) {
- $curtime = time();
- printf("IN LOOP: Current opened: %d pages_flush: %d\n", count($this->socks), count($this->pages_flush));
-
- /* Prepare the read array */
- /* // when we manage it ... */
- /* if ($shutdown) */
- /* $read = array_merge(array("$in" => $in), $socks); */
- /* else */
- $read = array_merge(array(intval($this->list) => $this->list, intval($this->in) => $this->in),
- $this->socks);
-
- if ($this->debug > 1) {
- printf("PRE_SELECT\n");
- print_r($read);
- }
- $write = NULL;
- $except = NULL;
- $num_changed_sockets = stream_select($read, $write, $except, 0, 250000);
-
- if ($num_changed_sockets == 0) {
- printf("No data in 5 secs\n");
- }
- else if ($num_changed_sockets > 0) {
- printf("num sock %d num_of_socket: %d\n", $num_changed_sockets, count($read));
- if ($this->debug > 1) {
- print_r($read);
- }
- /* At least at one of the sockets something interesting happened */
- foreach ($read as $i => $sock) {
- /* is_resource check is required because there is the possibility that
- during new request an old connection is closed */
- if (!is_resource($sock)) {
- continue;
- }
- if ($sock === $this->list) {
- printf("NUOVA CONNEX\n");
- $new_unix = stream_socket_accept($this->list);
- $stream_info = "";
- $method = "";
- $get = array();
- $post = array();
- $cookie = array();
- if (($new_socket = ancillary_getstream($new_unix, $stream_info)) !== FALSE) {
- stream_set_blocking($new_socket, $this->blocking_mode); // Set the stream to non-blocking
- printf("RECEIVED HEADER:\n%s", $stream_info);
- $path = spu_process_info($stream_info, $method, $header, $get, $post, $cookie);
- printf("PATH: [%s]\n", $path);
- printf("M: %s\nHEADER:\n", $method);
- print_r($header);
- printf("GET:\n");
- print_r($get);
- printf("POST:\n");
- print_r($post);
- printf("COOKIE:\n");
- print_r($cookie);
-
- $addr = stream_socket_get_name($new_socket, TRUE);
- $header_out = array();
-
- switch ($path) {
- case SITE_PREFIX:
- case SITE_PREFIX."index.php":
- ob_start();
- index_main($this->room, $header_out, $addr, $get, $post, $cookie);
- $content = ob_get_contents();
- ob_end_clean();
-
- $pgflush = new PageFlush($new_socket, $curtime, 20, $header_out, $content);
-
- if ($pgflush->try_flush($curtime) == FALSE) {
- // Add $pgflush to the pgflush array
- array_push($this->pages_flush, $pgflush);
- }
-
- break;
- case SITE_PREFIX."index_wr.php":
- ob_start();
- index_wr_main($this->room, $addr, $get, $post, $cookie);
- $content = ob_get_contents();
- ob_end_clean();
-
- $pgflush = new PageFlush($new_socket, $curtime, 20, $header_out, $content);
-
- if ($pgflush->try_flush($curtime) == FALSE) {
- // Add $pgflush to the pgflush array
- array_push($this->pages_flush, $pgflush);
- }
- break;
- case SITE_PREFIX."index_rd_ifra.php":
- do {
- if (!isset($cookie['sess'])
- || (($user = $this->room->get_user($cookie['sess'], $idx)) == FALSE)) {
- $content = index_rd_ifra_fini(TRUE);
-
- $pgflush = new PageFlush($new_socket, $curtime, 20, $header_out, $content);
-
- if ($pgflush->try_flush($curtime) == FALSE) {
- // Add $pgflush to the pgflush array
- array_push($this->pages_flush, $pgflush);
- }
- break;
- }
- // close a previous opened index_read_ifra socket, if exists
- if (($prev = $user->rd_socket_get()) != NULL) {
- unset($this->s2u[intval($user->rd_socket_get())]);
- unset($this->socks[intval($user->rd_socket_get())]);
- fclose($user->rd_socket_get());
- printf("CLOSE AND OPEN AGAIN ON IFRA2\n");
- $user->rd_socket_set(NULL);
- }
-
- $content = "";
- index_rd_ifra_init($this->room, $user, $header_out, $content, $get, $post, $cookie);
-
- $response = headers_render($header_out, -1).chunked_content($content);
- $response_l = mb_strlen($response, "ASCII");
-
- $wret = @fwrite($new_socket, $response, $response_l);
- if ($wret < $response_l) {
- printf("TROUBLES WITH FWRITE: %d\n", $wret);
- $user->rd_cache_set(mb_substr($content, $wret, $response_l - $wret, "ASCII"));
- }
- else {
- $user->rd_cache_set("");
- }
- fflush($new_socket);
-
- $this->s2u[intval($new_socket)] = $idx;
- $this->socks[intval($new_socket)] = $new_socket;
- $user->rd_socket_set($new_socket);
- } while (FALSE);
-
- break;
-
- /* default: */
- /* $cl = strlen(SITE_PREFIX."briskin5/"); */
- /* if (!strncmp($this->path, SITE_PREFIX."briskin5/", $cl)) { */
- /* Bin5::page_manager($room, $header_out, substr($path,$cl), $method, $addr, $get, $post, $cookie); */
- }
- }
- else {
- printf("WARNING: ancillary_getstream failed\n");
- }
- }
- else {
- if (($buf = fread($sock, 512)) === FALSE) {
- printf("error read\n");
- exit(123);
- }
- else if (strlen($buf) === 0) {
- if ($sock === $this->list) {
- printf("Arrivati %d bytes da list\n", strlen($buf));
- }
- else if ($sock === $this->in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
- }
- else {
- // $user_a[$s2u[intval($sock)]]->disable();
- if ($this->room->user[$this->s2u[intval($sock)]]->rd_socket_get() != NULL) {
- $this->room->user[$this->s2u[intval($sock)]]->rd_socket_set(NULL);
- }
- unset($this->socks[intval($sock)]);
- unset($this->s2u[intval($sock)]);
- fclose($sock);
- printf("CLOSE ON READ\n");
- }
- if ($this->debug > 1) {
- printf("post unset\n");
- print_r($this->socks);
- }
- }
- else {
- if ($debug > 1) {
- print_r($read);
- }
- if ($sock === $this->list) {
- printf("Arrivati %d bytes da list\n", strlen($buf));
- }
- else if ($sock === $this->in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
- }
- else {
- $key = array_search("$sock", $this->socks);
- printf("Arrivati %d bytes dalla socket n. %d\n", strlen($buf), $key);
- }
- }
- }
- }
- }
-
-
- foreach ($this->pages_flush as $k => $pgflush) {
- if ($pgflush->try_flush($curtime) == TRUE) {
- unset($this->pages_flush[$k]);
- }
- }
-
- foreach ($this->socks as $k => $sock) {
- if (isset($this->s2u[intval($sock)])) {
- $user = $this->room->user[$this->s2u[intval($sock)]];
- $response = $user->rd_cache_get();
- if ($response == "") {
- $content = "";
- index_rd_ifra_main($this->room, $user, $content, $get, $post, $cookie);
-
- if ($content == "" && $user->rd_kalive_is_expired($curtime)) {
- $content = index_rd_ifra_keepalive($user);
- }
- if ($content != "") {
- $response = chunked_content($content);
- }
- }
-
- if ($response != "") {
- echo "SPIA: [".substr($response, 0, 60)."...]\n";
- $response_l = mb_strlen($response, "ASCII");
- $wret = @fwrite($sock, $response);
- if ($wret < $response_l) {
- printf("TROUBLE WITH FWRITE: %d\n", $wret);
- $user->rd_cache_set(mb_substr($response, $wret, $response_l - $wret, "ASCII"));
- }
- else {
- $user->rd_cache_set("");
- }
- fflush($sock);
- $user->rd_kalive_reset($curtime);
- }
-
- // close socket after a while to prevent client memory consumption
- if ($user->rd_endtime_is_expired($curtime)) {
- // $user_a[$s2u[intval($sock)]]->disable();
- if ($this->room->user[$this->s2u[intval($sock)]]->rd_socket_get() != NULL) {
- $this->room->user[$this->s2u[intval($sock)]]->rd_socket_set(NULL);
- }
- unset($this->socks[intval($sock)]);
- unset($this->s2u[intval($sock)]);
- fclose($sock);
- printf("CLOSE ON LOOP\n");
- }
- }
- }
- }
- }
-}
-
-function main()
-{
- if (($sap = Sac_a_push::create("/tmp/brisk.sock", 0, 0)) === FALSE) {
- exit(1);
- }