cast to int for incoming table_idx values
[brisk.git] / web / index_wr.php
index 8a59ec5..43be553 100644 (file)
@@ -2,7 +2,10 @@
 /*
  *  brisk - index_wr.php
  *
- *  Copyright (C) 2006 matteo.nastasi@milug.org
+ *  Copyright (C) 2006-2011 Matteo Nastasi
+ *                          mailto: nastasi@alternativeoutput.it 
+ *                                  matteo.nastasi@milug.org
+ *                          web: http://www.alternativeoutput.it
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
  * not, write to the Free Software Foundation, Inc, 59 Temple Place -
  * Suite 330, Boston, MA 02111-1307, USA.
  *
- * $Id$
- *
  */
 
-require_once("brisk.phh");
+$G_base = "";
+
+require_once("Obj/brisk.phh");
+require_once("Obj/auth.phh");
+// require_once("Obj/proxyscan.phh");
+
+// Use of proxies isn't allowed.
+// if (is_proxy()) {
+//   sleep(5);
+//   exit;
+// }
+
+$mlang_indwr = array( 'btn_backtotab' => array( 'it' => 'Torna ai tavoli.',
+                                                'en' => 'Back to tables.' ),
+                      '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.',
+                                            '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.'),
+                      'btn_close' => array( 'it' => 'chiudi',
+                                            'en' => 'close' ),
+                      'commerr' => array( 'it' => '<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>',
+                                          'en' => '<b>An error was occurred during the saving, try again or contact the administrator.</b>'),
+                      'coerrdb' => array( 'it' => '<b>Il database è temporaneamente irraggiungibile, riprova più tardi o contatta l\'amministratore.</b>',
+                                          'en' => '<b>The database is temporarly unavailable, retry to later or conctact the administrator.</b>'),
+                      'warrmust' => array( 'it' => '<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>',
+                                           'en' => 'To authenticate somebody you have to be authenticated in your turn'),
+                      'mesgrepl' => array( 'it' => '<br><br>Il messaggio &egrave; stato inoltrato all\'amministratore.',
+                                           'en' => '<br><br>The message was forwarded to the administrator'),
+                      'mesgmust' => array( 'it' => '<b>Per mandare messaggi all\'amministratore devi essere autenticato.</b>',
+                                           'en' => 'To send a message to the administrator you have to be authenticated'),
+                      'shutmsg'  => array( 'it' => '<b>Il server sta per essere riavviato, non possono avere inizio nuove partite.</b>',
+                                           'en' => '<b>The server is going to be rebooted, new games are not allowed.</b>'),
+                      'mustauth' => array( 'it' => '<b>Il tavolo a cui volevi sederti richiede autentifica.</b>',
+                                           'en' => '<b>the table where you want to sit require authentication</b>'),
+                      'tabwait_a'=> array( 'it' => '<b>Il tavolo si &egrave; appena liberato, ci si potr&agrave; sedere tra ',
+                                           'en' => '<b>The table is only just opened, you will sit down in '), // FIXME
+                      'tabwait_b'=> array( 'it' => ' secondi.</b>',
+                                           'en' => ' seconds.</b>'),
+                      'pollmust' => array( 'it' => '<b>Per partecipare al sondaggio devi essere autenticato.</b>',
+                                           'en' => '<b>To vote for the poll you have to be authenticated</b>'),
+                      'pollnone' => array( 'it' => '<br><br>Al momento non è attivo alcun sondaggio.',
+                                           'en' => '<br><br>At this moment no polls are active.'),
+                      'pollchoo' => array( 'it' => '<br><br>Non hai espresso nessuna preferenza.',
+                                           'en' => '<br><br>You don\'t choose any preference, do it'), 
+                      'pollagai' => array( 'it' => '<br>Per questo sondaggio hai già votato.<br><br>Non si può esprimere la propria preferenza più di una volta.',
+                                           'en' => '<br>You just express your preference about this poll.<br><br>You cannot do it again.'),
+                      'pollrec'  => array ('it' => '<br><br>Il tuo voto è stato registrato.',
+                                           'en' => '<br><br>Your vote had be stored.'),
+                      'badwake_a'=> array( 'it' => '<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori.<br><br>Dovrai aspettare ancora ',
+                                           'en' => '<br>You stand up without the permission of the other players.<br><br>You will wait '),
+                      'badwake_b'=> array( 'it' => ' prima di poterti sedere nuovamente.',
+                                           'en' => ' before you can sit down again.'),
+                      'btn_stays'=> array( 'it' => 'resta in piedi.',
+                                           'en' => 'stay standing.'),
+                      '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 ',
+                                           '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 '), 
+                      '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.',
+                                           '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')
+
+                      );
+
+log_load("index_wr.php");
+
 if (DEBUGGING == "local" && $_SERVER['REMOTE_ADDR'] != '127.0.0.1') {
   echo "Debugging time!";
   exit;
 }
 
-log_load($sess, "LOAD: index_wr.php");
-
 /*
  *  MAIN
  */
-log_wr($sess, 'COMM: '.$mesg);
-
-$sem = lock_data();
-$bri = &load_data();
-if (($user = &$bri->get_user($sess, &$idx)) == FALSE) {
-  echo "Get User Error";
-  log_wr($sess, "Get User Error");
-  unlock_data($sem);
+
+/* if the IP is banned, exit without do nothing */
+if (array_search($_SERVER['REMOTE_ADDR'], $G_black_list) !== FALSE) {
+  sleep(5);
   exit;
 }
-$argz = explode('|', $mesg);
 
-if ($argz[0] == 'shutdown') {
-  log_auth($user_cur->sess, "Shutdown session.");
-  
-  $user->sess = "";
-  $user->name = "";
-  $user->the_end = FALSE;
-  
-  log_rd2($user->sess, "AUTO LOGOUT.");
-  if ($user->subst == 'sitdown' || $user->stat == 'table')
-    $bri->room_wakeup(&$user);
-  else if ($user->subst == 'standup')
-    $bri->room_outstandup(&$user);
-  else
-    log_rd2($sess, "SHUTDOWN FROM WHAT ???");
-}
-else if ($user->stat == 'room') {
-  $user->laccwr = time();
+$is_spawn = FALSE;
 
-  if ($argz[0] == 'help') {
-    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-    $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_help), 0, "torna ai tavoli", 600, 500);
+log_wr(0, 'index_wr.php: COMM: '.xcapemesg($mesg));
+log_wr('COMM: '.xcapemesg($mesg));
 
-    log_wr($sess, $user->comm[$user->step % COMM_N]);
-    $user->step++;
-    
+$curtime = time();
+$dt = date("H:i ", $curtime);
+
+$sem = Room::lock_data(TRUE);
+if (($room = &Room::load_data()) == FALSE) {
+  echo "Load data error";
+  log_wr("Load data error");
+  Room::unlock_data($sem);
+  exit;
+}
+if (($user = $room->get_user($sess, &$idx)) == FALSE) {
+  Room::unlock_data($sem);
+  $argz = explode('|', xcapemesg($mesg));
+
+  if ($argz[0] == 'getchallenge') {
+      GLOBAL $cli_name;
+      if (($a_sem = Challenges::lock_data(TRUE)) != FALSE) { 
+          log_main("chal lock data success");
+          
+          if (($chals = &Challenges::load_data()) != FALSE) {
+              
+              $token =  uniqid("");
+              // echo '2|'.$argz[1].'|'.$token.'|'.$_SERVER['REMOTE_ADDR'].'|'.$curtime.'|';
+              // exit;
+              
+              if (($login_new = validate_name(urldecode($cli_name))) != FALSE) {
+                  if ($chals->add($login_new, $token, $_SERVER['REMOTE_ADDR'], $curtime) != FALSE) {
+                      log_send("SUCCESS: token:".$token);
+                      echo '0|'.$token;
+                  }
+                  else {
+                      log_send("getchallenge FAILED");
+                      echo '1|';
+                  }
+              }
+              else {
+                  log_send("getchallenge FAILED");
+                  echo '1|';
+              }
+              if ($chals->ismod()) {
+                  Challenges::save_data(&$chals);
+              }
+          }
+          
+          
+          Challenges::unlock_data($a_sem);
+      }
+  }
+  else if ($argz[0] == 'auth') {
+    printf("challenge|ok");
+  }
+  else if ($argz[0] == 'help') {
+    /* MLANG: "torna ai tavoli" */ 
+    echo show_notify(str_replace("\n", " ", $G_room_help[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 600, 500);
   }
   else if ($argz[0] == 'about') {
-    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-    $user->comm[$user->step % COMM_N] .=  show_notify(str_replace("\n", " ", $G_room_about), 0, "torna ai tavoli", 400, 200);
-
-    log_wr($sess, $user->comm[$user->step % COMM_N]);
-    $user->step++;
-    
+    echo show_notify(str_replace("\n", " ", $G_room_about[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 220);
   }
-  else if ($argz[0] == 'logout') {
-    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-    $user->comm[$user->step % COMM_N] .= sprintf('postact_logout();');
-    $user->the_end = TRUE;
-    $user->step++;
+  else if ($argz[0] == 'passwdhowto') {
+    echo show_notify(str_replace("\n", " ", $G_room_passwdhowto[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 200);
   }
-  else if ($argz[0] == 'chatt') {
-    $bri->chatt_send(&$user,$mesg);
+  else if ($argz[0] == 'roadmap') {
+    echo show_notify(str_replace("\n", " ", $G_room_roadmap[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lang], 400, 200);
   }
-  else if ($argz[0] == 'sitdown') {
-    if ($user->stat != 'room' || $user->subst != 'standup') {
-      log_wr($sess, "Warning ! sitdown out fsm");
-      unlock_data($sem);
-      exit;
-    }
-               
-    // Take parameters
-    $table_idx = $argz[1];
-    $table = &$bri->table[$table_idx];
-               
-    if ($table->player_n == PLAYERS_N) {
-      log_wr($sess, "Warning ! unreachable, table full.");
-      unlock_data($sem);
-      exit;
-    } 
-
-    // set new status
-    $user->subst = "sitdown";
-    $user->table = $table_idx;
-    $user->table_pos = $table->user_add($idx);
-               
-    if ($table->player_n == PLAYERS_N) {
-      // Start game for this table.
-      log_wr($sess, "Start game!");
-      
-      $table->init(&$bri->user);
-      $table->game_init(&$bri->user);
-      $curtime = time();
+  else if ($argz[0] == 'placing') {
+    require_once("briskin5/Obj/briskin5.phh");
+    require_once("briskin5/Obj/placing.phh");
 
-      for ($i = 0 ; $i < $table->player_n ; $i++) {
-       $user_cur = &$bri->user[$table->player[$i]];
-       log_wr($sess, "Pre if!");
-       
-       $ret = "";
-       $ret .= sprintf('gst.st_loc++; gst.st=%d; the_end=true; window.onunload = null ; document.location.assign("table.php");|', $user_cur->step+1);
-       
-       $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-       $user_cur->trans_step = $user_cur->step + 1;
-       log_wr($sess, "TRANS ATTIVATO");
-       
-       $user_cur->stat =  'table';
-       $user_cur->subst = 'asta';
-       $user_cur->laccwr = $curtime;
-       $user_cur->step++;
-       
-       $user_cur->comm[$user_cur->step % COMM_N] = show_table(&$bri,&$user_cur,$user_cur->step+1,TRUE, FALSE);
-       $user_cur->step++;
-      }
-    }
-               
-    $bri->room_sitdown(&$user, $table_idx);
+    echo show_notify(str_replace("\n", " ", placings_show(FALSE)), 0, $mlang_indwr['btn_close'][$G_lang], 800, 600);
   }
-  else if ($argz[0] == 'wakeup') {
-    if ($user->stat != 'room' || $user->subst != 'sitdown') {
-      log_wr($sess, "Warning ! wakeup out fsm.");
-      unlock_data($sem);
-      exit;
-    }
-               
-    // set new status
+  else if ($argz[0] == 'whysupport') {
+    echo show_notify(str_replace("\n", " ", $G_room_whysupport[$G_lang]), 0, $mlang_indwr['btn_close'][$G_lng], 400, 200);
+  }
+  else { 
+    log_wr("Get User Error");
+    echo "Get User Error:" + $argz[0];
+  }
+  exit;
+}
+$argz = explode('|', xcapemesg($mesg));
 
-    $user->subst = "standup";
+log_wr('POSTSPLIT: '.$argz[0]);
 
-    $bri->room_wakeup(&$user);
+log_wr($user->step, 'index_wr.php: after get_user()');
+
+if ($argz[0] == 'shutdown') {
+  log_auth($user->sess, "Shutdown session.");
+
+  $user->reset();
+
+  log_rd2("AUTO LOGOUT.");
+  if ($user->subst == 'sitdown' || $user->stat == 'table')
+    $room->room_wakeup($user);
+  else if ($user->subst == 'standup')
+    $room->room_outstandup(&$user);
+  else {
+    log_rd2("SHUTDOWN FROM WHAT ???");
   }
 }
-/***************
- *             *
- *    TABLE    *
- *             *
- ***************/
-else if ($user->stat == 'table') {
-  $user->laccwr = time();
-  $table = &$bri->table[$user->table];
-
-  if ($argz[0] == 'tableinfo') {
-    log_wr($sess, "PER DI TABLEINFO");
-    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-    $user->comm[$user->step % COMM_N] .= show_table_info(&$bri, &$table, $user->table_pos);
-    log_wr($sess, $user->comm[$user->step % COMM_N]);
-    $user->step++;
+else if ($argz[0] == 'warranty') {
+  GLOBAL $cli_name, $cli_email;
+
+  $mesg_to_user = "";
+
+  log_wr("INFO:SKIP:argz == warranty name: [".$cli_name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
+  if ($user->flags & USER_FLAG_AUTH) {
+    if (($wa_lock = Warrant::lock_data(TRUE)) != FALSE) {
+      if (($fp = @fopen(LEGAL_PATH."/warrant.txt", 'a')) != FALSE) {
+        /* Unix time | session | nickname | IP | where was | mesg */
+        fwrite($fp, sprintf("%ld|%s|%s|%s|\n", $curtime, $user->name, xcapelt(urldecode($cli_name)), xcapelt(urldecode($cli_email))));
+        fclose($fp);
+      }
+      Warrant::unlock_data($wa_lock);
+      $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+      /* 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." */
+      $user->comm[$user->step % COMM_N] .=  show_notify($mlang_indwr['warrrepl'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 150);
+      $user->step_inc();
+      echo "1";
+    }
+    else {
+      /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
+      $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
+    }
+    
   }
-  else if ($argz[0] == 'chatt') {
-    $bri->chatt_send(&$user,$mesg);
+  else {
+    /* MLANG: "<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>" */
+    $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['warrmust'][$G_lang]);
   }
-  else if ($argz[0] == 'logout') {
-    $bri->room_wakeup(&$user);
+
+  if ($mesg_to_user != "") {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    
+    $user->comm[$user->step % COMM_N] .= $mesg_to_user;
+    $user->step_inc();
   }
-  else if ($argz[0] == 'exitlock') {
-    $user->exitislock = ($user->exitislock == TRUE ? FALSE : TRUE);
-    for ($ct = 0, $i = 0 ; $i < PLAYERS_N ; $i++) {    
-      $user_cur[$i] = &$bri->user[$table->player[$i]];
-      if ($user_cur[$i]->exitislock == FALSE)
-       $ct++;
+}
+else if ($argz[0] == 'mesgtoadm') {
+    GLOBAL $cli_subj, $cli_mesg;
+    
+    $mesg_to_user = "";
+    
+    log_wr("INFO:SKIP:argz == mesgtoadm name: [".$user->name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
+    if ($user->flags & USER_FLAG_AUTH) {
+        if (($wa_lock = Warrant::lock_data(TRUE)) != FALSE) {
+            if (($bdb = BriskDB::create()) != FALSE) {
+                $bdb->users_load();
+                
+                if (($ema = $bdb->getmail($user->name)) != FALSE) {
+                    //  mail("nastasi", 
+                    mail("brisk@alternativeoutput.it", urldecode($cli_subj), urldecode($cli_mesg), sprintf("From: %s <%s>", $user->name, $ema));
+                }
+                
+                if (($fp = @fopen(LEGAL_PATH."/messages.txt", 'a')) != FALSE) {
+                    /* Unix time | session | nickname | IP | where was | mesg */
+                    fwrite($fp, sprintf("%ld|%s|%s|%s\n", $curtime, $user->name, 
+                                        xcapelt(urldecode($cli_subj)), xcapelt(urldecode($cli_mesg))));
+                    fclose($fp);
+                }
+                Warrant::unlock_data($wa_lock);
+                $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+            /* MLANG: "" */
+                $user->comm[$user->step % COMM_N] .=  show_notify($mlang_indwr['mesgrepl'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
+                $user->step_inc();
+                echo "1";
+            }
+            else {
+                /* MLANG: "<b>Il database è temporaneamente irraggiungibile, riprova più tardi o contatta l\'amministratore.</b>" */
+                $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['coerrdb'][$G_lang]);
+                $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+            }
+        }
+        else {
+            /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
+            $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
+        }
+        
     }
-    for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-      $ret = sprintf('gst.st = %d;', $user_cur[$i]->step+1);
-      $ret = sprintf('exitlock_show(%d, %s);', $ct, 
-                    ($user_cur[$i]->exitislock ? 'true' : 'false'));
-      $user_cur[$i]->comm[$user_cur[$i]->step % COMM_N] = $ret;
-      log_wr($sess, $user_cur[$i]->comm[$user_cur[$i]->step % COMM_N]);
-      $user_cur[$i]->step++;
+    else {
+        /* MLANG: "<b>Per autenticare qualcuno devi a tua volta essere autenticato.</b>" */
+        $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['mesgmust'][$G_lang]);
     }
-  }
-  else if ($user->subst == 'asta') {
-    if ($argz[0] == 'lascio' && $user->handpt <= 2) {
-      $index_cur = $table->gstart % PLAYERS_N;
-    
-      log_wr($sess, sprintf("GIOCO FINITO !!!"));
     
-      $table->mult *= 2; 
-      $table->old_reason = sprintf("Ha lasciato %s perche` aveva al massimo 2 punti.", $user->name);
+    if ($mesg_to_user != "") {
+        $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+        
+        $user->comm[$user->step % COMM_N] .= $mesg_to_user;
+        $user->step_inc();
+    }
+}
 
-      $table->game_next();
-      $table->game_init(&$bri->user);
-    
-      for ($i = 0 ; $i < PLAYERS_N ; $i++) {   
-       $user_cur = &$bri->user[$table->player[$i]];
 
-       $ret = sprintf('gst.st = %d;', $user_cur->step+1);
-       $ret .= show_table(&$bri,&$user_cur,$user_cur->step+1, TRUE, TRUE);
-       $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-       $user_cur->step++;          
-      }
+
+else if ($argz[0] == 'poll') {
+  GLOBAL $G_with_poll, $G_poll_name, $cli_choose, $cli_poll_name;
+
+  $poll_lock = FALSE;
+  $mesg_to_user = "";
+  
+  $fp = FALSE;
+  $echont = "0";
+
+  /*
+          DONE - autorizzato ?
+          DONE - ci sono poll attivi ?
+          - verifica che il poll_name del client sia uguale a quello sul server
+          DONE - lock
+          DONE - apro file r+ con fallback in w+
+          DONE - vedo se ha già votato
+          DONE - se si: messaggio di voto già dato
+          se no: accetto il voto e lo segno; messaggio
+          chiudo file
+  */
+
+  $dobreak = FALSE;
+  do {
+    log_wr("INFO:SKIP:argz == poll name: [".$cli_name."] AUTH: ".($user->flags & USER_FLAG_AUTH));
+    if (($user->flags & USER_FLAG_AUTH) != USER_FLAG_AUTH) {
+      // MLANG: <b>Per partecipare al sondaggio devi essere autenticato.</b>
+      $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['pollmust'][$G_lang]);
+      log_wr("break1");
+      break;
+    }
+
+    if ($G_with_poll == FALSE && $G_poll_name != FALSE && $G_poll_name != "") {
+      $mesg_to_user = show_notify($mlang_indwr['pollnone'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
+      log_wr("break2");
+      break;
     }
-    else if ($argz[0] == 'asta') {
-      $again = TRUE;
     
-      $index_cur = $table->gstart % PLAYERS_N;
-      if ($user->table_pos == $index_cur &&
-         $table->asta_pla[$index_cur]) {
-       $a_card = $argz[1];
-       $a_pnt  = $argz[2];
-      
-       log_wr($sess, "CI SIAMO  a_card ".$a_card."  asta_card ".$table->asta_card);
-      
-       // Abbandono dell'asta
-       if ($a_card <= -1) {
-         log_wr($sess, "Abbandona l'asta.");
-         $table->asta_pla[$index_cur] = FALSE;
-         $user->asta_card  = -1;
-         $table->asta_pla_n--;
-         $again = FALSE;
-       }
-       else if ($a_card <= 9) {
-         if ($table->asta_card == 9) {
-           if ($a_card == 9 && $a_pnt <= 120 && $a_pnt > $table->asta_pnt)
-             $again = FALSE;
-         }
-         else {
-           if ($a_card >= 0 && $a_card <= 9 && $a_card > $table->asta_card)
-             $again = FALSE;
-         }
-
-         if ($again == FALSE) {
-           log_wr($sess, "NUOVI ORZI.");
-           $user->asta_card  = $a_card;
-           $table->asta_card = $a_card;
-           if ($a_card == 9) {
-             $user->asta_pnt   = $a_pnt;
-             $table->asta_pnt  = $a_pnt;
-           }
-         }
-       }
-      
-      
-      
-       if ($again) { // Qualcosa non andato bene, rifare
-         log_wr($sess, "Ripetere.");
-       }
-       else {
-         /* next step */
-         $showst = "show_astat("; 
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$bri->user[$table->player[$i]];
-           $showst .= sprintf("%s%d", ($i == 0 ? "" : ", "), 
-                              ($user_cur->asta_card < 9 ? $user_cur->asta_card : $user_cur->asta_pnt));
-         }
-         if (PLAYERS_N == 3)
-           $showst .= ",-2,-2";
-         $showst .= ");";
-
-         $maxcard = -2;
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$bri->user[$table->player[$i]];
-           if ($maxcard < $user_cur->asta_card)
-             $maxcard = $user_cur->asta_card;
-         }
-
-         if (($table->asta_pla_n > ($maxcard > -1 ? 1 : 0)) &&
-             !($table->asta_card == 9 && $table->asta_pnt == 120)) {
-           log_wr($sess,"ALLOPPA QUI");
-           for ($i = 1 ; $i < PLAYERS_N ; $i++) {
-             $index_next = ($table->gstart + $i) % PLAYERS_N;
-             if ($table->asta_pla[$index_next]) {
-               log_wr($sess,"GSTART 1");
-               $table->gstart += $i;
-               break;
-             }
-           }
-         
-         
-           for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-             $user_cur = &$bri->user[$table->player[$i]];
-             $ret = sprintf('gst.st = %d; %s', $user_cur->step+1, $showst);
-             if ($user_cur->table_pos == ($table->gstart % PLAYERS_N)) 
-               $ret .= sprintf('dispose_asta(%d,%d, %s); remark_on();', 
-                               $table->asta_card + 1, $table->asta_pnt+1, ($user_cur->handpt <= 2 ? "true" : "false"));
-             else
-               $ret .= sprintf('dispose_asta(%d,%d, %s); remark_off();',
-                               $table->asta_card + 1, -($table->asta_pnt+1), ($user_cur->handpt <= 2 ? "true" : "false"));
-             $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-             $user_cur->step++;
-           }
-         }
-         else if ($table->asta_pla_n == 0) {
-           log_wr($sess, "PASSANO TUTTI!");
-
-           log_wr($sess, sprintf("GIOCO FINITO !!!"));
-         
-           $table->old_reason = "Hanno passato tutti.";
-           $table->mult *= 2; 
-
-           $table->game_next();
-           $table->game_init(&$bri->user);
-         
-           for ($i = 0 ; $i < PLAYERS_N ; $i++) {      
-             $user_cur = &$bri->user[$table->player[$i]];
-
-             $ret = sprintf('gst.st = %d;', $user_cur->step+1);
-             $ret .= show_table(&$bri,&$user_cur,$user_cur->step+1, TRUE, TRUE);
-             $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-             $user_cur->step++;            
-           }
-         }
-         else {
-           log_wr($sess, "FINITA !");
-           // if a_pnt == 120 supergame ! else abbandono
-           if ($a_pnt == 120 || $user->asta_card != -1) {
-             $chooser = $index_cur;
-             for ($i = 1 ; $i < PLAYERS_N ; $i++) 
-               if ($i != $chooser)
-                 $table->asta_pla[$i] = FALSE;
-           }
-           else {
-             //"gst.st = ".($user->step+1)."; dispose_asta(".($table->asta_card + 1).",".-($table->asta_pnt).", true); remark_off();";
-             $user->comm[$user->step % COMM_N] = sprintf( "gst.st = %d; dispose_asta(%d, %d, false); remark_off();", $user->step+1, $table->asta_card + 1,-($table->asta_pnt));
-             $user->step++;
-             for ($i = 1 ; $i < PLAYERS_N ; $i++) {
-               $chooser = ($table->gstart + $i) % PLAYERS_N;
-               if ($table->asta_pla[$chooser]) {
-                 break;
-               }
-             }
-           }
-           $table->asta_win = $chooser;
-
-           for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-             $user_cur = &$bri->user[$table->player[$i]];
-             $ret = sprintf('gst.st = %d; %s', $user_cur->step+1, $showst);
-
-             if ($i == $chooser) {
-               $ret .= "choose_seed(". $table->asta_card."); \$(\"asta\").style.visibility = \"hidden\"; remark_on();";
-             }
-             else {
-               $ret .= "remark_off();";
-             }
-
-             $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-             $user_cur->step++;            
-           }
-         }
-       }
-      }
-      else {
-       log_wr($sess, "NON CI SIAMO");
-      }
+    if ($cli_choose == "" || !isset($cli_choose)) {
+      $mesg_to_user = show_notify($mlang_indwr['pollchoo'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
+      log_wr("break2.5");
+      break;
     }
-    /*  asta::choose */
-    else if ($argz[0] == 'choose') {
-      if ($table->asta_win > -1 && 
-         $user->table_pos == $table->asta_win) {
-       $a_brisco = $argz[1];
-       if ($a_brisco >= 0 && $a_brisco < 40) {
-         $table->briscola = $a_brisco;
-         $table->friend   = $table->card[$a_brisco]->owner;
-         log_wr($sess,"GSTART 2");
-         $table->gstart = ($table->mazzo+1) % PLAYERS_N;
-         log_wr($sess, "Setta la briscola a ".$a_brisco);
-
-         $chooser = $table->asta_win;
-         $user_chooser = &$bri->user[$table->player[$chooser]];
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$bri->user[$table->player[$i]];
-           $user_cur->subst = 'game';
-           $ret = sprintf('gst.st = %d; subst = "game";', $user_cur->step+1);
-         
-
-           /* bg of caller cell */
-           $ret .= briscola_show($bri, $table, $user_cur);
-
-           /* first gamer */
-           if ($i == ($table->gstart % PLAYERS_N))
-             $ret .= "is_my_time = true; remark_on();";
-           else
-             $ret .= "is_my_time = false; remark_off();";
-
-           $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-           $user_cur->step++;      
-         }
-         /*
-            TUTTE LE VARIABILI DI STATO PER PASSARE A GIOCARE E LE
-            VAR PER PASSARE ALLA FASE DI GIOCO
-         */
-       
-       }
+    
+    if (($poll_lock = Poll::lock_data(TRUE)) == FALSE) {
+      /* MLANG: "<b>E\' occorso un errore durante il salvataggio, riprova o contatta l\'amministratore.</b>" */
+      $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
+      log_wr("break3");
+      break;
+    }
+    
+    if (($fp = @fopen(LEGAL_PATH."/".$G_poll_name.".txt", 'r+')) == FALSE) 
+      $fp = @fopen(LEGAL_PATH."/".$G_poll_name.".txt", 'w+');
+    
+    if ($fp == FALSE) {
+      $mesg_to_user = sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['commerr'][$G_lang]);
+      log_wr("break4");
+      break;
+    }
+    
+    log_wr("poll: cp");
+    fseek($fp, 0);
+    
+    log_wr("poll: cp2");
+    while (!feof($fp)) {
+      log_wr("poll: cp3");
+      $bf = fgets($fp, 4096);
+      log_wr("poll: cp3.1");
+      $arli = csplitter($bf, '|');
+      if (count($arli) == 0)
+        break;
+    log_wr("poll: cp3.2");
+      if (strcasecmp($arli[1], $user->name) == 0) {
+        $mesg_to_user = show_notify($mlang_indwr['pollagai'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
+        $dobreak = TRUE;
+        break;
       }
     }
+    log_wr("poll: cp4");
+
+    if ($dobreak) {
+      log_wr("break5");
+      break;
+    }
+      
+    /* Unix time | nickname | choose */
+    fwrite($fp, sprintf("%ld|%s|%s\n", $curtime, xcapelt($user->name), xcapelt(urldecode($cli_choose))));
+    fflush($fp);
+    $mesg_to_user =  show_notify($mlang_indwr['pollrec'][$G_lang], 0, $mlang_indwr['btn_close'][$G_lang], 400, 110);
+    $echont = "1";
+    log_wr("poll: cp5");
+  } while (0);
+
+  if ($fp != FALSE)
+    fclose($fp);
+
+  if ($poll_lock != FALSE)
+    Poll::unlock_data($poll_lock);
+  
+  if ($mesg_to_user != "") {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    
+    $user->comm[$user->step % COMM_N] .= $mesg_to_user;
+    $user->step_inc();
   }
-  else if ($user->subst == 'game') {
-    log_wr($sess, "state: table::game".$argz[0]);
-
-    if ($argz[0] == 'play') {
-      $a_play = $argz[1];
-      $a_x =    $argz[2];
-      $a_y =    $argz[3];
-
-      if (strpos($a_x, "px") != FALSE)
-       $a_x = substr($a_x,0,-2);
-      if (strpos($a_y, "px") != FALSE)
-       $a_y = substr($a_y,0,-2);
-
-      $loggo = sprintf("A_play %s, table_pos %d == %d, mazzo %d, gstart %d, card_stat %d, card_own %d",
-                      $a_play, $user->table_pos, ($table->gstart % PLAYERS_N),
-                      $table->mazzo, $table->gstart,
-                      $table->card[$a_play]->stat, $table->card[$a_play]->owner);
-      log_wr($sess, "CIC".$loggo);
-                         
-      /* se era il suo turno e la carta era sua ed era in mano */
-      if ($a_play >=0 && $a_play < 40 &&
-         ($user->table_pos == (($table->gstart + $table->turn) % PLAYERS_N)) &&
-         $table->card[$a_play]->stat == 'hand' &&
-         $table->card[$a_play]->owner == $user->table_pos) {
-       log_wr($sess, sprintf("User: %s Play: %d",$user->name, $a_play));
-
-       /* Change the card status. */
-       $table->card[$a_play]->play($a_x, $a_y);
-
-       /*
-        *  !!!! TURN INCREMENTED BEFORE !!!!
-        */
-       $turn_cur = ($table->gstart + $table->turn) % PLAYERS_N;
-       $table->turn++;
-
-       $card_play = sprintf("card_play(%d,%d,%d,%d);|",
-                            $user->table_pos, $a_play, $a_x, $a_y);
-       if (($table->turn % PLAYERS_N) != 0) {     /* manche not finished */
-         $turn_nex = ($table->gstart + $table->turn) % PLAYERS_N;
-
-         $player_cur = "remark_off();";
-         $player_nex = $card_play . "is_my_time = true; remark_on();";
-         $player_oth = $card_play;
-       }
-       else if ($table->turn <= (PLAYERS_N * 8)) { /* manche finished */
-         $winner = calculate_winner($table);
-         log_wr($sess,"GSTART 3");
-         $table->gstart = $winner;
-         $turn_nex = ($table->gstart + $table->turn) % PLAYERS_N;
-
-         log_wr($sess, sprintf("The winner is: [%d] [%s]", $winner, $bri->user[$table->player[$winner]]->name));
-         $card_take = sprintf("sleep(gst,2000);|cards_take(%d);|cards_hidetake($d);",
-                              $winner, $winner);
-         $player_cur = "remark_off();" . $card_take . "|"; 
-         if ($turn_cur != $turn_nex)
-           $player_nex = $card_play . $card_take . "|";
-         else
-           $player_nex = "";
-         if ($table->turn < (PLAYERS_N * 8))  /* game NOT finished */
-           $player_nex .= "is_my_time = true; remark_on();";
-         $player_oth = $card_play . $card_take;
-       }
 
-       log_wr($sess, sprintf("Turn Cur %d Turn Nex %d",$turn_cur, $turn_nex));
-       for ($i = 0 ; $i < PLAYERS_N ; $i++) {  
-         $user_cur = &$bri->user[$table->player[$i]];
+  echo "$echont";
+}
 
-         $ret = sprintf('gst.st = %d; ', $user_cur->step+1);
+/******************
+ *                *
+ *   STAT: room   *
+ *                *
+ ******************/
+else if ($user->stat == 'room') {
+  $user->laccwr = time();
 
-       
-         if ($i == $turn_cur) {
-           $ret .= $player_cur;          
-         }
-         if ($i == $turn_nex) {
-           $ret .= $player_nex;          
-         }
-         if ($i != $turn_cur && $i != $turn_nex) {
-           $ret .= $player_oth;
-         }
-
-         $retar[$i] = $ret;
-       }
+  if ($argz[0] == 'help') {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    $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);
 
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+    
+  }
+  else if ($argz[0] == 'passwdhowto') {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    $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);
 
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+    
+  }
+  else if ($argz[0] == 'splash') {
+    GLOBAL $G_with_splash, $G_splash_content, $G_splash_interval, $G_splash_idx;
+    GLOBAL $G_splash_w, $G_splash_h, $G_splash_timeout;
+    $CO_splashdate = "CO_splashdate".$G_splash_idx;
+    GLOBAL $$CO_splashdate;
 
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
 
-       if ($table->turn == (PLAYERS_N * 8)) { /* game finished */
-         log_wr($sess, sprintf("GIOCO FINITO !!!"));
 
-         /* ************************************************ */
-         /*    PRIMA LA PARTE PER LO SHOW DI CHI HA VINTO    */
-         /* ************************************************ */
-         calculate_points(&$table);
+    $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);
 
-         $table->game_next();
-         $table->game_init(&$bri->user);
-         
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$bri->user[$table->player[$i]];
-           $retar[$i] .= show_table(&$bri,&$user_cur,$user_cur->step+1,TRUE, TRUE);
-         }
-       }
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+  }
+  else if ($argz[0] == 'about') {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    $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);
 
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+    
+  }
 
-       for ($i = 0 ; $i < PLAYERS_N ; $i++) {  
-         $user_cur = &$bri->user[$table->player[$i]];
-       
-         $user_cur->comm[$user_cur->step % COMM_N] = $retar[$i];
-         $user_cur->step++;        
-       }
 
-       log_wr($sess, sprintf("TURN: %d",$table->turn));
-       /* Have played all the players ? */
-       /* NO:  switch the focus and enable the next player to play. */
+  else if ($argz[0] == 'placing') {
+
+    require_once("briskin5/Obj/briskin5.phh");
+    require_once("briskin5/Obj/placing.phh");
+
+    $user->comm[$user->step % COMM_N] =  "gst.st = ".($user->step+1)."; ";
+    $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);
+
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+
+
+  }
+
+
+  else if ($argz[0] == 'roadmap') {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    $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);
+
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+    
+  }
+  else if ($argz[0] == 'whysupport') {
+    $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+    $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);
+
+    log_wr($user->comm[$user->step % COMM_N]);
+    $user->step_inc();
+    
+  }
+  else if ($argz[0] == 'chatt') {
+    $room->chatt_send(&$user, xcapemesg($mesg));
+  }
+  /**********************
+   *                    *
+   *   SUBST: standup   *
+   *                    *
+   **********************/
+  else if ($user->subst == 'standup') {
+   
+    if ($argz[0] == 'sitdown') {
+        log_wr("SITDOWN command");
+
+      if ($user->the_end == TRUE) {
+       log_wr("INFO:SKIP:argz == sitdown && the_end == TRUE => ignore request.");
+       Room::unlock_data($sem);
+       exit;
+      }
+
+      // Take parameters
+      $table_idx = (int)$argz[1];
+      $table = &$room->table[$table_idx];
+    
+      if ($G_shutdown || $table->wakeup_time > $curtime || 
+          ($table->auth_only && (($user->flags & USER_FLAG_AUTH) == 0)) ) {
+       $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+
+        /* 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>" */
+        if ($G_shutdown) {
+          $user->comm[$user->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['shutmsg'][$G_lang]);
+        }
+        else if ($table->auth_only && (($user->flags & USER_FLAG_AUTH) == 0)) {
+          $user->comm[$user->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"%s");', $dt, NICKSERV, $mlang_indwr['mustauth'][$G_lang]);
+        }
+        else {
+          $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]);
+        }
+       $user->step_inc();
+       Room::save_data($room);
+       Room::unlock_data($sem);
+       exit;
+      }
+
+      /* TODO: refact to a function */
+      // if ($user->bantime > $user->laccwr) {
+      require_once("Obj/hardban.phh");
+
+      if (($bantime = Hardbans::check(($user->flags & USER_FLAG_AUTH ? $user->name : FALSE),
+                          $user->ip, $user->sess)) != -1) {
+       $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+        /* 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." */
+        if ($user->flags & USER_FLAG_AUTH) {
+          $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);
+        }
+        else {
+          $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);
+       }
+       $user->step_inc();
+       Room::save_data($room);
+       Room::unlock_data($sem);
+       exit;
+      }
+    
+      if ($table->player_n == PLAYERS_N) {
+       log_wr("WARN:FSM: Sitdown unreachable, table full.");
+       Room::unlock_data($sem);
+       exit;
+      } 
+      
+      // set new status
+      $user->subst = "sitdown";
+      $user->table = $table_idx;
+      $user->table_pos = $table->user_add($idx);
       
-       /* YES: calculate who win and go to the next turn. */
+      log_wr("MOP before");
+
+      if ($table->player_n == PLAYERS_N) {
+        require_once("briskin5/Obj/briskin5.phh");
+       log_wr("MOP inall");
+
+       // Start game for this table.
+       log_wr("Start game!");
+       
+       //
+       //  START THE SPAWN HERE!!!!
+       //
+
+        // Create new spawned table
+        $bri_sem = Bin5::lock_data(TRUE, $table_idx);
+        $table_token = uniqid("");
+        $room->table[$table_idx]->table_token = $table_token;
+        $room->table[$table_idx]->table_start = $curtime;
+        
+        $plist = "$table_token|$user->table|$table->player_n";
+        for ($i = 0 ; $i < $table->player_n ; $i++) {
+          $plist .= '|'.$room->user[$table->player[$i]]->sess;
+        }
+        log_legal($curtime, $user, "STAT:CREATE_GAME", $plist);
+
+        log_wr("pre new Bin5");
+        if (($bri = new Bin5($room, $table_idx, $table_token)) == FALSE)
+          log_wr("bri create: FALSE");
+        else
+          log_wr("bri create: ".serialize($bri));
+       
+        log_wr("pre init table");
+        // init table
+        $bri_table = $bri->table[0];
+        $bri_table->init($bri->user);
+        $bri_table->game_init($bri->user);
+        //
+        // Init spawned users.
+        //
+        //  MULTIGAME: here init of selected game instead of hardcabled briskin5 init (look subst status)
+        // 
+        log_wr("game_init after");
+        for ($i = 0 ; $i < $table->player_n ; $i++) {
+          $bri_user_cur = $bri->user[$i];
+          $user_cur = $room->user[$table->player[$i]];
+          
+          $bri_user_cur->stat_set('table');
+          $bri_user_cur->subst = 'asta';
+          $bri_user_cur->laccwr = $curtime;
+          
+          $bri_user_cur->trans_step = $user_cur->step + 1;
+          $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = "";
+          $bri_user_cur->step_inc();
+          $bri_user_cur->comm[$bri_user_cur->step % COMM_N] = show_table(&$bri,&$bri_user_cur,$bri_user_cur->step+1,TRUE, FALSE);
+          $bri_user_cur->step_inc();
+          
+          log_wr("TRY PRESAVE: ".$bri_user_cur->step." TRANS STEP: ".$bri_user_cur->trans_step);
+          
+          log_wr("Pre if!");
+          
+          //          ARRAY_POP DISABLED
+          //       // CHECK
+          while (array_pop($user_cur->comm) != NULL);
+          
+          $ret = "";
+          $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);
+          
+          $user_cur->comm[$user_cur->step % COMM_N] = $ret;
+          $user_cur->trans_step = $user_cur->step + 1;
+          log_wr("TRANS ATTIVATO");
+          
+          $user_cur->stat_set('table');
+          $user_cur->subst = 'asta';
+          $user_cur->laccwr = $curtime;
+          $user_cur->step_inc();
+        }
+        log_wr("presave bri");
+        Bin5::save_data($bri);
+        Bin5::unlock_data($bri_sem);
+        log_wr("postsave bri");
       }
+      // change room
+      $room->room_sitdown($user, $table_idx);
+      
+      log_wr("MOP finish");
+    }
+    else if ($argz[0] == 'logout') {
+      $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+      $user->comm[$user->step % COMM_N] .= 'postact_logout();';
+      $user->the_end = TRUE;
+      $user->step_inc();
+    }
+  }
+  /**********************
+   *                    *
+   *   SUBST: sitdown   *
+   *                    *
+   **********************/
+  else if ($user->subst == 'sitdown') {
+    if ($argz[0] == 'wakeup') {
+      $room->room_wakeup($user);      
+    }
+    else if ($argz[0] == 'logout') {
+      $room->room_wakeup($user);      
+      $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
+      $user->comm[$user->step % COMM_N] .= 'postact_logout();';
+      $user->the_end = TRUE;
+      $user->step_inc();
     }
-    else
-      log_wr($sess, "NOSENSE");
   }
 }
-log_wr($sess, "before save data");
-save_data($bri);
+log_wr("before save data");
+Room::save_data($room);
+log_wr($user->step, 'index_wr.php: after save_data()');
 
-unlock_data($sem);
+Room::unlock_data($sem);
 exit;
 ?>