X-Git-Url: http://mop.ddnsfree.com/gitweb/?a=blobdiff_plain;f=web%2Fbriskin5%2FObj%2Fbriskin5.phh;h=106946fa90f791c935cc84f49fdb96256e413fcd;hb=7332bf2e21e419c2f5af5f7e955367b59c9da135;hp=9e29e0104e5d4b034e74ea5bcef874fc4cff6ff8;hpb=98937b122c56a9fd52903551e1e9ca8df50be65b;p=brisk.git
diff --git a/web/briskin5/Obj/briskin5.phh b/web/briskin5/Obj/briskin5.phh
index 9e29e01..106946f 100644
--- a/web/briskin5/Obj/briskin5.phh
+++ b/web/briskin5/Obj/briskin5.phh
@@ -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 = "
";
+ $tg_hr = "
";
+ $tg_bo = "";
+ $tg_bc = "";
+ $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: "
Nell'ultima mano ha chiamato %s, il socio era %s,
", "hanno fatto cappotto EBBRAVI!.
", "dovevano fare %s punti e ne hanno fatti %d: hanno %s.
", "
Nell'ultima mano %s si è chiamato in mano,
", "ha fatto cappotto EBBRAVO!.
", "doveva fare %s punti e ne ha fatti %d: ha %s.
", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'più 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();
}
}
@@ -1010,9 +1176,9 @@ class Bin5_user extends User {
return (sprintf('xstm.stop(); window.onbeforeunload = null; window.onunload = null; document.location.assign("%s");', $page));
}
- protected function maincheck($cur_stat, $cur_subst, $cur_step, $get, $post, $cookie)
+ protected function maincheck($get, $post, $cookie)
{
- GLOBAL $G_lang, $mlang_indrd;
+ GLOBAL $G_lang;
GLOBAL $G_with_splash, $G_splash_content, $G_splash_interval, $G_splash_idx;
GLOBAL $G_splash_w, $G_splash_h, $G_splash_timeout;
@@ -1024,14 +1190,14 @@ class Bin5_user extends User {
$curtime = time();
/* Nothing changed, return. */
- if ($cur_step == $this->step)
+ if ($this->rd_step == $this->step)
return (FALSE);
- log_rd2("do other cur_stat[".$cur_stat."] user->stat[".$this->stat."] cur_step[".$cur_step."] user_step[".$this->step."]");
+ log_rd2("do other cur_stat[".$this->rd_stat."] user->stat[".$this->stat."] cur_step[".$this->rd_step."] user_step[".$this->step."]");
- if ($cur_step == -1) {
+ if ($this->rd_step == -1) {
/*
- * if $cur_step == -1 load the current state from the main struct
+ * if $this->rd_step == -1 load the current state from the main struct
*/
$S_load_stat['wR_minusone']++;
@@ -1042,7 +1208,7 @@ class Bin5_user extends User {
if ($this->trans_step != -1) {
log_rd2("TRANS USATO ".$this->trans_step);
- $cur_step = $this->trans_step;
+ $this->rd_step = $this->trans_step;
$this->trans_step = -1;
}
else {
@@ -1052,7 +1218,7 @@ class Bin5_user extends User {
/* this part I suppose is read only on $this->room structure */
- if ($cur_step == -1) {
+ if ($this->rd_step == -1) {
log_rd2("PRE-NEWSTAT");
/***************
@@ -1071,17 +1237,15 @@ class Bin5_user extends User {
$this->rd_stat = $this->stat;
$this->rd_subst = $this->subst;
$this->rd_step = $this->step;
- } /* if ($cur_step == -1) { */
+ } /* if ($this->rd_step == -1) { */
else {
- /* $sem = Room::lock_data(FALSE); */
$S_load_stat['rU_heavy']++;
- if ($cur_step < $this->step) {
+ if ($this->rd_step < $this->step) {
do {
- if ($cur_step + COMM_N < $this->step) {
- if (($cur_stat != $this->stat)) {
+ if ($this->rd_step + COMM_N < $this->step) {
+ if ($this->rd_stat != $this->stat) {
$to_stat = $this->stat;
- /* Room::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));
@@ -1091,10 +1255,10 @@ class Bin5_user extends User {
$this->rd_step = -1;
break;
}
- for ($i = $cur_step ; $i < $this->step ; $i++) {
+ for ($i = $this->rd_step ; $i < $this->step ; $i++) {
$ii = $i % COMM_N;
if ($this->comm[$ii] == "") {
- if ($i == $cur_step)
+ if ($i == $this->rd_step)
continue;
else
break;
@@ -1109,33 +1273,14 @@ 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 ($cur_step < $this->step) { */
-
- /* Room::unlock_data($sem); */
- } /* else of if ($cur_step == -1) { */
+ // if ($this->the_end == TRUE) { management is moved
+ // in the spush scope
+ } /* if ($this->rd_step < $this->step) { */
+ } /* else of if ($this->rd_step == -1) { */
return ($ret);
- } // function maincheck (...
+ } // function maincheck(...
function continue_set($match_code)
{
@@ -1151,6 +1296,7 @@ class Bin5_user extends User {
class Bin5 {
static $delta_t = array();
+ var $brisk;// room object reference
var $user;
var $table;
@@ -1167,7 +1313,7 @@ class Bin5 {
var $delay_mgr;
- function Bin5 ($room, $table_idx, $table_token, $get, $post, $cookie) {
+ function Bin5($brisk, $table_idx, $table_token, $get, $post, $cookie) {
$this->user = array();
$this->table = array();
@@ -1178,9 +1324,9 @@ class Bin5 {
exit;
}
- $user = $room->user;
- $table = $room->table[$table_idx];
-
+ $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));
@@ -1483,7 +1649,6 @@ class Bin5 {
break;
case "index_wr.php":
- // FIXME $content can be unset
if (isset($table_idx) && isset($table_token)) {
if (($bri = $s_a_p->app->match_get($table_idx, $table_token)) != FALSE) {
ob_start();
@@ -1521,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());
@@ -1839,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(' | ');
@@ -1900,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) );
}
@@ -1965,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 = "
";
- $tg_hr = "
";
- $tg_bo = "";
- $tg_bc = "";
- $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: "
Nell'ultima mano ha chiamato %s, il socio era %s,
", "hanno fatto cappotto EBBRAVI!.
", "dovevano fare %s punti e ne hanno fatti %d: hanno %s.
", "
Nell'ultima mano %s si è chiamato in mano,
", "ha fatto cappotto EBBRAVO!.
", "doveva fare %s punti e ne ha fatti %d: ha %s.
", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'più 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);
-}
?>
|---|