Subversion Repositories Applications.gtt

Rev

Rev 11 | Go to most recent revision | Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
10 jpm 1
<?php
2
// +------------------------------------------------------------------------------------------------------+
3
// | PHP version 5.1.1                                                                                    |
4
// +------------------------------------------------------------------------------------------------------+
5
// | Copyright (C) 2006 Tela Botanica (accueil@tela-botanica.org)                                         |
6
// +------------------------------------------------------------------------------------------------------+
7
// | This file is part of eFlore.                                                                         |
8
// |                                                                                                      |
9
// | Foobar is free software; you can redistribute it and/or modify                                       |
10
// | it under the terms of the GNU General Public License as published by                                 |
11
// | the Free Software Foundation; either version 2 of the License, or                                    |
12
// | (at your option) any later version.                                                                  |
13
// |                                                                                                      |
14
// | Foobar is distributed in the hope that it will be useful,                                            |
15
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
16
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
17
// | GNU General Public License for more details.                                                         |
18
// |                                                                                                      |
19
// | You should have received a copy of the GNU General Public License                                    |
20
// | along with Foobar; if not, write to the Free Software                                                |
21
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
22
// +------------------------------------------------------------------------------------------------------+
23
// CVS : $Id$
24
/**
25
* Classe Calendrier
26
*
27
* Description
28
*
29
*@package Calendrier
30
//Auteur original :
31
*@version 1
32
*@author        Dorian BANNIER <dbannier@aol.com>
33
//Autres auteurs :
34
*@version 3
35
*@author        Shaheen ABDOOL RAHEEM <shaheenar50@hotmail.com>
36
*@version 4
37
*@author        Jean-Pascal MILCENT <jpm@clapas.org>
38
*@author        aucun
39
*@copyright     Tela-Botanica 2000-2006
40
*@version       $Revision$ $Date$
41
// +------------------------------------------------------------------------------------------------------+
42
*/
43
 
44
/**
45
* Classe calendrier pour gerer le calendrier pour un mois et une annee
46
*
47
*@param annee
48
*@param mois
49
*@param premier jour du mois
50
*@param semaine
51
*@param l'url du resultat affiche
52
*@param liste de noms des jours
53
*@param liste de noms des mois
54
*@param liste des jours feries du mois
55
*/
56
class Calendrier
57
{
58
	private $annee;
59
	private $mois;
60
	private $semaine;
61
	private $jour;
62
 
63
	private $nom_jours = array();
64
	private $nom_mois = array();
65
 
66
	private $liste_feries = array();
67
 
68
	/** contient le nom des variables que recevra l'url spécifié
69
	* @var string
70
	*/
71
	var $var_jour = "jour";
72
	var $var_mois = "mois";
73
	var $var_annee = "annee";
74
 
75
	/**
76
	*constructeur de la classe calendrier
77
	*toutes les variables sont initialises 	avec les donnees
78
	*de la date du jour si on ne passe aucune date en parametre
79
	*sinon on initialise le calendrier avec
80
	*@param semaine
81
	*@param annee
82
	*/
83
	public function __construct($semaine = null, $annee = null)
84
	{
85
		if (is_null($semaine)) {
86
			$semaine = date('W', time());
87
		}
88
		if (is_null($annee)) {
89
			// TODO : vérifier le standard ISO-8601
90
			$annee = date('Y', time());
91
		}
92
		$tableau = $this->donnerLundiEtDimancheSemaine($semaine, $annee);
93
 
94
		$this->jour = date('d',mktime(0,0,0,1,$tableau[0],$annee));
95
		$this->semaine = $semaine;
96
		$this->mois = date('n',mktime(0,0,0,1,$tableau[0],$annee));
97
		$this->annee = $annee;
98
 
99
		$this->nom_jours = array (GESTION_LUN_L, GESTION_MAR_L, GESTION_MER_L, GESTION_JEU_L, GESTION_VEN_L, GESTION_SAM_L ,GESTION_DIM_L);
100
		$this->nom_mois = array(1 => "Janvier","Février","Mars","Avril","Mai","Juin","Juillet", "Août","Septembre","Octobre","Novembre","Décembre");
101
 
102
		$this->liste_feries = $this->calculerJoursFeries($this->annee);
103
	}
104
 
105
	public function getAnnee()
106
	{
107
		return $this->annee;
108
	}
109
 
110
	public function getMois()
111
	{
112
		return $this->mois;
113
	}
114
 
115
	public function getSemaine()
116
	{
117
		return $this->semaine;
118
	}
119
 
120
	public function getJour()
121
	{
122
		return $this->jour;
123
	}
124
 
125
	/**
126
	*Calcule les dates des jours fériés pour la france.
127
	*Renvoie un tableau contenant la liste de dates par mois.
128
	*Les dates sont de la forme timestamp unix.
129
	*
130
	*@param integer l'année pour laquelle on veut les jours fériés.
131
	*@return array tableau des dates fériées.
132
	*/
133
	public function calculerJoursFeries($annee)
134
	{
135
		$tab = array(	mktime(0,0,0,1,1,$annee),
136
						$this->donnerDatePaques($annee),
137
						mktime(0,0,0,5,1,$annee),
138
	     				mktime(0,0,0,5,8,$annee),
139
	     				$this->donnerDateAscension($annee),
140
	     				$this->donnerDatePentecote($annee),
141
	     				mktime(0,0,0,7,14,$annee),
142
	     				mktime(0,0,0,8,15,$annee),
143
	     				mktime(0,0,0,11,1,$annee),
144
	     				mktime(0,0,0,11,11,$annee),
145
	     				mktime(0,0,0,12,25,$annee));
146
		return $tab;
147
	}
148
 
149
	/**
150
	*Calcule la date du lundi de Pâques.
151
	*
152
	*@param integer l'année pour laquelle on veut connaître la date de Pâques
153
	*@return integer le timestamp du lundi de Pâques
154
	*/
155
	public function donnerDatePaques($annee)
156
	{
157
		$date_paques = easter_date($annee);
158
		$lundi_paques = mktime(	date("H", $date_paques),
159
								date("i", $date_paques),
160
								date("s", $date_paques),
161
								date("m", $date_paques),
162
								date("d", $date_paques) + 1,
163
								date("Y", $date_paques));
164
		return $lundi_paques;
165
	}
166
	/**
167
	*Calcule la date de l'ascension.
168
	*
169
	*@param integer l'année pour laquelle on veut connaître la date de l'ascencion
170
	*@return integer le timestamp de l'ascencion
171
	*/
172
	public function donnerDateAscension($annee)
173
	{
174
		$date_paques = easter_date($annee);
175
		$date_ascension = mktime(	date("H", $date_paques),
176
									date("i", $date_paques),
177
									date("s", $date_paques),
178
									date("m", $date_paques),
179
									date("d", $date_paques) + 39,
180
									date("Y", $date_paques));
181
		return $date_ascension;
182
	}
183
 
184
	/**
185
	*Calcule la date du lundi de la pentecote
186
	*Renvoie un timestamp
187
	*renvoie cette derniere
188
	*/
189
	public function donnerDatePentecote($annee)
190
	{
191
		$date_paques = easter_date($annee);
192
		$date_ascension = $this->donnerDateAscension($annee);
193
		$date_pentecote = mktime(	date("H", $date_ascension),
194
									date("i", $date_ascension),
195
									date("s", $date_ascension),
196
									date("m", $date_ascension),
197
									date("d", $date_ascension) + 11,
198
									date("Y", $date_ascension));
199
		return $date_pentecote;
200
	}
201
 
202
	/**
203
	*Donne le type de jour de la semaine au format numérique du premier jour du mois.
204
	*
205
	*@return integer le numéro de 1 (lundi) à 7 (dimanche) correspondant au type du premier jour du mois.
206
	*/
207
	function donnerTypePremierJourMois()
208
	{
209
		$intPremierJour = date("w", mktime(0, 0, 0, $this->getMois(), 1, $this->getAnnee()));
210
		if ($intPremierJour == 0) {
211
			$intPremierJour = 7; // si c'est un dimanche
212
		}
213
		return $intPremierJour;
214
	}
215
 
216
	/**
217
	*Calcule le dernier jour du mois
218
	*@param : annee, mois
219
	*renvoie un entier
220
	*/
221
	function donnerDernierJourMois()
222
	{
223
		$h = $this->donnerNbreJoursMois();
224
		$intDernierJour = date("w", mktime(0, 0, 0, $this->getMois(), $h, $this->getAnnee()));
225
		if($intDernierJour == 0) {
226
			$intDernierJour = 7; // si c'est un dimanche
227
		}
228
		return $intDernierJour;
229
	}
230
 
231
	/**
232
	*Calcule le nombre de jours dans un mois
233
	*@return integer le nombre de jour dans le mois.
234
	*/
235
	function donnerNbreJoursMois()
236
	{
237
		return date("t", mktime(0, 0, 0, $this->getMois(), 1, $this->getAnnee()));
238
	}
239
 
240
	/**
241
	*Calcule la semaine suivante
242
	*/
243
	function donnerSemaineSuivante()
244
	{
245
		if ($this->getSemaine() == date('W', mktime(0, 0, 0, 12, 31, $this->getAnnee()))) {
246
			$tab['semaine'] = 1;
247
			$tab['annee'] = $this->getAnnee() + 1;
248
		} else {
249
			$tab['semaine'] = $this->getSemaine() + 1;
250
			$tab['annee'] = $this->getAnnee();
251
		}
252
		return $tab;
253
	}
254
 
255
	/**
256
	*Calule la semaine précédente
257
	*/
258
	function donnerSemainePrecedente()
259
	{
260
		if ($this->getSemaine() == 1) {
261
			$tab['semaine'] = date('W', mktime(0, 0, 0, 12, 31, ($this->getAnnee() - 1)));
262
			$tab['annee'] = $this->annee - 1;
263
		} else {
264
			$tab['semaine'] = $this->semaine - 1 ;
265
			$tab['annee'] = $this->annee;
266
		}
267
		return $tab;
268
	}
269
 
270
	/**
271
	*Calucule le mois suivant
272
	*renvoie l'annee et le mois suivant sous forme de chiffre
273
	*dans un tableau
274
	*/
275
	function donnerMoisSuivant()
276
	{
277
		if ($this->mois == 12) {
278
			$tab['mois'] = 1;
279
			$tab['annee'] = $this->annee + 1;
280
		} else {
281
			$tab['mois'] = $this->mois + 1;
282
			$tab['annee'] = $this->annee;
283
		}
284
		return $tab;
285
	}
286
 
287
	/**
288
	*Calcule le mois precedent
289
	*renvoie l'annee et le mois precedent sous forme de chiffre
290
	*/
291
	function donnerMoisPrecedent()
292
	{
293
		if ($this->mois == 1) {
294
			$tab['mois'] = 12;
295
			$tab['annee'] = $this->annee - 1;
296
		} else {
297
			$tab['mois'] = $this->mois - 1;
298
			$tab['annee'] = $this->annee;
299
		}
300
		return $tab;
301
	}
302
 
303
   /**
304
	*Renvoie la date du lundi et dimanche d'une semaine
305
	*a partir du numero de semaine
306
	*
307
	*@return un tableau contenat le timestamp unix de lundi et dimanche
308
	*de la semaine en question
309
	*/
310
	function donnerLundiEtDimancheSemaine()
311
	{
312
		if ((date("w", mktime(0, 0, 0, 1, 1, $this->getAnnee())) <= 4) && (date("w", mktime(0, 0, 0, 1, 1, $this->getAnnee())) != 0)) {
313
			$nbre_jour = ($this->getSemaine() - 1) * 7;
314
		} else {
315
			$nbre_jour = ($this->getSemaine()) * 7;
316
		}
317
 
318
		if (date("w", mktime(0, 0, 0, 1, 1, $this->getAnnee())) == 0) {
319
			$nbre_jour += 7;
320
		} else {
321
			$nbre_jour += 7 - ((date("w", mktime(0, 0, 0, 1, 1, $this->getAnnee())) - 1) % 7);
322
		}
323
		$nbre_jour_7 = $nbre_jour - 6;
324
		return array($nbre_jour_7, $nbre_jour);
325
	}
326
 
327
	/**
328
	*Indique si une date est fériée ou non
329
	*renvoie 1 si férié
330
	*0 sinon
331
	*/
332
	function etreFerie($date)
333
	{
334
		if (in_array($date, $this->liste_feries)) {
335
			return 1;
336
		} else {
337
			return 0;
338
		}
339
	}
340
 
341
	/**
342
	*Affiche un calendrier naviguable par semaine
343
	*option pour cliquer sur une semaine donnee
344
	*utilisation de la bibliotheque HTML/TABLE de PEAR
345
	*@param numero de semaine et annee
346
	*/
347
	function afficherCalendrier($annee)
348
	{
349
		$id="CALENDRIER";
350
		$text=/*"</tr></td>".*/"<div id=\"calendrier\">";
351
		//initialisation des donnees
352
		$intPremierJour = &Calendrier::premierJourMois($this->mois,$this->annee);
353
		$intNbJoursMois = &Calendrier::nbJourMois($this->mois,$this->annee);
354
		$prevMonth=&Calendrier::prevMonth($this->mois,$this->annee);
355
		$intNbJourPrec=&Calendrier::nbJourMois($prevMonth[0],$prevMonth[1]);
356
		$intDernierJour=&Calendrier::dernierJourMois($this->mois,$this->annee);
357
		//calcul du lundi et dimanche de la semaine courante
358
		//calcul de l'annee
359
		$tabLundiDimanche =& Calendrier::lundiEtDimancheSemaine($this->semaine,$annee);
360
		//creation de la table HTML representant le calendrier
361
		$tableAttrs = array("class" =>$id,"width" => "300");
362
		//creation de la barre de navigation
363
		//semaine precedente
364
		$tabPrevWeek=&Calendrier::prevWeek();
365
		$text.="<a href=".$GLOBALS['urlBase'].GESTION_TRAVAIL."&semaine=";
366
		$text.=$tabPrevWeek[0]."&annee=".$tabPrevWeek[1].">";
367
		$text.="<<"."</a>";
368
 
369
		//semaine courante
370
		$text.='<button>';
371
		$text.=date('d/m/y',mktime(0,0,0,1,$tabLundiDimanche[0],$annee));
372
		$text.='  --  ';
373
		$text.=date('d/m/y',mktime(0,0,0,1,$tabLundiDimanche[1],$annee));
374
		$text.='</button>';
375
		//semaine suivante
376
		$tabNextWeek= &Calendrier::nextWeek();
377
		$text.="<a href=".$GLOBALS['urlBase'].GESTION_TRAVAIL."&semaine=";
378
		$text.=$tabNextWeek[0]."&annee=".$tabNextWeek[1].">";
379
		$text.=">>"."</a>";
380
		$table = new HTML_Table($tableAttrs);
381
		$table -> setAutoGrow(true);
382
		$table->addRow($this->nom_jours);
383
		//remplissage de la premiere ligne
384
		//test si on est dans la semaine courante
385
		//si dimanche egale a la fin de la semaine
386
		$semCourante=(date('d',mktime(0,0,0,1,$tabLundiDimanche[1],$annee))==(7-$intPremierJour+1));
387
		$p=1;
388
		for($i=1; $i<=7;$i++) {
389
    		if ($i<$intPremierJour and $semCourante) {//mois prec et semaine courante
390
				$elem[$i-1]="<div id=\"moisprecedent\">".($intNbJourPrec-$intPremierJour+$i+1);
391
			} elseif ($i<$intPremierJour and !$semCourante) {//mois prec et pas semaien courante
392
				$semaineL=date('W',mktime(0,0,0,$prevMonth[0],($intNbJourPrec-$intPremierJour+$i+1),$prevMonth[1]));
393
				$elem[$i-1]= "<a href=".$this->url."?action=".GESTION_TRAVAIL."&semaine=$semaineL"."&annee=$prevMonth[1]".">".($intNbJourPrec-$intPremierJour+$i+1)."</a>";
394
			} elseif ($i>=$intPremierJour and $semCourante) {//mois courant et semaine courante
395
				$elem[$i-1] = "<div id=\"jourcourant\">".$p."</div>";
396
				$p++;
397
			} else {//mois courant et pas semaine courante
398
				$semaineL=date('W',mktime(0,0,0,$this->mois,$p,$this->annee));
399
				$elem[$i-1] = "<a href=".$this->url."?action=".GESTION_TRAVAIL."&semaine=$semaineL";
400
				$elem[$i-1] .="&annee=".$this->annee.">".$p."</a>";
401
				$p++;
402
			}
403
		}
404
		$table->addRow($elem);
405
		//remplissage du reste des lignes
406
		$i=0; //indice du tableau
407
		//lundi de la semaien courante
408
		// $t=&Calendrier::lundiEtDimancheSemaine($this->semaine,$this->annee);
409
		$lundiCourant=date('d',mktime(0,0,0,1,$tabLundiDimanche[0],$annee));
410
		$semCourante2=0;
411
		for ($f=$p; $f<=$intNbJoursMois ; $f++) {
412
			if ($f==$lundiCourant and $i==0) {
413
				$semCourante2=1;//booleen
414
			}
415
			//calcul de la semaine courante
416
			$semaineL2=date('W',mktime(0,0,0,$this->mois,$f,$this->annee));
417
			if ($semCourante2==1) {
418
				$elem[$i]= "<div id=\"jourcourant\">".$f."</div>";
419
			} else {
420
				$elem[$i]="<a href=".$this->url."?action=".GESTION_TRAVAIL."&semaine=$semaineL2";
421
				$elem[$i].="&annee=".$this->annee.">".$f."</a>";
422
			}
423
			if ($i==6) {
424
				$i=0;
425
				if ($semCourante2==1) {
426
					$semCourante2=0;
427
				}
428
				$table->addRow($elem);
429
			} else {
430
				$i++;
431
			}
432
		}
433
		//remplissage de la derniere ligne
434
		$semaineL3=date('W',mktime(0,0,0,$this->mois,$intNbJoursMois,$this->annee));
435
		if ($semCourante2==0) {
436
			for ($d=$i; $d<=6;$d++) {
437
				$s=$d-$i+1;
438
				$elem[$d]="<a href=".$this->url."?action=".GESTION_TRAVAIL."&semaine=$semaineL2";
439
				$elem[$d].="&annee=".$this->annee.">".$s."</a>";
440
			}
441
		} else {
442
			for ($d=$i; $d<=6;$d++) {
443
				$elem[$d]= ($d-$i+1);
444
			}
445
		}
446
		$table->addRow($elem);
447
		$text.=$table->toHtml();
448
		$text .= "</div>";
449
		return $text;
450
	}
451
}
452
?>