- if ($pgflush->try_flush($curtime) == FALSE) {
- // Add $pgflush to the pgflush array
- array_push($pages_flush, $pgflush);
- }
- break;
- case SITE_PREFIX."index_rd_ifra.php":
- do {
- $header_out = array();
- if (!isset($cookie['sess'])
- || (($user = $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($pages_flush, $pgflush);
- }
- break;
- }
- // close a previous opened index_read_ifra socket, if exists
- if (($prev = $user->rd_socket_get()) != NULL) {
- unset($s2u[intval($user->rd_socket_get())]);
- unset($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($room, $user, $header_out, $content, $get, $post, $cookie);
- $content_l = mb_strlen($content, "ASCII");
-
- $wret = @fwrite($new_socket, headers_render($header_out).$content);
- if ($wret < $content_l) {
- printf("TROUBLES WITH FWRITE: %d\n", $wret);
- $user->rd_cache_set(mb_substr($content, $wret, $content_l - $wret, "ASCII"));
- }
- else {
- $user->rd_cache_set("");
- }
- fflush($new_socket);
-
- $s2u[intval($new_socket)] = $idx;
- $socks[intval($new_socket)] = $new_socket;
- $user->rd_socket_set($new_socket);
- } while (FALSE);
-
- break;
- }
- }
- 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 === $list) {
- printf("Arrivati %d bytes da list\n", strlen($buf));
- }
- else if ($sock === $in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
- }
- else {
- // $user_a[$s2u[intval($sock)]]->disable();
- if ($room->user[$s2u[intval($sock)]]->rd_socket_get() != NULL) {
- $room->user[$s2u[intval($sock)]]->rd_socket_set(NULL);
- }
- unset($socks[intval($sock)]);
- unset($s2u[intval($sock)]);
- fclose($sock);
- printf("CLOSE ON READ\n");
- }
- if ($debug > 1) {
- printf("post unset\n");
- print_r($socks);
- }
- }
- else {
- if ($debug > 1) {
- print_r($read);
- }
- if ($sock === $list) {
- printf("Arrivati %d bytes da list\n", strlen($buf));
- }
- else if ($sock === $in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
- }
- else {
- $key = array_search("$sock", $socks);
- printf("Arrivati %d bytes dalla socket n. %d\n", strlen($buf), $key);
- }
- }
- }
- }