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 define(TOP_NUM, 10);
  28
  29 define(TRI_LIMIT, (90 * 24 * 60 * 60));
  30 define(TRI_FEW_GAMES, 60);
  31
  32 define(MON_LIMIT, (30 * 24 * 60 * 60));
  33 define(MON_FEW_GAMES, 20);
  34
  35 define(WEE_LIMIT, (7 * 24 * 60 * 60));
  36 define(WEE_FEW_GAMES, 10);
  37
  38
  39 class Ptsgam {
  40   var $username;
  41   var $pts;
  42   var $gam;
  43
  44   function Ptsgam($username = "", $pts = 0, $gam = 0)
  45   {
  46     $this->username = $username;
  47     $this->pts = $pts;
  48     $this->gam = $gam;
  49   }
  50
  51   function &clone()
  52   {
  53     $ret = new Ptsgam($this->username, $this->pts, $this->gam);
  54
  55     return ($ret);
  56   }
  57
  58   function add($pts)
  59   {
  60     $this->pts += $pts;
  61     $this->gam++;
  62   }
  63
  64   function snormpts()
  65   {
  66     $ret = sprintf ("%.3f", $this->normpts() * 100.0);
  67     if (strchr($ret, ".")) {
  68       $ret =  rtrim(rtrim($ret, "0"), ".");
  69     }
  70     return ($ret);
  71   }
  72
  73   function normpts()
  74   {
  75     if ($this->gam == 0)
  76       return (0);
  77     else
  78       return ($this->pts / $this->gam);
  79   }
  80 }
  81
  82 function ptsgam_cmp($a, $b)
  83 {
  84   $norma = $a->normpts();
  85   $normb = $b->normpts();
  86
  87   if ($norma == $normb) {
  88     if ($a->gam == $b->gam)
  89       return (0);
  90     else
  91       return ($a->gam < $b->gam ? 1 : -1);
  92   }
  93   else
  94     return (($norma < $normb) ? 1 : -1);
  95 }
  96
  97 function placings_show(&$user)
  98 {
  99   $ret = sprintf("<div style='padding: auto;'><table class='placings'>");
 100   $ret .= sprintf("<tr><td style='background-color: #f0f0ff;'><br><b>Settimanale</b><br>(non meno di %d partite)<br><br>%s</td>", WEE_FEW_GAMES, placing_show($user, "wee_hi") );
 101   $ret .= sprintf("<td style='background-color: #f0f0ff;'><br><b>Settimanale</b><br>(meno di %d partite)<br><br>%s</td></tr>\n", WEE_FEW_GAMES, placing_show($user, "wee_lo") );
 102
 103   $ret .= sprintf("<tr><td style='background-color: #fffff0;'><br><b>Mensile</b><br>(non meno di %d partite)<br><br>%s</td>", MON_FEW_GAMES, placing_show($user, "mon_hi") );
 104   $ret .= sprintf("<td style='background-color: #fffff0;'><br><b>Mensile</b><br>(meno di %d partite)<br><br>%s</td></tr>\n", MON_FEW_GAMES, placing_show($user, "mon_lo") );
 105
 106   $ret .= sprintf("<tr><td style='background-color: #fff0f0;'><br><b>Trimestrale</b><br>(non meno di %d partite)<br><br>%s</td>", TRI_FEW_GAMES, placing_show($user, "tri_hi"));
 107   $ret .= sprintf("<td style='background-color: #fff0f0;'><br><b>Trimestrale</b><br>(meno di %d partite)<br><br>%s</td></tr>", TRI_FEW_GAMES, placing_show($user, "tri_lo"));
 108
 109
 110   $ret .= sprintf("</table></div>");
 111   return ($ret);
 112 }
 113
 114 function placing_show(&$user, $suff)
 115 {
 116   $tail = FALSE;
 117
 118   if (($fp = @fopen(LEGAL_PATH."/class_".$suff.".log", 'r')) == FALSE) {
 119     return (FALSE);
 120   }
 121
 122   // MLANG
 123   $ret = sprintf("<table class='placing'><tr><th>Pos.</th><th>Utente</th><th>Score</th><th>(Punti/Partite)</th>");
 124   for ($i = 0 ; !feof($fp) ; $i++) {
 125     $bf = fgets($fp, 4096);
 126     $ar = csplitter($bf, '|');
 127
 128     $pg = new Ptsgam($ar[0], $ar[1], $ar[2]);
 129
 130     if ($pg->username == "")
 131       continue;
 132
 133     if ($i < TOP_NUM) {
 134       $ret .= sprintf("<tr><td>%d</td><td>%s%s%s</td><td>%s</td><td>(%d/%d)</td></tr>", $i+1,
 135                       ($pg->username == $user->name ? "<b>" : ""), $pg->username, ($pg->username == $user->name ? "</b>" : ""), $pg->snormpts(), $pg->pts, $pg->gam);
 136     }
 137     if ($user != FALSE) {
 138       if ($pg->username == $user->name && $i >= TOP_NUM) {
 139         $tail = sprintf("<tr><td colspan=4 style='text-align: center'> . . . . . . . . . . </td></tr>");
 140         $tail .= sprintf("<tr><td>%d</td><td>%s%s%s</td><td>%s</td><td>(%d/%d)</td></tr>", $i+1,
 141                          ($pg->username == $user->name ? "<b>" : ""), $pg->username, ($pg->username == $user->name ? "</b>" : ""), $pg->snormpts(), $pg->pts, $pg->gam);
 142       }
 143     }
 144   }
 145
 146   if ($tail != FALSE) {
 147     $ret .= $tail;
 148   }
 149   $ret .= "</table>";
 150
 151   fclose($fp);
 152
 153   return ($ret);
 154 }