Statistiques
| Branche: | Révision :

root / index.php @ 5ea6d54ca4b3ad5f71128088cf761478d85e1137

Historique | Voir | Annoter | Télécharger (4,12 ko)

1 5ea6d54c Romuald
<?php
2 5ea6d54c Romuald
        setlocale(LC_ALL, 'fr_FR');
3 5ea6d54c Romuald
        $lstJours = array("dimanche", "lundi", "mardi", "mercredi", "jeudi", "vendredi", "samedi");
4 5ea6d54c Romuald
        $lstMois = array(1 => "janvier", "f&eacute;vrier", "mars", "avril", "mai", "juin", "juillet", "ao&ucirc;t", "septembre", "octobre", "novembre", "d&eacute;cembre");
5 5ea6d54c Romuald
        $lstFeries = array(
6 5ea6d54c Romuald
                "jourDeLAn" => array(1, 1, "jour de l'an"),
7 5ea6d54c Romuald
                "rameaux" => array(0, 0, "les Rameaux"),
8 5ea6d54c Romuald
                "paques" => array(0, 0, "P&acirc;ques"),
9 5ea6d54c Romuald
                "lundiDePaques" => array(0, 0, "lundi de P&acirc;ques"),
10 5ea6d54c Romuald
                "feteDuTravail" => array(1, 5, "f&ecirc;te du travail"),
11 5ea6d54c Romuald
                "victoire1945" => array(8, 5, "victoire 1945"),
12 5ea6d54c Romuald
                "ascension" => array(15, 8, "l'Ascension"),
13 5ea6d54c Romuald
                "pentecote" => array(0, 0, "la Pentec&ocirc;te"),
14 5ea6d54c Romuald
                "lundiDePentecote" => array(0, 0, "lundi de Pentec&ocirc;te"),
15 5ea6d54c Romuald
                "feteNationale" => array(14, 7, "f&ecirc;te Nationale"),
16 5ea6d54c Romuald
                "assomption" => array(15, 8, "l'Assomption"),
17 5ea6d54c Romuald
                "toussaint" => array(1, 11, "la Toussaint"),
18 5ea6d54c Romuald
                "armistice1918" => array(11, 11, "armistice 1918"),
19 5ea6d54c Romuald
                "noel" => array(25, 12, "No&euml;l")
20 5ea6d54c Romuald
        );
21 5ea6d54c Romuald
22 5ea6d54c Romuald
        function getPaquesDay($year) {
23 5ea6d54c Romuald
                $b = $year-1900;
24 5ea6d54c Romuald
                $c = $year % 19;
25 5ea6d54c Romuald
                $d = (7*$c+1)/19;
26 5ea6d54c Romuald
                $e = (11*$c+4-$d) % 29;
27 5ea6d54c Romuald
                $f = $b/4;
28 5ea6d54c Romuald
                $g = ($b+$f+31-$e) % 7;
29 5ea6d54c Romuald
                $h = 25-$e-$g;
30 5ea6d54c Romuald
                if ($h > 0) {
31 5ea6d54c Romuald
                        $jour = $h;
32 5ea6d54c Romuald
                        $mois = 4;
33 5ea6d54c Romuald
                } else {
34 5ea6d54c Romuald
                        $jour = $h+31;
35 5ea6d54c Romuald
                        $mois = 3;
36 5ea6d54c Romuald
                }
37 5ea6d54c Romuald
                return array($jour, $mois);
38 5ea6d54c Romuald
        }
39 5ea6d54c Romuald
40 5ea6d54c Romuald
        $year = date("Y");
41 5ea6d54c Romuald
        if (isset($_GET['year'])) $year = $_GET['year'];
42 5ea6d54c Romuald
        if (isset($_GET['annee'])) $year = $_GET['annee'];
43 5ea6d54c Romuald
44 5ea6d54c Romuald
        list($jourPaques, $moisPaques) = getPaquesDay($year);
45 5ea6d54c Romuald
        $datePaques = strtotime("$year-$moisPaques-$jourPaques");
46 5ea6d54c Romuald
        $lstFeries['paques'][0] = $jourPaques;
47 5ea6d54c Romuald
        $lstFeries['paques'][1] = $moisPaques;
48 5ea6d54c Romuald
        $ts = strtotime("-7 days", $datePaques);
49 5ea6d54c Romuald
        $lstFeries['rameaux'][0] = date("j", $ts);
50 5ea6d54c Romuald
        $lstFeries['rameaux'][1] = date("n", $ts);
51 5ea6d54c Romuald
        $ts = strtotime("1 day", $datePaques);
52 5ea6d54c Romuald
        $lstFeries['lundiDePaques'][0] = date("j", $ts);
53 5ea6d54c Romuald
        $lstFeries['lundiDePaques'][1] = date("n", $ts);
54 5ea6d54c Romuald
        $ts = strtotime("39 days", $datePaques);
55 5ea6d54c Romuald
        $lstFeries['ascension'][0] = date("j", $ts);
56 5ea6d54c Romuald
        $lstFeries['ascension'][1] = date("n", $ts);
57 5ea6d54c Romuald
        $ts = strtotime("49 days", $datePaques);
58 5ea6d54c Romuald
        $lstFeries['pentecote'][0] = date("j", $ts);
59 5ea6d54c Romuald
        $lstFeries['pentecote'][1] = date("n", $ts);
60 5ea6d54c Romuald
        $ts = strtotime("50 days", $datePaques);
61 5ea6d54c Romuald
        $lstFeries['lundiDePentecote'][0] = date("j", $ts);
62 5ea6d54c Romuald
        $lstFeries['lundiDePentecote'][1] = date("n", $ts);
63 5ea6d54c Romuald
?>
64 5ea6d54c Romuald
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN"
65 5ea6d54c Romuald
 "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
66 5ea6d54c Romuald
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fr">
67 5ea6d54c Romuald
        <head>
68 5ea6d54c Romuald
                <meta http-equiv="Content-Type" content="text/HTML; charset=iso-8859-1"  />
69 5ea6d54c Romuald
                <meta http-equiv="Content-style-type" content="text/css" />
70 5ea6d54c Romuald
                <meta http-equiv="Content-language" content="fr" />
71 5ea6d54c Romuald
                <title>Calendrier <?=$year?></title>
72 5ea6d54c Romuald
                <link rel="stylesheet" type="text/css" href="calendrier.css" media="screen" title="Normal" />
73 5ea6d54c Romuald
                <link rel="stylesheet" type="text/css" href="calendrier.css" media="print" title="Normal" />
74 5ea6d54c Romuald
75 5ea6d54c Romuald
        </head>
76 5ea6d54c Romuald
77 5ea6d54c Romuald
        <body>
78 5ea6d54c Romuald
<?php
79 5ea6d54c Romuald
        for ($s = 1; $s <= 2; $s++) {
80 5ea6d54c Romuald
                print "\t\t<table>\n";
81 5ea6d54c Romuald
                for ($j = 0; $j <= 31; $j++) {
82 5ea6d54c Romuald
                        if ($j == 0) {
83 5ea6d54c Romuald
                                echo "\t\t\t<tr id=\"semestre$s\">\n";
84 5ea6d54c Romuald
                        } else {
85 5ea6d54c Romuald
                                echo "\t\t\t<tr class=\"jour$j\">\n";
86 5ea6d54c Romuald
                        }
87 5ea6d54c Romuald
                        for ($m = 6*$s-5; $m <= 6*$s; $m++) {
88 5ea6d54c Romuald
                                if ($j == 0) {
89 5ea6d54c Romuald
                                        echo "\t\t\t\t<th id=\"mois$m\">".$lstMois[$m]."</th>\n";
90 5ea6d54c Romuald
                                        $lastDay = 29;
91 5ea6d54c Romuald
                                        while (checkdate($m, $lastDay, $year)) $lastDay++;
92 5ea6d54c Romuald
                                        $last[$m] = $lastDay-1;
93 5ea6d54c Romuald
                                } else {
94 5ea6d54c Romuald
                                        $ts = strtotime("$year-$m-$j");
95 5ea6d54c Romuald
                                        $weekDay = $lstJours[date("w", $ts)];
96 5ea6d54c Romuald
                                        $abrvDay = strftime("%a", $ts);
97 5ea6d54c Romuald
                                        if ($j <= $last[$m]) {
98 5ea6d54c Romuald
                                                $classFerie = "";
99 5ea6d54c Romuald
                                                foreach ($lstFeries as $id => $f) {
100 5ea6d54c Romuald
                                                        if ($j == $f[0] && $m == $f[1]) {
101 5ea6d54c Romuald
                                                                $classFerie = " class=\"ferie\" class=\"$id\" title=\"".$f[2]."\"";
102 5ea6d54c Romuald
                                                                break;
103 5ea6d54c Romuald
                                                        }
104 5ea6d54c Romuald
                                                }
105 5ea6d54c Romuald
                                                echo "\t\t\t\t<td$classFerie class=\"$weekDay\"><span class=\"nom-jour\">$abrvDay</span><span class=\"num-jour\">$j</span></td>\n";
106 5ea6d54c Romuald
                                        } else {
107 5ea6d54c Romuald
                                                if ($last[$m] == 30) {
108 5ea6d54c Romuald
                                                        echo "\t\t\t\t<td></td>\n";
109 5ea6d54c Romuald
                                                } else {
110 5ea6d54c Romuald
                                                        if ($j == $last[$m]+1) echo "\t\t\t\t<td rowspan=\"".(31-$last[$m])."\"></td>\n";
111 5ea6d54c Romuald
                                                }
112 5ea6d54c Romuald
                                        }
113 5ea6d54c Romuald
                                }
114 5ea6d54c Romuald
                        }
115 5ea6d54c Romuald
                        echo "\t\t\t</tr>\n";
116 5ea6d54c Romuald
                }
117 5ea6d54c Romuald
                print "\t\t</table>\n";
118 5ea6d54c Romuald
                print "\t\t<br />\n";
119 5ea6d54c Romuald
        }
120 5ea6d54c Romuald
?>
121 5ea6d54c Romuald
        </body>
122 5ea6d54c Romuald
</html>