X-Git-Url: https://mop.ddnsfree.com/gitweb/?a=blobdiff_plain;f=web%2Fbriskin5%2FObj%2Fbriskin5.phh;h=91fb9c74c29229b44023c90d9a091de05a010b72;hb=14ad625280a22b32bb9d6035c24b868a77f630aa;hp=1f1434c8e4c48f7a723ddffdf7d2424078f4f55c;hpb=e246dc1e59ed187a121f0cae319881f40e1fd426;p=brisk.git
diff --git a/web/briskin5/Obj/briskin5.phh b/web/briskin5/Obj/briskin5.phh
index 1f1434c..91fb9c7 100644
--- a/web/briskin5/Obj/briskin5.phh
+++ b/web/briskin5/Obj/briskin5.phh
@@ -30,10 +30,9 @@ define('BIN5_SHM_MAX', (BIN5_SHM_MIN + 1048576));
define('BIN5_SHM_DLT', 32768);
define('BIN5_PROXY_PATH', PROXY_PATH."/bin5");
-define('BIN5_RULES_OLDSCHEMA', -1);
-define('BIN5_RULES_FINISH', 0);
-define('BIN5_RULES_ABANDON', 1);
-define('BIN5_RULES_ALLPASS', 2);
+require_once('rules.phh');
+
+define('BIN5_TOURNAMENT_CURRENT', BIN5_TOURNAMENT_NO_DRAW);
$mlang_bin5_bin5 = array(
// br, hr, b, /b, win, fri
@@ -41,9 +40,24 @@ $mlang_bin5_bin5 = array(
'en' => '%3$slast hand%4$s'),
'info_curr' => array( 'it' => '%3$smano corrente%4$s',
'en' => '%3$scurrent hand%4$s'),
+ 'info_yshuf'=> array( 'it' => 'Fai tu il mazzo, ',
+ 'en' => 'It\'s your shuffled the cards, '),
+ 'info_shuf' => array( 'it' => 'Il mazzo a %s, ',
+ 'en' => '%s shuffled the cards, '),
+ 'info_yturn'=> array( 'it' => ' tocca a te giocare.',
+ 'en' => ' it\'s your turn.'),
+ 'info_turn' => array( 'it' => 'tocca a %s giocare.',
+ 'en' => 'it\'s the %s\'s turn.'),
+ 'info_mult' => array( 'it' => ' La partita vale %s.',
+ 'en' => ' The game worth %s.' ),
+ 'info_match'=> array( 'it' => 'Il codice della partita è %d.',
+ 'en' => 'Match code is %d.'),
+
+
+
// 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 +76,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'),
@@ -86,18 +100,6 @@ $mlang_bin5_bin5 = array(
'info_aban' => array( 'it' => ' Ha lasciato %3$s%5$s%4$s perché aveva al massimo %3$s2 punti%4$s.',
'en' => ' EN: Ha lasciato %3$s%5$s%4$s perché aveva al massimo %3$s2 punti%4$s.'),
- 'info_shuf' => array( 'it' => 'Il mazzo a %s, ',
- 'en' => '%s shuffled the cards, '),
- 'info_yturn'=> array( 'it' => ' tocca a te giocare.',
- 'en' => ' it\'s your turn.'),
- 'info_turn' => array( 'it' => 'tocca a %s giocare.',
- 'en' => 'it\'s the %s\'s turn.'),
- 'info_mult' => array( 'it' => ' La partita vale %s.',
- 'en' => ' The game worth %s.' ),
- 'info_yshuf'=> array( 'it' => 'Fai tu il mazzo, ',
- 'en' => 'It\'s your shuffled the cards, '),
- 'info_match'=> array( 'it' => 'Il codice della partita è %d.',
- 'en' => 'Match code is %d.'),
'btn_bkgame'=> array( 'it' => 'torna alla partita',
'en' => 'back to the game'),
'call_wptn' => array( 'it' => '
con %d punti',
@@ -112,6 +114,16 @@ $mlang_bin5_bin5 = array(
$table_wellarr = Array( 'it' => Array ( 'Benvenuto al tavolo. Se almeno tre giocatori non sbloccano l\'uscita cliccando il lucchetto, chi esce non può risedersi a un qualunque tavolo per '.floor(BAN_TIME/60).' minuti.'),
'en' => Array ( 'EN Benvenuto al tavolo. Se almeno tre giocatori non sbloccano l\'uscita cliccando il lucchetto, chi esce non può risedersi a un qualunque tavolo per '.floor(BAN_TIME/60).' minuti.') );
+function rules_id2name($id)
+{
+ if ($id == 1)
+ return 'Rules_old_rules';
+ else if ($id == 2)
+ return 'Rules_no_draw';
+
+ return 'Rules_unknown';
+}
+
function multoval($mult)
{
GLOBAL $G_lang;
@@ -185,6 +197,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 +211,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 +239,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 +283,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;
@@ -299,7 +317,7 @@ class Bin5_table extends Table {
$thiz->card = array();
$thiz->bunch_create();
- $thiz->mazzo = rand(0,PLAYERS_N-1);
+ $thiz->mazzo = rand(0,PLAYERS_N-1);
$thiz->points = array();
$thiz->total = array();
$thiz->points_n = 0;
@@ -310,6 +328,8 @@ class Bin5_table extends Table {
$thiz->old_asta_win = -1;
$thiz->old_reason = "";
+ $rules_name = rules_id2name(BIN5_TOURNAMENT_CURRENT);
+ $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,41 +340,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 (static::s_multer($this->mult, $this->asta_pnt));
- }
- else {
- return (static::s_multer($this->old_mult, $this->old_asta_pnt));
- }
- }
-
- 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 bunch_create_old() function AND
// {
@@ -436,6 +421,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;
@@ -508,166 +494,11 @@ class Bin5_table extends Table {
return ($ct);
}
- function rules_engine(&$bri, $curtime, $action, $user)
- {
- GLOBAL $G_all_points, $G_dbasetype;
-
- $pnts_sav = array();
-
- if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
- $this->old_act = $action;
- $this->old_asta_win = -1;
- $this->old_pnt = 0;
- $this->mult_inc(1);
- for ($i = 0 ; $i < PLAYERS_N ; $i++) {
- $pnts_sav[$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
- if (!($user->handpt <= 2)) {
- return (FALSE);
- }
- $this->old_act = $action;
- 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++) {
- $pnts_sav[$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
- $this->old_act = $action;
- 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 (game_result($this->asta_pnt, $pro) == 0) {
- $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;
- $pnts_sav[$i] = 0;
- }
- $this->points_n++;
- $this->old_pnt = $pro;
- $this->old_asta_win = $this->asta_win;
- $this->mult_inc(1);
-
- break;
- }
-
- if ($pro >= $this->asta_pnt)
- $sig = 1;
- else
- $sig = -1;
-
- // TAG: POINTS_MANAGEMENT
- $this->points[$this->points_n % MAX_POINTS] = array();
- for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
- if ($i == $this->asta_win)
- $pnt = ($i == $this->friend ? 4 : 2);
- else if ($i == $this->friend)
- $pnt = 1;
- else
- $pnt = -1;
-
- log_wr(sprintf("PRO: pt[%d][%d] = %d", $this->points_n % MAX_POINTS, $i, $pnt));
-
- $pnt_sav = static::s_point_calc($pnt * $sig, 0, $this->asta_pnt, ($pro == 120));
- $pnt_tab = static::s_point_calc($pnt * $sig, $this->mult, $this->asta_pnt, ($pro == 120));
-
- $this->points[$this->points_n % MAX_POINTS][$i] = $pnt_tab;
- $this->total[$i] += $pnt_tab;
- $pnts_sav[$i] = $pnt_sav;
- }
- $this->points_n++;
- $this->old_pnt = $pro;
- $this->old_asta_win = $this->asta_win;
- $this->mult_set(0);
- } 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).'|'.$pnts_sav[$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, $pnts_sav);
- 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)
{
+ //
+ // Rules: update version following loaded tcode
+ //
$ret = FALSE;
$curtime = time();
@@ -759,6 +590,10 @@ class Bin5_table extends Table {
unset($bdb);
}
+ /* update rules engine */
+ $rules_name = rules_id2name($match_data['tcode']);
+ $this->rules = new $rules_name($this);
+
/* bunch and multiplier status set */
$this->mazzo = $match_data['mazzo_next'];
$this->mult = $match_data['mult_next'];
@@ -1353,7 +1188,7 @@ class Bin5 {
}
- function chatt_send($user, $mesg)
+ function chatt_send($user, $mesg, $mlang_indwr = NULL)
{
GLOBAL $mlang_brisk, $G_lang;
@@ -1907,7 +1742,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) );
}
@@ -1972,26 +1807,6 @@ function briscola_show($bri, $table, $user)
return ($ret);
}
-
-function game_result($asta_pnt, $pnt)
-{
- $sixty = 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 log_points($remote_addr, $curtime, $user, $where, $mesg)
{
if (($fp = @fopen(LEGAL_PATH."/points.log", 'a')) != FALSE) {
@@ -2003,111 +1818,5 @@ function log_points($remote_addr, $curtime, $user, $where, $mesg)
}
}
-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 = "