5 * Copyright (C) 2006-2007 matteo.nastasi@milug.org
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
12 * This program is distributed in the hope that it will be useful, but
13 * WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 * General Public License for more details. You should have received a
16 * copy of the GNU General Public License along with this program; if
17 * not, write to the Free Software Foundation, Inc, 59 Temple Place -
18 * Suite 330, Boston, MA 02111-1307, USA.
24 require_once("../Obj/brisk.phh");
25 require_once("Obj/briskin5.phh");
27 log_load("LOAD: bin5/index_rd.php ".$QUERY_STRING);
32 if (DEBUGGING == "local" && $_SERVER['REMOTE_ADDR'] != '127.0.0.1') {
33 echo "Debugging time!";
39 log_rd2("bin5 SHUTTA!".connection_status());
43 register_shutdown_function(shutta);
47 GLOBAL $is_page_streaming;
49 $is_page_streaming = TRUE;
50 log_rd2("UNREC_ERROR");
51 return (sprintf('the_end=true; window.onunload = null; document.location.assign("../index.php");'));
54 function page_sync($sess, $page)
56 GLOBAL $is_page_streaming;
58 $is_page_streaming = TRUE;
60 return (sprintf('the_end=true; window.onunload = null; document.location.assign("%s");', $page));
66 function maincheck($sess, $cur_stat, $cur_subst, $cur_step, &$new_stat, &$new_subst, &$new_step, $table_idx, $table_token)
68 GLOBAL $is_page_streaming, $first_loop;
74 /* Sync check (read only without modifications */
75 ignore_user_abort(TRUE);
76 if (($sem = Briskin5::lock_data($table_idx)) != FALSE) {
77 // Aggiorna l'expire time lato server
78 if ($first_loop == TRUE) {
81 // VERIFICARE TUTTE LE LOAD_DATA E PRENDERE CONTROMISURE NEL CASO FALLISCANO //
83 if (($bri = &Briskin5::load_data($table_idx, $table_token)) == FALSE) {
84 Briskin5::unlock_data($sem);
85 ignore_user_abort(FALSE);
86 return (unrecerror());
88 if (($user = &$bri->get_user($sess, $idx)) == FALSE) {
89 Briskin5::unlock_data($sem);
90 ignore_user_abort(FALSE);
91 return (unrecerror());
93 log_auth($sess, "bin5::update lacc");
96 $bri->garbage_manager(FALSE);
98 Briskin5::save_data($bri);
103 Briskin5::unlock_data($sem);
104 ignore_user_abort(FALSE);
110 if (($proxy_step = step_get($sess)) != FALSE) {
111 // log_rd2("Postget".$proxy_step."zizi");
113 if ($cur_step == $proxy_step) {
127 ignore_user_abort(TRUE);
128 if (($sem = Briskin5::lock_data($table_idx)) == FALSE)
132 if (($bri = &Briskin5::load_data($table_idx, $table_token)) == FALSE)
137 Briskin5::unlock_data($sem);
139 ignore_user_abort(FALSE);
141 return (unrecerror());
144 if (($user = &$bri->get_user($sess, $idx)) == FALSE) {
145 return (unrecerror());
148 /* Nothing changed, return. */
149 if ($cur_step == $user->step)
152 log_rd2("do other ++".$cur_stat."++".$user->stat."++".$cur_step."++".$user->step);
154 if ($cur_step == -1) {
155 // FUNZIONE from_scratch DA QUI
156 ignore_user_abort(TRUE);
157 $sem = Briskin5::lock_data($table_idx);
158 $bri = &Briskin5::load_data($table_idx, $table_token);
159 if (($user = &$bri->get_user($sess, $idx)) == FALSE) {
160 Briskin5::unlock_data($sem);
161 ignore_user_abort(FALSE);
162 return (unrecerror());
165 $is_page_streaming = TRUE;
168 if ($user->trans_step != -1) {
169 log_rd2("TRANS USATO ".$user->trans_step);
170 $cur_step = $user->trans_step;
171 $user->trans_step = -1;
174 Briskin5::save_data($bri);
175 Briskin5::unlock_data($sem);
176 ignore_user_abort(FALSE);
179 log_rd2("TRANS NON ATTIVATO");
180 Briskin5::unlock_data($sem);
181 ignore_user_abort(FALSE);
185 if ($cur_step == -1) {
186 log_rd2("PRE-NEWSTAT.");
193 if ($user->stat == "table") {
194 $ret = show_table(&$bri,&$user,$user->step,FALSE,FALSE);
196 log_rd2("SENDED TO THE STREAM: ".$ret);
198 log_rd2("NEWSTAT: ".$user->stat);
200 $new_stat = $user->stat;
201 $new_subst = $user->subst;
202 $new_step = $user->step;
205 ignore_user_abort(TRUE);
206 $sem = Briskin5::lock_data($table_idx);
207 $bri = &Briskin5::load_data($table_idx, $table_token);
208 if (($user = &$bri->get_user($sess, $idx)) == FALSE) {
209 Briskin5::unlock_data($sem);
210 ignore_user_abort(FALSE);
211 return (unrecerror());
213 if ($cur_step < $user->step) {
215 if ($cur_step + COMM_N < $user->step) {
216 if (($cur_stat != $user->stat)) {
217 $to_stat = $user->stat;
218 Briskin5::unlock_data($sem);
219 ignore_user_abort(FALSE);
220 return (page_sync($user->sess, $to_stat == "table" ? "index.php" : "../index.php"));
222 log_rd2("lost history, refresh from scratch");
226 for ($i = $cur_step ; $i < $user->step ; $i++) {
228 log_wr("TRY RET ".$i." COMM_N ".COMM_N." II ".$ii);
229 $ret .= $user->comm[$ii];
231 $new_stat = $user->stat;
232 $new_subst = $user->subst;
233 $new_step = $user->step;
236 if ($user->the_end == TRUE) {
237 log_rd2("LOGOUT BYE BYE!!");
238 log_auth($user->sess, "Explicit logout.");
239 $tmp_sess = $user->sess;
241 step_unproxy($tmp_sess);
244 $user->the_end = FALSE;
246 if ($user->subst == 'sitdown')
247 $bri->room_wakeup(&$user);
248 else if ($user->subst == 'standup')
249 $bri->room_outstandup(&$user);
251 log_rd2("LOGOUT FROM WHAT ???");
253 Briskin5::save_data($bri);
257 Briskin5::unlock_data($sem);
258 ignore_user_abort(FALSE);
276 $is_page_streaming = ((stristr($HTTP_USER_AGENT, "linux") &&
277 (stristr($HTTP_USER_AGENT, "firefox") || stristr($HTTP_USER_AGENT, "iceweasel"))) ? FALSE : TRUE);
280 header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
281 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past
287 log_rd2("FROM OUTSIDE - STAT: ".$stat." SUBST: ".$subst." STEP: ".$step." MYFROM: ".$myfrom. "IS_PAGE:" . $is_page_streaming."USER_AGENT:".$HTTP_USER_AGENT);
290 $endtime = time() + STREAM_TIMEOUT;
293 $old_step = $ext_step = $step;
295 for ($i = 0 ; time() < $endtime ; $i++) {
296 // log_rd("PRE MAIN ".$step);;
297 if (($ret = maincheck($sess, $old_stat, $old_subst, $old_step, &$stat, &$subst, &$step, $table_idx, $table_token)) != FALSE) {
299 // log_rd2(sprintf("\nSESS: [%s]\nOLD_STAT: [%s] OLD_SUBST: [%s] OLD_STEP: [%s] \nSTAT: [%s] SUBST: [%s] STEP: [%s] \nCOMM: [%s]\n", $sess, $old_stat, $old_subst, $old_step, $stat, $subst, $step, $ret));
302 log_send("EXT_STEP: ".$ext_step." ENDTIME: [".$endtime."] ".$ret);
304 if ($is_page_streaming)
310 // log_rd("POST MAIN ".$step);;
313 // log_rd2("TIME: ".time());