refactorization to manage old rules with a separated class
[brisk.git] / web / briskin5 / Obj / briskin5.phh
index 94d0788..106946f 100644 (file)
@@ -35,6 +35,9 @@ define('BIN5_RULES_FINISH',     0);
 define('BIN5_RULES_ABANDON',    1);
 define('BIN5_RULES_ALLPASS',    2);
 
+define('BIN5_TOURNAMENT_OLDRULES', 1);
+define('BIN5_TOURNAMENT_NO_DRAW',  2);
+
 $mlang_bin5_bin5 = array(
                          // br, hr, b, /b, win, fri
                          'info_last' => array( 'it' => '%3$sultima mano%4$s',
@@ -42,8 +45,8 @@ $mlang_bin5_bin5 = array(
                          'info_curr' => array( 'it' => '%3$smano corrente%4$s',
                                                'en' => '%3$scurrent hand%4$s'),
                          // br, hr, b, /b, win, fri
-                         'info_part' => array( 'it' => 'Ha chiamato %3$s%5$s%4$s, il socio era %3$s%6$s%4$s,%1$s',
-                                               'en' => 'The declarer was %3$s%5$s%4$s, the partner was %3$s%6$s%4$s,%1$s'),
+                         'info_part' => array( 'it' => 'Ha chiamato %3$s%5$s%4$s (punti torneo %7$d), il socio era %3$s%6$s%4$s,%1$s',
+                                               'en' => 'The declarer was %3$s%5$s%4$s (tournment points %7$d), the partner was %3$s%6$s%4$s,%1$s'),
                          // br, hr, b, /b
                          'info_capp' => array( 'it' => 'hanno fatto %3$scappotto%4$s EBBRAVI!.%1$s',
                                                'en' => 'and they made %3Dscapot%4$s WELL DONE!.%1$s'),
@@ -62,8 +65,8 @@ $mlang_bin5_bin5 = array(
                                                'en' => 'lost'),
 
                          // br, hr, b, /b, win_name
-                         'info_alon' => array( 'it' => '%3$s%5$s%4$s si è chiamato in mano,%1$s',
-                                               'en' => '%3$s%5$s%4$s play alone against each other,%1$s'),
+                         'info_alon' => array( 'it' => '%3$s%5$s%4$s si è chiamato in mano (punti torneo %6$d),%1$s',
+                                               'en' => '%3$s%5$s%4$s play alone against each other (tournment points %6$d),%1$s'),
                          // br, hr, b, /b, old_asta_pnt, old_pnt, winornot
                          'info_aleaa' => array( 'it' => 'doveva fare %3$salmeno %5$d%4$s punti e ne ha fatti %3$s%6$d%4$s: ha %3$s%7$s%4$s.%1$s',
                                                'en' => 'he/she had to do %3$sat least %5$d%4$s points and they had made %3$s%6$d%4$s: he/she had %3$s%7$s%4$s.%1$s'),
@@ -126,6 +129,347 @@ function multoval($mult)
         return (sprintf(($G_lang == 'en' ? "%d-ple" : "%d-plo"), $mult));
 }
 
+abstract class Rules {
+    var $table;
+
+    abstract function engine(&$bri, $curtime, $action, $user);
+
+    function __construct($table)
+    {
+        $this->table = $table;
+    }
+}
+
+class Rules_old_rules extends Rules {
+    function __construct($table)
+    {
+        parent::__construct($table);
+    }
+
+    static function asta2mult($asta_pnt)
+    {
+        if ($asta_pnt > 110)
+            return (6);
+        else if ($asta_pnt > 100)
+            return (5);
+        else if ($asta_pnt > 90)
+            return (4);
+        else if ($asta_pnt > 80)
+            return (3);
+        else if ($asta_pnt > 70)
+            return (2);
+        else
+            return (1);
+    }
+    static function s_multer($mult, $pnt)
+    {
+        return (pow(2, $mult) * static::asta2mult($pnt));
+    }
+
+    static function s_point_calc($pnt_done, $mult, $pnt_req, $is_allpoints)
+    {
+        return ($pnt_done * static::s_multer($mult, $pnt_req) * ($is_allpoints ? 2 : 1));
+    }
+
+    function multer($is_new)
+    {
+        if ($is_new) {
+            return (static::s_multer($this->table->mult, $this->table->asta_pnt));
+        }
+        else {
+            return (static::s_multer($this->table->old_mult, $this->table->old_asta_pnt));
+        }
+    }
+
+    static function game_result($asta_pnt, $pnt)
+    {
+        $sixty = (BIN5_PLAYERS_N == 3 ? 30 : 60);
+        if ($asta_pnt == 61) {
+            if ($pnt > $sixty)
+                return (1);
+            else if ($pnt == $sixty)
+                return (0);
+            else
+                return (-1);
+        }
+        else {
+            if ($pnt >= $asta_pnt)
+                return (1);
+            else
+                return (-1);
+        }
+    }
+
+    function engine(&$bri, $curtime, $action, $user)
+    {
+        GLOBAL $G_all_points, $G_dbasetype;
+
+        $table = $this->table;
+        $pnts_sav = array();
+
+        if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
+            $table->old_act = $action;
+            $table->old_asta_win = -1;
+            $table->old_pnt = 0;
+            $table->mult_inc(1);
+            for ($i = 0 ; $i < PLAYERS_N ; $i++) {
+                $pnts_sav[$i] = 0;
+            }
+
+            $game_delta = 1;
+            // $table->game_next(1);
+            $table->game_init(&$bri->user);
+        }
+        else if ($action == BIN5_RULES_ABANDON) { // return TRUE if all correct
+            if (!($user->handpt <= 2)) {
+                return (FALSE);
+            }
+            $table->old_act = $action;
+            log_wr(sprintf("GIOCO FINITO !!!"));
+            $table->old_asta_win = $user->table_pos;
+            $table->old_pnt = 0;
+            $table->mult_inc(1);
+
+            for ($i = 0 ; $i < PLAYERS_N ; $i++) {
+                $pnts_sav[$i] = 0;
+            }
+
+            // Non si cambia mazzo se si abbandona la partita
+            $game_delta = 0;
+            // $table->game_next(0);
+            $table->game_init(&$bri->user);
+        }
+        else if ($action == BIN5_RULES_FINISH) { // return TRUE if all correct
+            $table->old_act = $action;
+            do {
+                $pro = 0;
+
+                if ($table->asta_pnt == 60)
+                    $table->asta_pnt = 61;
+
+                $table->old_reason = "";
+
+                // count points for the temporary 2 teams
+                for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
+                    $ctt = $table->card[$i]->value % 10;
+                    $own = $table->card[$i]->owner;
+                    if ($own == $table->asta_win || $own == $table->friend)
+                        $pro += $G_all_points[$ctt];
+                }
+
+                log_wr(sprintf("PRO: [%d]", $pro));
+
+                // PATTA case !
+                if (static::game_result($table->asta_pnt, $pro) == 0) {
+                    $table->points[$table->points_n % MAX_POINTS] = array();
+                    for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
+                        $table->points[$table->points_n % MAX_POINTS][$i] = 0;
+                        $pnts_sav[$i] = 0;
+                    }
+                    $table->points_n++;
+                    $table->old_pnt = $pro;
+                    $table->old_asta_win = $table->asta_win;
+                    $table->mult_inc(1);
+
+                    break;
+                    }
+
+                if (static::game_result($table->asta_pnt, $pro) == 1)
+                    $sig = 1;
+                else
+                    $sig = -1;
+
+                // TAG: POINTS_MANAGEMENT
+                $table->points[$table->points_n % MAX_POINTS] = array();
+                for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
+                    if ($i == $table->asta_win)
+                        $pnt = ($i == $table->friend ? 4 : 2);
+                    else if ($i == $table->friend)
+                        $pnt = 1;
+                    else
+                        $pnt = -1;
+
+                    log_wr(sprintf("PRO: pt[%d][%d] = %d", $table->points_n % MAX_POINTS, $i, $pnt));
+
+                    $pnt_sav = static::s_point_calc($pnt * $sig,           0, $table->asta_pnt, ($pro == 120));
+                    $pnt_tab = static::s_point_calc($pnt * $sig, $table->mult, $table->asta_pnt, ($pro == 120));
+
+                    $table->points[$table->points_n % MAX_POINTS][$i] = $pnt_tab;
+                    $table->total[$i] += $pnt_tab;
+                    $pnts_sav[$i] = $pnt_sav;
+                }
+                $table->points_n++;
+                $table->old_pnt = $pro;
+                $table->old_asta_win = $table->asta_win;
+                $table->mult_set(0);
+            } while (0);
+            $game_delta = 1;
+        }
+        else {
+            return (FALSE);
+        }
+        $table->game_next($game_delta);
+
+        $plist = "$table->table_token|$user->table_orig|$table->player_n";
+        $ucodes = array();
+        $codes = "";
+        for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
+            $user_cur = &$bri->user[$table->player[$i]];
+
+            /* pro db */
+            $ucodes[$i] = $user_cur->code_get();
+
+            /* pro log */
+            $plist .= '|'.xcapelt($user_cur->name).'|'.$pnts_sav[$i];
+            $codes .= '|'.xcapelt($user_cur->code_get());
+        }
+        $plist .= $codes;
+        log_legal($curtime, $user->ip, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
+
+        $table->old_asta_pnt = $table->asta_pnt;
+        // $table->old_mazzo is managed by ->game_next();
+        // $table->old_mult, $table->old_pnt, $table->old_reason and $table->old_asta_win are specific
+
+        $table->old_friend = $table->friend;
+        $table->old_tourn_pts = $table->tourn_pts;
+
+        $table->old_reason = static::game_description($action, 'html', $table->old_mult,
+                                             $table->old_asta_win,
+                                             ($table->old_asta_win != -1 ?
+                                              $bri->user[$table->player[$table->old_asta_win]]->name : ""),
+                                             $table->old_friend,
+                                             ($table->old_friend != -1 ?
+                                              $bri->user[$table->player[$table->old_friend]]->name : ""),
+                                             $table->old_pnt, $table->old_asta_pnt, $table->old_tourn_pts);
+
+
+        if ($user->table_orig < TABLES_AUTH_N) {
+            require_once("../Obj/dbase_".$G_dbasetype.".phh");
+
+            if (($bdb = BriskDB::create()) != FALSE) {
+                $bdb->bin5_points_save($curtime, $table, $user->table_orig, $action, $ucodes, $pnts_sav);
+                unset($bdb);
+            }
+            else {
+                log_points($user->ip, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", "DATABASE CONNECTION FAILED");
+            }
+            log_points($user->ip, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
+        }
+
+        $table->game_init(&$bri->user);
+
+        return (TRUE);
+    }
+
+    static function game_description($act, $form, $old_mult, $win = -1, $win_name = "?1?", $fri = -1, $fri_name = "?2?",
+                              $old_pnt = -1, $old_asta_pnt = -1, $old_tourn_pts = -1)
+    {
+        GLOBAL $G_lang, $mlang_bin5_bin5;
+
+        if ($form == 'html') {
+            $tg_br = "<br>";
+            $tg_hr = "<hr>";
+            $tg_bo = "<b>";
+            $tg_bc = "</b>";
+            $win_name = xcape($win_name);
+            $fri_name = xcape($fri_name);
+        }
+        else {
+            $tg_br = " ";
+            $tg_hr = " ";
+            $tg_bo = "";
+            $tg_bc = "";
+        }
+
+        if ($act == BIN5_RULES_OLDSCHEMA) {
+            return ("");
+        }
+        else if ($act == BIN5_RULES_ALLPASS) {
+            return (sprintf($mlang_bin5_bin5['info_alpa'][$G_lang],
+                            $tg_br, $tg_hr, $tg_bo, $tg_bc));
+        }
+        else if ($act == BIN5_RULES_ABANDON) {
+            return (sprintf($mlang_bin5_bin5['info_aban'][$G_lang],
+                            $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                            $win_name));
+        }
+        else {
+            $wol = static::game_result($old_asta_pnt, $old_pnt);
+
+            $noty = "";
+
+            if ($win != $fri) { // not alone case
+                /* MLANG: "<hr>Nell'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>", "hanno fatto <b>cappotto</b> EBBRAVI!.<hr>", "dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno <b>%s</b>.<hr>", "<hr>Nell'ultima mano <b>%s</b> si &egrave; chiamato in mano,<br>", "ha fatto <b>cappotto</b> EBBRAVO!.<hr>", "doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha <b>%s</b>.<hr>", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'pi&ugrave; di 60'), $table->old_pnt, ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso" */
+
+                $noty .= sprintf($mlang_bin5_bin5['info_part'][$G_lang],
+                                 $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                 $win_name,
+                                 $fri_name,
+                                 $old_tourn_pts);
+                if ($old_pnt == 120) {
+                    $noty .= sprintf($mlang_bin5_bin5['info_capp'][$G_lang],
+                                     $tg_br, $tg_hr, $tg_bo, $tg_bc );
+                }
+                else {
+                    if ($old_asta_pnt > 61) {
+                        $noty .= sprintf($mlang_bin5_bin5['info_alea'][$G_lang],
+                                         $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                         $old_asta_pnt, $old_pnt,
+                                         ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+                                          ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+                                           $mlang_bin5_bin5['info_lost'][$G_lang])));
+                    }
+                    else {
+                        $noty .= sprintf($mlang_bin5_bin5['info_more'][$G_lang],
+                                         $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                         $old_pnt,
+                                         ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+                                          ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+                                           $mlang_bin5_bin5['info_lost'][$G_lang])));
+                    } // else of if ($old_asta_pnt > 61) {
+                } // else of if ($old_pnt == 120) {
+            } // if ($win != $fri) { // not alone case
+            else {
+                $noty .= sprintf($mlang_bin5_bin5['info_alon'][$G_lang],
+                                 $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                 $win_name,
+                                 $old_tourn_pts);
+                if ($old_pnt == 120) {
+                    $noty .= sprintf($mlang_bin5_bin5['info_acap'][$G_lang],
+                                     $tg_br, $tg_hr, $tg_bo, $tg_bc);
+                }
+                else {
+                    if ($old_asta_pnt > 61) {
+                        $noty .= sprintf($mlang_bin5_bin5['info_aleaa'][$G_lang],
+                                         $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                         $old_asta_pnt, $old_pnt,
+                                         ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+                                          ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+                                           $mlang_bin5_bin5['info_lost'][$G_lang])));
+                    }
+                    else {
+                        $noty .= sprintf($mlang_bin5_bin5['info_morea'][$G_lang],
+                                         $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                                         $old_pnt,
+                                         ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
+                                          ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
+                                           $mlang_bin5_bin5['info_lost'][$G_lang])));
+                    }
+                }
+            }
+        }
+
+        $old_multer = static::s_multer($old_mult, $old_asta_pnt);
+        if ($old_multer > 1) {
+            $noty .= sprintf($mlang_bin5_bin5['info_omul'][$G_lang],
+                             $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                             multoval($old_multer));
+        }
+        $noty .= sprintf('%2$s', $tg_br, $tg_hr);
+
+        return ($noty);
+    }
+} // class Rules_old_rules
 
 class Card {
     var $value; /* 0 - 39 card value */
@@ -185,6 +529,7 @@ class Bin5_table extends Table {
 
     var $asta_win;          // the caller idx position at table
     var $briscola;
+    var $tourn_pts;         // points in the caller hand
     var $friend;            // the callee idx position at table
 
     var $match_id;          // the id of the match on the database (-1 == just not saved)
@@ -198,6 +543,9 @@ class Bin5_table extends Table {
     var $old_asta_win;      // the old caller idx position at table
     var $old_friend;        // the old callee idx position at table
 
+    var $old_tourn_pts;     // the old tournment computed points in the hand of caller
+    var $rules;
+
     function Bin5_table()
     {
     }
@@ -223,6 +571,7 @@ class Bin5_table extends Table {
        $thiz->total     =   array( 0, 0, 0, 0, 0);
        $thiz->asta_win  =  -1;
        $thiz->briscola  =  -1;
+       $thiz->tourn_pts =  -1;
        $thiz->friend    =  -1;
        $thiz->turn      =   0;
 
@@ -266,6 +615,7 @@ class Bin5_table extends Table {
 
        $thiz->asta_win     = $from->asta_win;
        $thiz->briscola     = $from->briscola;
+       $thiz->tourn_pts    = $from->tourn_pts;
        $thiz->friend       = $from->friend;
 
        $thiz->match_id     = $from->match_id;
@@ -310,6 +660,9 @@ class Bin5_table extends Table {
         $thiz->old_asta_win = -1;
         $thiz->old_reason = "";
 
+        // FIXME
+        $rules_name = "Rules_old_rules";
+        $thiz->rules = new $rules_name($thiz);
         // players are rearranged in an dedicated array
         $thiz->player = array();
         for ($i = 0 ; $i < $from->player_n ; $i++)
@@ -320,38 +673,6 @@ class Bin5_table extends Table {
         return ($thiz);
     }
 
-    static function asta2mult($asta_pnt)
-    {
-        if ($asta_pnt > 110)
-            return (6);
-        else if ($asta_pnt > 100)
-            return (5);
-        else if ($asta_pnt > 90)
-            return (4);
-        else if ($asta_pnt > 80)
-            return (3);
-        else if ($asta_pnt > 70)
-            return (2);
-        else
-            return (1);
-    }
-
-    function multer($is_new)
-    {
-        if ($is_new) {
-            // return (pow(2, $this->mult) * $this->asta2mult($this->asta_pnt));
-            return (static::s_multer($this->mult, $this->asta_pnt));
-        }
-        else {
-            // return (pow(2, $this->old_mult) * $this->asta2mult($this->old_asta_pnt));
-            return (static::s_multer($this->old_mult, $this->old_asta_pnt));
-        }
-    }
-
-    static function s_multer($mult, $pnt)
-    {
-        return (pow(2, $mult) * static::asta2mult($pnt));
-    }
 
     //   function bunch_create_old() function AND
     //   {
@@ -433,6 +754,7 @@ class Bin5_table extends Table {
         $this->asta_pnt  = 60;
         $this->asta_win  = -1;
         $this->briscola  = -1;
+        $this->tourn_pts = -1;
         $this->friend    = -1;
         $this->turn      =  0;
 
@@ -505,161 +827,6 @@ class Bin5_table extends Table {
         return ($ct);
     }
 
-    function rules_engine(&$bri, $curtime, $action, $user)
-    {
-        GLOBAL $G_all_points, $G_dbasetype;
-
-        $pts = array();
-
-        $this->old_act = $action;
-        if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
-            $this->old_asta_win = -1;
-            $this->old_pnt = 0;
-            $this->mult_inc(1);
-            for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-                $pts[$i] = 0;
-            }
-
-            $game_delta = 1;
-            // $this->game_next(1);
-            $this->game_init(&$bri->user);
-        }
-        else if ($action == BIN5_RULES_ABANDON) { // return TRUE if all correct
-            log_wr(sprintf("GIOCO FINITO !!!"));
-            $this->old_asta_win = $user->table_pos;
-            $this->old_pnt = 0;
-            $this->mult_inc(1);
-
-            for ($i = 0 ; $i < PLAYERS_N ; $i++) {
-                $pts[$i] = 0;
-            }
-
-            // Non si cambia mazzo se si abbandona la partita
-            $game_delta = 0;
-            // $this->game_next(0);
-            $this->game_init(&$bri->user);
-        }
-        else if ($action == BIN5_RULES_FINISH) { // return TRUE if all correct
-            do {
-                $pro = 0;
-
-                if ($this->asta_pnt == 60)
-                    $this->asta_pnt = 61;
-
-                $this->old_reason = "";
-
-                // count points for the temporary 2 teams
-                for ($i = 0 ; $i < (BIN5_CARD_HAND * BIN5_PLAYERS_N) ; $i++) {
-                    $ctt = $this->card[$i]->value % 10;
-                    $own = $this->card[$i]->owner;
-                    if ($own == $this->asta_win || $own == $this->friend)
-                        $pro += $G_all_points[$ctt];
-                }
-
-                log_wr(sprintf("PRO: [%d]", $pro));
-
-                // PATTA case !
-                if ($this->asta_pnt == 61 && $pro == 60) {
-                    $this->points[$this->points_n % MAX_POINTS] = array();
-                    for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
-                        $this->points[$this->points_n % MAX_POINTS][$i] = 0;
-                        $pts[$i] = 0;
-                    }
-                    $this->points_n++;
-                    $this->old_pnt = $pro;
-                    $this->mult_inc(1);
-
-                    // return($pts);
-                    break;
-                }
-
-                if ($pro >= $this->asta_pnt)
-                    $sig = 1;
-                else
-                    $sig = -1;
-
-                $this->points[$this->points_n % MAX_POINTS] = array();
-                for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
-                    if ($i == $this->asta_win)
-                        $pt = ($i == $this->friend ? 4 : 2);
-                    else if ($i == $this->friend)
-                        $pt = 1;
-                    else
-                        $pt = -1;
-
-                    log_wr(sprintf("PRO: pt[%d][%d] = %d", $this->points_n % MAX_POINTS, $i, $pt));
-
-                    $pt = $pt * $sig * $this->multer(TRUE) * ($pro == 120 ? 2 : 1);
-
-                    log_wr(sprintf("PRO:[%d][%d][%d]", $sig, $this->multer(TRUE), ($pro == 120 ? 2 : 1)));
-
-                    $this->points[$this->points_n % MAX_POINTS][$i] = $pt;
-                    $this->total[$i] += $pt;
-                    $pts[$i] = $pt;
-                }
-                $this->points_n++;
-                $this->old_pnt = $pro;
-                $this->old_asta_win = $this->asta_win;
-                $this->mult_set(0);
-
-                // return($pts);
-            } while (0);
-            $game_delta = 1;
-        }
-        else {
-            return (FALSE);
-        }
-        $this->game_next($game_delta);
-
-        $plist = "$this->table_token|$user->table_orig|$this->player_n";
-        $ucodes = array();
-        $codes = "";
-        for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
-            $user_cur = &$bri->user[$this->player[$i]];
-
-            /* pro db */
-            $ucodes[$i] = $user_cur->code_get();
-
-            /* pro log */
-            $plist .= '|'.xcapelt($user_cur->name).'|'.$pts[$i];
-            $codes .= '|'.xcapelt($user_cur->code_get());
-        }
-        $plist .= $codes;
-        log_legal($curtime, $user->ip, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
-
-        $this->old_asta_pnt = $this->asta_pnt;
-        // $this->old_mazzo is managed by ->game_next();
-        // $this->old_mult, $this->old_pnt, $this->old_reason and $this->old_asta_win are specific
-
-        $this->old_friend = $this->friend;
-        $this->old_reason = game_description($action, 'html', $this->old_mult,
-                                             $this->old_asta_win,
-                                             ($this->old_asta_win != -1 ?
-                                              $bri->user[$this->player[$this->old_asta_win]]->name : ""),
-                                             $this->old_friend,
-                                             ($this->old_friend != -1 ?
-                                              $bri->user[$this->player[$this->old_friend]]->name : ""),
-                                             $this->old_pnt, $this->old_asta_pnt);
-
-
-        if ($user->table_orig < TABLES_AUTH_N) {
-            require_once("../Obj/dbase_".$G_dbasetype.".phh");
-
-            if (($bdb = BriskDB::create()) != FALSE) {
-                $bdb->bin5_points_save($curtime, $this, $user->table_orig, $action, $ucodes, $pts);
-                unset($bdb);
-            }
-            else {
-                log_points($remote_addr, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", "DATABASE CONNECTION FAILED");
-            }
-            log_points($remote_addr, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
-        }
-
-        $this->game_init(&$bri->user);
-
-        return (TRUE);
-    }
-
     function match_continue(&$bri, $user, $match_id_s)
     {
         $ret = FALSE;
@@ -785,8 +952,7 @@ class Bin5_table extends Table {
                 continue;
             $user_cur = &$bri->user[$this->player[$i]];
             $user_cur->comm[$user_cur->step % COMM_N] = "gst.st = ".($user_cur->step+1)."; ";
-            $user_cur->comm[$user_cur->step % COMM_N] .= sprintf('chatt_sub("%s", [2, "%s"],"%s");',
-                                                                 $dt, NICKSERV, $msg);
+            $user_cur->comm[$user_cur->step % COMM_N] .= nickserv_msg($dt, $msg);
             $user_cur->step_inc();
         }
     }
@@ -1073,7 +1239,6 @@ class Bin5_user extends User {
           $this->rd_step  = $this->step;
       } /* if ($this->rd_step == -1) { */
       else {
-          /* $sem = Brisk::lock_data(FALSE); */
           $S_load_stat['rU_heavy']++;
 
           if ($this->rd_step < $this->step) {
@@ -1081,7 +1246,6 @@ class Bin5_user extends User {
                   if ($this->rd_step + COMM_N < $this->step) {
                       if ($this->rd_stat != $this->stat) {
                           $to_stat = $this->stat;
-                          /* Brisk::unlock_data($sem); */
                           log_load("RESYNC");
                           printf("xXx BIN5_USER::MAINCHECK\n");
                           return ($this->page_sync($this->sess, ($to_stat == "table" ? "index.php" : "../index.php"), $this->table, $this->table_token));
@@ -1109,28 +1273,9 @@ class Bin5_user extends User {
 
               log_rd2($this->step, 'index_rd.php: after ret set');
 
-              if ($this->the_end == TRUE) {
-                  log_rd2("LOGOUT BYE BYE!!");
-                  log_auth($this->sess, "Explicit logout.");
-
-                  if ($this->the_end == TRUE) {
-                      $this->reset();
-
-                      // FIXME !!!
-                      /* if ($this->subst == 'sitdown') { */
-                      /*     log_load("ROOM WAKEUP"); */
-                      /*     $this->room->room_wakeup($this); */
-                      /* } */
-                      /* else if ($this->subst == 'standup') */
-                      /*     $this->room->room_outstandup($this); */
-                      /* else */
-                      /*     log_rd2("LOGOUT FROM WHAT ???"); */
-
-                  } /* if ($this->the_end == TRUE) { ... */
-              } /* if ($this->the_end == TRUE) { ... */
+              // if ($this->the_end == TRUE) { management is moved
+              // in the spush scope
           } /* if ($this->rd_step < $this->step) { */
-
-          /* Brisk::unlock_data($sem); */
       }  /* else of if ($this->rd_step == -1) { */
 
 
@@ -1151,6 +1296,7 @@ class Bin5_user extends User {
 
 class Bin5 {
     static $delta_t = array();
+    var $brisk;// room object reference
 
     var $user;
     var $table;
@@ -1178,9 +1324,9 @@ class Bin5 {
             exit;
         }
 
+        $this->brisk = $brisk;
         $user  = $brisk->user;
         $table = $brisk->table[$table_idx];
-
         log_wr("Bin5 constructor");
 
         for ($i = 0 ; $i < $table->player_n ; $i++) {
@@ -1207,6 +1353,8 @@ class Bin5 {
 
         if (validate_sess($sess)) {
             for ($i = 0 ; $i < BIN5_MAX_PLAYERS ; $i++) {
+                if ($this->user[$i]->is_empty())
+                    continue;
                 if (strcmp($sess, $this->user[$i]->sess) == 0) {
                     // find it
                     $idx = $i;
@@ -1224,7 +1372,32 @@ class Bin5 {
 
         return (FALSE);
     }
+    function banned_kickoff()
+    {
+        $is_ban = FALSE;
+
+        for ($i = 0 ; $i < BIN5_MAX_PLAYERS ; $i++) {
+            $user_cur = $this->user[$i];
 
+            // check if the IP is blacklisted
+            if ($this->brisk->black_check($user_cur->ip)) {
+                $user_cur->lacc = 0;
+                $is_ban = TRUE;
+                continue;
+            }
+
+            // if authorized not check if banlisted
+            if ($user_cur->is_auth()) {
+                continue;
+            }
+
+            if ($this->brisk->ban_check($user_cur->ip)) {
+                $user_cur->lacc = 0;
+                $is_ban = TRUE;
+            }
+        }
+        return ($is_ban);
+    }
 
     function garbage_manager($force)
     {
@@ -1239,7 +1412,7 @@ class Bin5 {
         if ($force || $this->garbage_timeout < $curtime) {
             for ($i = 0 ; $i < BIN5_MAX_PLAYERS ; $i++) {
                 $user_cur = $this->user[$i];
-                if ($user_cur->sess == "" ||
+                if ($user_cur->is_active() == FALSE || // is not active user or
                     ($user_cur->stat == 'table' && ($user_cur->subst == 'shutdowned' || $user_cur->subst == 'shutdowner')))
                     continue;
 
@@ -1249,21 +1422,14 @@ class Bin5 {
                     if ($user_cur->stat == 'table') {
                         log_auth($user_cur->sess," bin5 Autologout session.");
 
-                        /* SI DELEGA AL garbage_manager principale LA RIMOZIONE DELL'UTENTE
-
-                           $tmp_sess = $user_cur->sess;
-                           $user_cur->sess = "";
-                           Bin5_user::step_unproxy($tmp_sess);
-                           $user_cur->name = "";
-                           $user_cur->the_end = FALSE;
-
-                        */
+                        /* main garbage_manager is delegate as autologout management */
+                        $user_cur->the_end = TRUE;
 
                         /* se gli altri utenti non erano d'accordo questo utente viene bannato */
                         $remcalc = $this->table[0]->exitlock_calc(&$this->user, $user_cur->table_pos);
                         if ($remcalc < 3) {
                             require_once("${G_base}Obj/hardban.phh");
-                            Hardbans::add(($user_cur->flags & USER_FLAG_AUTH ? $user_cur->name : FALSE),
+                            Hardbans::add(($user_cur->is_auth() ? $user_cur->name : FALSE),
                                           $user_cur->ip, $user_cur->sess, $user_cur->laccwr + BAN_TIME);
                         }
                         //      $user->bantime = $user->laccwr + BAN_TIME;
@@ -1348,7 +1514,7 @@ class Bin5 {
     }
 
 
-    function chatt_send($user, $mesg)
+    function chatt_send($user, $mesg, $mlang_indwr = NULL)
     {
         GLOBAL $mlang_brisk, $G_lang;
 
@@ -1374,7 +1540,7 @@ class Bin5 {
             for ($i = 0 ; $i < ($user->stat == 'room' ? BIN5_MAX_PLAYERS : BIN5_PLAYERS_N) ; $i++) {
                 if ($user->stat == 'room') {
                     $user_cur = &$this->user[$i];
-                    if ($user_cur->sess == '' || $user_cur->stat != 'room')
+                    if ($user_cur->is_active() == FALSE || $user_cur->stat != 'room') // is not active user or stat isn't 'room'
                         continue;
                 }
                 else {
@@ -1445,7 +1611,7 @@ class Bin5 {
 
     static function request_mgr(&$s_a_p, $header, &$header_out, &$new_socket, $path, $addr, $get, $post, $cookie)
     {
-        GLOBAL $G_black_list;
+        GLOBAL $G_ban_list, $G_black_list;
 
         printf("NEW_SOCKET (root): %d\n", intval($new_socket));
 
@@ -1520,6 +1686,8 @@ class Bin5 {
                     return TRUE;
                     break;
                 }
+                $bri->brisk->sess_cur_set($user->sess);
+
                 // close a previous opened index_read_ifra socket, if exists
                 if (($prev = $user->rd_socket_get()) != NULL) {
                     $s_a_p->socks_unset($user->rd_socket_get());
@@ -1838,6 +2006,7 @@ function show_table_info(&$bri, &$table, $table_pos)
     $ret = "";
     $user = $bri->user[$table->player[$table_pos]];
 
+    // TAG: POINTS_MANAGEMENT
     $pnt_min = $table->points_n - MAX_POINTS < 0 ? 0 : $table->points_n - MAX_POINTS;
     $noty = sprintf('<table class=\"points\"><tr><th></th>');
 
@@ -1899,7 +2068,7 @@ function show_table_info(&$bri, &$table, $table_pos)
         $noty .= sprintf($mlang_bin5_bin5['info_turn'][$G_lang], $unam);
     }
 
-    $multer = $table->multer(TRUE);
+    $multer = $table->rules->multer(TRUE);
     if ($multer > 1) {
         $noty .= sprintf($mlang_bin5_bin5['info_mult'][$G_lang], multoval($multer) );
     }
@@ -1964,141 +2133,26 @@ function briscola_show($bri, $table, $user)
     return ($ret);
 }
 
-
-function game_result($asta_pnt, $pnt)
+/* FIXME
+function game_result_new($asta_pnt, $pnt)
 {
-    if ($asta_pnt == 61) {
-        if ($pnt > 60)
-            return (1);
-        else if ($pnt == 60)
-            return (0);
-        else
-            return (-1);
-    }
-    else {
-        if ($pnt >= $asta_pnt)
-            return (1);
-        else
-            return (-1);
-    }
+    if ($pnt >= $asta_pnt)
+        return (1);
+    else
+        return (-1);
 }
+*/
 
 function log_points($remote_addr, $curtime, $user, $where, $mesg)
 {
     if (($fp = @fopen(LEGAL_PATH."/points.log", 'a')) != FALSE) {
         /* Unix time | session | nickname | IP | where was | mesg */
         fwrite($fp, sprintf("%ld|%s|%s|%s|%s|%s|%s|\n", $curtime, $user->sess,
-                            ($user->flags & USER_FLAG_AUTH ? 'A' : 'N'),
+                            ($user->is_auth() ? 'A' : 'N'),
                             $user->name, $remote_addr, $where , $mesg));
         fclose($fp);
     }
 }
 
-function game_description($act, $form, $old_mult, $win = -1, $win_name = "?1?", $fri = -1, $fri_name = "?2?",
-                          $old_pnt = -1, $old_asta_pnt = -1)
-{
-    GLOBAL $G_lang, $mlang_bin5_bin5;
-
-    if ($form == 'html') {
-        $tg_br = "<br>";
-        $tg_hr = "<hr>";
-        $tg_bo = "<b>";
-        $tg_bc = "</b>";
-        $win_name = xcape($win_name);
-        $fri_name = xcape($fri_name);
-    }
-    else {
-        $tg_br = " ";
-        $tg_hr = " ";
-        $tg_bo = "";
-        $tg_bc = "";
-    }
-
-    if ($act == BIN5_RULES_OLDSCHEMA) {
-        return ("");
-    }
-    else if ($act == BIN5_RULES_ALLPASS) {
-        return (sprintf($mlang_bin5_bin5['info_alpa'][$G_lang],
-                        $tg_br, $tg_hr, $tg_bo, $tg_bc));
-    }
-    else if ($act == BIN5_RULES_ABANDON) {
-        return (sprintf($mlang_bin5_bin5['info_aban'][$G_lang],
-                        $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                        $win_name));
-    }
-    else {
-        $wol = game_result($old_asta_pnt, $old_pnt);
-
-        $noty = "";
-
-        if ($win != $fri) { // not alone case
-            /* MLANG: "<hr>Nell'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>", "hanno fatto <b>cappotto</b> EBBRAVI!.<hr>", "dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno <b>%s</b>.<hr>", "<hr>Nell'ultima mano <b>%s</b> si &egrave; chiamato in mano,<br>", "ha fatto <b>cappotto</b> EBBRAVO!.<hr>", "doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha <b>%s</b>.<hr>", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'pi&ugrave; di 60'), $table->old_pnt, ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso" */
-
-            $noty .= sprintf($mlang_bin5_bin5['info_part'][$G_lang],
-                             $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                             $win_name,
-                             $fri_name);
-            if ($old_pnt == 120) {
-                $noty .= sprintf($mlang_bin5_bin5['info_capp'][$G_lang],
-                                 $tg_br, $tg_hr, $tg_bo, $tg_bc );
-            }
-            else {
-                if ($old_asta_pnt > 61) {
-                    $noty .= sprintf($mlang_bin5_bin5['info_alea'][$G_lang],
-                                     $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                                     $old_asta_pnt, $old_pnt,
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
-                                      ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
-                                       $mlang_bin5_bin5['info_lost'][$G_lang])));
-                }
-                else {
-                    $noty .= sprintf($mlang_bin5_bin5['info_more'][$G_lang],
-                                     $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                                     $old_pnt,
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
-                                      ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
-                                       $mlang_bin5_bin5['info_lost'][$G_lang])));
-                } // else of if ($old_asta_pnt > 61) {
-            } // else of if ($old_pnt == 120) {
-        } // if ($win != $fri) { // not alone case
-        else {
-            $noty .= sprintf($mlang_bin5_bin5['info_alon'][$G_lang],
-                             $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                             $win_name);
-            if ($old_pnt == 120) {
-                $noty .= sprintf($mlang_bin5_bin5['info_acap'][$G_lang],
-                                 $tg_br, $tg_hr, $tg_bo, $tg_bc);
-            }
-            else {
-                if ($old_asta_pnt > 61) {
-                    $noty .= sprintf($mlang_bin5_bin5['info_aleaa'][$G_lang],
-                                     $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                                     $old_asta_pnt, $old_pnt,
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
-                                      ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
-                                       $mlang_bin5_bin5['info_lost'][$G_lang])));
-                }
-                else {
-                    $noty .= sprintf($mlang_bin5_bin5['info_morea'][$G_lang],
-                                     $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                                     $old_pnt,
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] :
-                                      ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] :
-                                       $mlang_bin5_bin5['info_lost'][$G_lang])));
-                }
-            }
-        }
-    }
-
-    $old_multer = Bin5_table::s_multer($old_mult, $old_asta_pnt);
-    if ($old_multer > 1) {
-        $noty .= sprintf($mlang_bin5_bin5['info_omul'][$G_lang],
-                         $tg_br, $tg_hr, $tg_bo, $tg_bc,
-                         multoval($old_multer));
-    }
-    $noty .= sprintf('%2$s', $tg_br, $tg_hr);
-
-    return ($noty);
-}
 
 ?>