by reference operator removed, add unset function on room class after it's usage
[brisk.git] / web / index_rd.php
1 <?php
2 /*
3  *  brisk - index_rd.php
4  *
5  *  Copyright (C) 2006-2011 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 $G_base = "";
26
27 require_once("Obj/brisk.phh");
28 // require_once("Obj/proxyscan.phh");
29 require_once("briskin5/Obj/briskin5.phh");
30
31 $S_load_stat = array( 'U_first_loop' => 0,
32                     'R_garbage'    => 0,
33                     'U_heavy'      => 0,
34                     'R_minusone'   => 0,
35                     'R_the_end'    => 0 );
36
37 $mlang_indrd = array( 
38                      'btn_backtotab'  => array('it' => ' torna ai tavoli ',
39                                                'en' => ' back to tables '),
40                      'btn_btotabsup'  => array('it' => ' grazie della donazione, torna ai tavoli ',
41                                                'en' => ' thank you for donation, back to tables ') 
42                      );
43
44 // Use of proxies isn't allowed.
45 // if (is_proxy()) {
46 //   sleep(5);
47 //   exit;
48 //}
49 log_load("index_rd.php");
50
51 $first_loop = TRUE;
52 $the_end = FALSE;
53
54 if (DEBUGGING == "local" && $_SERVER['REMOTE_ADDR'] != '127.0.0.1') {
55   echo "Debugging time!";
56   exit;
57 }
58
59 function shutta()
60 {
61   log_rd2("SHUTTA!".connection_status());
62 }
63
64
65 register_shutdown_function(shutta);
66
67 function unrecerror()
68 {
69   GLOBAL $is_page_streaming;
70
71   $is_page_streaming = TRUE;
72   log_rd2("UNREC_ERROR:".var_export(debug_backtrace()));
73   return (sprintf('the_end=true; window.onunload = null; window.onbeforeunload = null; document.location.assign("index.php");'));
74 }
75
76 function page_sync($sess, $page, $table_idx, $table_token)
77 {
78   GLOBAL $is_page_streaming;
79
80   log_rd2("page_sync:".var_export(debug_backtrace()));
81
82   $is_page_streaming = TRUE;
83
84   log_rd2("PAGE_SYNC");
85   return (sprintf('createCookie("table_idx", %d, 24*365, cookiepath); createCookie("table_token", "%s", 24*365, cookiepath); the_end=true; window.onunload = null; window.onbeforeunload = null; document.location.assign("%s");', $table_idx, $table_token, $page));
86 }
87
88
89
90
91 function maincheck($sess, $cur_stat, $cur_subst, $cur_step, &$new_stat, &$new_subst, &$new_step)
92 {
93     GLOBAL $G_lang, $mlang_indrd, $is_page_streaming, $first_loop;
94     GLOBAL $G_with_splash, $G_splash_content, $G_splash_interval, $G_splash_idx;
95     GLOBAL $G_splash_w, $G_splash_h, $G_splash_timeout;
96     $CO_splashdate = "CO_splashdate".$G_splash_idx;
97     GLOBAL $$CO_splashdate;
98     
99     GLOBAL $S_load_stat;
100
101     log_rd("maincheck begin");
102
103     $ret = FALSE;
104     $room = FALSE;
105     $user = FALSE;
106     $curtime = time();
107     
108     if (($proxy_step = User::step_get($sess)) == FALSE) {
109         log_only2("R");
110         return (FALSE);
111     }
112     
113     // log_rd2("M");
114     /* Sync check (read only without modifications */
115     ignore_user_abort(TRUE);
116     if  ($first_loop == TRUE) {
117         if (($sem = Room::lock_data()) != FALSE) { 
118             // Aggiorna l'expire time lato server
119             $S_load_stat['U_first_loop']++;
120             if (($user = User::load_data($proxy_step['i'], $sess)) == FALSE) {
121                 Room::unlock_data();
122                 ignore_user_abort(FALSE);
123                 return (unrecerror());
124             }
125             $user->lacc = $curtime;
126             User::save_data($user, $user->idx);
127             
128             if (Room::garbage_time_is_expired($curtime)) {
129                 log_only("F");
130                 
131                 $S_load_stat['R_garbage']++;
132                 if (($room = Room::load_data()) != FALSE) {
133                     log_main("pre garbage_manager TRE");
134                     $room->garbage_manager(FALSE);
135                     Room::save_data($room);
136                     unset($room);
137                 }
138             }
139             log_lock("U");
140             Room::unlock_data($sem);
141             ignore_user_abort(FALSE);
142         } // if (($sem = Room::lock_data()) != FALSE) { 
143         else {
144             // wait 20 secs, then restart the xhr 
145             ignore_user_abort(FALSE);
146             
147             return ("sleep(gst,20000);|xhr_rd_abort(xhr_rd);");
148         }
149         $first_loop = FALSE;
150     } // if  ($first_loop == TRUE) {
151     
152     if ($cur_step == $proxy_step['s']) {
153         log_lock("P");
154         return (FALSE);
155     }
156     else {
157         log_only2("R");
158     }
159     
160
161     if ($user == FALSE) {
162         do {
163             ignore_user_abort(TRUE);
164             if (($sem = Room::lock_data()) == FALSE) 
165                 break;
166             
167             log_lock("P");
168             $S_load_stat['U_heavy']++;
169             if (($user = User::load_data($proxy_step['i'], $sess)) == FALSE) {
170                 break;
171             }
172         } while (0);
173         
174         if ($sem != FALSE)
175             Room::unlock_data($sem);
176         
177         ignore_user_abort(FALSE);
178         if ($user == FALSE) {
179             return (unrecerror());
180         }
181     }
182     
183     /* Nothing changed, return. */
184     if ($cur_step == $user->step) 
185         return (FALSE);
186     
187     log_rd2("do other cur_stat[".$cur_stat."] user->stat[".$user->stat."] cur_step[".$cur_step."] user_step[".$user->step."]");
188     
189     if ($cur_step == -1) {
190         /*
191          *  if $cur_step == -1 load the current state from the main struct
192          */
193         ignore_user_abort(TRUE);
194         $sem = Room::lock_data();
195         $room = Room::load_data();
196         $S_load_stat['R_minusone']++;
197         
198         /* unset the $user var to reload it from main structure */
199         unset($user);
200         if (($user = $room->get_user($sess, $idx)) == FALSE) {
201             Room::unlock_data($sem);
202             ignore_user_abort(FALSE);
203             return (unrecerror());
204         }
205         
206         if ($user->the_end) { 
207             log_rd2("main_check: the end".var_export(debug_backtrace()));
208             $is_page_streaming = TRUE;
209         }
210         
211         if ($user->trans_step != -1) {
212             log_rd2("TRANS USATO ".$user->trans_step);
213             $cur_step = $user->trans_step;
214             $user->trans_step = -1;
215             
216             Room::save_data($room);
217             Room::unlock_data($sem);
218             ignore_user_abort(FALSE);
219         }
220         else {
221             log_rd2("TRANS NON ATTIVATO");
222             //        ARRAY_POP DISABLED
223             //        log_rd2("TRANS NON ATTIVATO, clean del comm array");
224             //        while (($el = array_pop($user->comm)) != NULL) { 
225             //          log_rd2("clean element [".$el."]");
226             //        }
227             //        //        $user->step_inc(COMM_N + 1);
228             //        Room::save_data($room);
229             //        //        $new_step = $user->step;
230             
231             Room::unlock_data($sem);
232             ignore_user_abort(FALSE);
233         }
234     }
235     
236     
237     /* this part I suppose is read only on $room structure */
238     if ($cur_step == -1) {
239         log_rd2("PRE-NEWSTAT: ".$user->stat);
240         
241         if ($user->stat == 'room') {
242             log_rd("roomma ".$user->step);
243             $curtime = time();
244             
245             if ($G_with_splash &&
246                 ($$CO_splashdate < $curtime - $G_splash_interval ||
247                  $$CO_splashdate > $curtime)) {
248                 $is_super = $user->flags & USER_FLAG_TY_SUPER;
249                 $ret .=  show_notify_ex(str_replace("\n", " ", $G_splash_content[$G_lang]), 
250                                         ($is_super ? 0 : $G_splash_timeout), 
251                                         $mlang_indrd[($is_super ? 'btn_btotabsup' : 'btn_backtotab')][$G_lang], 
252                                         $G_splash_w, $G_splash_h, true, 
253                                         ($is_super ? 0 : $G_splash_timeout));
254                 $ret .= sprintf('|createCookie("CO_splashdate%d", %d, 24*365, cookiepath);', $G_splash_idx, $curtime);
255             }
256             $ret .= $room->show_room($user->step, $user);
257             
258             // TODO uncomment and test
259             /* NOTE the sets went common */
260             $new_stat =  $user->stat;
261             $new_subst = $user->subst;
262             $new_step =  $user->step;
263         }
264         /***************
265          *             *
266          *    TABLE    *
267          *             *
268          ***************/
269         else if ($user->stat == 'table') {
270             log_load("RESYNC");
271             return (page_sync($user->sess, "briskin5/index.php", $user->table, $user->table_token));
272         }
273         log_rd2("NEWSTAT: ".$user->stat);
274     }
275     else {
276         // TODO: verify if we can use only $user struct 
277         ignore_user_abort(TRUE);
278         $sem = Room::lock_data();
279         $S_load_stat['U_heavy']++;
280         if (($user = User::load_data($proxy_step['i'], $sess)) == FALSE) {
281             Room::unlock_data();
282             ignore_user_abort(FALSE);
283             return (unrecerror());
284         }
285         
286         if ($cur_step < $user->step) {
287             do {
288                 if ($cur_step + COMM_N < $user->step) {
289                     if (($cur_stat != $user->stat)) {
290                         $to_stat = $user->stat;
291                         Room::unlock_data($sem);
292                         ignore_user_abort(FALSE);
293                         log_load("RESYNC");
294                         return (page_sync($user->sess, ($to_stat == "table" ? "briskin5/index.php" : "index.php"), $user->table, $user->table_token));
295                     }
296                     log_rd2("lost history, refresh from scratch");
297                     $new_step = -1;
298                     break;
299                 } 
300                 for ($i = $cur_step ; $i < $user->step ; $i++) {
301                     log_rd2("ADDED TO THE STREAM: ".$user->comm[$i % COMM_N]);
302                     $ret .= $user->comm[$i % COMM_N];
303                 }
304                 $new_stat =  $user->stat;
305                 $new_subst = $user->subst;
306                 $new_step =  $user->step;
307             } while (0);
308             
309             log_mop($user->step, 'index_rd.php: after ret set');
310             
311           if ($user->the_end == TRUE) {
312               log_rd2("LOGOUT BYE BYE!!");
313               log_auth($user->sess, "Explicit logout.");
314               
315               $S_load_stat['R_the_end']++;
316               $room = Room::load_data();
317               unset($user);
318               if (($user = $room->get_user($sess, $idx)) == FALSE) {
319                   Room::unlock_data($sem);
320                   ignore_user_abort(FALSE);
321                   return (unrecerror());
322               }              
323               $user->reset();
324               
325               if ($user->subst == 'sitdown') {
326                   log_load("ROOM WAKEUP");
327                   $room->room_wakeup($user);
328               }
329               else if ($user->subst == 'standup')
330                   $room->room_outstandup($user);
331               else
332                   log_rd2("LOGOUT FROM WHAT ???");
333               
334               Room::save_data($room);
335           }
336       }
337       
338       Room::unlock_data($sem);
339       ignore_user_abort(FALSE);
340   }
341   
342   
343   return ($ret);
344 }
345
346 /*
347  *  MAIN
348  */
349
350 /*
351    FROM THE EXTERN 
352    sess
353    stat
354    step
355 */
356
357 $is_page_streaming =  (stristr($HTTP_USER_AGENT, "MSIE") || stristr($HTTP_USER_AGENT, "CHROME") ? TRUE : FALSE);
358
359 header("Cache-Control: no-cache, must-revalidate"); // HTTP/1.1
360 header("Expires: Mon, 26 Jul 1997 05:00:00 GMT"); // Date in the past
361 header('Content-type: application/xml; charset="utf-8"',true);
362 // header('Content-type: text/plain; charset="utf-8"',true);
363 // header('Content-type: text/html; charset="utf-8"',true);
364
365 if (!isset($myfrom))
366      $myfrom = "";
367 if (!isset($subst))
368      $subst = "";
369 log_rd2("FROM OUTSIDE - STAT: ".$stat." SUBST: ".$subst." STEP: ".$step." MYFROM: ".$myfrom. "IS_PAGE:" . $is_page_streaming);
370
371
372 $endtime = time() + STREAM_TIMEOUT;
373 $old_stat =  $stat;
374 $old_subst = $subst;
375 $old_step =  $ext_step = $step;
376
377 for ($i = 0 ; time() < $endtime ; $i++) {
378   // log_rd("PRE MAIN ".$step);;
379   $pre_main = gettimeofday(TRUE);
380   if (($ret = maincheck($sess, $old_stat, $old_subst, $old_step, &$stat, &$subst, &$step)) != FALSE) {
381     echo '@BEGIN@';
382     // 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));
383     echo "$ret";
384     echo ' @END@'; 
385     log_send("IS_PAGE: ".($is_page_streaming == TRUE ? "TRUE" : "FALSE")."EXT_STEP: ".$ext_step." ENDTIME: [".$endtime."] ".$ret);
386     flush();
387     log_mop(0, 'index_rd.php: after flush (begin: '.sprintf("%f", $pre_main).')');
388     if ($is_page_streaming)
389       break;
390   }
391   $old_stat =  $stat;
392   $old_subst = $subst;
393   $old_step =  $step;
394   // log_rd("POST MAIN ".$step);;
395   usleep(400000);
396   if (($i % 10) == 0) {
397     // log_rd2("TIME: ".time());
398     echo '_';
399     flush();
400   }
401  }
402
403 $s = "[".$sess."] index_rd.php stats: ";
404 foreach ($S_load_stat as $key => $value) {
405     $s .= sprintf("%s: %d - ", $key, $value);
406 }
407 log_crit($s);
408
409
410 ?>