X-Git-Url: http://mop.ddnsfree.com/gitweb/?a=blobdiff_plain;f=web%2FObj%2Fdbase_pgsql.phh;h=7cd0c4bc0ee237e5cab8607b095b30adcb38d24e;hb=79db26bc13a3eed3104658c4ce5b174557275909;hp=cd7c6d6ca4af816799a765fec42e85b8506537e2;hpb=3900674d60de8d64918a7022da692ceef96c31c7;p=brisk.git diff --git a/web/Obj/dbase_pgsql.phh b/web/Obj/dbase_pgsql.phh index cd7c6d6..7cd0c4b 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 * @@ -25,7 +25,7 @@ require_once("${G_base}Obj/dbase_base.phh"); $escsql_from = array( "\\", "'" ); -$escsql_to = array( "\\\\", "\\'" ); +$escsql_to = array( "\\\\", "''" ); function escsql($s) { @@ -34,25 +34,47 @@ 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; + } + + static function create() { GLOBAL $G_dbauth; - + if (DBConn::$dbcnnx == FALSE) { - if (!(DBConn::$dbcnnx = @pg_connect ($G_dbauth))) { - echo "DB connection failed."; - exit; + if (!(DBConn::$dbcnnx = @pg_connect ($G_dbauth, PGSQL_CONNECT_FORCE_NEW))) { + return (FALSE); } } - $this->db = DBConn::$dbcnnx; - return; + $out = new DBConn(); + + return $out; + } + + static function destroy() + { + if (DBConn::$dbcnnx != FALSE) { + $ret = pg_close(DBConn::$dbcnnx); + DBConn::$dbcnnx = FALSE; + return ($ret); + } + return TRUE; + } + + static function recover() + { + self::destroy(); + return (self::create()); } + function db() { return ($this->db); @@ -64,121 +86,392 @@ class BriskDB var $dbconn; var $item; var $item_n; - - function BriskDB() + + function BriskDB($dbconn) + { + $this->dbconn = $dbconn; + } + + static function create() { - GLOBAL $DOCUMENT_ROOT, $G_dbpfx, $G_false; + GLOBAL $DOCUMENT_ROOT, $G_dbpfx; + + $ret = FALSE; + log_main("BriskDB create:start"); - - $this->dbconn = new DBConn(); - - log_main("BriskDB create:end"); + + do { + 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) { + error_log('pg_result_status: ' . pg_result_status($res)); + error_log('pg_connection_status: ' . pg_connection_status($this->dbconn->db())); + // 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 = '%s'", + $G_dbpfx, escsql($login)); + if (($user_pg = $this->query($user_sql)) != FALSE) if (pg_numrows($user_pg) == 1) return TRUE; - + return FALSE; } - function &getrecord_bylogin($login) { - GLOBAL $G_false, $G_dbpfx; + function getrecord_bylogin($login) { + 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) - return $ret; - + if (($user_pg = $this->query($user_sql)) == FALSE) { + return FALSE; + } if (pg_numrows($user_pg) != 1) - return $ret; - + 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; - - function &login_verify($login, $pass) + $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_false; - - $ret = &$G_false; - + 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 $ret; + + 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) { + if (($a_sem = Challenges::lock_data(TRUE)) != FALSE) { if (($chals = &Challenges::load_data()) != FALSE) { for ($e = 0 ; $e < $chals->item_n ; $e++) { - log_main("challenge[".$e."]: ".$chals->item[$e]->login); if (strcmp($login, $chals->item[$e]->login) == 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) { log_main("login_verify SUCCESS for ".$login); - + $chals->rem($login); + $this->user_update_login_time($user_obj->code, time()); $ret = LoginDBItem::LoginDBItemFromRecord($user_obj); - return ($ret); - //O break; + break; } } } // end for ($e = 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) { - GLOBAL $G_false; - - $ret = &$G_false; + 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) { @@ -186,7 +479,7 @@ class BriskDB if (($ret = $this->getrecord_bylogin($login)) == FALSE) return FALSE; - + return ($ret->email); } @@ -196,12 +489,10 @@ 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($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) ) { + $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_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; @@ -210,17 +501,200 @@ class BriskDB return TRUE; } - function &getdbconn() + function getdbconn() { - $ret = $this->dbconn; - return ($ret); + return ($this->dbconn); + } + + // 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, $ttok, $tidx, $ucodes, $pts) + // 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; @@ -228,9 +702,9 @@ class BriskDB $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; @@ -238,31 +712,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); /* @@ -270,37 +785,105 @@ 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); + } + + function usersnet_bycode($owner, $target) + { + GLOBAL $G_dbpfx; + $ret = FALSE; + + $net_sql = sprintf("SELECT * FROM %susersnet WHERE owner = %d AND target = %d;", + $G_dbpfx, $owner, $target); + if (($net_pg = $this->query($net_sql)) == FALSE) { + return FALSE; + } + if (pg_numrows($net_pg) != 1) + return FALSE; + + $net_obj = pg_fetch_object($net_pg, 0); + + return (UsersNetItem::UsersNetItemFromRecord($net_obj)); + } + + function usersnet_default($owner, $target) + { + return (UsersNetItem::UsersNetItemDefaults($owner, $target)); + } + } // End class BriskDB -class LoginDBOld +class LoginDBOld { var $item; var $item_n; @@ -327,4 +910,4 @@ class LoginDBOld } // End class LoginDBOld -?> \ No newline at end of file +?>