Statistiques
| Branche: | Révision :

root / index.php @ 57de9303461235fd219abf0b211b7d3c60e1232a

Historique | Voir | Annoter | Télécharger (10,19 ko)

1 16322a9c Romuald
<?php
2 16322a9c Romuald
/*
3 16322a9c Romuald
 * index.php - Visualisation du championnat
4 16322a9c Romuald
 * Copyright (C) 2008 Romuald DELAVERGNE  <delavergne@free.fr>
5 16322a9c Romuald
 *
6 16322a9c Romuald
 * This source code is licensed under the GNU General Public License,
7 16322a9c Romuald
 * Version 2.  See the file COPYING for more details.
8 16322a9c Romuald
 */
9 16322a9c Romuald
        if (basename(dirname($_SERVER['PHP_SELF'])) == "admin")
10 16322a9c Romuald
                require_once '../functions.php';
11 16322a9c Romuald
        else
12 16322a9c Romuald
                require_once 'functions.php';
13 16322a9c Romuald
14 16322a9c Romuald
        /*
15 16322a9c Romuald
        echo "<pre>\n";
16 16322a9c Romuald
        print_r($_POST);
17 16322a9c Romuald
        echo "</pre>\n";
18 16322a9c Romuald
        */
19 16322a9c Romuald
20 16322a9c Romuald
        $Pts = array(); // Nombre de points
21 16322a9c Romuald
        $Joue = array();// Nombre de matchs jou
22 16322a9c Romuald
        $Vic = array(); // Nombre de victoires
23 16322a9c Romuald
        $Nul = array(); // Nombre de matchs nuls
24 16322a9c Romuald
        $Def = array(); // Nombre de défaites
25 16322a9c Romuald
        $Pen = array(); // Points de pénalit
26 16322a9c Romuald
        $PG = array();  // Somme des points gagn
27 16322a9c Romuald
        $PP = array();  // Somme des points perdus
28 16322a9c Romuald
        $Diff = array();// Diff entre les points gagnés et perdus
29 16322a9c Romuald
        $Rang = array();// Nombre de points avec en décimale 'Diff".
30 16322a9c Romuald
                                                                        // Permet de faire le tri en départageant les ex-aequos
31 16322a9c Romuald
        $rencontres = array(); // Rencontres et résultats de chaque journ
32 16322a9c Romuald
        $saisons = array();    // Liste des saisons disponibles
33 16322a9c Romuald
        $divisions = array();  // Liste des divisions disponibles pour l'ann
34 16322a9c Romuald
        $subdivs = array();    // Liste des poules/phases disponibles pour la division
35 16322a9c Romuald
36 16322a9c Romuald
        $saison = $_POST['saison'];     // l'année du début de saison
37 16322a9c Romuald
        $div1 = $_POST['div1'];         // PRO, N, PN, R, PR ou D
38 16322a9c Romuald
        $div2 = $_POST['div2'];         // A, B, 1, 2, 3, ...
39 16322a9c Romuald
        $division = $_POST['division']; // PROA, N1, PN, R2, PR ou D4, ...
40 16322a9c Romuald
        $poule = $_POST['poule'];       // A, B, ...
41 16322a9c Romuald
        $phase = $_POST['phase'];       // 1, 2, ...
42 16322a9c Romuald
        if (!$division) $division = $div1; if ($div2) $division .= $SEP_DIV.$div2;
43 16322a9c Romuald
        $subdiv = $poule; if ($phase) $subdiv .= $SEP_DIV.$phase;
44 16322a9c Romuald
45 16322a9c Romuald
        $path = (IamAdmin()) ? "../datas" : "datas";
46 16322a9c Romuald
        getDirs($path, $saisons);
47 16322a9c Romuald
        rsort($saisons);
48 16322a9c Romuald
        if (!in_array($saison, $saisons)) unset($saison, $division, $div1, $div2, $subdiv, $poule, $phase);
49 16322a9c Romuald
        if (!$saison && $saisons) $saison = $saisons[0];
50 16322a9c Romuald
51 16322a9c Romuald
        if ($saison) {
52 16322a9c Romuald
                $path .= "/$saison";
53 16322a9c Romuald
                getDirs($path, $divisions);
54 16322a9c Romuald
                sort($divisions, SORT_STRING);
55 16322a9c Romuald
                if (!in_array($division, $divisions)) unset($division, $div1, $div2);
56 16322a9c Romuald
                if (!$division && $divisions) $division = $divisions[0];
57 16322a9c Romuald
        }
58 16322a9c Romuald
59 16322a9c Romuald
        if ($division) {
60 16322a9c Romuald
                $path .= "/$division";
61 16322a9c Romuald
                list($div1, $div2) = explode($SEP_DIV, $division);
62 16322a9c Romuald
                getDirs($path, $subdivs);
63 16322a9c Romuald
                sort($subdivs, SORT_STRING);
64 16322a9c Romuald
                if (!in_array($subdiv, $subdivs)) unset($subdiv, $poule, $phase);
65 16322a9c Romuald
                if (!$subdiv && $subdivs) $subdiv = $subdivs[0];
66 16322a9c Romuald
        }
67 16322a9c Romuald
        if ($subdiv) {
68 16322a9c Romuald
                list($poule, $phase) = explode($SEP_DIV, $subdiv);
69 16322a9c Romuald
                $path .= "/$subdiv";
70 16322a9c Romuald
        }
71 16322a9c Romuald
72 16322a9c Romuald
        // Récupération des équipes
73 16322a9c Romuald
        $equipes = getEquipes($path);
74 16322a9c Romuald
75 16322a9c Romuald
        // Récupération des résultats
76 16322a9c Romuald
        if ($dir = opendir($path)) {
77 16322a9c Romuald
                while (($file = readdir($dir)) !== FALSE) {
78 16322a9c Romuald
                        if (is_file("$path/$file") && preg_match("/match-*/", $file)) {
79 16322a9c Romuald
                                list($prefix, $journee, $domicile, $visiteur) = explode("-", $file);
80 16322a9c Romuald
                                $resu = array_map('rtrim', file("$path/$file"));
81 16322a9c Romuald
                                $resu = file_get_contents("$path/$file");
82 16322a9c Romuald
                                $rencontres[$journee][] = "$domicile:$visiteur:$resu";
83 16322a9c Romuald
                        }
84 16322a9c Romuald
                }
85 16322a9c Romuald
                ksort($rencontres, SORT_STRING);
86 16322a9c Romuald
                closedir($dir);
87 16322a9c Romuald
        }
88 16322a9c Romuald
89 16322a9c Romuald
        // Récupération des pénalit
90 16322a9c Romuald
        $file = "$path/penalites";
91 16322a9c Romuald
        if (file_exists($file) && $penalites = file($file)) {
92 16322a9c Romuald
                foreach ($penalites as $n => $p) {
93 16322a9c Romuald
                        list($equipe, $penalite) = explode(":", rtrim($penalites[$n]));
94 16322a9c Romuald
                        $Pen[$equipe] = $penalite;
95 16322a9c Romuald
                }
96 16322a9c Romuald
        }
97 16322a9c Romuald
?>
98 16322a9c Romuald
<html>
99 16322a9c Romuald
<head>
100 16322a9c Romuald
        <title>Championnat de tennis de table</title>
101 16322a9c Romuald
        <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
102 16322a9c Romuald
        <meta http-equiv="Content-language" content="fr" />
103 16322a9c Romuald
        <meta name="copyright" content="Tous droits réservés - All Rights Reserved" />
104 16322a9c Romuald
        <meta name="author" content="Romuald DELAVERGNE">
105 16322a9c Romuald
        <link rel="stylesheet" type="text/css" href="<?=(IamAdmin()) ? "../" : ""?>style/fftt.css" media="screen" title="Normal" />
106 16322a9c Romuald
</head>
107 16322a9c Romuald
<html>
108 16322a9c Romuald
<body>
109 16322a9c Romuald
<?php
110 16322a9c Romuald
        /*
111 16322a9c Romuald
        echo "<pre>\n";
112 16322a9c Romuald
        echo "saison  =/$saison/\n";
113 16322a9c Romuald
        echo "division=/$division/\n";
114 16322a9c Romuald
        echo "subdiv  =/$subdiv/\n";
115 16322a9c Romuald
        echo "poule   =/$poule/\n";
116 16322a9c Romuald
        echo "phase   =/$phase/\n";
117 16322a9c Romuald
        echo "equipe1=/".$equipes[0]."/\n";
118 16322a9c Romuald
        print_r($equipes);
119 16322a9c Romuald
        print_r($rencontres);
120 16322a9c Romuald
        //print_r($saisons);
121 16322a9c Romuald
        //print_r($divisions);
122 16322a9c Romuald
        echo "</pre>\n";
123 16322a9c Romuald
        */
124 16322a9c Romuald
?>
125 16322a9c Romuald
<?php if ($saisons) { ?>
126 16322a9c Romuald
        <form name="resultats" method="post" action="<?=$_SERVER['PHP_SELF']?>">
127 16322a9c Romuald
                <div id="boutons-selection">
128 57de9303 Romuald
                        Saison :
129 57de9303 Romuald
                        <select name="saison">
130 16322a9c Romuald
<?php
131 16322a9c Romuald
                foreach ($saisons as $s) {
132 57de9303 Romuald
                        echo "\t\t\t\t<option value=\"$s\"";
133 16322a9c Romuald
                        if ($saison == $s) echo " selected";
134 16322a9c Romuald
                        echo ">$s/".($s+1)."</option>\n";
135 16322a9c Romuald
                }
136 16322a9c Romuald
?>
137 57de9303 Romuald
                        </select>
138 16322a9c Romuald
<?php } ?>
139 16322a9c Romuald
<?php if ($divisions) { ?>
140 57de9303 Romuald
                        Division :
141 57de9303 Romuald
                        <select name="division">
142 16322a9c Romuald
<?php
143 16322a9c Romuald
                foreach ($divisions as $d) {
144 16322a9c Romuald
                        list($a, $b) = explode($SEP_DIV, $d);
145 57de9303 Romuald
                        echo "\t\t\t\t<option value=\"$d\"";
146 16322a9c Romuald
                        if ($d == $division) echo " selected";
147 16322a9c Romuald
                        echo ">".$a.$b."</option>\n";
148 16322a9c Romuald
                }
149 16322a9c Romuald
?>
150 57de9303 Romuald
                        </select>
151 16322a9c Romuald
<?php } ?>
152 16322a9c Romuald
<?php if ($poule) { ?>
153 57de9303 Romuald
                        Poule :
154 57de9303 Romuald
                        <select name="poule">
155 16322a9c Romuald
<?php
156 16322a9c Romuald
                foreach ($subdivs as $s) {
157 16322a9c Romuald
                        list($a, $b) = explode($SEP_DIV, $s);
158 57de9303 Romuald
                        echo "\t\t\t\t<option value=\"$a\"";
159 16322a9c Romuald
                        if ($poule == $a) echo " selected";
160 16322a9c Romuald
                        echo ">$a</option>\n";
161 16322a9c Romuald
                }
162 16322a9c Romuald
?>
163 57de9303 Romuald
                        </select>
164 16322a9c Romuald
<?php } ?>
165 16322a9c Romuald
<?php        if ($phase) { ?>
166 57de9303 Romuald
                        Phase :
167 57de9303 Romuald
                        <select name="phase">
168 16322a9c Romuald
<?php
169 16322a9c Romuald
                foreach ($subdivs as $s) {
170 16322a9c Romuald
                        list($a, $b) = explode($SEP_DIV, $s);
171 57de9303 Romuald
                        echo "\t\t\t\t<option value=\"$b\"";
172 16322a9c Romuald
                        if ($phase == $b) echo " selected";
173 16322a9c Romuald
                        echo ">$b</option>\n";
174 16322a9c Romuald
                }
175 16322a9c Romuald
?>
176 57de9303 Romuald
                        </select>
177 16322a9c Romuald
<?php } ?>
178 16322a9c Romuald
<?php if ($saisons) { ?>
179 57de9303 Romuald
                        <input type="submit" name="action" value="s&eacute;lectionner" />
180 16322a9c Romuald
                </div>
181 16322a9c Romuald
        </form>
182 16322a9c Romuald
<?php } ?>
183 16322a9c Romuald
<?php if (IamAdmin()) { ?>
184 16322a9c Romuald
        <form name="resultats" method="post" action="admin.php">
185 16322a9c Romuald
                <input type="hidden" name="saison" value="<?=$saison?>" />
186 16322a9c Romuald
                <input type="hidden" name="div1" value="<?=$div1?>" />
187 16322a9c Romuald
                <input type="hidden" name="div2" value="<?=$div2?>" />
188 16322a9c Romuald
                <input type="hidden" name="poule" value="<?=$poule?>" />
189 16322a9c Romuald
                <input type="hidden" name="phase" value="<?=$phase?>" />
190 16322a9c Romuald
                <div id="championnat-ajouter">
191 16322a9c Romuald
                        <input type="submit" name="championnat" value="ajouter un championnat" />
192 16322a9c Romuald
<?php         if ($saisons) { ?>
193 16322a9c Romuald
                        <input type="submit" name="exporter-tout" value="tout exporter" />
194 16322a9c Romuald
<?php if (FALSE) { ?>
195 16322a9c Romuald
                        <input type="submit" name="importer-tout" value="tout importer" />
196 16322a9c Romuald
                        <input type="submit" name="supprimer-tout" value="tout supprimer" />
197 16322a9c Romuald
<?php } ?>
198 16322a9c Romuald
<?php         } ?>
199 16322a9c Romuald
                </div>
200 16322a9c Romuald
<?php         if ($saisons) { ?>
201 16322a9c Romuald
                <div id="boutons-championnat">
202 16322a9c Romuald
                        <input type="submit" name="championnat" value="modifier" />
203 16322a9c Romuald
                        <input type="submit" name="championnat" value="supprimer" onClick='return confirm("Voulez-vous vraiment effacer tout le championnat ?")' />
204 16322a9c Romuald
                        <input type="submit" name="championnat" value="exporter" />
205 16322a9c Romuald
                </div>
206 16322a9c Romuald
<?php         } ?>
207 16322a9c Romuald
<?php }
208 16322a9c Romuald
        if ($equipes) foreach ($equipes as $n => $e) {
209 16322a9c Romuald
                $Pts[$n] -= $Pen[$n];
210 16322a9c Romuald
                $Joue[$n] = 0;
211 16322a9c Romuald
                $Vic[$n] = 0;
212 16322a9c Romuald
                $Nul[$n] = 0;
213 16322a9c Romuald
                $Def[$n] = 0;
214 16322a9c Romuald
                $PG[$n] = 0;
215 16322a9c Romuald
                $PP[$n] = 0;
216 16322a9c Romuald
                $Diff[$n] = 0;
217 16322a9c Romuald
                $Rang[$n] = 0;
218 16322a9c Romuald
        }
219 16322a9c Romuald
        if ($rencontres) foreach ($rencontres as $j => $rencontre) {
220 16322a9c Romuald
                foreach ($rencontre as $r) {
221 16322a9c Romuald
                        list($domicile, $visiteur, $ptsDom, $ptsVis, $scoreDom, $scoreVis) = explode(":", $r);
222 16322a9c Romuald
                        if ($ptsDom == "" || $ptsVis == "" || $scoreDom == "" || $scoreVis == "") continue;
223 16322a9c Romuald
224 16322a9c Romuald
                        $Joue[$domicile]++;
225 16322a9c Romuald
                        $Joue[$visiteur]++;
226 16322a9c Romuald
                        $Pts[$domicile] += $scoreDom;
227 16322a9c Romuald
                        $Pts[$visiteur] += $scoreVis;
228 16322a9c Romuald
                        $PG[$domicile] += $ptsDom;
229 16322a9c Romuald
                        $PP[$domicile] += $ptsVis;
230 16322a9c Romuald
                        $PG[$visiteur] += $ptsVis;
231 16322a9c Romuald
                        $PP[$visiteur] += $ptsDom;
232 16322a9c Romuald
233 16322a9c Romuald
                        if ($scoreDom > $scoreVis) {
234 16322a9c Romuald
                                $Vic[$domicile]++;
235 16322a9c Romuald
                                $Def[$visiteur]++;
236 16322a9c Romuald
                        }
237 16322a9c Romuald
                        elseif ($ptsDom < $ptsVis) {
238 16322a9c Romuald
                                $Def[$domicile]++;
239 16322a9c Romuald
                                $Vic[$visiteur]++;
240 16322a9c Romuald
                        }
241 16322a9c Romuald
                        else {
242 16322a9c Romuald
                                $Nul[$domicile]++;
243 16322a9c Romuald
                                $Nul[$visiteur]++;
244 16322a9c Romuald
                        }
245 16322a9c Romuald
                }
246 16322a9c Romuald
        }
247 16322a9c Romuald
        if ($equipes) foreach ($equipes as $n => $e) {
248 16322a9c Romuald
                $Diff[$n] = $PG[$n] - $PP[$n];
249 16322a9c Romuald
                $Rang[$n] = $Pts[$n] + $Diff[$n]/1000;
250 16322a9c Romuald
        }
251 16322a9c Romuald
        arsort($Rang);
252 16322a9c Romuald
        if ($equipes) {
253 16322a9c Romuald
?>
254 57de9303 Romuald
        <div id="tabClassement">
255 16322a9c Romuald
                <table>
256 16322a9c Romuald
                        <tr>
257 16322a9c Romuald
                                <th class="colClt">Clt</th>
258 16322a9c Romuald
                                <th class="colEquipe">Equipe</th>
259 16322a9c Romuald
                                <th class="colPts">Pts</th>
260 16322a9c Romuald
                                <th class="colJoue">Jou&eacute;</th>
261 16322a9c Romuald
                                <th class="colVic">Vic</th>
262 16322a9c Romuald
                                <th class="colNul">Nul</th>
263 16322a9c Romuald
                                <th class="colDef">D&eacute;f</th>
264 16322a9c Romuald
                                <th class="colPen">P&eacute;n</th>
265 16322a9c Romuald
                                <th class="colPG">PG</th>
266 16322a9c Romuald
                                <th class="colPP">PP</th>
267 16322a9c Romuald
                                <th class="colDiff">Diff</th>
268 16322a9c Romuald
                        </tr>
269 16322a9c Romuald
<?php
270 16322a9c Romuald
        }
271 16322a9c Romuald
        $i = 0;
272 16322a9c Romuald
        foreach ($Rang as $equipe => $r) {
273 16322a9c Romuald
                $i++;
274 16322a9c Romuald
?>
275 16322a9c Romuald
                        <tr>
276 16322a9c Romuald
                                <td class="colClt"><?=(isset($last) && $last == $Pts[$equipe]) ? "-" : $i?></td>
277 16322a9c Romuald
                                <td class="colEquipe"><?=$equipes[$equipe]?></td>
278 16322a9c Romuald
                                <td class="colPts"><?=$Pts[$equipe]?></td>
279 16322a9c Romuald
                                <td class="colJoue"><?=$Joue[$equipe]?></td>
280 16322a9c Romuald
                                <td class="colVic"><?=($Vic[$equipe]) ? $Vic[$equipe] : "0"?></td>
281 16322a9c Romuald
                                <td class="colNul"><?=($Nul[$equipe]) ? $Nul[$equipe] : "0"?></td>
282 16322a9c Romuald
                                <td class="colDef"><?=($Def[$equipe]) ? $Def[$equipe] : "0"?></td>
283 16322a9c Romuald
                                <td class="colPen"><?=($Pen[$equipe]) ? $Pen[$equipe] : "0"?></td>
284 16322a9c Romuald
                                <td class="colPG"><?=($PG[$equipe]) ? $PG[$equipe] : "0"?></td>
285 16322a9c Romuald
                                <td class="colPP"><?=($PP[$equipe]) ? $PP[$equipe] : "0"?></td>
286 16322a9c Romuald
                                <td class="colDiff"><?=($Diff[$equipe]) ? $Diff[$equipe] : "0"?></td>
287 16322a9c Romuald
                        </tr>
288 16322a9c Romuald
<?php
289 16322a9c Romuald
                $last = $Pts[$equipe];
290 16322a9c Romuald
        }
291 16322a9c Romuald
?>
292 16322a9c Romuald
<?php if ($equipes) { ?>
293 16322a9c Romuald
                </table>
294 57de9303 Romuald
        </div>
295 57de9303 Romuald
        <br />
296 16322a9c Romuald
<?php } ?>
297 16322a9c Romuald
<?php
298 16322a9c Romuald
        $j = 0;
299 16322a9c Romuald
        foreach ($rencontres as $j => $rencontre) {
300 16322a9c Romuald
?>
301 16322a9c Romuald
        <div class="tabJournee">
302 57de9303 Romuald
                <table>
303 57de9303 Romuald
                        <tr>
304 57de9303 Romuald
                                <th class="colJournee" colspan="6">Journ&eacute;e <?=$j?></th>
305 57de9303 Romuald
                        <tr>
306 16322a9c Romuald
<?php
307 16322a9c Romuald
                foreach ($rencontre as $r) {
308 16322a9c Romuald
                        list($domicile, $visiteur, $ptsDom, $ptsVis) = explode(":", $r);
309 16322a9c Romuald
?>
310 57de9303 Romuald
                        <tr>
311 57de9303 Romuald
                                <td class="colDom"><div<?=($ptsDom != "" && $ptsVis != "" && $ptsDom >= $ptsVis) ? " class=\"vainqueur\"": ""?>><?=$equipes[$domicile]?></div></td>
312 57de9303 Romuald
                                <td class="colSep">&nbsp;-&nbsp;</td>
313 57de9303 Romuald
                                <td class="colVis"><div<?=($ptsDom != "" && $ptsVis != "" && $ptsVis >= $ptsDom) ? " class=\"vainqueur\"": ""?>><?=$equipes[$visiteur]?></div></td>
314 57de9303 Romuald
                                <td class="colPtsDom"><?=$ptsDom?></td>
315 57de9303 Romuald
                                <td class="colPtsVis"><?=$ptsVis?></td>
316 16322a9c Romuald
<?php if (IamAdmin()) { ?>
317 57de9303 Romuald
                                <td>
318 16322a9c Romuald
<?php $value = "$j-$domicile-$visiteur"; ?>
319 57de9303 Romuald
                                        <input type="submit" name="rencontre-<?=$value?>" value="modifier" />
320 57de9303 Romuald
                                        <input type="submit" name="rencontre-<?=$value?>" value="supprimer" onClick='return confirm("Voulez-vous vraiment effacer cette rencontre entre\n<?=$equipes[$domicile]?> et <?=$equipes[$visiteur]?> ?")' />
321 57de9303 Romuald
                                </td>
322 16322a9c Romuald
<?php } ?>
323 57de9303 Romuald
                        </tr>
324 16322a9c Romuald
<?php
325 16322a9c Romuald
                }
326 16322a9c Romuald
?>
327 16322a9c Romuald
                </table>
328 57de9303 Romuald
        </div>
329 57de9303 Romuald
        <br />
330 16322a9c Romuald
<?php
331 16322a9c Romuald
        }
332 16322a9c Romuald
?>
333 16322a9c Romuald
<?php if (IamAdmin()) { ?>
334 16322a9c Romuald
<?php         if ($equipes) { ?>
335 57de9303 Romuald
        <div id="rencontre-ajouter">
336 57de9303 Romuald
                <input type="submit" name="rencontre-ajouter" value="ajouter une rencontre" />
337 57de9303 Romuald
        </div>
338 16322a9c Romuald
<?php         } ?>
339 16322a9c Romuald
        </form>
340 16322a9c Romuald
<?php } ?>
341 16322a9c Romuald
</body>
342 16322a9c Romuald
</html>