web/briskin5/Obj/placing.phh

   1 <?php
   2 /*
   3  *  brisk - placing.phh
   4  *
   5  *  Copyright (C) 2009 Matteo Nastasi
   6  *                          mailto: nastasi@alternativeoutput.it
   7  *                                  matteo.nastasi@milug.org
   8  *                          web: http://www.alternativeoutput.it
   9  *
  10  * This program is free software; you can redistribute it and/or modify
  11  * it under the terms of the GNU General Public License as published by
  12  * the Free Software Foundation; either version 2 of the License, or
  13  * (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful, but
  16  * WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABLILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  18  * General Public License for more details. You should have received a
  19  * copy of the GNU General Public License along with this program; if
  20  * not, write to the Free Software Foundation, Inc, 59 Temple Place -
  21  * Suite 330, Boston, MA 02111-1307, USA.
  22  *
  23  * $Id$
  24  *
  25  */
  26
  27
  28 define(TOP_NUM, 10);
  29 define(TRI_LIMIT, (90 * 24 * 60 * 60));
  30 // define(TRI_FEW_GAMES, 60);
  31 define(TRI_FEW_GAMES, 140);
  32
  33 define(MON_LIMIT, (30 * 24 * 60 * 60));
  34 // define(MON_FEW_GAMES, 20);
  35 define(MON_FEW_GAMES, 70);
  36
  37 define(WEE_LIMIT, (7 * 24 * 60 * 60));
  38 // define(WEE_FEW_GAMES, 10);
  39 define(WEE_FEW_GAMES, 35);
  40
  41
  42 class Ptsgam {
  43   var $username;
  44   var $pts;
  45   var $gam;
  46
  47   function Ptsgam($username = "", $pts = 0, $gam = 0)
  48   {
  49     $this->username = $username;
  50     $this->pts = $pts;
  51     $this->gam = $gam;
  52   }
  53
  54   function &clone()
  55   {
  56     $ret = new Ptsgam($this->username, $this->pts, $this->gam);
  57
  58     return ($ret);
  59   }
  60
  61   function add($pts)
  62   {
  63     $this->pts += $pts;
  64     $this->gam++;
  65   }
  66
  67   function snormpts()
  68   {
  69     $ret = sprintf ("%.3f", $this->normpts() * 100.0);
  70     if (strchr($ret, ".")) {
  71       $ret =  rtrim(rtrim($ret, "0"), ".");
  72     }
  73     return ($ret);
  74   }
  75
  76   function normpts()
  77   {
  78     if ($this->gam == 0)
  79       return (0);
  80     else
  81       return ($this->pts / $this->gam);
  82   }
  83 }
  84
  85 function ptsgam_cmp($a, $b)
  86 {
  87   $norma = $a->normpts();
  88   $normb = $b->normpts();
  89
  90   if ($norma == $normb) {
  91     if ($a->gam == $b->gam)
  92       return (0);
  93     else
  94       return ($a->gam < $b->gam ? 1 : -1);
  95   }
  96   else
  97     return (($norma < $normb) ? 1 : -1);
  98 }
  99
 100 function placings_show(&$user)
 101 {
 102   $ret = sprintf("<div style='padding: auto;'><table class='placings'>");
 103   $ret .= sprintf("<tr><td style='background-color: #f0f0ff;'><br><b>Settimanale</b><br>(non meno di %d partite)<br><br>%s<br></td>", WEE_FEW_GAMES, placing_show($user, "wee_hi") );
 104   $ret .= sprintf("<td style='background-color: #f0f0ff;'><br><b>Settimanale</b><br>(meno di %d partite)<br><br>%s<br></td></tr>\n", WEE_FEW_GAMES, placing_show($user, "wee_lo") );
 105
 106   $ret .= sprintf("<tr><td style='background-color: #fffff0;'><br><b>Mensile</b><br>(non meno di %d partite)<br><br>%s<br></td>", MON_FEW_GAMES, placing_show($user, "mon_hi") );
 107   $ret .= sprintf("<td style='background-color: #fffff0;'><br><b>Mensile</b><br>(meno di %d partite)<br><br>%s<br></td></tr>\n", MON_FEW_GAMES, placing_show($user, "mon_lo") );
 108
 109   $ret .= sprintf("<tr><td style='background-color: #fff0f0;'><br><b>Trimestrale</b><br>(non meno di %d partite)<br><br>%s<br></td>", TRI_FEW_GAMES, placing_show($user, "tri_hi"));
 110   $ret .= sprintf("<td style='background-color: #fff0f0;'><br><b>Trimestrale</b><br>(meno di %d partite)<br><br>%s<br></td></tr>", TRI_FEW_GAMES, placing_show($user, "tri_lo"));
 111
 112
 113   $ret .= sprintf("</table></div>");
 114   return ($ret);
 115 }
 116
 117 function placing_show(&$user, $suff)
 118 {
 119   $tail = FALSE;
 120
 121   if (($fp = @fopen(LEGAL_PATH."/class_".$suff.".log", 'r')) == FALSE) {
 122     return (FALSE);
 123   }
 124
 125   // MLANG
 126   $ret = sprintf("<table class='placing'><tr><th>Pos.</th><th>Utente</th><th>Score</th><th>(Punti/Partite)</th>");
 127
 128   $old_normpts = 1000000000;
 129   $old_gam = -1;
 130   for ($i = 0 ; !feof($fp) ; $i++) {
 131     $bf = fgets($fp, 4096);
 132     $ar = csplitter($bf, '|');
 133
 134     $pg = new Ptsgam($ar[0], $ar[1], $ar[2]);
 135
 136     if ($pg->username == "")
 137       continue;
 138
 139     if ($pg->normpts() == $old_normpts && $pg->gam == $old_gam)
 140        $i--;
 141
 142     if ($i < TOP_NUM) {
 143       $ret .= sprintf("<tr><td>%d</td><td>%s%s%s</td><td>%s</td><td>(%d/%d)</td></tr>", $i+1,
 144                       ($pg->username == $user->name ? "<b>" : ""), $pg->username, ($pg->username == $user->name ? "</b>" : ""), $pg->snormpts(), $pg->pts, $pg->gam);
 145     }
 146     if ($user != FALSE) {
 147       if (strcasecmp($pg->username, $user->name) == 0 && $i >= TOP_NUM) {
 148         $tail = sprintf("<tr><td colspan=4 style='text-align: center'> . . . . . . . . . . </td></tr>");
 149         $tail .= sprintf("<tr><td>%d</td><td>%s%s%s</td><td>%s</td><td>(%d/%d)</td></tr>", $i+1,
 150                          ($pg->username == $user->name ? "<b>" : ""), $pg->username, ($pg->username == $user->name ? "</b>" : ""), $pg->snormpts(), $pg->pts, $pg->gam);
 151       }
 152     }
 153     $old_normpts = $pg->normpts();
 154     $old_gam = $pg->gam;
 155   }
 156
 157   if ($tail != FALSE) {
 158     $ret .= $tail;
 159   }
 160   $ret .= "</table>";
 161
 162   fclose($fp);
 163
 164   return ($ret);
 165 }