refactorization to manage old rules with a separated class
[brisk.git] / web / briskin5 / statadm.php
index 3c3e954..ee06e08 100644 (file)
@@ -2,7 +2,7 @@
 /*
  *  brisk - statadm.php
  *
- *  Copyright (C) 2009-2011 Matteo Nastasi
+ *  Copyright (C) 2009-2012 Matteo Nastasi
  *                          mailto: nastasi@alternativeoutput.it 
  *                                  matteo.nastasi@milug.org
  *                          web: http://www.alternativeoutput.it
 /*
   line example:
 1246428948|492e4e9e856b0|N|tre|172.22.1.90|STAT:BRISKIN5:FINISH_GAME|4a4afd4983039|6|3|tre|1|due|2|uno|-1|
-
-TODO:
-   - update the STAT file with differential
-   - recalculate points
-
    
 */
 
@@ -38,6 +33,7 @@ $G_base = "../";
 ini_set("max_execution_time",  "240");
 
 require_once("../Obj/brisk.phh");
+require_once("../Obj/user.phh");
 require_once("../Obj/auth.phh");
 require_once("../Obj/dbase_${G_dbasetype}.phh");
 require_once("Obj/briskin5.phh");
@@ -45,6 +41,7 @@ require_once("Obj/placing.phh");
 
 function main_file($curtime)
 {
+  GLOBAL $G_alarm_passwd;
   $tri = array();
   $mon = array();
   $wee = array();
@@ -62,7 +59,11 @@ function main_file($curtime)
     fclose($fp_start);
   }
 
-  $bdb = new BriskDB();
+  if (($bdb = BriskDB::create()) == FALSE) {
+    echo "database connection failed";
+    exit;
+  }
+      
   $bdb->users_load();
 
   for ($i = 0 ; $i < $bdb->count() ; $i++) {
@@ -100,12 +101,12 @@ function main_file($curtime)
       
       continue;
     }
-    // echo $p++." ".BRISKIN5_PLAYERS_N."<br>";
+    // echo $p++." ".BIN5_PLAYERS_N."<br>";
     
     $found = FALSE;
     $mult = 1;
-    for ($i = 0 ; $i < BRISKIN5_PLAYERS_N ; $i++) {
-      for ($e = $i + 1 ; $e < BRISKIN5_PLAYERS_N ; $e++) {
+    for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
+      for ($e = $i + 1 ; $e < BIN5_PLAYERS_N ; $e++) {
         if ($ar[10+($i*2)] == $ar[10+($e*2)]) {
           $mult = abs($ar[10+($i*2)]);
           $found = TRUE;
@@ -117,7 +118,7 @@ function main_file($curtime)
 
     if ($mult == 0)
        continue;
-    for ($i = 0 ; $i < BRISKIN5_PLAYERS_N ; $i++) {
+    for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
       // echo $p." i) ".$i."<br>";
       $username = $ar[9+($i*2)];
       if (($item = $bdb->getitem_bylogin($username, &$id)) == FALSE) {
@@ -214,7 +215,10 @@ function main_pgsql($curtime)
 {
     GLOBAL $G_dbpfx;
 
-    $bdb = new BriskDB();
+    if (($bdb = BriskDB::create()) == FALSE) {
+        echo "database connection failed";
+        exit;
+    }
 
     $limi = array( TRI_LIMIT, MON_LIMIT, WEE_LIMIT );
     $ming = array( TRI_MIN_GAMES, MON_MIN_GAMES, WEE_MIN_GAMES );
@@ -225,31 +229,128 @@ function main_pgsql($curtime)
             log_crit("statadm: begin failed");
             break;
         }
+        
+        $mtc_sql = sprintf("CREATE TEMPORARY TABLE %sbin5_temp_matches ON COMMIT DROP AS SELECT m.code, max(g.tstamp) AS tstamp 
+                            FROM %sbin5_matches as m, %sbin5_games as g 
+                            WHERE m.tcode = %d AND m.code = g.mcode GROUP BY m.code, m.ttok",
+                           $G_dbpfx, $G_dbpfx, $G_dbpfx, BIN5_TOURNAMENT_NORMAL);
+        if (pg_query($bdb->dbconn->db(), $mtc_sql) == FALSE) {
+            log_crit("statadm: temporary matches table creation [$mtc_sql] failed");
+            break;
+        }
+        
+        $tmt_sql = sprintf("SELECT * FROM %sbin5_temp_matches WHERE  tstamp < to_timestamp(%d)",
+                           $G_dbpfx, $curtime - TRI_LIMIT);
+
+        // if deletable old matches exists then ...
+        if (($tmt_pg = pg_query($bdb->dbconn->db(), $tmt_sql)) != FALSE) {
+            //
+            // store matches before clean them
+            //
+            $fname = sprintf("%s/pts_archive%s.log", LEGAL_PATH, date("Ymd", $curtime));
+            if (($fp = @fopen($fname, 'a')) == FALSE) {
+                log_crit("statadm: log file [$fname] open failed");
+                break;
+            }
+            
+            $tmt_n = pg_numrows($tmt_pg);
+            // get matches
+            for ($m = 0 ; $m < $tmt_n ; $m++) {
+                $tmt_obj = pg_fetch_object($tmt_pg, $m);
+                
+                $mtc_sql = sprintf("SELECT * from %sbin5_matches WHERE code = %d",
+                                   $G_dbpfx, $tmt_obj->code);
+                
+                if (($mtc_pg  = pg_query($bdb->dbconn->db(), $mtc_sql)) == FALSE || pg_numrows($mtc_pg) != 1) {
+                    log_crit("statadm: matches row select failed");
+                    break;
+                }
+                $mtc_obj = pg_fetch_object($mtc_pg, 0);
+                
+                if (fwrite($fp, sprintf("M|%d|%s|%d|\n", $mtc_obj->code, xcapelt($mtc_obj->ttok), $mtc_obj->tidx)) == FALSE) {
+                    log_crit("statadm: log file [$fname] write match failed");
+                    break;
+                }
+                
+                // get games associated to each match
+                $gam_sql = sprintf("SELECT code, mcode, EXTRACT(epoch FROM tstamp) AS tstamp FROM %sbin5_games 
+                                    WHERE mcode = %d ORDER BY tstamp",
+                                   $G_dbpfx, $mtc_obj->code);
+                if (($gam_pg  = pg_query($bdb->dbconn->db(), $gam_sql)) == FALSE) {
+                    log_crit("statadm: games row select failed");
+                    break;
+                }
+                
+                $gam_n = pg_numrows($gam_pg);
+                for ($g = 0 ; $g < $gam_n ; $g++) {
+                    $gam_obj = pg_fetch_object($gam_pg, $g);
+                    
+                    if (fwrite($fp, sprintf("G|%d|%d|%d|\n", $gam_obj->mcode, $gam_obj->code, $gam_obj->tstamp)) == FALSE) {
+                        log_crit("statadm: log file [$fname] write game failed");
+                        break;
+                    }
+                    $pts_sql = sprintf("SELECT * FROM %sbin5_points WHERE gcode = %d", $G_dbpfx, $gam_obj->code);
+                    if (($pts_pg  = pg_query($bdb->dbconn->db(), $pts_sql)) == FALSE) {
+                        log_crit("statadm: points row select [$pts_sql] failed");
+                        break;
+                    }
+                    $pts_n = pg_numrows($pts_pg);
+                    for ($p = 0 ; $p < $pts_n ; $p++) {
+                        $pts_obj = pg_fetch_object($pts_pg, $p);
+                        
+                        if (fwrite($fp, sprintf("P|%d|%d|%d|\n", $pts_obj->gcode, $pts_obj->ucode, $pts_obj->pts)) == FALSE) {
+                            log_crit("statadm: log file [$fname] write pts failed");
+                            break;
+                        }
+                    }
+                    if ($p < $pts_n)
+                        break;
+                }
+                if ($g < $gam_n)
+                    break;
+                
+                // delete match and all it's childs (games and points)
+                $del_sql = sprintf("DELETE FROM %sbin5_matches WHERE code = %d",
+                                   $G_dbpfx, $tmt_obj->code);
+                if (($del_pg = pg_query($bdb->dbconn->db(),$del_sql)) == FALSE || pg_affected_rows($del_pg) != 1) {
+                    log_crit("statadm: matches row deletion failed");
+                    break;
+                }
+                
+            }
+            if ($m < $tmt_n)
+                break;
+        } // if (($tmt_pg = pg_query($bdb->dbco...
 
-        // Truncate table (postgresql extension, in other SQL you must user unqualified DELETE
+        // GEN: Truncate table (postgresql extension, in other SQL you must user unqualified DELETE
         $tru_sql = sprintf("TRUNCATE %sbin5_places;", $G_dbpfx);
         if (pg_query($bdb->dbconn->db(), $tru_sql) == FALSE) {
             log_crit("statadm: truncate failed");
             break;
         }
-
+        
         for ($dtime = 0 ; $dtime < count($limi) ; $dtime++) {
             $old_score = array( 1000000000, 1000000000);
             $old_gam   = array( -1, -1);
             $rank      = array(  0,  0);
-            
+
+            // TAG: POINTS_MANAGEMENT
             $pla_sql = sprintf("SELECT (float4(sum(p.pts)) * 100.0 ) /  float4(count(p.pts)) as score, sum(p.pts) as points, count(p.pts) as games, u.code as ucode, u.login as login
                                 FROM %sbin5_points as p, %sbin5_games as g, %sbin5_matches as m, %susers as u 
-                                WHERE p.ucode = u.code AND p.gcode = g.code AND g.mcode = m.code AND 
-                                      g.tstamp > to_timestamp(%d)
+                                WHERE m.tcode = %d AND m.code = g.mcode AND
+                                      ( (u.type & (CAST (X'ff0000' as integer))) <> (CAST (X'800000' as integer)) ) AND
+                                      g.tstamp > to_timestamp(%d) AND g.tstamp <= to_timestamp(%d) AND
+                                      p.ucode = u.code AND p.gcode = g.code AND
+                                      p.pts != 0
                                 GROUP BY u.code, u.login
                                 ORDER BY (float4(sum(p.pts)) * 100.0 ) /  float4(count(p.pts)) DESC, 
                                          count(p.pts) DESC",
-                               $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, $curtime - $limi[$dtime], $ming[$dtime]);
+                               $G_dbpfx, $G_dbpfx, $G_dbpfx, $G_dbpfx, BIN5_TOURNAMENT_NORMAL,
+                               $curtime - $limi[$dtime], $curtime);
 
             // log_crit("statadm: INFO: [$pla_sql]");
 
-            if (($pla_pg  = pg_query($bdb->dbconn->db(), $pla_sql)) == FALSE || pg_numrows($pla_pg) == 0) {
+            if (($pla_pg  = pg_query($bdb->dbconn->db(), $pla_sql)) == FALSE) {
                 // no point found, abort
                 log_crit("statadm: main placement select failed [$pla_sql]");
                 break;
@@ -315,23 +416,28 @@ function main()
     GLOBAL $G_dbasetype, $G_alarm_passwd, $pazz;
     
     echo "Inizio.<br>";
-    flush();
+    mop_flush();
     if ($pazz != $G_alarm_passwd) {
         echo "Wrong password<br>";
-        flush();
+        mop_flush();
         exit;
     }
     
     $fun_name = "main_${G_dbasetype}";
     
-    $curtime = time();
+    $ctime = time();
+
+    if (BIN5_PLAYERS_N != 5)
+        $curtime = $ctime;
+    else
+        $curtime = ((int)($ctime / (24 * 3600))) * 24 * 3600 - (((int)substr(date("O", $ctime), 0, -2)) * 3600);
     if ($ret = $fun_name($curtime))
         echo "Success.<br>\n";
     else
         echo "Failed.<br>\n";
     
     echo "Fine.\n";
-    flush();
+    mop_flush();
 }
 
 main();