X-Git-Url: http://mop.ddnsfree.com/gitweb/?a=blobdiff_plain;f=web%2FObj%2Fdbase_pgsql.phh;h=77c215f83940975a122a5dddf0df4c46388a7545;hb=0b13b1b5ef313a06e58d2d44ffd09670a4dd8eb5;hp=004edb91a89f343bd4151ed9654d3b1f06a5ec0d;hpb=312a6acc00ec7f331ab461894c319776eec95cae;p=brisk.git diff --git a/web/Obj/dbase_pgsql.phh b/web/Obj/dbase_pgsql.phh index 004edb9..77c215f 100644 --- a/web/Obj/dbase_pgsql.phh +++ b/web/Obj/dbase_pgsql.phh @@ -2,8 +2,8 @@ /* * brisk - dbase_pgsql.phh * - * Copyright (C) 2006-2011 Matteo Nastasi - * mailto: nastasi@alternativeoutput.it + * Copyright (C) 2006-2015 Matteo Nastasi + * mailto: nastasi@alternativeoutput.it * matteo.nastasi@milug.org * web: http://www.alternativeoutput.it * @@ -34,30 +34,46 @@ function escsql($s) return str_replace($escsql_from, $escsql_to, $s); } -class DBConn +class DBConn { static $dbcnnx = FALSE; var $db = FALSE; - + function DBConn() { - $this->db = DBConn::$dbcnnx; + $this->db = DBConn::$dbcnnx; } static function create() { GLOBAL $G_dbauth; - + if (DBConn::$dbcnnx == FALSE) { - if (!(DBConn::$dbcnnx = @pg_connect ($G_dbauth))) { + if (!(DBConn::$dbcnnx = @pg_connect ($G_dbauth, PGSQL_CONNECT_FORCE_NEW))) { return (FALSE); } } $out = new DBConn(); - + return $out; } + + static function destroy() + { + if (DBConn::$dbcnnx != FALSE) { + DBConn::$dbcnnx = FALSE; + return (pg_close(DBConn::$dbcnnx)); + } + return TRUE; + } + + static function recover() + { + self::destroy(); + return (self::create()); + } + function db() { return ($this->db); @@ -69,7 +85,7 @@ class BriskDB var $dbconn; var $item; var $item_n; - + function BriskDB($dbconn) { $this->dbconn = $dbconn; @@ -82,34 +98,52 @@ class BriskDB $ret = FALSE; log_main("BriskDB create:start"); - + do { - if (($dbconn = DBConn::create()) == FALSE) + if (($dbconn = DBConn::create()) == FALSE) { break; - + } + $ret = new BriskDB($dbconn); } while (0); - + return ($ret); } + function query($sql) + { + if (($res = pg_query($this->dbconn->db(), $sql)) == FALSE) { + // try to recover the connection + if (($this->dbconn = DBConn::recover()) == FALSE) + return FALSE; + return (pg_query($this->dbconn->db(), $sql)); + } + + return ($res); + } + + function last_error() + { + return pg_last_error($this->dbconn->db); + } + function users_load() { } - + function login_exists($login) { GLOBAL $G_dbpfx; /* check the existence of the nick in the BriskDB */ log_main("login_exists: ".$login); - - $user_sql = sprintf("SELECT * FROM %susers WHERE login = lower('%s') AND (type & CAST (X'%08x' as integer)) = 0;", - $G_dbpfx, escsql($login), USER_FLAG_TY_DISABLE); - if (($user_pg = pg_query($this->dbconn->db(), $user_sql)) != FALSE) + + $user_sql = sprintf("SELECT * FROM %susers WHERE login = lower('%s')", + $G_dbpfx, escsql($login)); + if (($user_pg = $this->query($user_sql)) != FALSE) if (pg_numrows($user_pg) == 1) return TRUE; - + return FALSE; } @@ -117,90 +151,324 @@ class BriskDB GLOBAL $G_dbpfx; $user_sql = sprintf("SELECT * FROM %susers WHERE login = lower('%s') AND (type & CAST (X'%08x' as integer)) = 0;", $G_dbpfx, escsql($login), USER_FLAG_TY_DISABLE); - if (($user_pg = pg_query($this->dbconn->db(), $user_sql)) == FALSE) + if (($user_pg = $this->query($user_sql)) == FALSE) { + return FALSE; + } + if (pg_numrows($user_pg) != 1) + return FALSE; + + $user_obj = pg_fetch_object($user_pg, 0); + + return ($user_obj); + } + + function user_add($login, $pass, $email, $type, $disa_reas, $guar_code) { + GLOBAL $G_dbpfx; + + $usr_sql = sprintf("INSERT INTO %susers (login, pass, email, type, disa_reas, guar_code, lintm) + VALUES ('%s', '%s', '%s', %d, %d, %d, now()) RETURNING *;", + $G_dbpfx, escsql(strtolower($login)), escsql($pass), escsql($email), + $type, $disa_reas, $guar_code); + + if (! (($usr_pg = $this->query($usr_sql)) != FALSE && pg_affected_rows($usr_pg) == 1) ) { + return FALSE; + } + $usr_obj = pg_fetch_object($usr_pg, 0); + + return $usr_obj; + } + + function transaction($cmd) { + if ($cmd != "BEGIN" && $cmd != "COMMIT" && $cmd != "ROLLBACK") + return FALSE; + + $trans_sql = sprintf("%s;", $cmd); + if (($trans_pg = $this->query($trans_sql)) == FALSE) { + return FALSE; + } + + return (TRUE); + } + + /* + $laddr is native php int (32 or 64 bit) + if ret True is ip is free + */ + function selfreg_check($laddr) + { + GLOBAL $G_dbpfx, $G_selfreg_tout, $G_selfreg_mask; + + $sere_sql = sprintf("DELETE from %sselfreg_chk WHERE atime < now();", $G_dbpfx); + if (($sere_pg = $this->query($sere_sql)) == FALSE) { + return (FALSE); + } + + if (($sere_pg = $this->query($sere_sql)) == FALSE) { + return (FALSE); + } + + $sere_sql = sprintf("SELECT * FROM %sselfreg_chk WHERE (ip & %d) = %d;", + $G_dbpfx, int2four($G_selfreg_mask), int2four($laddr & $G_selfreg_mask)); + if (($sere_pg = $this->query($sere_sql)) == FALSE) { + return(FALSE); + } + + $ret = pg_numrows($sere_pg); + + if ($ret === FALSE) { + return(FALSE); + } + else if ($ret === 0) { + return(TRUE); + } + else if ($ret > 0) { + // already present + return(FALSE); + } + else { + // unreachable branch + return(FALSE); + } + } + + /* + $laddr is native php int (32 or 64 bit) + if ret True is ip is free + */ + function selfreg_set($laddr) + { + GLOBAL $G_dbpfx, $G_selfreg_tout, $G_selfreg_mask; + + $newi_sql = sprintf("INSERT INTO %sselfreg_chk (ip, atime) VALUES (%d, now() + interval '%d seconds');", + $G_dbpfx, int2four($laddr & $G_selfreg_mask), $G_selfreg_tout); + if (($newi_pg = $this->query($newi_sql)) == FALSE) { + return(FALSE); + } + return(TRUE); + } + + /* + to be able to add mail record code into the record itself I must reserve it before. + */ + function mail_reserve_code() { + GLOBAL $G_dbpfx; + + $mail_sql = sprintf("SELECT nextval('%smails_code_seq'::regclass) AS nextval;", $G_dbpfx); + if (($mail_pg = $this->query($mail_sql)) == FALSE) { + return FALSE; + } + if (pg_numrows($mail_pg) != 1) return FALSE; - + + $mail_obj = pg_fetch_object($mail_pg, 0); + + return ($mail_obj->nextval); + } + + function check_record_by_login_or_email($login, $email) { + GLOBAL $G_dbpfx; + + $arr_fie = array('login', 'email'); + $arr_val = array($login, $email); + + for ($i = 0 ; $i < 2 ; $i++) { + $user_sql = sprintf("SELECT * FROM %susers WHERE %s = lower('%s');", + $G_dbpfx, $arr_fie[$i], escsql($arr_val[$i])); + if (($user_pg = $this->query($user_sql)) == FALSE) { + fprintf(STDERR, "QUERY [%s]_ FALSE", $user_sql); + return (3); + } + if (pg_numrows($user_pg) == 1) { + return ($i + 1); + } + } + + return (0); + } + + function getrecord_bycode($code) { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("SELECT * FROM %susers WHERE code = %d;", $G_dbpfx, $code); + if (($user_pg = $this->query($user_sql)) == FALSE) { + return FALSE; + } if (pg_numrows($user_pg) != 1) return FALSE; - + $user_obj = pg_fetch_object($user_pg, 0); return ($user_obj); } + function user_update_login_time($code, $lintm) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (lintm) = (date 'epoch' + %d * INTERVAL '1 second') WHERE code = %d;", $G_dbpfx, $lintm, $code); + + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + + return TRUE; + } + + function user_update_flag_ty($code, $type, $old_val, $old_reas, $new_val, $new_reas) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (type, disa_reas) + = (type & ~(CAST (X'%08x' as integer)) | (CAST (X'%08x' as integer)), %d) + WHERE code = %d AND (type & (CAST (X'%08x' as integer))) + = (CAST (X'%08x' as integer)) AND disa_reas = %d;", + $G_dbpfx, $type, ($new_val ? $type : 0), $new_reas, + $code, $type, ($old_val ? $type : 0), $old_reas); + + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + + return TRUE; + } + + function user_update_passwd($code, $passwd) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (pass) = (md5('%s')) WHERE code = %d;", + $G_dbpfx, $passwd, $code); + + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + + return TRUE; + } + + function user_prefs_update($code, $flags, $supp_comp) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (type, supp_comp) = (%d, '%s') WHERE code = %d;", + $G_dbpfx, $flags, escsql($supp_comp), $code); + fprintf(STDERR, "REQUEST [%s]\n", $user_sql); + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + fprintf(STDERR, "REQUEST GOOD [%s]\n", $user_sql); + + return TRUE; + } + + function user_state_update($code, $flags, $disa_reas) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (type, disa_reas) = (%d, %d) WHERE code = %d;", + $G_dbpfx, $flags, $disa_reas, $code); + fprintf(STDERR, "REQUEST [%s]\n", $user_sql); + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + fprintf(STDERR, "REQUEST GOOD [%s]\n", $user_sql); - + return TRUE; + } + + function user_tos_update($code, $tos_vers) + { + GLOBAL $G_dbpfx; + + $user_sql = sprintf("UPDATE %susers SET (tos_vers) = ('%s') WHERE code = %d;", + $G_dbpfx, escsql($tos_vers), $code); + fprintf(STDERR, "REQUEST [%s]\n", $user_sql); + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + return FALSE; + } + fprintf(STDERR, "REQUEST GOOD [%s]\n", $user_sql); + + return TRUE; + } + + /* + if success return a LoginDBItem object + */ function login_verify($login, $pass) { GLOBAL $G_dbpfx; - + $ret = FALSE; - + log_main("login_verify: ".$login); - - + //O /* check the existence of the nick in the BriskDB */ //O for ($i = 0 ; $i < $this->item_n ; $i++) { //O log_main("login_verify: BEGIN"); - + if (($user_obj = $this->getrecord_bylogin($login)) == FALSE) { return FALSE; } log_main("login[".$user_obj->code."]: ".$user_obj->login); - + /* if it exists check for a valid challenge */ - if (($a_sem = Challenges::lock_data()) != FALSE) { - // error_log("loop-2", 0); + if (($a_sem = Challenges::lock_data(TRUE)) != FALSE) { if (($chals = &Challenges::load_data()) != FALSE) { - // error_log("loop-1", 0); for ($e = 0 ; $e < $chals->item_n ; $e++) { - // error_log("loop", 0); log_main("challenge[".$e."]: ".$chals->item[$e]->login); if (strcmp($login, $chals->item[$e]->login) == 0) { - // error_log("loop2", 0); log_main("login_verify [".$pass."] with [".md5($chals->item[$e]->token.$user_obj->pass)."]"); - + if (strcmp($pass, md5($chals->item[$e]->token.$user_obj->pass)) == 0) { - // error_log("loop3", 0); log_main("login_verify SUCCESS for ".$login); - + $chals->rem($login); + $this->user_update_login_time($user_obj->code, time()); $ret = LoginDBItem::LoginDBItemFromRecord($user_obj); - // error_log("dbitem: ".print_r($ret, TRUE)); break; } } } // end for ($e = 0 ... - // error_log("end loop-1", 0); } - + if ($chals->ismod()) { Challenges::save_data(&$chals); } - + Challenges::unlock_data($a_sem); } //O break; // O } // if (strcasecmp($this->item[$i]->login, ... //O } - + return ($ret); } function getitem_bylogin($login, &$id) { $ret = FALSE; $id = -1; - + log_main("getitem_bylogin: ".$login); - + if (($user_obj = $this->getrecord_bylogin($login)) == FALSE) return $ret; $id = $user_obj->code; return (LoginDBItem::LoginDBItemFromRecord($user_obj)); } - + + function getitem_bycode($code) { + $ret = FALSE; + + log_main("getitem_bycode: ".$code); + + if (($user_obj = $this->getrecord_bycode($code)) == FALSE) + return $ret; + + return (LoginDBItem::LoginDBItemFromRecord($user_obj)); + } + // TODO FOR DB function getmail($login) { @@ -208,7 +476,7 @@ class BriskDB if (($ret = $this->getrecord_bylogin($login)) == FALSE) return FALSE; - + return ($ret->email); } @@ -219,11 +487,9 @@ class BriskDB for ($i = 0 ; $i < $olddb->count() ; $i++) { $user_sql = sprintf("INSERT INTO %susers ( login, pass, email, type) VALUES ('%s', '%s', '%s', %d);", $G_dbpfx, escsql(strtolower($olddb->item[$i]->login)), escsql($olddb->item[$i]->pass), - escsql($olddb->item[$i]->email), $olddb->item[$i]->type & USER_FLAG_TY_ALL); - - // if ( ! (($user_pg = pg_exec($dbconn,$order_add_sql)) != FALSE && pg_affected_rows($order_pg) == 1) ) { + escsql($olddb->item[$i]->email), $olddb->item[$i]->type & USER_FLAG_TY_ALL); - if ( ! (($user_pg = pg_query($this->dbconn->db(), $user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { + if ( ! (($user_pg = $this->query($user_sql)) != FALSE && pg_affected_rows($user_pg) == 1) ) { $cont .= sprintf("ERROR IN LINE: %s\n", eschtml($user_sql)); return FALSE; @@ -237,21 +503,205 @@ class BriskDB return ($this->dbconn); } - // ttok text UNIQUE, - // tidx - function bin5_points_save($date, $ttok, $tidx, $ucodes, $pts) + // return array of array('code', 'login' [, 'first', 'last', 'tidx']) ordered by table position + function users_get($match_code, $with_minmaxtidx, $is_newmatch) { GLOBAL $G_dbpfx; + if ($is_newmatch) { // is new + $usr_sql = sprintf("SELECT u.code AS code, u.login AS login%s + FROM %sbin5_matches AS m, %sbin5_games AS g, %sbin5_points AS p, + %susers AS u, %sbin5_table_orders AS o + WHERE m.code = g.mcode AND g.code = p.gcode AND u.code = p.ucode + AND m.code = o.mcode AND u.code = o.ucode AND m.code = %d + GROUP BY u.code, u.login%s, o.pos + ORDER BY o.pos;", + ($with_minmaxtidx ? ", min(g.tstamp) AS first, max(g.tstamp) AS last, m.tidx AS tidx" : ""), + $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, $match_code, + ($with_minmaxtidx ? ", m.tidx" : "")); + } + else { // is old + $usr_sql = sprintf("SELECT u.code AS code, u.login AS login%s + FROM %sbin5_matches AS m, %sbin5_games AS g, %sbin5_points AS p, %susers AS u + WHERE m.code = g.mcode AND g.code = p.gcode AND u.code = p.ucode AND m.code = %d + GROUP BY u.code, u.login%s;", + ($with_minmaxtidx ? ", min(g.tstamp) AS first, max(g.tstamp) AS last, m.tidx AS tidx" : ""), + $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, $match_code, + ($with_minmaxtidx ? ", m.tidx" : "")); + } + + if (($usr_pg = pg_query($this->dbconn->db(), $usr_sql)) == FALSE ) { + log_crit(sprintf("%s::%s: pg_query usr_sql failed [%s]", __CLASS__, __FUNCTION__, $usr_sql)); + return (FALSE); + } + $usr_n = pg_numrows($usr_pg); + if ($usr_n != BIN5_PLAYERS_N) { + log_crit(sprintf("%s::%s: wrong number of players [%s] %d", __CLASS__, __FUNCTION__, $usr_sql, $usr_n)); + return (FALSE); + } + $users = array(); + + if ($with_minmaxtidx) + $fields = array('code', 'login', 'first', 'last', 'tidx'); + else + $fields = array('code', 'login'); + + for ($u = 0 ; $u < $usr_n ; $u++) { + $usr_obj = pg_fetch_object($usr_pg, $u); + $users[$u] = array(); + foreach($fields as $field) { + $users[$u][$field] = $usr_obj->$field; + } + } + return ($users); + } + + // out: tab->{points,points_n,old_reason}, in: tab->ttok + function match_continue($match_code, $table, $tidx) + { + GLOBAL $G_dbpfx; + $sql_ttok = escsql($table->table_token); + + if (($users = $this->users_get($match_code, FALSE /*without minmaxidx*/, TRUE /*new game*/)) == FALSE) { + log_crit(sprintf("%s::%s: retrieve users fails", __CLASS__, __FUNCTION__)); + return (FALSE); + } + + $num_sql = sprintf("SELECT count(*) AS points_n FROM %sbin5_games WHERE mcode = %d;", $G_dbpfx, $match_code); + if (($num_pg = $this->query($num_sql)) == FALSE || pg_numrows($num_pg) != 1) { + log_crit(sprintf("%s::%s: get games number fails", __CLASS__, __FUNCTION__)); + return (FALSE); + } + $num_obj = pg_fetch_object($num_pg, 0); + $table->points_n = $num_obj->points_n; + + // TAG: POINTS_MANAGEMENT + $tot_sql = sprintf("SELECT sum(p.pts * (2^g.mult)) AS pts + FROM %sbin5_games AS g, %sbin5_points AS p, %susers AS u, + %sbin5_table_orders AS o + WHERE g.mcode = %d AND g.code = p.gcode AND p.ucode = u.code + AND p.ucode = o.ucode AND g.mcode = o.mcode + GROUP BY p.ucode, o.pos + ORDER BY o.pos;", + $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, $match_code); + if (($tot_pg = pg_query($this->dbconn->db(), $tot_sql)) == FALSE + || pg_numrows($tot_pg) != BIN5_PLAYERS_N) { + log_crit(sprintf("%s::%s: get games totals fails", __CLASS__, __FUNCTION__)); + return(FALSE); + } + + $u = 0; + foreach ($users as $user) { + // TAG: POINTS_MANAGEMENT + $pts_sql = sprintf("SELECT p.pts AS pts, g.mult AS mult + FROM %sbin5_points as p, %sbin5_games as g + WHERE p.gcode = g.code AND g.mcode = %d AND p.ucode = %d + ORDER BY g.tstamp ASC + LIMIT %d OFFSET %d;", + $G_dbpfx, $G_dbpfx, $match_code, $user['code'], + MAX_POINTS, + ($num_obj->points_n < MAX_POINTS ? 0 : $num_obj->points_n - MAX_POINTS)); + + // points of the match for each user + if (($pts_pg = $this->query($pts_sql)) == FALSE) { + log_crit(sprintf("%s::%s: get points fails", __CLASS__, __FUNCTION__)); + return (FALSE); + } + $pts_n = pg_numrows($pts_pg); + if ($pts_n > $table->points_n) { + // inconsistent scenario number of points great than number of games + log_crit(sprintf("%s::%s: number of points great than number of games", __CLASS__, __FUNCTION__)); + return (FALSE); + } + // TAG: POINTS_MANAGEMENT + for ($i = 0 , $ct = $table->points_n - $pts_n; $ct < $table->points_n ; $ct++, $i++) { + $pts_obj = pg_fetch_object($pts_pg, $i); + $table->points[$ct % MAX_POINTS][$u] = $pts_obj->pts * pow(2, $pts_obj->mult); + } + $tot_obj = pg_fetch_object($tot_pg, $u); + $table->total[$u] = $tot_obj->pts; + + $u++; + } + + $gam_sql = sprintf("SELECT * FROM %sbin5_games WHERE mcode = %d ORDER BY tstamp DESC LIMIT 1;", $G_dbpfx, $match_code); + if (($gam_pg = $this->query($gam_sql)) == FALSE || pg_numrows($gam_pg) != 1) { + log_crit(sprintf("%s::%s: get last game fails", __CLASS__, __FUNCTION__)); + return (FALSE); + } + $gam_obj = pg_fetch_object($gam_pg, 0); + + $table->old_reason = game_description($gam_obj->act, 'html', $gam_obj->mult, + $gam_obj->asta_win, ($gam_obj->asta_win != -1 ? + $users[$gam_obj->asta_win]['login'] : ""), + $gam_obj->friend, ($gam_obj->friend != -1 ? + $users[$gam_obj->friend]['login'] : ""), + $gam_obj->pnt, $gam_obj->asta_pnt); + + // update matches with new ttok and table idx + $mtc_sql = sprintf("UPDATE %sbin5_matches SET (ttok, tidx) = ('%s', %d) WHERE code = %d RETURNING *;", + $G_dbpfx, $sql_ttok, $tidx, $match_code); + if (($mtc_pg = $this->query($mtc_sql)) == FALSE || pg_numrows($mtc_pg) != 1) { + log_crit(sprintf("%s::%s: update matches table failed", __CLASS__, __FUNCTION__)); + return (FALSE); + } + + return (TRUE); + } + + function match_order_get(&$match_data, $match_code, $exp_num) + { + GLOBAL $G_dbpfx; + + $ord_sql = sprintf("SELECT ucode FROM %sbin5_table_orders WHERE mcode = %d ORDER BY pos ASC;", + $G_dbpfx, $match_code); + + if (($ord_pg = $this->query($ord_sql)) == FALSE || pg_numrows($ord_pg) != $exp_num) { + log_crit(sprintf("%s: fails for id or users number", __FUNCTION__)); + return (FALSE); + } + + $ucodes = array(); + for ($i = 0 ; $i < $exp_num ; $i++) { + $ord_obj = pg_fetch_object($ord_pg, $i); + $ucodes[$i] = $ord_obj->ucode; + } + + if ($match_data !== NULL) { + $mtdt_sql = sprintf("SELECT * FROM %sbin5_matches WHERE code = %d;", + $G_dbpfx, $match_code); + + if (($mtdt_pg = $this->query($mtdt_sql)) == FALSE || pg_numrows($mtdt_pg) != 1) { + log_crit(sprintf("%s: fails retrieve match_data values [%d]", __FUNCTION__, $match_code)); + return (FALSE); + } + + $mtdt_obj = pg_fetch_object($mtdt_pg, 0); + + foreach (array('ttok', 'tidx', 'mult_next', 'mazzo_next', 'tcode') as $match_name) { + $match_data[$match_name] = $mtdt_obj->$match_name; + } + } + + return ($ucodes); + } + + // ttok text UNIQUE, + // tidx + function bin5_points_save($date, $table, $tidx, $action, $ucodes, $pts) + { + GLOBAL $G_dbpfx; + $sql_ttok = escsql($table->table_token); + $is_trans = FALSE; $ret = FALSE; $n = count($ucodes); /* check the existence of the nick in the BriskDB */ log_main("bin5_points_save: "); - + do { - if (pg_query($this->dbconn->db(), "BEGIN") == FALSE) { + if ($this->query("BEGIN") == FALSE) { break; } $is_trans = TRUE; @@ -259,31 +709,72 @@ class BriskDB /* * matches management */ - $mtc_sql = sprintf("SELECT * FROM %sbin5_matches WHERE ttok = '%s';", $G_dbpfx, escsql($ttok)); - if (($mtc_pg = pg_query($this->dbconn->db(), $mtc_sql)) == FALSE || pg_numrows($mtc_pg) != 1) { + $codes_where = ""; + $mtc_sql = sprintf("UPDATE %sbin5_matches SET (mazzo_next, mult_next) = (%d, %d) WHERE ttok = '%s' RETURNING *;", + $G_dbpfx, $table->mazzo, $table->mult, $sql_ttok); + if (($mtc_pg = $this->query($mtc_sql)) == FALSE || pg_numrows($mtc_pg) != 1) { + // match not exists, insert it - $mtc_sql = sprintf("INSERT INTO %sbin5_matches (ttok, tidx) VALUES ('%s', %d) RETURNING *;", - $G_dbpfx, escsql($ttok), $tidx); - if ( ! (($mtc_pg = pg_query($this->dbconn->db(), $mtc_sql)) != FALSE && - pg_affected_rows($mtc_pg) == 1) ) { + $mtc_sql = sprintf("INSERT INTO %sbin5_matches (ttok, tidx, mazzo_next, mult_next) VALUES ('%s', %d, %d, %d) RETURNING *;", + $G_dbpfx, $sql_ttok, $tidx, $table->mazzo, $table->mult); + if (($mtc_pg = $this->query($mtc_sql)) == FALSE || pg_affected_rows($mtc_pg) != 1) { log_crit(sprintf("bin5_points_save: failed at insert match [%s]", $mtc_sql)); break; } + $mtc_obj = pg_fetch_object($mtc_pg, 0); + + for ($i = 0 ; $i < $n ; $i++) { + $ord_sql = sprintf("INSERT INTO %sbin5_table_orders (mcode, ucode, pos) VALUES (%d, %d, %d);", + $G_dbpfx, $mtc_obj->code, $ucodes[$i], $i); + if (($ord_pg = $this->query($ord_sql)) == FALSE || pg_affected_rows($ord_pg) != 1 ) { + log_crit(sprintf("bin5_points_save: failed at insert table order [%s]", $ord_sql)); + break; + } + $codes_where .= sprintf("%scode = %d", ($i == 0 ? "" : " OR "), $ucodes[$i]); + } + if ($i < $n) + break; + + $cnt_sql = sprintf("UPDATE %susers SET (match_cnt, game_cnt) + = (match_cnt+1, game_cnt+1) WHERE %s;", + $G_dbpfx, $codes_where); + error_log($cnt_sql); + if (($cnt_pg = $this->query($cnt_sql)) == FALSE || pg_affected_rows($cnt_pg) != $n) { + log_crit(sprintf("bin5_points_save: failed increment match and game [%s]", $cnt_sql)); + break; + } + } + else { + $mtc_obj = pg_fetch_object($mtc_pg,0); + + for ($i = 0 ; $i < $n ; $i++) { + $codes_where .= sprintf("%scode = %d", ($i == 0 ? "" : " OR "), $ucodes[$i]); + } + $cnt_sql = sprintf("UPDATE %susers SET (game_cnt) + = (game_cnt+1) WHERE %s;", + $G_dbpfx, $codes_where); + error_log($cnt_sql); + if (($cnt_pg = $this->query($cnt_sql)) == FALSE || pg_affected_rows($cnt_pg) != $n) { + log_crit(sprintf("bin5_points_save: failed increment game [%s]", $cnt_sql)); + break; + } } - $mtc_obj = pg_fetch_object($mtc_pg,0); /* * games management */ - $gam_sql = sprintf("INSERT INTO %sbin5_games (mcode, tstamp) - VALUES (%d, to_timestamp(%d)) RETURNING *;", - $G_dbpfx, $mtc_obj->code, $date); - if ( ! (($gam_pg = pg_query($this->dbconn->db(), $gam_sql)) != FALSE && - pg_affected_rows($gam_pg) == 1) ) { + $gam_sql = sprintf("INSERT INTO %sbin5_games (mcode, tstamp, act, asta_pnt, pnt, asta_win, friend, mazzo, mult) + VALUES (%d, to_timestamp(%d), %d, %d, %d, %d, %d, %d, %d) RETURNING *;", + $G_dbpfx, $mtc_obj->code, $date, $action, + $table->old_asta_pnt, $table->old_pnt, + $table->old_asta_win, + $table->old_friend, + $table->old_mazzo, $table->old_mult); + if (($gam_pg = $this->query($gam_sql)) == FALSE || pg_affected_rows($gam_pg) != 1) { log_crit(sprintf("bin5_points_save: failed at insert game [%s]", $gam_sql)); - break; + break; } - + $gam_obj = pg_fetch_object($gam_pg,0); /* @@ -291,37 +782,83 @@ class BriskDB */ for ($i = 0 ; $i < $n ; $i++) { /* put points */ - $pts_sql = sprintf("INSERT INTO %sbin5_points (gcode, ucode, pts) + $pts_sql = sprintf("INSERT INTO %sbin5_points (gcode, ucode, pts) VALUES (%d, %d, %d);", $G_dbpfx, $gam_obj->code, $ucodes[$i], $pts[$i]); - if ( ! (($pts_pg = pg_query($this->dbconn->db(), $pts_sql)) != FALSE && - pg_affected_rows($pts_pg) == 1) ) { + if (($pts_pg = $this->query($pts_sql)) == FALSE || pg_affected_rows($pts_pg) != 1) { log_crit(sprintf("bin5_points_save: failed at insert point [%s]", $pts_sql)); - break; + break; } } - if ($i < $n) break; - - if (pg_query($this->dbconn->db(), "COMMIT") == FALSE) { + + if ($this->query("COMMIT") == FALSE) { break; } - + $is_trans = FALSE; - $ret = TRUE; + $table->match_id = $mtc_obj->code; + $ret = TRUE; } while (0); - + if ($is_trans) - pg_query($this->dbconn-db(), "ROLLBACK"); - + $this->query("ROLLBACK"); + return $ret; } + function mail_add_fromitem($mail) { + GLOBAL $G_dbpfx; + + $usr_sql = sprintf(" +INSERT INTO %smails (code, ucode, type, tstamp, subj, body_txt, body_htm, hash) + VALUES (%d, %d, %d, to_timestamp(%d), '%s', '%s', '%s', '%s') RETURNING *;", + $G_dbpfx, $mail->code, $mail->ucode, $mail->type, $mail->tstamp, + escsql($mail->subj), escsql($mail->body_txt), escsql($mail->body_htm), + ($mail->hash == NULL ? "" : escsql($mail->hash)) + ); + + if (! (($usr_pg = $this->query($usr_sql)) != FALSE && pg_affected_rows($usr_pg) == 1) ) { + return FALSE; + } + $usr_obj = pg_fetch_object($usr_pg, 0); + + return $usr_obj; + } + + function mail_check($code, $type, $hash) + { + GLOBAL $G_dbpfx; + + $mai_sql = sprintf("SELECT * FROM %smails WHERE code = %d AND type = %d AND hash = '%s';", + $G_dbpfx, $code, $type, escsql($hash)); + if (($mai_pg = $this->query($mai_sql)) == FALSE || pg_numrows($mai_pg) != 1) { + // check failed + return (FALSE); + } + + $mai_obj = pg_fetch_object($mai_pg, 0); + return ($mai_obj); + } + + function mail_delete($code) + { + GLOBAL $G_dbpfx; + + $mai_sql = sprintf("DELETE FROM %smails WHERE code = %d;", $G_dbpfx, $code); + + if (($mai_pg = $this->query($mai_sql)) == FALSE || pg_affected_rows($mai_pg) != 1) { + return (FALSE); + } + return (TRUE); + } + + } // End class BriskDB -class LoginDBOld +class LoginDBOld { var $item; var $item_n; @@ -348,4 +885,4 @@ class LoginDBOld } // End class LoginDBOld -?> \ No newline at end of file +?>