- 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($user->ip, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", "DATABASE CONNECTION FAILED");
- }
- log_points($user->ip, $curtime, $user, "STAT:BRISKIN5:FINISH_GAME", $plist);
- }
-
- $this->game_init($bri->user);
-
- return (TRUE);
- }
-