web/index_wr.php

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