Score in the range -100 : 100
[brisk.git] / 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
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 < 5) {
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 >= 5) {
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 }