aggiornati i commenti di benvenuto
[brisk.git] / web / index_wr.php
index b7cea12..d4138ee 100644 (file)
@@ -29,26 +29,31 @@ if (DEBUGGING == "local" && $_SERVER['REMOTE_ADDR'] != '127.0.0.1') {
   exit;
 }
 
-log_load($sess, "LOAD: index_wr.php");
+log_load("index_wr.php");
 
 /*
  *  MAIN
  */
 $is_spawn = FALSE;
 
-log_wr($sess, 'COMM: '.$mesg);
+log_wr('COMM: '.$mesg);
 
 $sem = Room::lock_data();
-$room = &Room::load_data();
+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) {
   echo "Get User Error";
-  log_wr($sess, "Get User Error");
+  log_wr("Get User Error");
   Room::unlock_data($sem);
   exit;
 }
 $argz = explode('|', $mesg);
 
-log_wr($sess, 'POSTSPLIT: '.$argz[0]);
+log_wr('POSTSPLIT: '.$argz[0]);
 
 if ($argz[0] == 'shutdown') {
   log_auth($user_cur->sess, "Shutdown session.");
@@ -58,13 +63,13 @@ if ($argz[0] == 'shutdown') {
   $user->name = "";
   $user->the_end = FALSE;
   
-  log_rd2($user->sess, "AUTO LOGOUT.");
+  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($sess, "SHUTDOWN FROM WHAT ???");
+    log_rd2("SHUTDOWN FROM WHAT ???");
 }
 /******************
  *                *
@@ -78,7 +83,7 @@ else if ($user->stat == 'room') {
     $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($sess, $user->comm[$user->step % COMM_N]);
+    log_wr($user->comm[$user->step % COMM_N]);
     $user->step_inc();
     
   }
@@ -86,7 +91,7 @@ else if ($user->stat == 'room') {
     $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]);
+    log_wr($user->comm[$user->step % COMM_N]);
     $user->step_inc();
     
   }
@@ -101,17 +106,17 @@ else if ($user->stat == 'room') {
   else if ($user->subst == 'standup') {
    
     if ($argz[0] == 'sitdown') {
-      log_wr($sess, "SITDOWN command");
+      log_wr("SITDOWN command");
 
       if ($user->the_end == TRUE) {
-       log_wr($sess, "INFO:SKIP:argz == sitdown && the_end == TRUE => ignore request.");
+       log_wr("INFO:SKIP:argz == sitdown && the_end == TRUE => ignore request.");
        Room::unlock_data($sem);
        exit;
       }
       /* TODO: refact to a function */
       if ($user->bantime > $user->laccwr) {
        $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-       $user->comm[$user->step % COMM_N] .= show_notify("<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori. Dovrai aspettare ancora ".secstoword($user->bantime - $user->laccwr)." prima di poterti sedere nuovamente.", 2000, "Torna in piedi.", 400, 100);
+       $user->comm[$user->step % COMM_N] .= show_notify("<br>Ti sei alzato da un tavolo senza il consenso degli altri giocatori. Dovrai aspettare ancora ".secstoword($user->bantime - $user->laccwr)." prima di poterti sedere nuovamente.", 2000, "resta in piedi.", 400, 100);
        
        $user->step_inc();
        Room::save_data($room);
@@ -124,7 +129,7 @@ else if ($user->stat == 'room') {
       $table = &$room->table[$table_idx];
     
       if ($table->player_n == PLAYERS_N) {
-       log_wr($sess, "WARN:FSM: Sitdown unreachable, table full.");
+       log_wr("WARN:FSM: Sitdown unreachable, table full.");
        Room::unlock_data($sem);
        exit;
       } 
@@ -134,13 +139,13 @@ else if ($user->stat == 'room') {
       $user->table = $table_idx;
       $user->table_pos = $table->user_add($idx);
       
-      log_wr($sess, "MOP before");
+      log_wr("MOP before");
 
       if ($table->player_n == PLAYERS_N) {
-       log_wr($sess, "MOP inall");
+       log_wr("MOP inall");
 
        // Start game for this table.
-       log_wr($sess, "Start game!");
+       log_wr("Start game!");
        
        //
        //  START THE SPAWN HERE!!!!
@@ -150,44 +155,47 @@ else if ($user->stat == 'room') {
          $curtime = time();
          // Create new spawned table
          $bri_sem = Briskin5::lock_data($table_idx);
-         if (($bri =& new Briskin5(&$room, $table_idx)) == FALSE)
-           log_wr($sess, "bri create: FALSE");
+         $table_token = uniqid("");
+         $room->table[$table_idx]->table_token = $table_token;
+         $room->table[$table_idx]->table_start = $curtime;
+         
+         if (($bri =& new Briskin5(&$room, $table_idx, $table_token)) == FALSE)
+           log_wr("bri create: FALSE");
          else
-           log_wr($sess, "bri create: ".serialize($bri));
+           log_wr("bri create: ".serialize($bri));
        
          // init table
          $bri_table =& $bri->table[0];
          $bri_table->init(&$bri->user);
          $bri_table->game_init(&$bri->user);
-         $curtime = time();
-
-         
-         // init spawned users
+         //
+         // Init spawned users.
+         //
          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->stat_set('table');
-           $bri_user_cur->subst = 'asta';
-           $bri_user_cur->laccwr = $curtime;
-
            $bri_user_cur->step_inc();
 
-           log_wr($bri_user_cur->sess, "TRY PRESAVE: ".$bri_user_cur->step." TRANS STEP: ".$bri_user_cur->trans_step);
+           log_wr("TRY PRESAVE: ".$bri_user_cur->step." TRANS STEP: ".$bri_user_cur->trans_step);
 
-           log_wr($sess, "Pre if!");
+           log_wr("Pre if!");
            
            $ret = "";
-           $ret .= sprintf('gst.st_loc++; gst.st=%d; the_end=true; window.onunload = null ; document.location.assign("briskin5/briskin5.php?table_idx=%d");|', $user_cur->step+1, $table_idx);
+           $ret .= sprintf('gst.st_loc++; gst.st=%d; createCookie("table_idx", %d, 24*365, cookiepath); createCookie("table_token", "%s", 24*365, cookiepath); the_end=true; window.onunload = null ; document.location.assign("briskin5/index.php");|', $user_cur->step+1, $table_idx, $table_token);
            
            $user_cur->comm[$user_cur->step % COMM_N] = $ret;
            $user_cur->trans_step = $user_cur->step + 1;
-           log_wr($sess, "TRANS ATTIVATO");
+           log_wr("TRANS ATTIVATO");
            
            
            $user_cur->stat_set('table');
@@ -195,10 +203,10 @@ else if ($user->stat == 'room') {
            $user_cur->laccwr = $curtime;
            $user_cur->step_inc();
          }
-         log_wr($sess, "presave bri");
+         log_wr("presave bri");
          Briskin5::save_data($bri);
          Briskin5::unlock_data($bri_sem);
-         log_wr($sess, "postsave bri");
+         log_wr("postsave bri");
        }
        else { // BEFORE SPAWN
          // init table
@@ -209,14 +217,14 @@ else if ($user->stat == 'room') {
          // init users
          for ($i = 0 ; $i < $table->player_n ; $i++) {
            $user_cur = &$room->user[$table->player[$i]];
-           log_wr($sess, "Pre if!");
+           log_wr("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");
+           log_wr("TRANS ATTIVATO");
            
            
            $user_cur->stat_set('table');
@@ -229,13 +237,13 @@ else if ($user->stat == 'room') {
          }
        } // end else {  BEFORE SPAWN
        
-       log_wr($sess, "MOP after");
+       log_wr("MOP after");
 
       }
       // change room
       $room->room_sitdown(&$user, $table_idx);
 
-      log_wr($sess, "MOP finish");
+      log_wr("MOP finish");
 
       
     }
@@ -264,409 +272,7 @@ else if ($user->stat == 'room') {
     }
   }
 }
-/*********************
- *                   *
- *    STAT: table    *
- *                   *
- *********************/
-else if ($user->stat == 'table') {
-  $user->laccwr = time();
-  $table = &$room->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(&$room, &$table, $user->table_pos);
-    log_wr($sess, $user->comm[$user->step % COMM_N]);
-    $user->step_inc();
-  }
-  else if ($argz[0] == 'chatt') {
-    $room->chatt_send(&$user,$mesg);
-  }
-  else if ($argz[0] == 'logout') {
-    $remcalc = $argz[1];
-
-    if ($user->exitislock == TRUE) {
-      $remcalc++;
-      $user->exitislock = FALSE;
-    }
-
-    $logout_cont = TRUE;
-    if ($remcalc >= 3) {
-      $lockcalc = $table->exitlock_calc(&$room->user, $user->table_pos);
-      if ($lockcalc < 3) {
-       $user->comm[$user->step % COMM_N] = "gst.st = ".($user->step+1)."; ";
-       $user->comm[$user->step % COMM_N] .= $table->exitlock_show(&$room->user, $user->table_pos);
-       $user->comm[$user->step % COMM_N] .=  show_notify("<br>I dati presenti sul server non erano allineati con quelli inviati dal tuo browser, adesso lo sono. Riprova ora.", 2000, "Torna alla partita.", 400, 100);
-       
-       log_wr($sess, $user->comm[$user->step % COMM_N]);
-       $user->step_inc();
-       $logout_cont = FALSE;
-      }
-    }
-    else 
-      $user->bantime = $user->laccwr + BAN_TIME;
-    
-    if ($logout_cont == TRUE) {
-      $room->room_wakeup(&$user);
-    }
-  }
-  else if ($argz[0] == 'exitlock') {
-    $user->exitislock = ($user->exitislock == TRUE ? FALSE : TRUE);
-    for ($ct = 0, $i = 0 ; $i < PLAYERS_N ; $i++) {    
-      $user_cur[$i] = &$room->user[$table->player[$i]];
-      if ($user_cur[$i]->exitislock == FALSE)
-       $ct++;
-    }
-    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_inc();
-    }
-  }
-  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);
-
-      $table->game_next();
-      $table->game_init(&$room->user);
-    
-      for ($i = 0 ; $i < PLAYERS_N ; $i++) {   
-       $user_cur = &$room->user[$table->player[$i]];
-
-       $ret = sprintf('gst.st = %d;', $user_cur->step+1);
-       $ret .= show_table(&$room,&$user_cur,$user_cur->step+1, TRUE, TRUE);
-       $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-       $user_cur->step_inc();      
-      }
-    }
-    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 ($a_card >= 0 && $a_card < 9 && $a_card > $table->asta_card)
-           $again = FALSE;
-         else if ($a_card == 9 && $a_pnt > ($table->asta_pnt >= 61 ? $table->asta_pnt : 60) && $a_pnt <= 120)
-           $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
-         $ret = sprintf('gst.st = %d; asta_pnt_set(%d);', $user->step+1, 
-                         ($table->asta_pnt > 60 ? $table->asta_pnt + 1 : 61) );
-         $user->comm[$user->step % COMM_N] = $ret;
-         $user->step_inc();
-
-         log_wr($sess, "Ripetere.");
-       }
-       else {
-         /* next step */
-         $showst = "show_astat("; 
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$room->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 = &$room->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 = &$room->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_inc();
-           }
-         }
-         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(&$room->user);
-         
-           for ($i = 0 ; $i < PLAYERS_N ; $i++) {      
-             $user_cur = &$room->user[$table->player[$i]];
-
-             $ret = sprintf('gst.st = %d;', $user_cur->step+1);
-             $ret .= show_table(&$room,&$user_cur,$user_cur->step+1, TRUE, TRUE);
-             $user_cur->comm[$user_cur->step % COMM_N] = $ret;
-             $user_cur->step_inc();        
-           }
-         }
-         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_inc();
-             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 = &$room->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_inc();        
-           }
-         }
-       }
-      }
-      else {
-       log_wr($sess, "NON CI SIAMO");
-      }
-    }
-    /*  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 = &$room->user[$table->player[$chooser]];
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$room->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($room, $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_inc();          
-         }
-         /*
-            TUTTE LE VARIABILI DI STATO PER PASSARE A GIOCARE E LE
-            VAR PER PASSARE ALLA FASE DI GIOCO
-         */
-       
-       }
-      }
-    }
-  }
-  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, $room->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 = &$room->user[$table->player[$i]];
-
-         $ret = sprintf('gst.st = %d; ', $user_cur->step+1);
-
-       
-         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 ($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);
-
-         $table->game_next();
-         $table->game_init(&$room->user);
-         
-         for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-           $user_cur = &$room->user[$table->player[$i]];
-           $retar[$i] .= show_table(&$room,&$user_cur,$user_cur->step+1,TRUE, TRUE);
-         }
-       }
-
-
-       for ($i = 0 ; $i < PLAYERS_N ; $i++) {  
-         $user_cur = &$room->user[$table->player[$i]];
-       
-         $user_cur->comm[$user_cur->step % COMM_N] = $retar[$i];
-         $user_cur->step_inc();            
-       }
-
-       log_wr($sess, sprintf("TURN: %d",$table->turn));
-       /* Have played all the players ? */
-       /* NO:  switch the focus and enable the next player to play. */
-      
-       /* YES: calculate who win and go to the next turn. */
-      }
-    }
-    else
-      log_wr($sess, "NOSENSE");
-  }
-}
-log_wr($sess, "before save data");
+log_wr("before save data");
 Room::save_data($room);
 
 Room::unlock_data($sem);