modification to fix explorer bug.
[brisk.git] / web / spush / brisk-spush.phh
1 <?php
2 /*
3  *  brisk - spush/brisk-spush.phh
4  *
5  *  Copyright (C) 2012 Matteo Nastasi
6  *                          mailto: nastasi@alternativeoutput.it 
7  *                                  matteo.nastasi@milug.org
8  *                          web: http://www.alternativeoutput.it
9  *
10  * This program is free software; you can redistribute it and/or modify
11  * it under the terms of the GNU General Public License as published by
12  * the Free Software Foundation; either version 2 of the License, or
13  * (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful, but
16  * WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18  * General Public License for more details. You should have received a
19  * copy of the GNU General Public License along with this program; if
20  * not, write to the Free Software Foundation, Inc, 59 Temple Place -
21  * Suite 330, Boston, MA 02111-1307, USA.
22  *
23  */
24
25 $DOCUMENT_ROOT="";
26 $HTTP_HOST="dodo.birds.lan";
27
28 class PageFlush {
29
30   var $socket; // socket handler of page stream
31   var $kalive; // if no message are sent after RD_KEEPALIVE_TOUT secs we send a keepalive from server
32   var $msg;    // place where store failed fwrite data
33   var $msg_sz; // size of content
34
35   function PageFlush($socket, $curtime, $kalive, $header_out, $body)
36   {
37       printf("TRY FLUSH CREATE\n");
38       // $body_sz = mb_strlen($body, "ASCII");
39       // add length to header_out 
40       $hea = headers_render($header_out, 0);
41
42       $this->socket = $socket;
43       $this->kalive = $curtime + $kalive;
44       $this->msg    = $hea.$body;
45       $this->msg_sz = mb_strlen($this->msg, "ASCII");
46   }
47
48   /* return TRUE if is removable from it's list */
49   function try_flush($curtime)
50   {
51       printf("TRY FLUSH IN\n");
52       if ($this->kalive < $curtime) {
53           printf("TRY FLUSH CLOSE 1\n");
54           fclose($this->socket);
55           return TRUE;
56       }   
57
58       $wret = @fwrite($this->socket, $this->msg);
59       if ($wret == FALSE && $wret !== FALSE) {
60           printf("TRY FLUSH PageFlush::try_flush: wret 0 but not FALSE\n");
61       }
62       if ($wret == $this->msg_sz) {
63           printf("TRY FLUSH CLOSE 2\n");
64           fclose($this->socket);
65           return TRUE;
66       }
67       $this->msg_sz -= $wret;
68       $this->msg    = mb_substr($this->msg, $wret, $this->msg_sz, "ASCII");
69
70       printf("TRY FLUSH RETURN FALSE\n");
71
72       return FALSE;
73   }
74
75 }
76
77 ?>