game_description() manage all actions (pass, abandon, finish)
authorMatteo Nastasi (mop) <nastasi@alternativeoutput.it>
Tue, 24 Sep 2013 17:26:55 +0000 (19:26 +0200)
committerMatteo Nastasi (mop) <nastasi@alternativeoutput.it>
Tue, 24 Sep 2013 17:26:55 +0000 (19:26 +0200)
web/briskin5/Obj/briskin5.phh
web/briskin5/stat-day.php

index 0fa68bd..9793262 100644 (file)
@@ -42,9 +42,6 @@ $mlang_bin5_bin5 = array(
                          'info_capp' => array( 'it' => 'hanno fatto %3$scappotto%4$s EBBRAVI!.%1$s',
                                                'en' => 'and they made %3Dscapot%4$s WELL DONE!.%1$s'),
 
-                         // br, hr, b, /b, asta_pnt, pnt, winornot
-                         'info_pnt'  => array( 'it' => 'dovevano fare %3$s%5$d%4$s punti e ne hanno fatti %3$s%6$d%4$s: hanno %7$s.%1$s',
-                                               'en' => 'they had to do %3$s%5$d%4$s points and they had made %3$s%6$d%4$s: they have %7$s.%1$s'),
                          // br, hr, b, /b, old_asta_pnt, old_pnt, winornot
                          'info_alea' => array( 'it' => 'dovevano fare %3$salmeno %5$d%4$s punti e ne hanno fatti %3$s%6$d%4$s: hanno %7$s.%1$s',
                                                'en' => 'they had to do %3$sat least %5$d%4$s points and they had made %3$s%6$d%4$s: they have %7$s.%1$s'),
@@ -72,12 +69,16 @@ $mlang_bin5_bin5 = array(
                                                'en' => 'and he/she made %3$scapot%4$s WELL DONE!.%2$s'),
 
                          // br, hr, b, /b
-                         'info_omul' => array( 'it' => ' La partita valeva %3$s%5$s%3$s.',
-                                               'en' => ' EN: The game was worth %3$s%5$s%3$s.' ),
-
-
+                         'info_omul' => array( 'it' => ' La partita valeva %3$s%5$s%4$s.',
+                                               'en' => ' EN: The game was worth %3$s%5$s%4$s.' ),
 
+                         // br, hr, b, /b
+                         'info_alpa' => array( 'it' => ' Hanno passato %3$stutti%4$s.',
+                                               'en' => ' EN: Hanno passato %3$stutti%4$s.' ),
 
+                         // br, hr, b, /b, aband-name
+                         '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_yturn'=> array( 'it' => ' tocca a <b>te</b> giocare.',
                                                'en' => ' it\'s <b>your</b> turn.'),
@@ -481,7 +482,7 @@ class Bin5_table extends Table {
         $pts = array();
 
         if ($action == BIN5_RULES_ALLPASS) { // return TRUE if all correct
-            $this->old_reason = "Hanno passato tutti.";
+            $this->old_reason = game_description(BIN5_RULES_ALLPASS, 'html');
             $this->old_asta_win = -1;
             $this->old_pnt = 0;
             $this->mult_inc(1);
@@ -496,7 +497,7 @@ class Bin5_table extends Table {
         else if ($action == BIN5_RULES_ABANDON) { // return TRUE if all correct
             log_wr(sprintf("GIOCO FINITO !!!"));
 
-            $this->old_reason = sprintf("Ha lasciato %s perché aveva al massimo 2 punti.", xcape($user->name));
+            $this->old_reason = game_description(BIN5_RULES_ABANDON, 'html', $user->table_pos, $user->name);
             $this->old_asta_win = $user->table_pos;
             $this->old_pnt = 0;
             $this->mult_inc(1);
@@ -1830,43 +1831,8 @@ function show_table_info(&$bri, &$table, $table_pos)
         log_main("TABLE_OLD_FRIEND:".$table->old_friend);
         $fri = $table->player[$table->old_friend];
 
-        $wol = game_result($table->old_asta_pnt, $table->old_pnt);
-
-        if (0 == 1) {
-            if ($win != $fri) {
-                /* MLANG: "<hr>Nell'ultima mano ha chiamato <b>%s</b>, il socio era <b>%s</b>,<br>", "hanno fatto <b>cappotto</b> EBBRAVI!.<hr>", "dovevano fare <b>%s</b> punti e ne hanno fatti <b>%d</b>: hanno <b>%s</b>.<hr>", "<hr>Nell'ultima mano <b>%s</b> si &egrave; chiamato in mano,<br>", "ha fatto <b>cappotto</b> EBBRAVO!.<hr>", "doveva fare <b>%s</b> punti e ne ha fatti <b>%d</b>: ha <b>%s</b>.<hr>", ($table->old_asta_pnt > 61 ? "almeno ".$table->old_asta_pnt : 'pi&ugrave; di 60'), $table->old_pnt, ($wol == 1 ? "vinto" : ($wol == 0 ? "pareggiato" : "perso" */
-
-                $noty .= sprintf($mlang_bin5_bin5['info_part'][$G_lang],
-                                 xcape($bri->user[$win]->name),
-                                 xcape($bri->user[$fri]->name));
-                if ($table->old_pnt == 120) {
-                    $noty .= sprintf($mlang_bin5_bin5['info_capp'][$G_lang]);
-                }
-                else {
-                    $noty .= sprintf($mlang_bin5_bin5['info_pnt'][$G_lang],
-                                     ($table->old_asta_pnt > 61 ? $mlang_bin5_bin5['info_alea'][$G_lang].$table->old_asta_pnt :
-                                      $mlang_bin5_bin5['info_more'][$G_lang]), $table->old_pnt,
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] : ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] : $mlang_bin5_bin5['info_lost'][$G_lang])));
-                }
-            }
-            else {
-                $noty .= sprintf($mlang_bin5_bin5['info_alon'][$G_lang],
-                                 xcape($bri->user[$win]->name));
-                if ($table->old_pnt == 120) {
-                    $noty .= sprintf($mlang_bin5_bin5['info_acap'][$G_lang]);
-                }
-                else {
-                    $noty .= sprintf($mlang_bin5_bin5['info_apnt'][$G_lang],
-
-                                     ($table->old_asta_pnt > 61 ? $mlang_bin5_bin5['info_alea'][$G_lang].$table->old_asta_pnt :
-                                      $mlang_bin5_bin5['info_more'][$G_lang]), $table->old_pnt,
-
-                                     ($wol == 1 ? $mlang_bin5_bin5['info_win'][$G_lang] : ($wol == 0 ? $mlang_bin5_bin5['info_peer'][$G_lang] : $mlang_bin5_bin5['info_lost'][$G_lang])));
-                }
-            }
-        } // OLD VERSION
         $noty = game_description(BIN5_RULES_FINISH, 'html', $win, $bri->user[$win]->name, $fri, $bri->user[$fri]->name,
-                                 $wol, $table->old_pnt, $table->old_asta_pnt);
+                                 $table->old_pnt, $table->old_asta_pnt);
 
         $old_multer = $table->multer(FALSE);
         if ($old_multer > 1) {
@@ -1992,8 +1958,8 @@ function log_points($remote_addr, $curtime, $user, $where, $mesg)
     }
 }
 
-function game_description($act, $form, $win, $win_name, $fri, $fri_name,
-                          $wol, $old_pnt, $old_asta_pnt)
+function game_description($act, $form, $win = -1, $win_name = "?1?", $fri = -1, $fri_name "?2?",
+                          $old_pnt = -1, $old_asta_pnt = -1)
 {
     GLOBAL $G_lang, $mlang_bin5_bin5;
 
@@ -2012,6 +1978,18 @@ function game_description($act, $form, $win, $win_name, $fri, $fri_name,
         $tg_bc = "";
     }
 
+    if ($act == BIN5_RULES_ALLPASS) {
+        return (sprintf($mlang_bin5_bin5['info_alpa'][$G_lang],
+                        $tg_br, $tg_hr, $tg_bo, $tg_bc));
+    }
+    else if ($act == BIN5_RULES_ABANDON) {
+        return (sprintf($mlang_bin5_bin5['info_alpa'][$G_lang],
+                        $tg_br, $tg_hr, $tg_bo, $tg_bc,
+                        $win_name));
+    }
+    // implicit else bin5_rules_finish
+    $wol = game_result($old_asta_pnt, $old_pnt);
+
     $noty = "";
 
     if ($win != $fri) { // not alone case
index 7218905..8cbe095 100644 (file)
@@ -1,9 +1,9 @@
 <?php
 /*
- *  brisk - statadm.php
+ *  brisk - stat-day.php
  *
  *  Copyright (C) 2009-2012 Matteo Nastasi
- *                          mailto: nastasi@alternativeoutput.it 
+ *                          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|
-   
+  call example:
+wget -O daily.txt dodo.birds.van/brisk/briskin5/stat-day.php?pazz=yourpasswd&from=1000&to=1380308086
+
+now="$(date +%s)"
+
+# from 100 days ago to 1 day after
+to="$(date +"%Y-%m-%d+%H:%M:%S" -d @$(echo "$now + 86400" | bc))"
+from="$(date +"%Y-%m-%d+%H:%M:%S" -d @$(echo "$now - 8640000" | bc))"
+# to="$(date +"%Y-%m-%d+%H:%M:%S" -d @$(echo "$now + 7200 " | bc))"
+# from="$(date +"%Y-%m-%d+%H:%M:%S" -d @$(echo "$now - 9200 " | bc))"
+
+curl -d "pazz=$BRISK_PASS" "http://$BRISK_SITE/briskin5/stat-day.php?from=$from&to=$to"
+
 */
 
 $G_base = "../";
 
+$mlang_stat_day = array( 'normal match'=> array( 'it' => 'Partite normali',
+                                                 'en' => 'Normal matches' ),
+                         'special match' => array( 'it' => 'Partite speciali',
+                                                   'en' => 'Special matches')
+                         );
+
+
 ini_set("max_execution_time",  "240");
 
 require_once("../Obj/brisk.phh");
@@ -41,17 +58,17 @@ require_once("Obj/placing.phh");
 
 function main_file($curtime)
 {
-  GLOBAL $G_alarm_passwd;
+    GLOBAL $G_lang, $G_alarm_passwd;
   $tri = array();
   $mon = array();
   $wee = array();
-  
+
   if (($fp = @fopen(LEGAL_PATH."/points.log", 'r')) == FALSE) {
     echo "Open data file error";
     exit;
   }
   echo "prima<br>";
+
   if (($fp_start = @fopen(LEGAL_PATH."/points.start", 'r')) != FALSE) {
     $skip = intval(fgets($fp_start));
     if ($skip > 0)
@@ -63,7 +80,7 @@ function main_file($curtime)
     echo "database connection failed";
     exit;
   }
-      
+
   $bdb->users_load();
 
   for ($i = 0 ; $i < $bdb->count() ; $i++) {
@@ -82,7 +99,7 @@ function main_file($curtime)
     // if not auth table, continue
     if (count($ar) < 15)
       continue;
-    
+
     // echo $p++."<br>";
     if ($ar[7] >= TABLES_AUTH_N)
       continue;
@@ -98,11 +115,11 @@ function main_file($curtime)
         fwrite($fp_start, sprintf("%d\n", $curpos));
         fclose($fp_start);
       }
-      
+
       continue;
     }
     // echo $p++." ".BIN5_PLAYERS_N."<br>";
-    
+
     $found = FALSE;
     $mult = 1;
     for ($i = 0 ; $i < BIN5_PLAYERS_N ; $i++) {
@@ -125,22 +142,22 @@ function main_file($curtime)
         echo "WARNING: the user [".$username."] NOT EXISTS!<br>";
         continue;
       }
-      
+
       // echo $item->login." id)".$id."  ".$ar[10+($i*2)]." mult: ".$mult."<br>";
       $tri[$id]->add($ar[10+($i*2)] / $mult);
-      if ($ar[0] >= $curtime - MON_LIMIT) 
+      if ($ar[0] >= $curtime - MON_LIMIT)
         $mon[$id]->add($ar[10+($i*2)] / $mult);
-      if ($ar[0] >= $curtime - WEE_LIMIT) 
+      if ($ar[0] >= $curtime - WEE_LIMIT)
         $wee[$id]->add($ar[10+($i*2)] / $mult);
     }
     // $p++; echo $p++."<br>";
   }
   fclose($fp);
-  
+
   usort($tri, ptsgam_cmp);
   usort($mon, ptsgam_cmp);
   usort($wee, ptsgam_cmp);
-  
+
   echo "<br><br>TRI<br>\n";
 
   if (($fplo = @fopen(LEGAL_PATH."/class_tri_lo.log", 'w')) == FALSE) {
@@ -156,9 +173,9 @@ function main_file($curtime)
     if ($tri[$i]->gam == 0.0)
       continue;
     printf("%s: %s (%d) <br>\n",  $tri[$i]->username,  $tri[$i]->snormpts(), $tri[$i]->gam);
-    if ($tri[$i]->gam >= TRI_MAX_GAMES) 
+    if ($tri[$i]->gam >= TRI_MAX_GAMES)
       fwrite($fphi, sprintf("%s|%d|%d|\n", xcapelt($tri[$i]->username), $tri[$i]->pts, $tri[$i]->gam));
-    else if ($tri[$i]->gam > TRI_MIN_GAMES) 
+    else if ($tri[$i]->gam > TRI_MIN_GAMES)
       fwrite($fplo, sprintf("%s|%d|%d|\n", xcapelt($tri[$i]->username), $tri[$i]->pts, $tri[$i]->gam));
   }
   fclose($fphi);
@@ -179,9 +196,9 @@ function main_file($curtime)
     if ($mon[$i]->gam == 0.0)
       continue;
     printf("%s: %s (%d) <br>\n",  $mon[$i]->username,  $mon[$i]->snormpts(), $mon[$i]->gam);
-    if ($mon[$i]->gam >= MON_MAX_GAMES) 
+    if ($mon[$i]->gam >= MON_MAX_GAMES)
       fwrite($fphi, sprintf("%s|%d|%d|\n", xcapelt($mon[$i]->username), $mon[$i]->pts, $mon[$i]->gam));
-    else if ($mon[$i]->gam > MON_MIN_GAMES) 
+    else if ($mon[$i]->gam > MON_MIN_GAMES)
       fwrite($fplo, sprintf("%s|%d|%d|\n", xcapelt($mon[$i]->username), $mon[$i]->pts, $mon[$i]->gam));
   }
   fclose($fphi);
@@ -198,12 +215,12 @@ function main_file($curtime)
   }
 
   for ($i = 0 ; $i < count($wee) ; $i++) {
-    if ($wee[$i]->gam == 0.0) 
+    if ($wee[$i]->gam == 0.0)
       continue;
     printf("%s: %s (%d) <br>\n",  $wee[$i]->username,  $wee[$i]->snormpts(), $wee[$i]->gam);
-    if ($wee[$i]->gam >= WEE_MAX_GAMES) 
+    if ($wee[$i]->gam >= WEE_MAX_GAMES)
       fwrite($fphi, sprintf("%s|%d|%d|\n", xcapelt($wee[$i]->username), $wee[$i]->pts, $wee[$i]->gam));
-    else if ($wee[$i]->gam > WEE_MIN_GAMES) 
+    else if ($wee[$i]->gam > WEE_MIN_GAMES)
       fwrite($fplo, sprintf("%s|%d|%d|\n", xcapelt($wee[$i]->username), $wee[$i]->pts, $wee[$i]->gam));
   }
   fclose($fphi);