* Suite 330, Boston, MA 02111-1307, USA.
*
* TODO
- * problema con getpeer (HOSTADDR)
- * setcookie (for tables only)
- * keepalive
- * chunked
- * index_rd.php porting
- * index.php auth part
- * generic var management from internet
+ *
+ *
+ * - BUG: logout failed
+ * - BUG: fast loop on stream index_rd_ifra page
+ *
+ * - garbage management
+ * - log_legal address fix
+ * - from room to table
+ * - from table to room
+ * - index_wr other issues
+ * - manage and test cross forwarder between table and room
+ * - setcookie (for tables only)
+ * - keepalive management
+ *
+ * DONE/FROZEN - problema con getpeer (HOSTADDR)
+ *
+ * DONE - chunked
+ * DONE - bug: read from a not resource handle (already closed because a new socket substitute it)
+ * DONE - partial write for normal page management
+ * DONE - index_rd_ifra: last_clean issue
+ * DONE - fwrite failed error management (select, buffer where store unsent data, and fwrite check and retry)
+ * ABRT - index_wr.php::reload - reload is js-only function
+ * DONE - bug: after restart index_rd.php receive from prev clients a lot of req
+ * DONE - index_wr.php::chat
+ * DONE - index_wr.php::exit
+ * DONE - index_rd.php porting
+ * DONE - generic var management from internet
+ * DONE - index.php auth part
*/
$G_base = "../";
require_once("./sac-a-push.phh");
require_once("./brisk-spush.phh");
+require_once($G_base."Obj/user.phh");
require_once($G_base."Obj/brisk.phh");
require_once($G_base."Obj/auth.phh");
// require_once("../Obj/proxyscan.phh");
define('SITE_PREFIX', '/brisk/');
-class SPUser {
- var $id;
- var $sess;
- var $cnt;
- var $sock;
-
- function SPUser($id)
- {
- $this->id = $id;
- $this->cnt = -1;
- $this->sock = NULL;
- }
-
- function enable($sock, $sess)
- {
- $this->sess = $sess;
- $this->cnt = 0;
- $this->sock = $sock;
-
- return ($this->id);
- }
-
- function disable()
- {
- $this->cnt = -1;
- $this->sock = NULL;
- }
-
- function is_enable()
- {
- return ($this->cnt < 0 ? FALSE : TRUE);
- }
-
- function sock_get()
- {
- return $this->sock;
- }
-
- function sock_set($sock)
- {
- $this->sock = $sock;
- }
-
- function id_get()
- {
- return $this->id;
- }
-
- function sess_get()
- {
- return $this->sess;
- }
-
- function cnt_get()
- {
- return $this->cnt;
- }
-
- function cnt_inc()
- {
- return $this->cnt++;
- }
-}
-
-function user_get_free($user_arr)
-{
- foreach ($user_arr as $i => $user) {
- if (!$user->is_enable()) {
- return ($user);
- }
- }
- return FALSE;
-}
-
-function user_get_sess($user_arr, $sess)
-{
- foreach ($user_arr as $i => $user) {
- printf("SESS: [%s] cur: [%s]\n", $user->sess_get(), $sess);
- if ($user->sess_get() == $sess) {
- return ($user);
- }
- }
- return FALSE;
-}
-
-function headers_render($header)
+function headers_render($header, $len)
{
$s = "";
foreach($header as $key => $value) {
$s .= sprintf("%s: %s\r\n", $key, $value);
}
- $s .= "Mop: was/here\r\n";
+ if ($len == -1) {
+ $s .= "Cache-Control: no-cache, must-revalidate\r\n";
+ $s .= "Expires: Mon, 26 Jul 1997 05:00:00 GMT\r\n";
+ $s .= "Content-Encoding: chunked\r\n";
+ $s .= "Transfer-Encoding: chunked\r\n";
+ }
+ else if ($len > 0) {
+ $s .= sprintf("Content-Length: %d\r\n", $len);
+ }
$s .= "\r\n";
return ($s);
}
-
/*
* Caching system using ob php system to cache old style pages
* to a var and than send it with more calm
*/
-$G_headers = "";
function shutta()
{
/*
* MAIN
*/
-$shutdown = FALSE;
-function main()
+function chunked_content($content)
+{
+ $content_l = mb_strlen($content, "ASCII");
+
+ return (sprintf("%X\r\n%s\r\n", $content_l, $content));
+}
+
+function chunked_fini()
{
- GLOBAL $G_headers;
- GLOBAL $shutdown;
- $main_loop = TRUE;
+ return sprintf("0\r\n");
+}
- /*
- * INIT
- */
+class Sac_a_push {
+ static $fixed_fd = 2;
+
+ var $file_socket;
+ var $unix_socket;
+ var $socks;
+ var $s2u;
+ var $pages_flush;
- $FILE_SOCKET = "/tmp/brisk.sock";
- $UNIX_SOCKET = "unix://$FILE_SOCKET";
- $debug = 0;
- $fixed_fd = 2;
- $socks = array();
+ var $list;
+ var $in;
- $blocking_mode = 0; // 0 for non-blocking
+ var $debug;
+ var $blocking_mode;
- if (($room = Room::create()) == FALSE) {
- log_crit("load_data failed");
- return FALSE;
- }
+ var $room;
+ var $bin5;
- $s2u = array();
+ var $curtime;
- $rndstr = "";
- for ($i = 0 ; $i < 4096 ; $i++) {
- $rndstr .= chr(mt_rand(65, 90));
- }
+ var $rndstr;
+ var $main_loop;
- if (file_exists($FILE_SOCKET)) {
- unlink($FILE_SOCKET);
+ function Sac_a_push()
+ {
}
+
+ // Sac_a_push::create("/tmp/brisk.sock", 0, 0
+
+ static function create(&$room, $sockname, $debug, $blocking_mode)
+ {
+ $thiz = new Sac_a_push();
+
+ $thiz->room = $room;
+ $thiz->file_socket = $sockname;
+ $thiz->unix_socket = "unix://$sockname";
+ $thiz->debug = $debug;
+ $thiz->socks = array();
+ $thiz->s2u = array();
+ $thiz->pages_flush = array();
+
+ $thiz->blocking_mode = 0; // 0 for non-blocking
+
+ $thiz->rndstr = "";
+ for ($i = 0 ; $i < 4096 ; $i++) {
+ $thiz->rndstr .= chr(mt_rand(65, 90));
+ }
+
+ if (file_exists($thiz->file_socket)) {
+ unlink($thiz->file_socket);
+ }
- $old_umask = umask(0);
- if (($list = stream_socket_server($UNIX_SOCKET, $err, $errs)) === FALSE) {
- exit(11);
+ $old_umask = umask(0);
+ if (($thiz->list = stream_socket_server($thiz->unix_socket, $err, $errs)) === FALSE) {
+ return (FALSE);
+ }
+ 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);
}
- umask($old_umask);
- if (($in = fopen("php://stdin", "r")) === FALSE) {
- exit(11);
+ function socks_set($sock, $user)
+ {
+ $id = intval($sock);
+
+ $this->s2u[$id] = $user;
+ $this->socks[$id] = $sock;
}
- stream_set_blocking($list, $blocking_mode); # Set the stream to non-blocking
+ function socks_unset($sock)
+ {
+ $id = intval($sock);
+
+ unset($this->s2u[$id]);
+ unset($this->socks[$id]);
+ }
+
+ function pgflush_try_add(&$new_socket, $tout, $header_out, $content)
+ {
+ $pgflush = new PageFlush($new_socket, $this->curtime, $tout, $header_out, $content);
+
+ if ($pgflush->try_flush($this->curtime) == FALSE) {
+ // Add $pgflush to the pgflush array
+ $this->pgflush_add($pgflush);
+ }
+ }
- while ($main_loop) {
- echo "IN LOOP\n";
- /* Prepare the read array */
- if ($shutdown)
- $read = array_merge(array("$in" => $in), $socks);
- else
- $read = array_merge(array("$list" => $list, "$in" => $in), $socks);
+ function pgflush_add($pgflush)
+ {
+ array_push($this->pages_flush, $pgflush);
+ }
- if ($debug > 1) {
- printf("PRE_SELECT\n");
- print_r($read);
+ function run()
+ {
+ if ($this->main_loop) {
+ return (FALSE);
}
- $write = NULL;
- $except = NULL;
- $num_changed_sockets = stream_select($read, $write, $except, 1); // 0, 250000);
- if ($num_changed_sockets === FALSE) {
- printf("No data in 5 secs");
- }
- else if ($num_changed_sockets > 0) {
- printf("num sock %d num_of_socket: %d\n", $num_changed_sockets, count($read));
- if ($debug > 1) {
+ $this->main_loop = TRUE;
+
+ while ($this->main_loop) {
+ $this->curtime = time();
+ printf("IN LOOP: Current opened: %d pages_flush: %d - ", 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);
}
- /* At least at one of the sockets something interesting happened */
- foreach ($read as $i => $sock) {
- if ($sock === $list) {
- printf("NUOVA CONNEX\n");
- $new_unix = stream_socket_accept($list);
- $stream_info = "";
- $method = "";
- $get = array();
- $post = array();
- $cookie = array();
- if (($new_socket = ancillary_getstream($new_unix, $stream_info)) !== FALSE) {
- 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);
-
- switch ($path) {
- case SITE_PREFIX:
- case SITE_PREFIX."index.php":
- $header_out = array();
- ob_start();
- index_main($room, $header_out, $addr, $get, $post, $cookie);
- $content = ob_get_contents();
- ob_end_clean();
- // printf("OUT: [%s]\n", $G_content);
- fwrite($new_socket, headers_render($header_out).$content);
- fclose($new_socket);
- break;
- case SITE_PREFIX."index_wr.php":
+ $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 ");
+ }
+ 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) {
+ printf("NEW_SOCKET: %d\n", intval($new_socket));
+ 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();
- $addr = "";
- // $ret = socket_getpeername($new_socket, $addr);
- printf("RET: %s\n", $addr);
- // exit(123);
- ob_start();
- index_wr_main($room, $addr, $get, $post, $cookie);
- $content = ob_get_contents();
- ob_end_clean();
-
- // printf("OUT: [%s]\n", $G_content);
- fwrite($new_socket, headers_render($header_out).$content);
- fclose($new_socket);
- break;
- case SITE_PREFIX."index_rd_ifra.php":
- do {
- if (!isset($cookie['sess'])) {
- fclose($new_socket);
- break;
- }
- if (($user = $room->get_user($cookie['sess'], $idx)) == FALSE) {
- fclose($new_socket);
- break;
- }
- 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());
- $user->rd_socket_set(NULL);
- }
-
- $header_out = array();
- $body = "";
- index_rd_ifra_init($room, $user, $header_out, $body, $get, $post, $cookie);
- stream_set_blocking($new_socket, $blocking_mode); // Set the stream to non-blocking
- fwrite($new_socket, headers_render($header_out).$body);
- fflush($new_socket);
-
- $s2u[intval($new_socket)] = $idx;
- $socks[intval($new_socket)] = $new_socket;
- $user->rd_socket_set($new_socket);
- } while (FALSE);
- break;
+ $this->room->request_mgr($this, $header_out, $new_socket, $path, $addr, $get, $post, $cookie);
+ printf("number of sockets after %d\n", count($this->socks));
}
-
-
-
-
- if (0 == 1) {
- /* TODO: here stuff to decide if it is old or new user */
- if (($user_cur = user_get_sess($user_a, $get['sess'])) != FALSE) {
- /* close the previous socket */
- unset($s2u[intval($user_cur->sock_get())]);
- unset($socks[intval($user_cur->sock_get())]);
- fclose($user_cur->sock_get());
- /* assign the new socket */
- $user_cur->sock_set($new_socket);
- $id = $user_cur->id_get();
- $s2u[intval($new_socket)] = $id;
- $socks[intval($new_socket)] = $new_socket;
- fwrite($new_socket, $rndstr);
- fflush($new_socket);
- }
- else if (($user_cur = user_get_free($user_a)) != FALSE) {
- stream_set_blocking($new_socket, $blocking_mode); // Set the stream to non-blocking
- $socks[intval($new_socket)] = $new_socket;
-
- $id = $user_cur->id_get();
- $user_a[$id]->enable($new_socket, $get['sess']);
- printf("s2u: ci passo %d\n", intval($new_socket));
- $s2u[intval($new_socket)] = $id;
-
- fwrite($new_socket, $rndstr);
- fflush($new_socket);
- }
- else {
- printf("Too many opened users\n");
- fclose($new_socket);
- }
+ else {
+ printf("WARNING: ancillary_getstream failed\n");
}
}
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));
+ if (($buf = fread($sock, 512)) === FALSE) {
+ printf("error read\n");
+ exit(123);
}
- else if ($sock === $in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
+ 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->s2u[intval($sock)]->rd_socket_get() != NULL) {
+ $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 {
- // $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);
+ 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);
}
- unset($socks[intval($sock)]);
- unset($s2u[intval($sock)]);
- fclose($sock);
- }
- if ($debug > 1) {
- printf("post unset\n");
- print_r($socks);
}
}
- else {
- if ($debug > 1) {
- print_r($read);
+ }
+ }
+
+
+ /* manage unfinished pages */
+ foreach ($this->pages_flush as $k => $pgflush) {
+ if ($pgflush->try_flush($this->curtime) == TRUE) {
+ unset($this->pages_flush[$k]);
+ }
+ }
+
+ /* manage open streaming */
+ foreach ($this->socks as $k => $sock) {
+ if (isset($this->s2u[intval($sock)])) {
+ $user = $this->s2u[intval($sock)];
+ $response = $user->rd_cache_get();
+ if ($response == "") {
+ $content = "";
+ $user->stream_main($content, $get, $post, $cookie);
+
+ if ($content == "" && $user->rd_kalive_is_expired($this->curtime)) {
+ $content = $user->stream_keepalive();
}
- if ($sock === $list) {
- printf("Arrivati %d bytes da list\n", strlen($buf));
+ if ($content != "") {
+ $response = chunked_content($content);
}
- else if ($sock === $in) {
- printf("Arrivati %d bytes da stdin\n", strlen($buf));
+ }
+
+ 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 {
- $key = array_search("$sock", $socks);
- printf("Arrivati %d bytes dalla socket n. %d\n", strlen($buf), $key);
+ $user->rd_cache_set("");
+ }
+ fflush($sock);
+ $user->rd_kalive_reset($this->curtime);
+ }
+
+ // close socket after a while to prevent client memory consumption
+ if ($user->rd_endtime_is_expired($this->curtime)) {
+ if ($this->s2u[intval($sock)]->rd_socket_get() != NULL) {
+ $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");
}
}
- }
- }
-
-
-
+ } // foreach ($this->socks...
+ printf("\n");
+ } // while (...
+ } // function run(...
+}
- foreach ($socks as $k => $sock) {
- if (isset($s2u[intval($sock)])) {
- $body = "";
-
+function main()
+{
+ if (($room = Room::create()) == FALSE) {
+ log_crit("room::create failed");
+ exit(1);
+ }
- $body = "";
- $user = $room->user[$s2u[intval($sock)]];
- index_rd_ifra_main($room, $user, $body);
- if ($body == "" && $user->rd_tout_is_expired($curtime)) {
- $body = index_rd_ifra_keepalive($user);
- }
+ if (($s_a_p = Sac_a_push::create($room, "/tmp/brisk.sock", 0, 0)) === FALSE) {
+ exit(1);
+ }
- if ($body != "") {
- echo "SPIA: [".substr($body, 0, 60)."...]\n";
- fwrite($sock, $body);
- fflush($sock);
- $user->rd_tout_reset($curtime);
- }
+ $s_a_p->run();
- // close socket after a while to prevent client memory consumption
- if ($user->rd_endtime_is_expired($curtime)) {
- // $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);
- }
- }
- }
- }
-
exit(0);
}