typos fixed
[brisk.git] / web / index_wr.php
1 <?php
2 /*
3  *  brisk - index_wr.php
4  *
5  *  Copyright (C) 2006-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 // require_once("Obj/brisk.phh");
26 // require_once("Obj/auth.phh");
27 // require_once("Obj/proxyscan.phh");
28
29 // Use of proxies isn't allowed.
30 // if (is_proxy()) {
31 //   sleep(5);
32 //   exit;
33 // }
34
35 $mlang_indwr = array( 'btn_backtotab' => array( 'it' => 'Torna ai tavoli.',
36                                                 'en' => 'Back to tables.' ),
37                       'warrrepl'  => array( 'it' => '<br>Il nominativo &egrave; stato inoltrato all\'amministratore.<br><br>Nell\'arco di pochi giorni verr&agrave;<br><br>notificata al garantito l\'avvenuta registrazione.',
38                                             'en' => '<br>The subscription was forwarded to the administrator.<br><br>In a few days we will notify<br><br>your friend the occurred registration.'),
39                       'btn_close' => array( 'it' => 'chiudi',
40                                             'en' => 'close' ),
41                       'commerr' => array( 'it' => '<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>',
42                                           'en' => '<b>An error was occurred during the saving, try again or contact the administrator.</b>'),
43                       'coerrdb' => array( 'it' => '<b>Il database è temporaneamente irraggiungibile, riprova più tardi o contatta l\'amministratore.</b>',
44                                           'en' => '<b>The database is temporarly unavailable, retry to later or conctact the administrator.</b>'),
45                       'warrmust' => array( 'it' => '<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>',
46                                            'en' => 'To authenticate somebody you have to be authenticated in your turn'),
47                       'mesgrepl' => array( 'it' => '<br><br>Il messaggio &egrave; stato inoltrato all\'amministratore.',
48                                            'en' => '<br><br>The message was forwarded to the administrator'),
49                       'mesgmust' => array( 'it' => '<b>Per mandare messaggi all\'amministratore devi essere autenticato.</b>',
50                                            'en' => 'To send a message to the administrator you have to be authenticated'),
51                       'shutmsg'  => array( 'it' => '<b>Il server sta per essere riavviato, non possono avere inizio nuove partite.</b>',
52                                            'en' => '<b>The server is going to be rebooted, new games are not allowed.</b>'),
53                       'mustauth' => array( 'it' => '<b>Il tavolo a cui volevi sederti richiede autentifica.</b>',
54                                            'en' => '<b>the table where you want to sit require authentication</b>'),
55                       'tabwait_a'=> array( 'it' => '<b>Il tavolo si &egrave; appena liberato, ci si potr&agrave; sedere tra ',
56                                            'en' => '<b>The table is only just opened, you will sit down in '), // FIXME
57                       'tabwait_b'=> array( 'it' => ' secondi.</b>',
58                                            'en' => ' seconds.</b>'),
59                       'mustfirst'=> array( 'it' => '<b>Il tuo utente può sedersi al tavolo solo per primo.</b>',
60                                            'en' => '<b>Your can sit down as first user only.' ),
61                       'pollmust' => array( 'it' => '<b>Per partecipare al sondaggio devi essere autenticato.</b>',
62                                            'en' => '<b>To vote for the poll you have to be authenticated</b>'),
63                       'pollnone' => array( 'it' => '<br><br>Al momento non è attivo alcun sondaggio.',
64                                            'en' => '<br><br>At this moment no polls are active.'),
65                       'pollchoo' => array( 'it' => '<br><br>Non hai espresso nessuna preferenza.',
66                                            'en' => '<br><br>You don\'t choose any preference, do it'), 
67                       'pollagai' => array( 'it' => '<br>Per questo sondaggio hai già votato.<br><br>Non si può esprimere la propria preferenza più di una volta.',
68                                            'en' => '<br>You just express your preference about this poll.<br><br>You cannot do it again.'),
69                       'pollrec'  => array ('it' => '<br><br>Il tuo voto è stato registrato.',
70                                            'en' => '<br><br>Your vote had be stored.'),
71                       'badwake_a'=> array( 'it' => '<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori.<br><br>Dovrai aspettare ancora ',
72                                            'en' => '<br>You stand up without the permission of the other players.<br><br>You will wait '),
73                       'badwake_b'=> array( 'it' => ' prima di poterti sedere nuovamente.',
74                                            'en' => ' before you can sit down again.'),
75                       'btn_stays'=> array( 'it' => 'resta in piedi.',
76                                            'en' => 'stay standing.'),
77                       'badsit_a' => array( 'it' => '<br>Tu o qualcuno col tuo stesso indirizzo IP si è alzato da un tavolo senza il consenso degli altri giocatori.<br><br>Dovrai aspettare ancora ',
78                                            'en' => '<br>You or someone with your same IP address is standing up from a table without the permission of the other players <br><br>You will wait '), 
79                       'badsit_b' => array( 'it' => ' prima di poterti sedere nuovamente.<br><br>Se non sei stato tu ad alzarti e possiedi un login con password, autenticandoti con quello, potrai accedere.',
80                                            'en' => ' before you can sit down again. If you don\'t leave the table and you have a login with a password, authenticating with this one you will access')
81
82                       );
83
84 function index_wr_main(&$room, $remote_addr_full, $get, $post, $cookie)
85 {
86     GLOBAL $G_shutdown, $G_black_list, $G_lang, $G_room_help, $G_room_about, $G_room_passwdhowto, $mlang_indwr;
87
88     $remote_addr = addrtoipv4($remote_addr_full);
89
90     log_load("index_wr.php");
91
92     if (($mesg = gpcs_var('mesg', $get, $post, $cookie)) === FALSE) 
93         unset($mesg);
94
95     if (($sess = gpcs_var('sess', $get, $post, $cookie)) === FALSE)
96         $sess = "";
97
98
99     if (DEBUGGING == "local" && $remote_addr != '127.0.0.1') {
100         echo "Debugging time!";
101         return (FALSE);
102     }
103
104     /*
105      *  MAIN
106      */
107
108     /* if the IP is banned, exit without do nothing */
109     if (array_search($remote_addr, $G_black_list) !== FALSE) {
110         // TODO: find a way to add a nonblocking sleep(5) here
111         return (FALSE);
112     }
113
114     $is_spawn = FALSE;
115
116     log_wr(0, 'index_wr.php: COMM: '.xcapemesg($mesg));
117     log_wr('COMM: '.xcapemesg($mesg));
118
119     $curtime = time();
120     $dt = date("H:i ", $curtime);
121
122     if (($user = $room->get_user($sess, &$idx)) == FALSE) {
123         $argz = explode('|', xcapemesg($mesg));
124
125         if ($argz[0] == 'getchallenge') {
126             if (isset($get['cli_name']))
127                 $cli_name = $get['cli_name'];
128             if (($a_sem = Challenges::lock_data(TRUE)) != FALSE) { 
129                 log_main("chal lock data success");
130                 
131                 if (($chals = &Challenges::load_data()) != FALSE) {
132                     
133                     $token =  uniqid("");
134                     // echo '2|'.$argz[1].'|'.$token.'|'.$remote_addr.'|'.$curtime.'|';
135                     // exit;
136                     
137                     if (($login_new = validate_name(urldecode($cli_name))) != FALSE) {
138                         if ($chals->add($login_new, $token, $remote_addr, $curtime) != FALSE) {
139                             log_send("SUCCESS: token:".$token);
140                             echo '0|'.$token;
141                         }
142                         else {
143                             log_send("getchallenge FAILED");
144                             echo '1|';
145                         }
146                     }
147                     else {
148                         log_send("getchallenge FAILED");
149                         echo '1|';
150                     }
151                     if ($chals->ismod()) {
152                         Challenges::save_data(&$chals);
153                     }
154                 }
155                 
156                 
157                 Challenges::unlock_data($a_sem);
158             }
159             else {
160                 echo "CHALLENGE LOCK FAILED\n";
161                 return FALSE;
162             }
163         }
164         else if ($argz[0] == 'auth') {
165             printf("challenge|ok");
166         }
167         else if ($argz[0] == 'help') {
168             /* MLANG: "torna ai tavoli" */
169             echo show_notify(str_replace("\n", " ", $G_room_help[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 600, 500);
170         }
171         else if ($argz[0] == 'about') {
172             echo show_notify(str_replace("\n", " ", $G_room_about[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 230);
173         }
174         else if ($argz[0] == 'passwdhowto') {
175             echo show_notify(str_replace("\n", " ", $G_room_passwdhowto[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 200);
176         }
177         else if ($argz[0] == 'roadmap') {
178             echo show_notify(str_replace("\n", " ", $G_room_roadmap[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 200);
179         }
180         else if ($argz[0] == 'placing') {
181             require_once("briskin5/Obj/briskin5.phh");
182             require_once("briskin5/Obj/placing.phh");
183             
184             echo show_notify(str_replace("\n", " ", placings_show(FALSE)), 0, $mlang_indwr['btn_close'][$G_lang], 800, 600);
185         }
186         else if ($argz[0] == 'whysupport') {
187             echo show_notify(str_replace("\n", " ", $G_room_whysupport[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lng], 400, 200);
188         }
189         else { 
190             log_wr("Get User Error");
191             echo "Get User Error:" + $argz[0];
192             return FALSE;
193         }
194         return TRUE;
195     }
196
197     $argz = explode('|', xcapemesg($mesg));
198
199     log_wr('POSTSPLIT: '.$argz[0]);
200
201     // LACC UPDATED
202     $user->lacc = $curtime;
203
204     if (array_search($user->ip, $G_black_list) !== FALSE) {
205         // TODO: find a way to add a nonblocking sleep(5) here
206         return (FALSE);
207     }
208
209     if ($argz[0] == 'ping') {
210         log_wr("PING RECEIVED");
211     }
212     else if ($argz[0] == 'prefs') {
213         if ($argz[1] == 'save') {
214             if (!isset($post['prefs'])) {
215                 return FALSE;
216             }
217
218             if (($prefs = Client_prefs::from_json($post['prefs'])) == FALSE) {
219                 $prefs = Client_prefs::from_user($user);
220             }
221             $prefs->store($user, TRUE);
222         }
223         else { // reset case as default
224             $prefs = Client_prefs::from_user($user);
225         }
226         $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
227         $user->comm[$user->step % COMM_N] .=  sprintf('prefs_load(\'%s\', true, %s);', json_encode($prefs),
228                                                       'false');
229         $user->step_inc();
230
231         if ($argz[1] == 'save') {
232             if ($user->stat == 'room' && $user->subst == 'standup') {
233                 $room->standup_update($user);
234             }
235             else if ($user->stat == 'room' && $user->subst == 'sitdown') {
236                 log_main("chatt_send pre table update");
237                 $room->table_update($user);
238                 log_main("chatt_send post table update");
239             }
240         }
241         echo "1";
242         return TRUE;
243     }
244     else if ($argz[0] == 'shutdown') {
245         log_auth($user->sess, "Shutdown session.");
246
247         $user->reset();
248
249         log_rd2("AUTO LOGOUT.");
250         if ($user->subst == 'sitdown' || $user->stat == 'table')
251             $room->room_wakeup($user);
252         else if ($user->subst == 'standup')
253             $room->room_outstandup(&$user);
254         else {
255             log_rd2("SHUTDOWN FROM WHAT ???");
256         }
257     }
258     else if ($argz[0] == 'warranty') {
259         if (($cli_name = gpcs_var('cli_name', $get, $post, $cookie)) === FALSE) 
260             $cli_name = "";
261         
262         if (($cli_email = gpcs_var('cli_email', $get, $post, $cookie)) === FALSE)
263             $cli_email = "";
264
265         
266         $mesg_to_user = "";
267         
268         log_wr("INFO:SKIP:argz == warranty name: [".$cli_name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
269         if ($user->flags & USER_FLAG_AUTH) {
270             if (($wa_lock = Warrant::lock_data(TRUE)) != FALSE) {
271                 if (($fp = @fopen(LEGAL_PATH."/warrant.txt", 'a')) != FALSE) {
272                     /* Unix time | session | nickname | IP | where was | mesg */
273                     fwrite($fp, sprintf("%ld|%s|%s|%s|\n", $curtime, xcapelt($user->name), xcapelt(urldecode($cli_name)), xcapelt(urldecode($cli_email))));
274                     fclose($fp);
275                 }
276                 Warrant::unlock_data($wa_lock);
277                 $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
278                 /* MLANG: "<br>Il nominativo &egrave; stato inoltrato all\'amministratore.<br><br>Nell\'arco di pochi giorni vi verr&agrave;<br><br>notificata l\'avvenuta registrazione." */
279                 $user->comm[$user->step % COMM_N] .=  show_notify($mlang_indwr['warrrepl'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 150);
280                 $user->step_inc();
281                 echo "1";
282             }
283             else {
284                 /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
285                 $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
286             }
287             
288         }
289         else {
290             /* MLANG: "<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>" */
291             $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['warrmust'][$G_lang]);
292         }
293         
294         if ($mesg_to_user != "") {
295             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
296             
297             $user->comm[$user->step % COMM_N] .= $mesg_to_user;
298             $user->step_inc();
299         }
300     }
301     else if ($argz[0] == 'mesgtoadm') {
302         if (($cli_subj = gpcs_var('cli_subj', $get, $post, $cookie)) === FALSE) 
303             $cli_subj = "";
304         
305         if (($cli_mesg = gpcs_var('cli_mesg', $get, $post, $cookie)) === FALSE)
306             $cli_mesg = "";
307
308
309         
310         $mesg_to_user = "";
311         
312         log_wr("INFO:SKIP:argz == mesgtoadm name: [".$user->name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
313         if ($user->flags & USER_FLAG_AUTH) {
314             if (($wa_lock = Warrant::lock_data(TRUE)) != FALSE) {
315                 if (($bdb = BriskDB::create()) != FALSE) {
316                     $bdb->users_load();
317                 
318                     if (($ema = $bdb->getmail($user->name)) != FALSE) {
319                         //  mail("nastasi",
320                         mail("brisk@alternativeoutput.it", urldecode($cli_subj), urldecode($cli_mesg), sprintf("From: %s <%s>", $user->name, $ema));
321                     }
322                     
323                     if (($fp = @fopen(LEGAL_PATH."/messages.txt", 'a')) != FALSE) {
324                         /* Unix time | session | nickname | IP | where was | mesg */
325                         fwrite($fp, sprintf("%ld|%s|%s|%s\n", $curtime, $user->name,
326                                             xcapelt(urldecode($cli_subj)), xcapelt(urldecode($cli_mesg))));
327                         fclose($fp);
328                     }
329                     Warrant::unlock_data($wa_lock);
330                     $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
331                     /* MLANG: "" */
332                     $user->comm[$user->step % COMM_N] .=  show_notify($mlang_indwr['mesgrepl'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
333                     $user->step_inc();
334                     echo "1";
335                 }
336                 else {
337                     /* MLANG: "<b>Il database è temporaneamente irraggiungibile, riprova più tardi o contatta l\'amministratore.</b>" */
338                     $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['coerrdb'][$G_lang]);
339                     $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
340                 }
341             }
342             else {
343                 /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
344                 $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
345             }
346             
347         }
348         else {
349             /* MLANG: "<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>" */
350             $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['mesgmust'][$G_lang]);
351         }
352         
353         if ($mesg_to_user != "") {
354             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
355             
356             $user->comm[$user->step % COMM_N] .= $mesg_to_user;
357             $user->step_inc();
358         }
359     }
360
361
362
363     else if ($argz[0] == 'poll') {
364         GLOBAL $G_with_poll, $G_poll_name;
365         if (($cli_choose = gpcs_var('cli_choose', $get, $post, $cookie)) === FALSE) 
366             $cli_choose = "";
367         
368         if (($cli_poll_name = gpcs_var('cli_poll_name', $get, $post, $cookie)) === FALSE)
369             $cli_poll_name = "";
370
371         $poll_lock = FALSE;
372         $mesg_to_user = "";
373   
374         $fp = FALSE;
375         $echont = "0";
376
377   /*
378           DONE - autorizzato ?
379           DONE - ci sono poll attivi ?
380           - verifica che il poll_name del client sia uguale a quello sul server
381           DONE - lock
382           DONE - apro file r+ con fallback in w+
383           DONE - vedo se ha già votato
384           DONE - se si: messaggio di voto già dato
385           se no: accetto il voto e lo segno; messaggio
386           chiudo file
387   */
388
389         $dobreak = FALSE;
390         do {
391             log_wr("INFO:SKIP:argz == poll name: [".$cli_poll_name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
392             if (($user->flags & USER_FLAG_AUTH) != USER_FLAG_AUTH) {
393                 // MLANG: <b>Per partecipare al sondaggio devi essere autenticato.</b>
394                 $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['pollmust'][$G_lang]);
395                 log_wr("break1");
396                 break;
397             }
398             
399             if ($G_with_poll == FALSE && $G_poll_name != FALSE && $G_poll_name != "") {
400                 $mesg_to_user = show_notify($mlang_indwr['pollnone'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
401                 log_wr("break2");
402                 break;
403             }
404     
405             if ($cli_choose == "" || !isset($cli_choose)) {
406                 $mesg_to_user = show_notify($mlang_indwr['pollchoo'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
407                 log_wr("break2.5");
408                 break;
409             }
410     
411             if (($poll_lock = Poll::lock_data(TRUE)) == FALSE) {
412                 /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
413                 $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
414                 log_wr("break3");
415                 break;
416             }
417     
418             if (($fp = @fopen(LEGAL_PATH."/".$G_poll_name.".txt", 'r+')) == FALSE)
419                 $fp = @fopen(LEGAL_PATH."/".$G_poll_name.".txt", 'w+');
420             
421             if ($fp == FALSE) {
422                 $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
423                 log_wr("break4");
424                 break;
425             }
426     
427             log_wr("poll: cp");
428             fseek($fp, 0);
429             
430             log_wr("poll: cp2");
431             while (!feof($fp)) {
432                 log_wr("poll: cp3");
433                 $bf = fgets($fp, 4096);
434                 log_wr("poll: cp3.1");
435                 $arli = csplitter($bf, '|');
436                 if (count($arli) == 0)
437                     break;
438                 log_wr("poll: cp3.2");
439                 if (strcasecmp($arli[1], $user->name) == 0) {
440                     $mesg_to_user = show_notify($mlang_indwr['pollagai'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
441                     $dobreak = TRUE;
442                     break;
443                 }
444             }
445             log_wr("poll: cp4");
446             
447             if ($dobreak) {
448                 log_wr("break5");
449                 break;
450             }
451       
452             /* Unix time | nickname | choose */
453             fwrite($fp, sprintf("%ld|%s|%s\n", $curtime, xcapelt($user->name), xcapelt(urldecode($cli_choose))));
454             fflush($fp);
455             $mesg_to_user =  show_notify($mlang_indwr['pollrec'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
456             $echont = "1";
457             log_wr("poll: cp5");
458         } while (0);
459         
460         if ($fp != FALSE)
461             fclose($fp);
462         
463         if ($poll_lock != FALSE)
464             Poll::unlock_data($poll_lock);
465         
466         if ($mesg_to_user != "") {
467             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
468             
469             $user->comm[$user->step % COMM_N] .= $mesg_to_user;
470             $user->step_inc();
471         }
472
473         echo "$echont";
474     }
475
476     /******************
477      *                *
478      *   STAT: room   *
479      *                *
480      ******************/
481     else if ($user->stat == 'room') {
482         $user->laccwr = time();
483
484         if ($argz[0] == 'help') {
485             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
486             $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_help[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], 600, 500);
487
488             log_wr($user->comm[$user->step % COMM_N]);
489             $user->step_inc();
490
491         }
492         else if ($argz[0] == 'passwdhowto') {
493             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
494             $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_passwdhowto[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], 600, 500);
495
496             log_wr($user->comm[$user->step % COMM_N]);
497             $user->step_inc();
498
499         }
500         else if ($argz[0] == 'splash') {
501             GLOBAL $G_with_splash, $G_splash_content, $G_splash_interval, $G_splash_idx;
502             GLOBAL $G_splash_w, $G_splash_h, $G_splash_timeout;
503             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
504
505             $user->comm[$user->step % COMM_N] .=  show_notify_ex(str_replace("\n", " ", $G_splash_content[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], $G_splash_w, $G_splash_h, true, 0);
506
507             log_wr($user->comm[$user->step % COMM_N]);
508             $user->step_inc();
509         }
510         else if ($argz[0] == 'about') {
511             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
512             $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_about[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], 400, 200);
513             
514             log_wr($user->comm[$user->step % COMM_N]);
515             $user->step_inc();
516             
517         }
518         
519         else if ($argz[0] == 'placing') {
520             
521             require_once("briskin5/Obj/briskin5.phh");
522             require_once("briskin5/Obj/placing.phh");
523             
524             $user->comm[$user->step % COMM_N] =  "gst.st = ".($user->step+1)."; ";
525             $user->comm[$user->step % COMM_N] .= show_notify_ex(str_replace("\n", " ", placings_show($user)), 0, $mlang_indwr['btn_backtotab'][$G_lang], 800, 600, TRUE, 0);
526             
527             log_wr($user->comm[$user->step % COMM_N]);
528             $user->step_inc();
529             
530             
531         }
532         
533         
534         else if ($argz[0] == 'roadmap') {
535             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
536             $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_roadmap[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], 400, 200);
537             
538             log_wr($user->comm[$user->step % COMM_N]);
539             $user->step_inc();
540             
541         }
542         else if ($argz[0] == 'whysupport') {
543             $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
544             $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_whysupport[$G_lang]), 0, $mlang_indwr['btn_backtotab'][$G_lang], 400, 200);
545             
546             log_wr($user->comm[$user->step % COMM_N]);
547             $user->step_inc();
548             
549         }
550         else if ($argz[0] == 'chatt') {
551             $room->chatt_send(&$user, xcapemesg($mesg));
552         }
553         /**********************
554          *                    *
555          *   SUBST: standup   *
556          *                    *
557          **********************/
558         else if ($user->subst == 'standup') {
559
560             if ($argz[0] == 'sitdown') {
561                 log_wr("SITDOWN command");
562
563                 if ($user->the_end == TRUE) {
564                     log_wr("INFO:SKIP:argz == sitdown && ->the_end == TRUE => ignore request.");
565                     return FALSE;
566                 }
567                 
568                 // Take parameters
569                 $table_idx = (int)$argz[1];
570                 $table = &$room->table[$table_idx];
571     
572                 $not_allowed_msg = "";
573                 if ($G_shutdown) {
574                         $not_allowed_msg = sprintf('chatt_sub("%s", [2, "%s"],"%s");',
575                                                    $dt, NICKSERV, $mlang_indwr['shutmsg'][$G_lang]);
576                 }
577                 else if ($table->wakeup_time > $curtime) {
578                     $not_allowed_msg = sprintf('chatt_sub("%s", [2, "%s"],"%s%d%s");',
579                                                $dt, NICKSERV, $mlang_indwr['tabwait_a'][$G_lang],
580                                                $table->wakeup_time - $curtime, $mlang_indwr['tabwait_b'][$G_lang]);
581                 }
582                 else if ($table->auth_only && (($user->flags & USER_FLAG_AUTH) == 0)) {
583                     $not_allowed_msg = sprintf('chatt_sub("%s", [2, "%s"],"%s");',
584                                                $dt, NICKSERV, $mlang_indwr['mustauth'][$G_lang]);
585                 }
586                 else if ($user->flags & USER_FLAG_TY_FIRONLY && $table->player_n > 0) {
587                     $not_allowed_msg = sprintf('chatt_sub("%s", [2, "%s"], "%s");',
588                                                $dt, NICKSERV, $mlang_indwr['mustfirst'][$G_lang]);
589                 }
590                 if ($not_allowed_msg != "") {
591                     $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ".$not_allowed_msg;
592                     $user->step_inc();
593                     return TRUE;
594                 }
595                 
596                 /* TODO: refact to a function */
597                 // if ($user->bantime > $user->laccwr) {
598                 require_once("Obj/hardban.phh");
599
600                 if (($bantime = Hardbans::check(($user->flags & USER_FLAG_AUTH ? $user->name : FALSE),
601                                                 $user->ip, $user->sess)) != -1) {
602                     $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
603                     /* MLANG: "<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori. <br><br>Dovrai aspettare ancora ".secstoword($user->bantime - $user->laccwr)." prima di poterti sedere nuovamente.", "resta in piedi.", "<br>Tu o qualcuno col tuo stesso indirizzo IP si è alzato da un tavolo senza il consenso degli altri giocatori.<br><br>Dovrai aspettare ancora ".secstoword($bantime - $user->laccwr)." prima di poterti sedere nuovamente.<br><br>Se non sei stato tu ad alzarti e possiedi un login con password, autenticandoti con quello, potrai accedere." */
604                     if ($user->flags & USER_FLAG_AUTH) {
605                         $user->comm[$user->step % COMM_N] .= show_notify($mlang_indwr['badwake_a'][$G_lang].secstoword($user->bantime - $user->laccwr).$mlang_indwr['badwake_b'][$G_lang], 2000, $mlang_indwr['btn_stays'][$G_lang], 400, 100);
606                     }
607                     else {
608                         $user->comm[$user->step % COMM_N] .= show_notify($mlang_indwr['badsit_a'][$G_lang].secstoword($bantime - $user->laccwr).$mlang_indwr['badsit_a'][$G_lang], 2000, $mlang_indwr['btn_stays'][$G_lang], 400, 180);
609                     }
610                     $user->step_inc();
611                     return TRUE;
612                 }
613     
614                 if ($table->player_n == PLAYERS_N) {
615                     log_wr("WARN:FSM: Sitdown unreachable, table full.");
616                     return FALSE;
617                 }
618       
619                 // set new status
620                 $user->subst = "sitdown";
621                 $user->table = $table_idx;
622                 $user->table_pos = $table->user_add($idx);
623                 
624                 log_wr("MOP before");
625                 
626                 if ($table->player_n == PLAYERS_N) {
627                     require_once("briskin5/Obj/briskin5.phh");
628                     log_wr("MOP inall");
629                     
630                     // Start game for this table.
631                     log_wr("Start game!");
632         
633                     //
634                     //  START THE SPAWN HERE!!!!
635                     //
636                     
637                     // Create new spawned table
638                     // $bri_sem = Bin5::lock_data(TRUE, $table_idx);
639                     $table_token = uniqid("");
640                     $room->table[$table_idx]->table_token = $table_token;
641                     $room->table[$table_idx]->table_start = $curtime;
642                     
643                     $plist = "$table_token|$user->table|$table->player_n";
644                     for ($i = 0 ; $i < $table->player_n ; $i++) {
645                         $plist .= '|'.$room->user[$table->player[$i]]->sess;
646                     }
647                     log_legal($curtime, $user->ip, $user, "STAT:CREATE_GAME", $plist);
648                     
649                     log_wr("pre new Bin5");
650                     if (($bri = new Bin5($room, $table_idx, $table_token, $get, $post, $cookie)) == FALSE)
651                         log_wr("bri create: FALSE");
652                     else
653                         log_wr("bri create: ".serialize($bri));
654                     
655                     log_wr("pre init table");
656                     // init table
657                     $bri_table = $bri->table[0];
658                     $bri_table->init($bri->user);
659                     $bri_table->game_init($bri->user);
660                     //
661                     // Init spawned users.
662                     //
663                     //  MULTIGAME: here init of selected game instead of hardcabled briskin5 init (look subst status)
664                     //
665                     log_wr("game_init after");
666                     for ($i = 0 ; $i < $table->player_n ; $i++) {
667                         $bri_user_cur = $bri->user[$i];
668                         $user_cur = $room->user[$table->player[$i]];
669                         
670                         $bri_user_cur->laccwr = $curtime;
671                         $bri_user_cur->trans_step = $user_cur->step + 1;
672                         $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = "";
673                         $bri_user_cur->step_inc();
674                         $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = show_table(&$bri,&$bri_user_cur,$bri_user_cur->step+1,TRUE, FALSE);
675                         $bri_user_cur->step_inc();
676                         
677                         log_wr("TRY PRESAVE: ".$bri_user_cur->step." TRANS STEP: ".$bri_user_cur->trans_step);
678                         
679                         log_wr("Pre if!");
680                         
681                         //          ARRAY_POP DISABLED
682                         //          // CHECK
683                         while (array_pop($user_cur->comm) != NULL);
684           
685                         $user_cur->trans_step = $user_cur->step + 1;
686                         $user_cur->comm[$user_cur->step % COMM_N] = sprintf('gst.st_loc++; gst.st=%d; createCookie("table_idx", %d, 24*365, cookiepath); createCookie("table_token", "%s", 24*365, cookiepath); createCookie("lang", "%s", 24*365, cookiepath); xstm.stop(); window.onunload = null ; window.onbeforeunload = null ; document.location.assign("briskin5/index.php");|', $user_cur->step+1, $table_idx, $table_token, $G_lang);
687                         log_wr("TRANS ATTIVATO");
688                         
689                         $user_cur->stat_set('table');
690                         $user_cur->subst = 'asta';
691                         $user_cur->laccwr = $curtime;
692                         $user_cur->step_inc();
693                     }
694                     log_wr("presave bri");
695                     $room->match_add($table_idx, $bri);
696                     log_wr("postsave bri");
697                 }
698                 // change room
699                 $room->room_sitdown($user, $table_idx);
700                 
701                 log_wr("MOP finish");
702             }
703             else if ($argz[0] == 'logout') {
704                 $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
705                 $user->comm[$user->step % COMM_N] .= 'postact_logout();';
706                 $user->the_end = TRUE;
707                 $user->step_inc();
708             }
709         }
710         /**********************
711          *                    *
712          *   SUBST: sitdown   *
713          *                    *
714          **********************/
715         else if ($user->subst == 'sitdown') {
716             if ($argz[0] == 'wakeup') {
717                 $room->room_wakeup($user);
718             }
719             else if ($argz[0] == 'logout') {
720                 $room->room_wakeup($user);
721                 $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
722                 $user->comm[$user->step % COMM_N] .= 'postact_logout();';
723                 $user->the_end = TRUE;
724                 $user->step_inc();
725             }
726         }
727     }
728     log_wr("before save data");
729     // Room::save_data($room);
730     log_wr($user->step, 'index_wr.php: after save_data()');
731     
732 /* Room::unlock_data($sem); */
733 /* exit; */
734     return (FALSE);
735 }
736 ?>