10 |
ddelon |
1 |
<?php
|
|
|
2 |
/*vim: set expandtab tabstop=4 shiftwidth=4: */
|
|
|
3 |
// Copyright (C) 1999-2004 Tela Botanica (accueil@tela-botanica.org)
|
|
|
4 |
//
|
|
|
5 |
// Ce logiciel est un programme informatique servant à gérer du contenu et des
|
|
|
6 |
// applications web.
|
|
|
7 |
|
|
|
8 |
// Ce logiciel est régi par la licence CeCILL soumise au droit français et
|
|
|
9 |
// respectant les principes de diffusion des logiciels libres. Vous pouvez
|
|
|
10 |
// utiliser, modifier et/ou redistribuer ce programme sous les conditions
|
|
|
11 |
// de la licence CeCILL telle que diffusée par le CEA, le CNRS et l'INRIA
|
|
|
12 |
// sur le site "http://www.cecill.info".
|
|
|
13 |
|
|
|
14 |
// En contrepartie de l'accessibilité au code source et des droits de copie,
|
|
|
15 |
// de modification et de redistribution accordés par cette licence, il n'est
|
|
|
16 |
// offert aux utilisateurs qu'une garantie limitée. Pour les mêmes raisons,
|
|
|
17 |
// seule une responsabilité restreinte pèse sur l'auteur du programme, le
|
|
|
18 |
// titulaire des droits patrimoniaux et les concédants successifs.
|
|
|
19 |
|
|
|
20 |
// A cet égard l'attention de l'utilisateur est attirée sur les risques
|
|
|
21 |
// associés au chargement, à l'utilisation, à la modification et/ou au
|
|
|
22 |
// développement et à la reproduction du logiciel par l'utilisateur étant
|
|
|
23 |
// donné sa spécificité de logiciel libre, qui peut le rendre complexe à
|
|
|
24 |
// manipuler et qui le réserve donc à des développeurs et des professionnels
|
|
|
25 |
// avertis possédant des connaissances informatiques approfondies. Les
|
|
|
26 |
// utilisateurs sont donc invités à charger et tester l'adéquation du
|
|
|
27 |
// logiciel à leurs besoins dans des conditions permettant d'assurer la
|
|
|
28 |
// sécurité de leurs systèmes et ou de leurs données et, plus généralement,
|
|
|
29 |
// à l'utiliser et l'exploiter dans les mêmes conditions de sécurité.
|
|
|
30 |
|
|
|
31 |
// Le fait que vous puissiez accéder à cet en-tête signifie que vous avez
|
|
|
32 |
// pris connaissance de la licence CeCILL, et que vous en avez accepté les
|
|
|
33 |
// termes.
|
|
|
34 |
// ----
|
19 |
ddelon |
35 |
// CVS : $Id: bazar.calendrier.php,v 1.4 2005-10-01 11:21:39 ddelon Exp $
|
10 |
ddelon |
36 |
/**
|
|
|
37 |
* bazar_calendrier : programme affichant les evenements du bazar sous forme de Calendrier
|
|
|
38 |
*
|
|
|
39 |
*
|
|
|
40 |
*@package Bazar
|
|
|
41 |
//Auteur original :
|
|
|
42 |
*@author David DELON <david.delon@clapas.net>
|
19 |
ddelon |
43 |
*@version $Revision: 1.4 $ $Date: 2005-10-01 11:21:39 $
|
10 |
ddelon |
44 |
// +------------------------------------------------------------------------------------------------------+
|
|
|
45 |
*/
|
|
|
46 |
|
14 |
ddelon |
47 |
// TODO : afficher evenement sur plusieur jours
|
|
|
48 |
// TODO : traduction entete mois calendrier
|
|
|
49 |
// Parametrage EVENEMENT : template
|
10 |
ddelon |
50 |
|
|
|
51 |
// Fonction Calendrier de Pear
|
|
|
52 |
|
|
|
53 |
require_once 'Calendar/Month/Weekdays.php';
|
|
|
54 |
require_once 'Calendar/Day.php';
|
|
|
55 |
require_once 'Calendar/Decorator.php';
|
|
|
56 |
|
17 |
ddelon |
57 |
define ('BAZ_VOIR_FICHE', 8) ;
|
|
|
58 |
include_once 'configuration/baz_config.inc.php'; //fichier de configuration de Bazar
|
|
|
59 |
include_once 'bibliotheque/bazar.fonct.php'; //fichier des fonctions de Bazar
|
10 |
ddelon |
60 |
|
17 |
ddelon |
61 |
|
|
|
62 |
|
10 |
ddelon |
63 |
// Classe Utilitaire pour Calendrier
|
|
|
64 |
|
|
|
65 |
class DiaryEvent extends Calendar_Decorator {
|
17 |
ddelon |
66 |
var $entry=array();
|
10 |
ddelon |
67 |
function DiaryEvent($calendar) {
|
|
|
68 |
Calendar_Decorator::Calendar_Decorator($calendar);
|
|
|
69 |
}
|
|
|
70 |
function setEntry($entry) {
|
17 |
ddelon |
71 |
$this->entry[]=$entry;
|
|
|
72 |
|
10 |
ddelon |
73 |
}
|
|
|
74 |
function getEntry() {
|
|
|
75 |
return $this->entry;
|
|
|
76 |
}
|
|
|
77 |
}
|
|
|
78 |
|
|
|
79 |
|
|
|
80 |
function afficherContenuCorps() {
|
17 |
ddelon |
81 |
|
|
|
82 |
// Ajout d'une feuille de style externe
|
|
|
83 |
GEN_stockerStyleExterne ('wikini', 'client/bazar/presentations/styles/calendrier.css') ;
|
|
|
84 |
|
|
|
85 |
$retour='';
|
10 |
ddelon |
86 |
|
|
|
87 |
$url = $GLOBALS['_GEN_commun']['url'] ;
|
|
|
88 |
$db = &$GLOBALS['_GEN_commun']['pear_db'] ;
|
|
|
89 |
$auth = &$GLOBALS['_GEN_commun']['pear_auth'] ;
|
|
|
90 |
|
|
|
91 |
if (!isset($_GET['y'])) {
|
|
|
92 |
$_GET['y'] = date('Y');
|
|
|
93 |
}
|
|
|
94 |
|
|
|
95 |
if (!isset($_GET['m'])) {
|
|
|
96 |
$_GET['m'] = date('m');
|
|
|
97 |
}
|
|
|
98 |
|
17 |
ddelon |
99 |
|
14 |
ddelon |
100 |
// Construction Mois en Cours
|
|
|
101 |
$month = new Calendar_Month_Weekdays($_GET['y'],$_GET['m']);
|
10 |
ddelon |
102 |
|
14 |
ddelon |
103 |
$curStamp=$month->getTimeStamp();
|
17 |
ddelon |
104 |
$url->addQueryString ('y', date('Y',$curStamp));
|
|
|
105 |
$url->addQueryString ('m', date('n',$curStamp));
|
|
|
106 |
$url->addQueryString ('d', date('j',$curStamp));
|
|
|
107 |
$cur = $url->getUrl();
|
14 |
ddelon |
108 |
|
|
|
109 |
// Navigation
|
|
|
110 |
$prevStamp = $month->prevMonth(true);
|
|
|
111 |
$url->addQueryString ('y', date('Y',$prevStamp));
|
|
|
112 |
$url->addQueryString ('m', date('n',$prevStamp));
|
|
|
113 |
$url->addQueryString ('d', date('j',$prevStamp));
|
|
|
114 |
$prev = $url->getUrl();
|
|
|
115 |
$nextStamp = $month->nextMonth(true);
|
|
|
116 |
$url->addQueryString ('y', date('Y',$nextStamp));
|
|
|
117 |
$url->addQueryString ('m', date('n',$nextStamp));
|
|
|
118 |
$url->addQueryString ('d', date('j',$nextStamp));
|
|
|
119 |
$next = $url->getUrl();
|
10 |
ddelon |
120 |
|
17 |
ddelon |
121 |
$fr_month=array("1"=>BAZ_JANVIER,"2"=>BAZ_FEVRIER,"3"=>BAZ_MARS,"4"=>BAZ_AVRIL,"5"=>BAZ_MAI,"6"=>BAZ_JUIN,"7"=>BAZ_JUILLET,"8"=>BAZ_AOUT,"9"=>BAZ_SEPTEMBRE,"10"=>BAZ_OCTOBRE,"11"=>BAZ_NOVEMBRE,"12"=>BAZ_DECEMBRE);
|
10 |
ddelon |
122 |
|
17 |
ddelon |
123 |
$retour.= "<div class=\"navi\">";
|
|
|
124 |
$retour.= "<a href=\"".$prev."\"> << </a>";
|
10 |
ddelon |
125 |
|
17 |
ddelon |
126 |
$retour.= " ";
|
|
|
127 |
$retour.= "<a href=\"".$cur;
|
|
|
128 |
$retour.= "\"> ";
|
|
|
129 |
$retour.= $fr_month[(date('n',$curStamp))];
|
|
|
130 |
$retour.= " ";
|
|
|
131 |
$retour.= (date('Y',$curStamp));
|
|
|
132 |
$retour.= "</a>";
|
|
|
133 |
$retour.= " ";
|
|
|
134 |
$retour.= "<a href=\"".$next."\"> >> </a>";
|
10 |
ddelon |
135 |
|
17 |
ddelon |
136 |
$retour.= "</div>";
|
10 |
ddelon |
137 |
|
17 |
ddelon |
138 |
$retour.="<br></br>";
|
10 |
ddelon |
139 |
|
17 |
ddelon |
140 |
// Vue Mois
|
|
|
141 |
if (!isset($_GET['id_fiche'])) {
|
|
|
142 |
|
|
|
143 |
// Recherche evenement de la periode selectionnée
|
10 |
ddelon |
144 |
|
17 |
ddelon |
145 |
// TODO : Selectionner element du mois en cours
|
|
|
146 |
|
|
|
147 |
$requete_evenements = "SELECT DISTINCT bf_id_fiche, bf_titre, bf_lieu_evenement, day(bf_date_debut_evenement) as bf_jour_debut_evenement , bf_date_fin_evenement, bf_description FROM bazar_fiche, bazar_nature where year(bf_date_debut_evenement) =".date('Y',$curStamp)." and month(bf_date_debut_evenement)=".date('m',$curStamp)." and bf_ce_nature=bn_id_nature and bn_label_nature='Évènements'";
|
|
|
148 |
|
|
|
149 |
|
|
|
150 |
$resultat_evenement = $db->query($requete_evenements);
|
|
|
151 |
|
|
|
152 |
(DB::isError($resultat_evenement))
|
|
|
153 |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_evenement->getMessage(), $requete_evenements))
|
|
|
154 |
: '';
|
10 |
ddelon |
155 |
|
17 |
ddelon |
156 |
$calcom="";
|
|
|
157 |
|
|
|
158 |
$selection=array();
|
|
|
159 |
$evenements=array();
|
|
|
160 |
|
|
|
161 |
$prev_curday_ymd=0;
|
|
|
162 |
|
|
|
163 |
while ($ligne_evenements = $resultat_evenement->fetchRow(DB_FETCHMODE_OBJECT)) {
|
|
|
164 |
|
|
|
165 |
$curday_ymd=date('Ym',$curStamp).$ligne_evenements->bf_jour_debut_evenement;
|
|
|
166 |
if ($curday_ymd!=$prev_curday_ymd) {
|
|
|
167 |
$Day = new Calendar_Day(date('Y',$curStamp),date('m',$curStamp), $ligne_evenements->bf_jour_debut_evenement);
|
|
|
168 |
$DiaryEvent = new DiaryEvent($Day);
|
|
|
169 |
$prev_curday_ymd=$curday_ymd;
|
|
|
170 |
}
|
|
|
171 |
|
|
|
172 |
$DiaryEvent->setEntry($ligne_evenements);
|
|
|
173 |
|
|
|
174 |
// Add the decorator to the selection
|
|
|
175 |
$selection[] = $DiaryEvent;
|
14 |
ddelon |
176 |
|
17 |
ddelon |
177 |
}
|
|
|
178 |
|
|
|
179 |
// Affichage Calendrier
|
10 |
ddelon |
180 |
|
|
|
181 |
|
17 |
ddelon |
182 |
$month->build($selection);
|
10 |
ddelon |
183 |
|
17 |
ddelon |
184 |
$retour.= "<table class=\"calendar\">
|
|
|
185 |
<tr>
|
10 |
ddelon |
186 |
|
17 |
ddelon |
187 |
<th> ". BAZ_LUNDI ."</th>
|
|
|
188 |
<th> ". BAZ_MARDI ."</th>
|
|
|
189 |
<th> ". BAZ_MERCREDI ."</th>
|
|
|
190 |
<th> ". BAZ_JEUDI ."</th>
|
|
|
191 |
<th> ". BAZ_VENDREDI ."</th>
|
|
|
192 |
<th> ". BAZ_SAMEDI ."</th>
|
|
|
193 |
<th> ". BAZ_DIMANCHE ."</th>
|
|
|
194 |
</tr>
|
|
|
195 |
";
|
|
|
196 |
|
|
|
197 |
$todayStamp=time();
|
|
|
198 |
|
|
|
199 |
$today_ymd=date('Ymd',$todayStamp);
|
14 |
ddelon |
200 |
|
17 |
ddelon |
201 |
// Other month : mois
|
|
|
202 |
//
|
|
|
203 |
|
|
|
204 |
while ($day = $month->fetch() ) {
|
|
|
205 |
|
|
|
206 |
$dayStamp = $day->thisDay(true);
|
|
|
207 |
$day_ymd=date('Ymd',$dayStamp);
|
|
|
208 |
|
|
|
209 |
if ( $day->isEmpty() ) {
|
|
|
210 |
$class = "other_month";
|
14 |
ddelon |
211 |
}
|
|
|
212 |
else {
|
17 |
ddelon |
213 |
if (($day_ymd < $today_ymd)) {
|
|
|
214 |
$class="previous_month";
|
|
|
215 |
}
|
|
|
216 |
else {
|
19 |
ddelon |
217 |
if ($day_ymd == $today_ymd) {
|
|
|
218 |
$class="current_day";
|
|
|
219 |
}
|
|
|
220 |
else {
|
|
|
221 |
$class="current_month";
|
|
|
222 |
}
|
17 |
ddelon |
223 |
}
|
14 |
ddelon |
224 |
}
|
|
|
225 |
|
17 |
ddelon |
226 |
$url->addQueryString ('y', date('Y',$dayStamp));
|
|
|
227 |
$url->addQueryString ('m', date('n',$dayStamp));
|
|
|
228 |
$url->addQueryString ('d', date('j',$dayStamp));
|
|
|
229 |
|
|
|
230 |
$link = $url->getUrl();
|
14 |
ddelon |
231 |
|
17 |
ddelon |
232 |
// isFirst() to find start of week
|
|
|
233 |
if ($day->isFirst())
|
|
|
234 |
$retour.= ( "<tr>\n" );
|
14 |
ddelon |
235 |
|
17 |
ddelon |
236 |
$retour.= ( "<td class=\"".$class."\"><a href=\"".$link."\">".$day->thisDay()."</a>\n" );
|
14 |
ddelon |
237 |
|
17 |
ddelon |
238 |
if ($day->isSelected() ) {
|
|
|
239 |
$evenements=$day->getEntry();
|
|
|
240 |
while ($ligne_evenement=array_pop($evenements)) {
|
|
|
241 |
$url->addQueryString ('id_fiche',$ligne_evenement->bf_id_fiche);
|
|
|
242 |
$link = $url->getUrl();
|
|
|
243 |
$retour.= ( "<a href=\"".$link."\">".$ligne_evenement->bf_titre."</a>\n" );
|
|
|
244 |
}
|
|
|
245 |
|
|
|
246 |
}
|
|
|
247 |
|
|
|
248 |
$retour.= ( "</td>\n" );
|
|
|
249 |
|
|
|
250 |
// isLast() to find end of week
|
|
|
251 |
if ( $day->isLast() )
|
|
|
252 |
$retour.= ( "</tr>\n" );
|
14 |
ddelon |
253 |
}
|
17 |
ddelon |
254 |
|
|
|
255 |
$retour.= "</table>";
|
14 |
ddelon |
256 |
|
17 |
ddelon |
257 |
return $retour;
|
|
|
258 |
|
10 |
ddelon |
259 |
}
|
17 |
ddelon |
260 |
else {
|
|
|
261 |
// Vue jour
|
|
|
262 |
if (isset($_GET['id_fiche'])) {
|
|
|
263 |
return $retour.baz_voir_fiche(0, $_GET['id_fiche']);
|
|
|
264 |
}
|
|
|
265 |
}
|
14 |
ddelon |
266 |
}
|
|
|
267 |
|
10 |
ddelon |
268 |
?>
|