| 7 |
david |
1 |
<?php
|
|
|
2 |
|
|
|
3 |
/***************************************************************************\
|
|
|
4 |
* SPIP, Systeme de publication pour l'internet *
|
|
|
5 |
* *
|
|
|
6 |
* Copyright (c) 2001-2005 *
|
|
|
7 |
* Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
|
|
|
8 |
* *
|
|
|
9 |
* Ce programme est un logiciel libre distribue sous licence GNU/GPL. *
|
|
|
10 |
* Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne. *
|
|
|
11 |
\***************************************************************************/
|
|
|
12 |
|
|
|
13 |
//
|
|
|
14 |
// Ce fichier ne sera execute qu'une fois
|
|
|
15 |
if (defined("_ECRIRE_INC_CALENDRIER")) return;
|
|
|
16 |
define("_ECRIRE_INC_CALENDRIER", "1");
|
|
|
17 |
|
|
|
18 |
include_ecrire("inc_texte.php3");
|
|
|
19 |
|
|
|
20 |
// Typographie generale des calendriers de 3 type: jour/semaine/mois(ou plus)
|
|
|
21 |
|
|
|
22 |
// Notes: pour toutes les fonctions ayant parmi leurs parametres
|
|
|
23 |
// annee, mois, jour, echelle, partie_cal, script, ancre
|
|
|
24 |
// ceux-ci apparaissent TOUJOURS dans cet ordre
|
|
|
25 |
|
|
|
26 |
define(DEFAUT_D_ECHELLE,120); # 1 pixel = 2 minutes
|
|
|
27 |
|
|
|
28 |
// icones standards, fonction de la direction de la langue
|
|
|
29 |
|
|
|
30 |
global $bleu, $vert, $jaune;
|
|
|
31 |
$bleu = http_img_pack("m_envoi_bleu$spip_lang_rtl.gif", 'B', "class='calendrier-icone'");
|
|
|
32 |
$vert = http_img_pack("m_envoi$spip_lang_rtl.gif", 'V', "class='calendrier-icone'");
|
|
|
33 |
$jaune= http_img_pack("m_envoi_jaune$spip_lang_rtl.gif", 'J', "class='calendrier-icone'");
|
|
|
34 |
|
|
|
35 |
//
|
|
|
36 |
// Utilitaires sans html ni sql
|
|
|
37 |
//
|
|
|
38 |
|
|
|
39 |
// utilitaire de separation script / ancre
|
|
|
40 |
// et de retrait des arguments a remplacer
|
|
|
41 |
|
|
|
42 |
function calendrier_retire_args_ancre($script)
|
|
|
43 |
{
|
|
|
44 |
$script = str_replace('?bonjour=oui&?','?',$script);
|
|
|
45 |
if (ereg('^(.*)(#[^=&]*)$',$script, $m)) {
|
|
|
46 |
$script = $m[1];
|
|
|
47 |
$ancre = $m[2];
|
|
|
48 |
} else { $ancre = ''; }
|
|
|
49 |
if ($script[strlen($script)-1] == '?') $script = substr($script,0,-1);
|
|
|
50 |
foreach(array('echelle','jour','mois','annee', 'type', 'partie_cal') as $arg) {
|
|
|
51 |
$script = preg_replace("/([?&])$arg=[^&]*&/",'\1', $script);
|
|
|
52 |
$script = preg_replace("/([?&])$arg=[^&]*$/",'\1', $script);
|
|
|
53 |
}
|
|
|
54 |
return array($script, $ancre);
|
|
|
55 |
}
|
|
|
56 |
|
|
|
57 |
function calendrier_args_date($annee, $mois, $jour)
|
|
|
58 |
{
|
|
|
59 |
return 'annee=' . sprintf("%04d", $annee) . '&' .
|
|
|
60 |
'mois=' . sprintf("%02d", $mois) . '&' .
|
|
|
61 |
'jour=' . sprintf("%02d", $jour);
|
|
|
62 |
}
|
|
|
63 |
|
|
|
64 |
|
|
|
65 |
# prend une heure de debut et de fin, ainsi qu'une echelle (seconde/pixel)
|
|
|
66 |
# et retourne un tableau compose
|
|
|
67 |
# - taille d'une heure
|
|
|
68 |
# - taille d'une journee
|
|
|
69 |
# - taille de la fonte
|
|
|
70 |
# - taille de la marge
|
|
|
71 |
|
|
|
72 |
function calendrier_echelle($debut, $fin, $echelle)
|
|
|
73 |
{
|
|
|
74 |
if ($echelle==0) $echelle = DEFAUT_D_ECHELLE;
|
|
|
75 |
if ($fin <= $debut) $fin = $debut +1;
|
|
|
76 |
|
|
|
77 |
$duree = $fin - $debut;
|
|
|
78 |
$dimheure = floor((3600 / $echelle));
|
|
|
79 |
return array($dimheure,
|
|
|
80 |
(($duree+2) * $dimheure),
|
|
|
81 |
floor (14 / (1+($echelle/240))),
|
|
|
82 |
floor(240 / $echelle));
|
|
|
83 |
}
|
|
|
84 |
|
|
|
85 |
# Calcule le "top" d'une heure
|
|
|
86 |
|
|
|
87 |
function calendrier_top ($heure, $debut, $fin, $dimheure, $dimjour, $fontsize) {
|
|
|
88 |
|
|
|
89 |
$h_heure = substr($heure, 0, strpos($heure, ":"));
|
|
|
90 |
$m_heure = substr($heure, strpos($heure,":") + 1, strlen($heure));
|
|
|
91 |
$heure100 = $h_heure + ($m_heure/60);
|
|
|
92 |
|
|
|
93 |
if ($heure100 < $debut) $heure100 = ($heure100 / $debut) + $debut - 1;
|
|
|
94 |
if ($heure100 > $fin) $heure100 = (($heure100-$fin) / (24 - $fin)) + $fin;
|
|
|
95 |
|
|
|
96 |
$top = floor(($heure100 - $debut + 1) * $dimheure);
|
|
|
97 |
|
|
|
98 |
return $top;
|
|
|
99 |
}
|
|
|
100 |
|
|
|
101 |
# Calcule la hauteur entre deux heures
|
|
|
102 |
function calendrier_height ($heure, $heurefin, $debut, $fin, $dimheure, $dimjour, $fontsize) {
|
|
|
103 |
|
|
|
104 |
$height = calendrier_top ($heurefin, $debut, $fin, $dimheure, $dimjour, $fontsize)
|
|
|
105 |
- calendrier_top ($heure, $debut, $fin, $dimheure, $dimjour, $fontsize);
|
|
|
106 |
|
|
|
107 |
$padding = floor(($dimheure / 3600) * 240);
|
|
|
108 |
$height = $height - (2* $padding + 2); // pour padding interieur
|
|
|
109 |
|
|
|
110 |
if ($height < ($dimheure/4)) $height = floor($dimheure/4); // eviter paves totalement ecrases
|
|
|
111 |
|
|
|
112 |
return $height;
|
|
|
113 |
}
|
|
|
114 |
|
|
|
115 |
//
|
|
|
116 |
// init: calcul generique des evenements a partir des tables SQL
|
|
|
117 |
//
|
|
|
118 |
|
|
|
119 |
function http_calendrier_init($time='', $ltype='', $lechelle='', $lpartie_cal='', $script='', $evt='')
|
|
|
120 |
{
|
|
|
121 |
global $mois, $annee, $jour, $type, $echelle, $partie_cal;
|
|
|
122 |
|
|
|
123 |
if (!$time)
|
|
|
124 |
{
|
|
|
125 |
$today=getdate(time());
|
|
|
126 |
if (!$annee)
|
|
|
127 |
$annee = $today["year"];
|
|
|
128 |
if (!$mois)
|
|
|
129 |
$mois = $today["mon"];
|
|
|
130 |
if (!$jour)
|
|
|
131 |
$jour = $today["mday"];
|
|
|
132 |
$time = mktime(0,0,0,$mois, $jour, $annee);
|
|
|
133 |
$type= 'mois';
|
|
|
134 |
}
|
|
|
135 |
|
|
|
136 |
$jour = date("d",$time);
|
|
|
137 |
$mois = date("m",$time);
|
|
|
138 |
$annee = date("Y",$time);
|
|
|
139 |
if (!$ltype) $ltype = $type ? $type : 'mois';
|
|
|
140 |
if (!$lechelle) $lechelle = $echelle;
|
|
|
141 |
if (!$lpartie_cal) $lpartie_cal = $partie_cal;
|
|
|
142 |
list($script, $ancre) =
|
|
|
143 |
calendrier_retire_args_ancre($script ? $script :
|
|
|
144 |
$GLOBALS['clean_link']->getUrl());
|
|
|
145 |
if (!_DIR_RESTREINT) http_calendrier_titre($time, $ltype);
|
|
|
146 |
if (!$evt) {
|
|
|
147 |
$g = 'sql_calendrier_' . $ltype;
|
|
|
148 |
$evt = sql_calendrier_interval($g($annee,$mois, $jour));
|
|
|
149 |
sql_calendrier_interval_articles("'$annee-$mois-00'", "'$annee-$mois-1'", $evt[0]);
|
|
|
150 |
// si on veut les forums, decommenter
|
|
|
151 |
# sql_calendrier_interval_forums($g($annee,$mois,$jour), $evt[0]);
|
|
|
152 |
}
|
|
|
153 |
$f = 'http_calendrier_' . $ltype;
|
|
|
154 |
return $f($annee, $mois, $jour, $lechelle, $lpartie_cal, $script, $ancre, $evt);
|
|
|
155 |
|
|
|
156 |
}
|
|
|
157 |
|
|
|
158 |
# titre de la page, si on est dans l'espace de redaction
|
|
|
159 |
|
|
|
160 |
function http_calendrier_titre($time, $type)
|
|
|
161 |
{
|
|
|
162 |
$date = date("Y-m-d", $time); # a optimiser
|
|
|
163 |
if ($type == 'semaine') {
|
|
|
164 |
|
|
|
165 |
$GLOBALS['afficher_bandeau_calendrier_semaine'] = true;
|
|
|
166 |
|
|
|
167 |
$titre = _T('titre_page_calendrier',
|
|
|
168 |
array('nom_mois' => nom_mois($date), 'annee' => annee($date)));
|
|
|
169 |
}
|
|
|
170 |
elseif ($type == 'jour') {
|
|
|
171 |
$titre = nom_jour($date)." ". affdate_jourcourt($date);
|
|
|
172 |
}
|
|
|
173 |
else {
|
|
|
174 |
$titre = _T('titre_page_calendrier',
|
|
|
175 |
array('nom_mois' => nom_mois($date), 'annee' => annee($date)));
|
|
|
176 |
}
|
|
|
177 |
|
|
|
178 |
debut_page($titre, "redacteurs", "calendrier");
|
|
|
179 |
echo "<div> </div>" ;
|
|
|
180 |
}
|
|
|
181 |
|
|
|
182 |
# affichage d'un calendrier de plusieurs semaines
|
|
|
183 |
# si la periode est inferieure a 31 jours, on considere que c'est un mois
|
|
|
184 |
|
|
|
185 |
function http_calendrier_mois($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre, $evt)
|
|
|
186 |
{
|
|
|
187 |
global $spip_ecran;
|
|
|
188 |
if (!isset($spip_ecran)) $spip_ecran = 'large';
|
|
|
189 |
|
|
|
190 |
list($sansduree, $evenements, $premier_jour, $dernier_jour) = $evt;
|
|
|
191 |
|
|
|
192 |
if ($sansduree)
|
|
|
193 |
foreach($sansduree as $d => $r)
|
|
|
194 |
{
|
|
|
195 |
$evenements[$d] = !$evenements[$d] ? $r :
|
|
|
196 |
array_merge($evenements[$d], $r); }
|
|
|
197 |
|
|
|
198 |
if (!$premier_jour) $premier_jour = '01';
|
|
|
199 |
if (!$dernier_jour)
|
|
|
200 |
{
|
|
|
201 |
$dernier_jour = 31;
|
|
|
202 |
while (!(checkdate($mois,$dernier_jour,$annee))) $dernier_jour--;
|
|
|
203 |
}
|
|
|
204 |
$scriptep = $script .
|
|
|
205 |
(ereg('[?&]$', $script) ? "" : (strpos($script,'?') ? '&' : '?')) .
|
|
|
206 |
"echelle=$echelle&partie_cal=$partie_cal&";
|
|
|
207 |
|
|
|
208 |
return
|
|
|
209 |
"<table class='calendrier-table-$spip_ecran' cellspacing='0' cellpadding='0'>" .
|
|
|
210 |
http_calendrier_mois_navigation($annee, $mois, $premier_jour, $dernier_jour, $echelle, $partie_cal, $script, $ancre) .
|
|
|
211 |
http_calendrier_mois_noms($annee, $mois, $jour, $scriptep, $ancre) .
|
|
|
212 |
http_calendrier_mois_sept($annee, $mois, $premier_jour, $dernier_jour,$evenements, $scriptep, $ancre) .
|
|
|
213 |
'</table>' .
|
|
|
214 |
http_calendrier_sans_date($annee, $mois, $evenements) .
|
|
|
215 |
(_DIR_RESTREINT ? "" : http_calendrier_aide_mess());
|
|
|
216 |
}
|
|
|
217 |
|
|
|
218 |
// si la periore a plus de 31 jours, c'est du genre trimestre, semestre etc
|
|
|
219 |
// pas de navigation suivant/precedent alors
|
|
|
220 |
|
|
|
221 |
function http_calendrier_mois_navigation($annee, $mois, $premier_jour, $dernier_jour, $echelle, $partie_cal, $script, $ancre){
|
|
|
222 |
if ($dernier_jour > 31) {
|
|
|
223 |
$prec = $suiv = '';
|
|
|
224 |
$periode = affdate_mois_annee(date("Y-m-d", mktime(1,1,1,$mois,$premier_jour,$annee))) . ' - '. affdate_mois_annee(date("Y-m-d", mktime(1,1,1,$mois,$dernier_jour,$annee)));
|
|
|
225 |
} else {
|
|
|
226 |
|
|
|
227 |
$mois_suiv=$mois+1;
|
|
|
228 |
$annee_suiv=$annee;
|
|
|
229 |
$mois_prec=$mois-1;
|
|
|
230 |
$annee_prec=$annee;
|
|
|
231 |
if ($mois==1){
|
|
|
232 |
$mois_prec=12;
|
|
|
233 |
$annee_prec=$annee-1;
|
|
|
234 |
}
|
|
|
235 |
else if ($mois==12){$mois_suiv=1; $annee_suiv=$annee+1;}
|
|
|
236 |
$prec = calendrier_args_date($annee_prec, $mois_prec, 1);
|
|
|
237 |
$suiv = calendrier_args_date($annee_suiv, $mois_suiv, 1);
|
|
|
238 |
$periode = affdate_mois_annee("$annee-$mois-1");
|
|
|
239 |
}
|
|
|
240 |
return
|
|
|
241 |
"\n<tr><td colspan='7'>" .
|
|
|
242 |
http_calendrier_navigation($annee,
|
|
|
243 |
$mois,
|
|
|
244 |
$jour,
|
|
|
245 |
$echelle,
|
|
|
246 |
$partie_cal,
|
|
|
247 |
$periode,
|
|
|
248 |
$script,
|
|
|
249 |
$prec,
|
|
|
250 |
$suiv,
|
|
|
251 |
'mois',
|
|
|
252 |
$ancre) .
|
|
|
253 |
"</td></tr>";
|
|
|
254 |
|
|
|
255 |
}
|
|
|
256 |
|
|
|
257 |
function http_calendrier_mois_noms($annee, $mois, $jour, $script, $ancre){
|
|
|
258 |
global $couleur_claire;
|
|
|
259 |
|
|
|
260 |
$bandeau ="";
|
|
|
261 |
for ($j=1; $j<8;$j++){
|
|
|
262 |
$bandeau .=
|
|
|
263 |
"\n\t<th class='calendrier-th'>" .
|
|
|
264 |
_T('date_jour_' . (($j%7)+1)) .
|
|
|
265 |
"</th>";
|
|
|
266 |
}
|
|
|
267 |
return "\n<tr" .
|
|
|
268 |
(!isset($couleur_claire) ? "" : " style='background-color: $couleur_claire'") .
|
|
|
269 |
">$bandeau\n</tr>";
|
|
|
270 |
}
|
|
|
271 |
|
|
|
272 |
# dispose les lignes d'un calendrier de 7 colonnes (les jours)
|
|
|
273 |
# chaque case est garnie avec les evenements du jour figurant dans $evenements
|
|
|
274 |
|
|
|
275 |
function http_calendrier_mois_sept($annee, $mois, $premier_jour, $dernier_jour,$evenements, $script, $ancre='')
|
|
|
276 |
{
|
|
|
277 |
global $couleur_claire, $spip_lang_left, $spip_lang_right;
|
|
|
278 |
|
|
|
279 |
if (!ereg('[?&]$', $script))
|
|
|
280 |
$script .= (strpos($script,'?') ? '&' : '?');
|
|
|
281 |
|
|
|
282 |
// affichage du debut de semaine hors periode
|
|
|
283 |
$init = '';
|
|
|
284 |
$debut = date("w",mktime(1,1,1,$mois,$premier_jour,$annee));
|
|
|
285 |
for ($i=$debut ? $debut : 7;$i>1;$i--)
|
|
|
286 |
{$init .= "\n\t<td style=\"border-bottom: 1px solid $couleur_claire;\"> </td>";}
|
|
|
287 |
|
|
|
288 |
$total = '';
|
|
|
289 |
$ligne = '';
|
|
|
290 |
$today=date("Ymd");
|
|
|
291 |
for ($j=$premier_jour; $j<=$dernier_jour; $j++){
|
|
|
292 |
$nom = mktime(1,1,1,$mois,$j,$annee);
|
|
|
293 |
$jour = date("d",$nom);
|
|
|
294 |
$jour_semaine = date("w",$nom);
|
|
|
295 |
$mois_en_cours = date("m",$nom);
|
|
|
296 |
$annee_en_cours = date("Y",$nom);
|
|
|
297 |
$amj = date("Y",$nom) . $mois_en_cours . $jour;
|
|
|
298 |
$scriptarg = $script . calendrier_args_date($annee_en_cours, $mois_en_cours, $jour);
|
|
|
299 |
$couleur_lien = "black";
|
|
|
300 |
$couleur_fond = "";
|
|
|
301 |
|
|
|
302 |
if ($jour_semaine == 0) $couleur_fond = $couleur_claire;
|
|
|
303 |
else if ($jour_semaine==1)
|
|
|
304 |
{
|
|
|
305 |
$total .= "\n<tr>$init$ligne\n</tr>";
|
|
|
306 |
$ligne = $init = '';
|
|
|
307 |
}
|
|
|
308 |
|
|
|
309 |
if ($amj == $today) {
|
|
|
310 |
$couleur_lien = "red";
|
|
|
311 |
$couleur_fond = "white";
|
|
|
312 |
}
|
|
|
313 |
$res = '';
|
|
|
314 |
if ($evts = $evenements[$amj]) {
|
|
|
315 |
foreach ($evts as $evenement)
|
|
|
316 |
{
|
|
|
317 |
$res .= isset($evenement['DTSTART']) ?
|
|
|
318 |
http_calendrier_avec_heure($evenement, $amj) :
|
|
|
319 |
http_calendrier_sans_heure($evenement);
|
|
|
320 |
}
|
|
|
321 |
}
|
|
|
322 |
|
|
|
323 |
$ligne .= "\n\t\t<td\tclass='calendrier-td'
|
|
|
324 |
style='height: 100px; border-bottom: 1px solid $couleur_claire; border-$spip_lang_right: 1px solid $couleur_claire;" .
|
|
|
325 |
($couleur_fond ? " background-color: $couleur_fond;" : "") .
|
|
|
326 |
($ligne ? "" :
|
|
|
327 |
" border-$spip_lang_left: 1px solid $couleur_claire;") .
|
|
|
328 |
"'>" .
|
|
|
329 |
(!_DIR_RESTREINT ?
|
|
|
330 |
(http_href($scriptarg . "&type=jour" . $ancre, $jour,
|
|
|
331 |
'', "color: $couleur_lien",'calendrier-helvetica16') .
|
|
|
332 |
http_calendrier_ics_message($annee_en_cours, $mois_en_cours, $jour, false)):
|
|
|
333 |
http_calendrier_mois_clics($annee_en_cours, $mois_en_cours, $jour, $scriptarg, $ancre)) .
|
|
|
334 |
$res .
|
|
|
335 |
"\n\t</td>";
|
|
|
336 |
}
|
|
|
337 |
return $total . ($ligne ? "\n<tr>$ligne\n</tr>" : '');
|
|
|
338 |
}
|
|
|
339 |
|
|
|
340 |
// typo pour l'espace public
|
|
|
341 |
|
|
|
342 |
function http_calendrier_mois_clics($annee, $mois, $jour, $script, $ancre)
|
|
|
343 |
{
|
|
|
344 |
$d = mktime(0,0,0,$mois, $jour, $annee);
|
|
|
345 |
$semaine = date("W", $d);
|
|
|
346 |
return
|
|
|
347 |
"<table width='100%'>\n<tr><td style='text-align: left'>".
|
|
|
348 |
http_href("$script&type=jour" . $ancre,
|
|
|
349 |
"$jour/$mois",
|
|
|
350 |
_T('date_jour_'. (1+date('w',$d))) .
|
|
|
351 |
" $jour " .
|
|
|
352 |
_T('date_mois_'.(0+$mois)),
|
|
|
353 |
'','calendrier-helvetica16') .
|
|
|
354 |
"</td><td style='text-align: right'>" .
|
|
|
355 |
http_href("$script&type=semaine" . $ancre,
|
|
|
356 |
$semaine,
|
|
|
357 |
_T('date_semaines') . " $semaine",
|
|
|
358 |
'',
|
|
|
359 |
'calendrier-helvetica16') .
|
|
|
360 |
"</td></tr>\n</table>";
|
|
|
361 |
}
|
|
|
362 |
|
|
|
363 |
# dispose les evenements d'une semaine
|
|
|
364 |
|
|
|
365 |
function http_calendrier_semaine($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre, $evt)
|
|
|
366 |
{
|
|
|
367 |
global $spip_ecran;
|
|
|
368 |
if (!isset($spip_ecran)) $spip_ecran = 'large';
|
|
|
369 |
|
|
|
370 |
$init = date("w",mktime(1,1,1,$mois,$jour,$annee));
|
|
|
371 |
$init = $jour+1-($init ? $init : 7);
|
|
|
372 |
|
|
|
373 |
$scriptep = $script .
|
|
|
374 |
(ereg('[?&]$', $script) ? "" : (strpos($script,'?') ? '&' : '?')) .
|
|
|
375 |
"echelle=$echelle&partie_cal=$partie_cal&";
|
|
|
376 |
|
|
|
377 |
return
|
|
|
378 |
"\n<table class='calendrier-table-$spip_ecran' cellspacing='0' cellpadding='0'>" .
|
|
|
379 |
http_calendrier_semaine_navigation($annee, $mois, $init, $echelle, $partie_cal, $script, $ancre) .
|
|
|
380 |
http_calendrier_semaine_noms($annee, $mois, $init, $scriptep, $ancre) .
|
|
|
381 |
http_calendrier_semaine_sept($annee, $mois, $init, $echelle, $partie_cal, $evt) .
|
|
|
382 |
"</table>" .
|
|
|
383 |
http_calendrier_sans_date($annee, $mois,$evt[0]) .
|
|
|
384 |
(_DIR_RESTREINT ? "" : http_calendrier_aide_mess());
|
|
|
385 |
}
|
|
|
386 |
|
|
|
387 |
function http_calendrier_semaine_navigation($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre){
|
|
|
388 |
|
|
|
389 |
$fin = mktime (1,1,1,$mois, $jour+6, $annee);
|
|
|
390 |
$fjour = date("d",$fin);
|
|
|
391 |
$fmois = date("m",$fin);
|
|
|
392 |
$fannee = date("Y",$fin);
|
|
|
393 |
$fin = date("Y-m-d", $fin);
|
|
|
394 |
$debut = mktime (1,1,1,$mois, $jour, $annee);
|
|
|
395 |
$djour = date("d",$debut)+0;
|
|
|
396 |
$dmois = date("m",$debut);
|
|
|
397 |
$dannee = date("Y",$debut);
|
|
|
398 |
$debut = date("Y-m-d", $debut);
|
|
|
399 |
$periode = (($dannee != $fannee) ?
|
|
|
400 |
(affdate($debut)." - ".affdate($fin)) :
|
|
|
401 |
(($dmois == $fmois) ?
|
|
|
402 |
($djour ." - ".affdate_jourcourt($fin)) :
|
|
|
403 |
(affdate_jourcourt($debut)." - ".affdate_jourcourt($fin))));
|
|
|
404 |
|
|
|
405 |
return
|
|
|
406 |
"\n<tr><td colspan='7'>" .
|
|
|
407 |
http_calendrier_navigation($annee,
|
|
|
408 |
$mois,
|
|
|
409 |
$jour,
|
|
|
410 |
$echelle,
|
|
|
411 |
$partie_cal,
|
|
|
412 |
$periode,
|
|
|
413 |
$script,
|
|
|
414 |
calendrier_args_date($dannee, $dmois, ($djour-7)),
|
|
|
415 |
calendrier_args_date($fannee, $fmois, ($fjour+1)),
|
|
|
416 |
'semaine',
|
|
|
417 |
$ancre) .
|
|
|
418 |
"</td></tr>\n";
|
|
|
419 |
}
|
|
|
420 |
|
|
|
421 |
function http_calendrier_semaine_noms($annee, $mois, $jour, $script, $ancre){
|
|
|
422 |
global $couleur_claire;
|
|
|
423 |
$href = $script .
|
|
|
424 |
(ereg('[?&]$', $script) ? '' : (strpos($script,'?') ? '&' : '?')) .
|
|
|
425 |
"type=jour&";
|
|
|
426 |
|
|
|
427 |
$bandeau = '';
|
|
|
428 |
for ($j=$jour; $j<$jour+7;$j++){
|
|
|
429 |
$nom = mktime(0,0,0,$mois,$j,$annee);
|
|
|
430 |
$num = intval(date("d", $nom)) ;
|
|
|
431 |
$numois = date("m",$nom);
|
|
|
432 |
$nomjour = _T('date_jour_'. (1+date('w',$nom)));
|
|
|
433 |
$bandeau .=
|
|
|
434 |
"\n\t<th class='calendrier-th'>" .
|
|
|
435 |
http_href(($href .
|
|
|
436 |
calendrier_args_date(date("Y",$nom), $numois, $num) .
|
|
|
437 |
|
|
|
438 |
$ancre),
|
|
|
439 |
($nomjour .
|
|
|
440 |
" " .
|
|
|
441 |
$num .
|
|
|
442 |
(($num == 1) ? 'er' : '') .
|
|
|
443 |
($ancre ? ('/' . $numois) : ''))) .
|
|
|
444 |
"</th>";
|
|
|
445 |
}
|
|
|
446 |
return "\n<tr" .
|
|
|
447 |
(!isset($couleur_claire) ? "" : " style='background-color: $couleur_claire'") .
|
|
|
448 |
">$bandeau\n</tr>";
|
|
|
449 |
}
|
|
|
450 |
|
|
|
451 |
function http_calendrier_semaine_sept($annee, $mois, $jour, $echelle, $partie_cal, $evt)
|
|
|
452 |
{
|
|
|
453 |
global $couleur_claire, $spip_ecran, $spip_lang_left;
|
|
|
454 |
|
|
|
455 |
$largeur = ($spip_ecran == "large") ? 90 : 60;
|
|
|
456 |
|
|
|
457 |
$today=date("Ymd");
|
|
|
458 |
$total = '';
|
|
|
459 |
$style = "border-$spip_lang_left: 1px solid $couleur_claire; border-bottom: 1px solid $couleur_claire; border-top: 0px; border-right: 0px;";
|
|
|
460 |
for ($j=$jour; $j<$jour+7;$j++){
|
|
|
461 |
$v = mktime(0,0,0,$mois, $j, $annee);
|
|
|
462 |
$total .= "\n<td class='calendrier-td'>" .
|
|
|
463 |
http_calendrier_ics($annee,$mois,$j, $echelle, $partie_cal, $largeur, $evt, ($style . ( (date("w",$v)==0 && isset($couleur_claire)) ?
|
|
|
464 |
" background-color: $couleur_claire;" :
|
|
|
465 |
((date("Ymd", $v) == $today) ?
|
|
|
466 |
" background-color: white;" :
|
|
|
467 |
" background-color: #eeeeee;")))) .
|
|
|
468 |
"\n</td>";
|
|
|
469 |
}
|
|
|
470 |
return "\n<tr class='calendrier-verdana10'>$total</tr>";
|
|
|
471 |
}
|
|
|
472 |
|
|
|
473 |
|
|
|
474 |
function http_calendrier_jour($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre, $evt){
|
|
|
475 |
global $spip_ecran;
|
|
|
476 |
if (!isset($spip_ecran)) $spip_ecran = 'large';
|
|
|
477 |
$scriptep = $script .
|
|
|
478 |
(ereg('[?&]$', $script) ? "" : (strpos($script,'?') ? '&' : '?')) .
|
|
|
479 |
"echelle=$echelle&partie_cal=$partie_cal&";
|
|
|
480 |
|
|
|
481 |
return
|
|
|
482 |
"\n<table class='calendrier-table-$spip_ecran'>" .
|
|
|
483 |
"\n<tr><td class='calendrier-td-gauche'></td>" .
|
|
|
484 |
"<td colspan='5' class='calendrier-td-centre'>" .
|
|
|
485 |
http_calendrier_navigation($annee, $mois, $jour, $echelle, $partie_cal,
|
|
|
486 |
(nom_jour("$annee-$mois-$jour") . " " .
|
|
|
487 |
affdate_jourcourt("$annee-$mois-$jour")),
|
|
|
488 |
$script,
|
|
|
489 |
calendrier_args_date($annee, $mois, ($jour-1)),
|
|
|
490 |
calendrier_args_date($annee, $mois, ($jour+1)),
|
|
|
491 |
'jour',
|
|
|
492 |
$ancre) .
|
|
|
493 |
"</td>" .
|
|
|
494 |
"<td class='calendrier-td-droit calendrier-arial10'></td>" .
|
|
|
495 |
"</tr>" .
|
|
|
496 |
http_calendrier_jour_noms($annee, $mois, $jour, $scriptep, $ancre) .
|
|
|
497 |
http_calendrier_jour_sept($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre, $evt) .
|
|
|
498 |
"</table>";
|
|
|
499 |
}
|
|
|
500 |
|
|
|
501 |
function http_calendrier_jour_noms($annee, $mois, $jour, $script, $ancre){
|
|
|
502 |
global $spip_ecran;
|
|
|
503 |
|
|
|
504 |
$gauche = (_DIR_RESTREINT || ($spip_ecran != "large"));
|
|
|
505 |
return
|
|
|
506 |
"\n<tr><td class='calendrier-td-gauche'>" .
|
|
|
507 |
($gauche ? '' :
|
|
|
508 |
http_calendrier_ics_titre($annee,$mois,$jour-1,$script)) .
|
|
|
509 |
"</td><td colspan='5' class='calendrier-td-centre'>" .
|
|
|
510 |
(_DIR_RESTREINT ? '' :
|
|
|
511 |
("\n\t<div class='calendrier-titre'>" .
|
|
|
512 |
http_calendrier_ics_message($annee, $mois, $jour, true) .
|
|
|
513 |
'</div>')) .
|
|
|
514 |
"</td><td class='calendrier-td-droit calendrier-arial10'> " .
|
|
|
515 |
(_DIR_RESTREINT ? '' : http_calendrier_ics_titre($annee,$mois,$jour+1,$script)) .
|
|
|
516 |
"</td></tr>";
|
|
|
517 |
}
|
|
|
518 |
|
|
|
519 |
function http_calendrier_jour_sept($annee, $mois, $jour, $echelle, $partie_cal, $script, $ancre, $evt){
|
|
|
520 |
global $spip_ecran;
|
|
|
521 |
|
|
|
522 |
$gauche = (_DIR_RESTREINT || ($spip_ecran != "large"));
|
|
|
523 |
return
|
|
|
524 |
"<tr class='calendrier-verdana10'>" .
|
|
|
525 |
# afficher en reduction le tableau du jour precedent
|
|
|
526 |
"\n<td class='calendrier-td-gauche'>" .
|
|
|
527 |
($gauche ? '' :
|
|
|
528 |
http_calendrier_ics($annee, $mois, $jour-1, $echelle, $partie_cal, 0, $evt)) .
|
|
|
529 |
"</td><td colspan='5' class='calendrier-td-centre'>" .
|
|
|
530 |
http_calendrier_ics($annee, $mois, $jour, $echelle, $partie_cal, 300, $evt) .
|
|
|
531 |
'</td>' .
|
|
|
532 |
# afficher en reduction le tableau du jour suivant
|
|
|
533 |
"\n<td class='calendrier-td-droit'>" .
|
|
|
534 |
|
|
|
535 |
(_DIR_RESTREINT ? '' :
|
|
|
536 |
http_calendrier_ics($annee, $mois, $jour+1, $echelle, $partie_cal, 0, $evt)) .
|
|
|
537 |
'</td>' .
|
|
|
538 |
"\n</tr>";
|
|
|
539 |
}
|
|
|
540 |
|
|
|
541 |
|
|
|
542 |
// Conversion d'un tableau de champ ics en des balises div positionnees
|
|
|
543 |
// Le champ categories indique la Classe de CSS a prendre
|
|
|
544 |
// $echelle est le nombre de secondes representees par 1 pixel
|
|
|
545 |
|
|
|
546 |
function http_calendrier_ics($annee, $mois, $jour,$echelle, $partie_cal, $largeur, $evt, $style='') {
|
|
|
547 |
global $spip_lang_left;
|
|
|
548 |
|
|
|
549 |
// tableau
|
|
|
550 |
if ($partie_cal == "soir") {
|
|
|
551 |
$debut = 12;
|
|
|
552 |
$fin = 23;
|
|
|
553 |
} else if ($partie_cal == "matin") {
|
|
|
554 |
$debut = 4;
|
|
|
555 |
$fin = 15;
|
|
|
556 |
} else {
|
|
|
557 |
$debut = 7;
|
|
|
558 |
$fin =20;
|
|
|
559 |
}
|
|
|
560 |
|
|
|
561 |
if ($echelle==0) $echelle = DEFAUT_D_ECHELLE;
|
|
|
562 |
|
|
|
563 |
list($dimheure, $dimjour, $fontsize, $padding) =
|
|
|
564 |
calendrier_echelle($debut, $fin, $echelle);
|
|
|
565 |
$modif_decalage = round($largeur/8);
|
|
|
566 |
|
|
|
567 |
$date = date("Ymd", mktime(0,0,0,$mois, $jour, $annee));
|
|
|
568 |
list($sansheure, $avecheure) = $evt;
|
|
|
569 |
$avecheure = $avecheure[$date];
|
|
|
570 |
$sansheure = $sansheure[$date];
|
|
|
571 |
|
|
|
572 |
$total = '';
|
|
|
573 |
|
|
|
574 |
if ($avecheure)
|
|
|
575 |
{
|
|
|
576 |
$tous = 1 + count($avecheure);
|
|
|
577 |
$i = 0;
|
|
|
578 |
foreach($avecheure as $evenement){
|
|
|
579 |
|
|
|
580 |
$d = $evenement['DTSTART'];
|
|
|
581 |
$e = $evenement['DTEND'];
|
|
|
582 |
$d_jour = substr($d,0,8);
|
|
|
583 |
$e_jour = $e ? substr($e,0,8) : $d_jour;
|
|
|
584 |
$debut_avant = false;
|
|
|
585 |
$fin_apres = false;
|
|
|
586 |
|
|
|
587 |
/* disparues sauf erreur
|
|
|
588 |
$radius_top = " radius-top";
|
|
|
589 |
$radius_bottom = " radius-bottom";
|
|
|
590 |
*/
|
|
|
591 |
if ($d_jour <= $date AND $e_jour >= $date)
|
|
|
592 |
{
|
|
|
593 |
|
|
|
594 |
$i++;
|
|
|
595 |
|
|
|
596 |
// Verifier si debut est jour precedent
|
|
|
597 |
if (substr($d,0,8) < $date)
|
|
|
598 |
{
|
|
|
599 |
$heure_debut = 0; $minutes_debut = 0;
|
|
|
600 |
$debut_avant = true;
|
|
|
601 |
$radius_top = "";
|
|
|
602 |
}
|
|
|
603 |
else
|
|
|
604 |
{
|
|
|
605 |
$heure_debut = substr($d,-6,2);
|
|
|
606 |
$minutes_debut = substr($d,-4,2);
|
|
|
607 |
}
|
|
|
608 |
|
|
|
609 |
if (!$e)
|
|
|
610 |
{
|
|
|
611 |
$heure_fin = $heure_debut ;
|
|
|
612 |
$minutes_fin = $minutes_debut ;
|
|
|
613 |
$bordure = "border-bottom: dashed 2px";
|
|
|
614 |
}
|
|
|
615 |
else
|
|
|
616 |
{
|
|
|
617 |
$bordure = "";
|
|
|
618 |
if (substr($e,0,8) > $date)
|
|
|
619 |
{
|
|
|
620 |
$heure_fin = 23; $minutes_fin = 59;
|
|
|
621 |
$fin_apres = true;
|
|
|
622 |
$radius_bottom = "";
|
|
|
623 |
}
|
|
|
624 |
else
|
|
|
625 |
{
|
|
|
626 |
$heure_fin = substr($e,-6,2);
|
|
|
627 |
$minutes_fin = substr($e,-4,2);
|
|
|
628 |
}
|
|
|
629 |
}
|
|
|
630 |
|
|
|
631 |
if ($debut_avant && $fin_apres) $opacity = "-moz-opacity: 0.6; filter: alpha(opacity=60);";
|
|
|
632 |
else $opacity = "";
|
|
|
633 |
|
|
|
634 |
$haut = calendrier_top ("$heure_debut:$minutes_debut", $debut, $fin, $dimheure, $dimjour, $fontsize);
|
|
|
635 |
$bas = !$e ? $haut :calendrier_top ("$heure_fin:$minutes_fin", $debut, $fin, $dimheure, $dimjour, $fontsize);
|
|
|
636 |
$hauteur = calendrier_height ("$heure_debut:$minutes_debut", "$heure_fin:$minutes_fin", $debut, $fin, $dimheure, $dimjour, $fontsize);
|
|
|
637 |
if ($bas_prec >= $haut) $decale += $modif_decalage;
|
|
|
638 |
else $decale = (4 * $fontsize);
|
|
|
639 |
if ($bas > $bas_prec) $bas_prec = $bas;
|
|
|
640 |
$url = $evenement['URL'];
|
|
|
641 |
$desc = propre($evenement['DESCRIPTION']);
|
|
|
642 |
$perso = $evenement['ATTENDEE'];
|
|
|
643 |
$lieu = $evenement['LOCATION'];
|
|
|
644 |
$sum = ereg_replace(' +',' ', typo($evenement['SUMMARY']));
|
|
|
645 |
if (!$sum) { $sum = $desc; $desc = '';}
|
|
|
646 |
if (!$sum) { $sum = $lieu; $lieu = '';}
|
|
|
647 |
if (!$sum) { $sum = $perso; $perso = '';}
|
|
|
648 |
if ($sum)
|
|
|
649 |
$sum = "<span class='calendrier-verdana10'><b>$sum</b>$lieu $perso</span>";
|
|
|
650 |
if (($largeur > 90) && $desc)
|
|
|
651 |
$sum .= "\n<br /><span class='calendrier-noir'>$desc</span>";
|
|
|
652 |
$colors = $evenement['CATEGORIES'];
|
|
|
653 |
|
|
|
654 |
$total .= "\n<div class='calendrier-arial10 $colors'
|
|
|
655 |
style='cursor: auto; position: absolute; overflow: hidden;$opacity z-index: " .
|
|
|
656 |
$i .
|
|
|
657 |
"; $spip_lang_left: " .
|
|
|
658 |
$decale .
|
|
|
659 |
"px; top: " .
|
|
|
660 |
$haut .
|
|
|
661 |
"px; height: " .
|
|
|
662 |
$hauteur .
|
|
|
663 |
"px; width: ".
|
|
|
664 |
($largeur - 2 * ($padding+1)) .
|
|
|
665 |
"px; font-size: ".
|
|
|
666 |
floor($fontsize * 1.3) .
|
|
|
667 |
"px; padding: " .
|
|
|
668 |
$padding .
|
|
|
669 |
"px; $bordure'
|
|
|
670 |
onmouseover=\"this.style.zIndex=" . $tous . "\"
|
|
|
671 |
onmouseout=\"this.style.zIndex=" . $i . "\">" .
|
|
|
672 |
((!$url) ?
|
|
|
673 |
$sum :
|
|
|
674 |
http_href($url, $sum, $desc,"border: 0px",$colors)) .
|
|
|
675 |
"</div>";
|
|
|
676 |
}
|
|
|
677 |
}
|
|
|
678 |
}
|
|
|
679 |
return
|
|
|
680 |
"\n<div class='calendrier-jour' style='height: ${dimjour}px; font-size: ${fontsize}px;$style'>\n" .
|
|
|
681 |
http_calendrier_ics_grille($debut, $fin, $dimheure, $dimjour, $fontsize) .
|
|
|
682 |
$total .
|
|
|
683 |
"\n</div>" .
|
|
|
684 |
(!$sansheure ? "" :
|
|
|
685 |
http_calendrier_ics_trois($sansheure, $largeur, $dimjour, $fontsize, '')) ;
|
|
|
686 |
|
|
|
687 |
}
|
|
|
688 |
|
|
|
689 |
# Affiche une grille horaire
|
|
|
690 |
# Selon l'echelle demandee, on affiche heure, 1/2 heure 1/4 heure, 5minutes.
|
|
|
691 |
|
|
|
692 |
function http_calendrier_ics_grille($debut, $fin, $dimheure, $dimjour, $fontsize)
|
|
|
693 |
{
|
|
|
694 |
global $spip_lang_left, $spip_lang_right;
|
|
|
695 |
$slice = floor($dimheure/(2*$fontsize));
|
|
|
696 |
if ($slice%2) $slice --;
|
|
|
697 |
if (!$slice) $slice = 1;
|
|
|
698 |
|
|
|
699 |
$total = '';
|
|
|
700 |
for ($i = $debut; $i < $fin; $i++) {
|
|
|
701 |
for ($j=0; $j < $slice; $j++)
|
|
|
702 |
{
|
|
|
703 |
$total .= "\n<div class='calendrier-heure" .
|
|
|
704 |
($j ? "face" : "pile") .
|
|
|
705 |
"' style='$spip_lang_left: 0px; top: ".
|
|
|
706 |
calendrier_top ("$i:".sprintf("%02d",floor(($j*60)/$slice)), $debut, $fin, $dimheure, $dimjour, $fontsize) .
|
|
|
707 |
"px;'>$i:" .
|
|
|
708 |
sprintf("%02d",floor(($j*60)/$slice)) .
|
|
|
709 |
"</div>";
|
|
|
710 |
}
|
|
|
711 |
}
|
|
|
712 |
|
|
|
713 |
return "\n<div class='calendrier-heurepile' style='border: 0px; $spip_lang_left: 0px; top: 2px;'>0:00</div>" .
|
|
|
714 |
$total .
|
|
|
715 |
"\n<div class='calendrier-heurepile' style='$spip_lang_left: 0px; top: ".
|
|
|
716 |
calendrier_top ("$fin:00", $debut, $fin, $dimheure, $dimjour, $fontsize).
|
|
|
717 |
"px;'>$fin:00</div>" .
|
|
|
718 |
"\n<div class='calendrier-heurepile' style='border: 0px; $spip_lang_left: 0px; top: ".
|
|
|
719 |
($dimjour - $fontsize - 2) .
|
|
|
720 |
"px;'>23:59</div>";
|
|
|
721 |
}
|
|
|
722 |
|
|
|
723 |
# si la largeur le permet, les evenements sans duree,
|
|
|
724 |
# se placent a cote des autres, sinon en dessous
|
|
|
725 |
|
|
|
726 |
function http_calendrier_ics_trois($evt, $largeur, $dimjour, $fontsize, $border)
|
|
|
727 |
{
|
|
|
728 |
global $spip_lang_left;
|
|
|
729 |
|
|
|
730 |
$types = array();
|
|
|
731 |
foreach($evt as $v) $types[$v['CATEGORIES']][] = $v;
|
|
|
732 |
$res = '';
|
|
|
733 |
foreach ($types as $k => $v) {
|
|
|
734 |
$res2 = '';
|
|
|
735 |
foreach ($v as $evenement) {
|
|
|
736 |
$res2 .= http_calendrier_sans_heure($evenement);
|
|
|
737 |
}
|
|
|
738 |
$res .= "\n<div class='calendrier-verdana10 calendrier-titre'>".
|
|
|
739 |
_T($k) .
|
|
|
740 |
"</div>" .
|
|
|
741 |
$res2;
|
|
|
742 |
}
|
|
|
743 |
|
|
|
744 |
$pos = ((_DIR_RESTREINT || ($largeur > 90)) ? "-$dimjour" : 0);
|
|
|
745 |
if ($largeur > 90) $largeur += (5*$fontsize);
|
|
|
746 |
else $largeur = _DIR_RESTREINT ? (3*$fontsize) : 0;
|
|
|
747 |
|
|
|
748 |
return "\n<div style='position: relative; z-index: 2; top: ${pos}px; margin-$spip_lang_left: " . $largeur . "px'>$res</div>";
|
|
|
749 |
}
|
|
|
750 |
|
|
|
751 |
function http_calendrier_ics_titre($annee, $mois, $jour,$script)
|
|
|
752 |
{
|
|
|
753 |
$date = mktime(0,0,0,$mois, $jour, $annee);
|
|
|
754 |
$jour = date("d",$date);
|
|
|
755 |
$mois = date("m",$date);
|
|
|
756 |
$annee = date("Y",$date);
|
|
|
757 |
|
|
|
758 |
$l = new Link($script);
|
|
|
759 |
$l->addvar("type","jour");
|
|
|
760 |
|
|
|
761 |
return "<div class='calendrier-arial10 calendrier-titre'>" .
|
|
|
762 |
http_href($l->getUrl() . '&' .
|
|
|
763 |
calendrier_args_date($annee, $mois, $jour),
|
|
|
764 |
affdate_jourcourt("$annee-$mois-$jour"),
|
|
|
765 |
'', '', 'calendrier-noir') .
|
|
|
766 |
"</div>";
|
|
|
767 |
}
|
|
|
768 |
|
|
|
769 |
function http_calendrier_ics_message($annee, $mois, $jour, $large)
|
|
|
770 |
{
|
|
|
771 |
global $bleu, $vert,$jaune;
|
|
|
772 |
$b = _T("lien_nouvea_pense_bete");
|
|
|
773 |
$v = _T("lien_nouveau_message");
|
|
|
774 |
$j= _T("lien_nouvelle_annonce");
|
|
|
775 |
$href = "message_edit.php3?rv=$annee-$mois-$jour&new=oui";
|
|
|
776 |
return
|
|
|
777 |
http_href("$href&type=pb",
|
|
|
778 |
$bleu . ($large ? $b : ''),
|
|
|
779 |
$b,
|
|
|
780 |
'color: blue;',
|
|
|
781 |
'calendrier-arial10') .
|
|
|
782 |
"\n" .
|
|
|
783 |
http_href("$href&type=normal",
|
|
|
784 |
$vert . ($large ? $v : ''),
|
|
|
785 |
$v,
|
|
|
786 |
'color: green;',
|
|
|
787 |
'calendrier-arial10') .
|
|
|
788 |
(($GLOBALS['connect_statut'] != "0minirezo") ? "" :
|
|
|
789 |
("\n" .
|
|
|
790 |
http_href("$href&type=affich",
|
|
|
791 |
$jaune . ($large ? $j : ''),
|
|
|
792 |
$j,
|
|
|
793 |
'color: #ff9900;',
|
|
|
794 |
'calendrier-arial10')));
|
|
|
795 |
}
|
|
|
796 |
|
|
|
797 |
function http_calendrier_sans_date($annee, $mois, $evenements)
|
|
|
798 |
{
|
|
|
799 |
$r = $evenements[0+($annee . $mois . "00")];
|
|
|
800 |
if (!$r) return "";
|
|
|
801 |
$res = "\n<div class='calendrier-arial10 calendrier-titre'>".
|
|
|
802 |
_T('info_mois_courant').
|
|
|
803 |
"</div>";
|
|
|
804 |
foreach ($r as $evenement) $res .= http_calendrier_sans_heure($evenement);
|
|
|
805 |
return $res;
|
|
|
806 |
}
|
|
|
807 |
|
|
|
808 |
|
|
|
809 |
function http_calendrier_sans_heure($evenement)
|
|
|
810 |
{
|
|
|
811 |
if ($evenement['CATEGORIES'] == 'info_articles')
|
|
|
812 |
$i = 'puce-verte-breve.gif';
|
|
|
813 |
elseif ($evenement['CATEGORIES'] == 'info_breves')
|
|
|
814 |
$i = 'puce-blanche-breve.gif';
|
|
|
815 |
else
|
|
|
816 |
$i = 'puce-orange-breve.gif';
|
|
|
817 |
$desc = propre($evenement['DESCRIPTION']);
|
|
|
818 |
$sum = $evenement['SUMMARY'];
|
|
|
819 |
if (!$sum) $sum = $desc;
|
|
|
820 |
$sum = http_img_pack($i, $desc, "style='width: 8px; height: 9px; border: 0px'") . ' ' . $sum;
|
|
|
821 |
if ($evenement['URL']) {
|
|
|
822 |
$sum = http_href($evenement['URL'], $sum, $desc);
|
|
|
823 |
}
|
|
|
824 |
return "\n<div class='calendrier-noir calendrier-arial10'>$sum\n</div>\n";
|
|
|
825 |
}
|
|
|
826 |
|
|
|
827 |
function http_calendrier_avec_heure($evenement, $amj)
|
|
|
828 |
{
|
|
|
829 |
$jour_debut = substr($evenement['DTSTART'], 0,8);
|
|
|
830 |
$jour_fin = substr($evenement['DTEND'], 0, 8);
|
|
|
831 |
if ($jour_fin <= 0) $jour_fin = $jour_debut;
|
|
|
832 |
if (($jour_debut <= 0) OR ($jour_debut > $amj) OR ($jour_fin < $amj))
|
|
|
833 |
return "";
|
|
|
834 |
|
|
|
835 |
$desc = propre($evenement['DESCRIPTION']);
|
|
|
836 |
$sum = $evenement['SUMMARY'];
|
|
|
837 |
if (!$sum) $sum = $desc;
|
|
|
838 |
$sum = "<span class='calendrier-noir'>" .
|
|
|
839 |
ereg_replace(' +',' ', typo($sum)) .
|
|
|
840 |
"</span>";
|
|
|
841 |
if ($evenement['URL'])
|
|
|
842 |
$sum = http_href($evenement['URL'], $sum, $desc);
|
|
|
843 |
$opacity = "";
|
|
|
844 |
$deb_h = substr($evenement['DTSTART'],-6,2);
|
|
|
845 |
$deb_m = substr($evenement['DTSTART'],-4,2);
|
|
|
846 |
$fin_h = substr($evenement['DTEND'],-6,2);
|
|
|
847 |
$fin_m = substr($evenement['DTEND'],-4,2);
|
|
|
848 |
|
|
|
849 |
if ($deb_h >0 OR $deb_m > 0) {
|
|
|
850 |
if ((($deb_h > 0) OR ($deb_m > 0)) AND $amj == $jour_debut)
|
|
|
851 |
{ $deb = '<b>' . $deb_h . ':' . $deb_m . '</b> ';}
|
|
|
852 |
else {
|
|
|
853 |
$deb = '...';
|
|
|
854 |
}
|
|
|
855 |
|
|
|
856 |
if ((($fin_h > 0) OR ($fin_m > 0)) AND $amj == $jour_fin)
|
|
|
857 |
{ $fin = '<b>' . $fin_h . ':' . $fin_m . '</b> ';}
|
|
|
858 |
else {
|
|
|
859 |
$fin = '...';
|
|
|
860 |
}
|
|
|
861 |
|
|
|
862 |
if ($amj == $jour_debut OR $amj == $jour_fin) {
|
|
|
863 |
$sum = "<div>$deb-$fin</div>$sum";
|
|
|
864 |
} else {
|
|
|
865 |
$opacity ='calendrier-opacity';
|
|
|
866 |
}
|
|
|
867 |
}
|
|
|
868 |
return "\n<div class='$opacity calendrier-evenement calendrier-arial10 " . $evenement['CATEGORIES'] ."'>$sum\n</div>\n";
|
|
|
869 |
}
|
|
|
870 |
|
|
|
871 |
function http_calendrier_aide_mess()
|
|
|
872 |
{
|
|
|
873 |
global $bleu, $vert, $jaune, $spip_lang_left;
|
|
|
874 |
return
|
|
|
875 |
"\n<br /><br /><br />\n<font face='arial,helvetica,sans-serif' size='2'><table width='700'>\n<tr><th style='text-align: $spip_lang_left'> " .
|
|
|
876 |
"<b>"._T('info_aide')."</b>" .
|
|
|
877 |
"</th></tr><tr><td>$bleu\n"._T('info_symbole_bleu')."\n" .
|
|
|
878 |
"</td></tr><tr><td>$vert\n"._T('info_symbole_vert')."\n" .
|
|
|
879 |
"</th></tr><tr><td>$jaune\n"._T('info_symbole_jaune')."\n" .
|
|
|
880 |
"</td></tr>\n</table></font>";
|
|
|
881 |
}
|
|
|
882 |
|
|
|
883 |
# Bandeau superieur d'un calendrier selon son $type (jour/mois/annee):
|
|
|
884 |
# 2 icones vers les 2 autres types, a la meme date $jour $mois $annee
|
|
|
885 |
# 2 icones de loupes pour zoom sur la meme date et le meme type
|
|
|
886 |
# 2 fleches appelant le $script sur les periodes $pred/$suiv avec une $ancre
|
|
|
887 |
# et le $nom du calendrier
|
|
|
888 |
|
|
|
889 |
function http_calendrier_navigation($annee, $mois, $jour, $echelle, $partie_cal, $nom, $script, $args_pred, $args_suiv, $type, $ancre)
|
|
|
890 |
{
|
|
|
891 |
global $spip_lang_right, $spip_lang_left, $couleur_foncee;
|
|
|
892 |
|
|
|
893 |
if (!$echelle) $echelle = DEFAUT_D_ECHELLE;
|
|
|
894 |
|
|
|
895 |
if (!ereg('[?&]$', $script)) $script .= (strpos($script,'?') ? '&' : '?');
|
|
|
896 |
$args = calendrier_args_date($annee, $mois, $jour);
|
|
|
897 |
$args_e = "$args&type=$type&echelle=$echelle";
|
|
|
898 |
$args_p = "$args&type=$type&partie_cal=$partie_cal";
|
|
|
899 |
$today=getdate(time());
|
|
|
900 |
$jour_today = $today["mday"];
|
|
|
901 |
$mois_today = $today["mon"];
|
|
|
902 |
$annee_today = $today["year"];
|
|
|
903 |
|
|
|
904 |
$id = 'nav-agenda' .ereg_replace('[^A-Za-z0-9]', '', $ancre);
|
|
|
905 |
|
|
|
906 |
return
|
|
|
907 |
"<div class='navigation-calendrier calendrier-moztop8'"
|
|
|
908 |
. (!isset($couleur_foncee) ? "" : "\nstyle='background-color: $couleur_foncee;'")
|
|
|
909 |
. "><div style='float: $spip_lang_right; padding-left: 5px; padding-right: 5px;'>"
|
|
|
910 |
. (($type == "mois") ? '' :
|
|
|
911 |
(
|
|
|
912 |
http_href_img(("$script$args_e&partie_cal=tout$ancre"),
|
|
|
913 |
"heures-tout.png",
|
|
|
914 |
"class='calendrier-png" .
|
|
|
915 |
(($partie_cal == "tout") ? " calendrier-opacity'" : "'"),
|
|
|
916 |
_T('cal_jour_entier'))
|
|
|
917 |
.http_href_img(("$script$args_e&partie_cal=matin$ancre"),
|
|
|
918 |
"heures-am.png",
|
|
|
919 |
"class='calendrier-png" .
|
|
|
920 |
(($partie_cal == "matin") ? " calendrier-opacity'" : "'"),
|
|
|
921 |
_T('cal_matin'))
|
|
|
922 |
|
|
|
923 |
.http_href_img(("$script$args_e&partie_cal=soir$ancre"),
|
|
|
924 |
"heures-pm.png",
|
|
|
925 |
"class='calendrier-png" .
|
|
|
926 |
(($partie_cal == "soir") ? " calendrier-opacity'" : "'"),
|
|
|
927 |
_T('cal_apresmidi'))
|
|
|
928 |
. " "
|
|
|
929 |
. http_href_img(("$script$args_p&echelle=" .
|
|
|
930 |
floor($echelle * 1.5)) . $ancre,
|
|
|
931 |
"loupe-moins.gif",
|
|
|
932 |
'',
|
|
|
933 |
_T('info_zoom'). '-')
|
|
|
934 |
. http_href_img(("$script$args_p&echelle=" .
|
|
|
935 |
floor($echelle / 1.5)) . $ancre,
|
|
|
936 |
"loupe-plus.gif",
|
|
|
937 |
'',
|
|
|
938 |
_T('info_zoom'). '+')
|
|
|
939 |
))
|
|
|
940 |
. http_href_img(("$script$args&type=jour&echelle=$echelle&partie_cal=$partie_cal$ancre"),"cal-jour.gif",
|
|
|
941 |
(($type == 'jour') ? " class='calendrier-opacity'" : ''),
|
|
|
942 |
_T('cal_par_jour'))
|
|
|
943 |
|
|
|
944 |
. http_href_img("$script$args&type=semaine&echelle=$echelle&partie_cal=$partie_cal$ancre", "cal-semaine.gif",
|
|
|
945 |
(($type == 'semaine') ? " class='calendrier-opacity'" : "" ),
|
|
|
946 |
_T('cal_par_semaine'))
|
|
|
947 |
|
|
|
948 |
. http_href_img("$script$args&type=mois&echelle=$echelle&partie_cal=$partie_cal$ancre","cal-mois.gif",
|
|
|
949 |
(($type == 'mois') ? " class='calendrier-opacity'" : "" ),
|
|
|
950 |
_T('cal_par_mois'))
|
|
|
951 |
. "</div>"
|
|
|
952 |
. " "
|
|
|
953 |
. http_href_img($script .
|
|
|
954 |
calendrier_args_date($annee_today, $mois_today, $jour_today) .
|
|
|
955 |
"&type=$type&echelle=$echelle&partie_cal=$partie_cal$ancre",
|
|
|
956 |
"cal-today.gif",
|
|
|
957 |
(" onmouseover=\"montrer('$id');\"" .
|
|
|
958 |
(($annee == $annee_today && $mois == $mois_today && (($type == 'mois') || ($jour == $jour_today)))
|
|
|
959 |
? " class='calendrier-opacity'" : "")),
|
|
|
960 |
_T("ecrire:info_aujourdhui"))
|
|
|
961 |
. " "
|
|
|
962 |
. (!$args_pred ? '' :
|
|
|
963 |
http_href($script . "type=$type&echelle=$echelle&partie_cal=$partie_cal&args_pred$ancre",
|
|
|
964 |
http_img_pack("fleche-$spip_lang_left.png", '<<<', "class='calendrier-png'"),
|
|
|
965 |
_T('precedent')))
|
|
|
966 |
. (!$args_suiv ? '' :
|
|
|
967 |
http_href(($script . "type=$type&echelle=$echelle&partie_cal=$partie_cal&args_suiv$ancre"),
|
|
|
968 |
http_img_pack("fleche-$spip_lang_right.png", '>>>', "class='calendrier-png'"),
|
|
|
969 |
_T('suivant')))
|
|
|
970 |
. " "
|
|
|
971 |
. $nom
|
|
|
972 |
. (_DIR_RESTREINT ? '' : aide("messcalen"))
|
|
|
973 |
. "</div>"
|
|
|
974 |
. http_calendrier_invisible($annee, $mois, $jour, $script . "echelle=$echelle&partie_cal=$partie_cal&", $ancre,$id);
|
|
|
975 |
}
|
|
|
976 |
|
|
|
977 |
|
|
|
978 |
// fabrique un petit agenda accessible par survol
|
|
|
979 |
|
|
|
980 |
function http_calendrier_invisible($annee, $mois, $jour, $script, $ancre, $id)
|
|
|
981 |
{
|
|
|
982 |
global $spip_lang_right, $spip_lang_left, $couleur_claire;
|
|
|
983 |
$gadget = "<div style='position: relative;z-index: 1000;'
|
|
|
984 |
onmouseover=\"montrer('$id');\"
|
|
|
985 |
onmouseout=\"cacher('$id');\">"
|
|
|
986 |
. "<table id='$id' class='calendrier-cadreagenda'"
|
|
|
987 |
. (!isset($couleur_claire) ? "" : " style='background-color: $couleur_claire'")
|
|
|
988 |
. ">\n<tr><td colspan='3' style='text-align:$spip_lang_left;'>";
|
|
|
989 |
|
|
|
990 |
$annee_avant = $annee - 1;
|
|
|
991 |
$annee_apres = $annee + 1;
|
|
|
992 |
|
|
|
993 |
$finurl = "&type=mois" . $ancre;
|
|
|
994 |
|
|
|
995 |
for ($i=$mois; $i < 13; $i++) {
|
|
|
996 |
$gadget .= http_href($script .
|
|
|
997 |
calendrier_args_date($annee_avant, $i, 1) . $finurl,
|
|
|
998 |
nom_mois("$annee_avant-$i-1"),'','', 'calendrier-annee') ;
|
|
|
999 |
}
|
|
|
1000 |
for ($i=1; $i < $mois - 1; $i++) {
|
|
|
1001 |
$gadget .= http_href($script .
|
|
|
1002 |
calendrier_args_date($annee, $i, 1) . $finurl,
|
|
|
1003 |
nom_mois("$annee-$i-1"),'','', 'calendrier-annee');
|
|
|
1004 |
}
|
|
|
1005 |
$gadget .= "</td></tr>"
|
|
|
1006 |
. "\n<tr><td class='calendrier-tripleagenda'>"
|
|
|
1007 |
. http_calendrier_agenda($annee, $mois-1, $jour, $mois, $annee, $GLOBALS['afficher_bandeau_calendrier_semaine'], $script,$ancre)
|
|
|
1008 |
. "</td>\n<td class='calendrier-tripleagenda'>"
|
|
|
1009 |
. http_calendrier_agenda($annee, $mois, $jour, $mois, $annee, $GLOBALS['afficher_bandeau_calendrier_semaine'], $script,$ancre)
|
|
|
1010 |
. "</td>\n<td class='calendrier-tripleagenda'>"
|
|
|
1011 |
. http_calendrier_agenda($annee, $mois+1, $jour, $mois, $annee, $GLOBALS['afficher_bandeau_calendrier_semaine'], $script,$ancre)
|
|
|
1012 |
. "</td>"
|
|
|
1013 |
. "</tr>"
|
|
|
1014 |
. "\n<tr><td colspan='3' style='text-align:$spip_lang_right;'>";
|
|
|
1015 |
for ($i=$mois+2; $i <= 12; $i++) {
|
|
|
1016 |
$gadget .= http_href($script .
|
|
|
1017 |
calendrier_args_date($annee, $i, 1) . $finurl,
|
|
|
1018 |
nom_mois("$annee-$i-1"),'','', 'calendrier-annee');
|
|
|
1019 |
}
|
|
|
1020 |
for ($i=1; $i < $mois+1; $i++) {
|
|
|
1021 |
$gadget .= http_href($script .
|
|
|
1022 |
calendrier_args_date($annee_apres, $i, 1) . $finurl,
|
|
|
1023 |
nom_mois("$annee_apres-$i-1"),'','', 'calendrier-annee');
|
|
|
1024 |
}
|
|
|
1025 |
return $gadget . "</td></tr></table></div>";
|
|
|
1026 |
}
|
|
|
1027 |
|
|
|
1028 |
// agenda mensuel
|
|
|
1029 |
|
|
|
1030 |
function http_calendrier_agenda ($annee, $mois, $jour_ved, $mois_ved, $annee_ved, $semaine = false, $script='', $ancre='', $evt='') {
|
|
|
1031 |
|
|
|
1032 |
if (!$script) $script = $GLOBALS['PHP_SELF'] ;
|
|
|
1033 |
if (!strpos($script, '?')) $script .= '?';
|
|
|
1034 |
if (!$mois) {$mois = 12; $annee--;}
|
|
|
1035 |
elseif ($mois==13) {$mois = 1; $annee++;}
|
|
|
1036 |
if (!$evt) $evt = sql_calendrier_agenda($annee, $mois);
|
|
|
1037 |
return
|
|
|
1038 |
"<div class='calendrier-titre calendrier-arial10'>" .
|
|
|
1039 |
http_href($script .
|
|
|
1040 |
calendrier_args_date($annee, $mois, 1) .
|
|
|
1041 |
'&type=mois' . $ancre,
|
|
|
1042 |
affdate_mois_annee("$annee-$mois-1"),
|
|
|
1043 |
'',
|
|
|
1044 |
'color: black;') .
|
|
|
1045 |
"<table width='100%' cellspacing='0' cellpadding='0'>" .
|
|
|
1046 |
http_calendrier_agenda_rv ($annee, $mois, $evt,
|
|
|
1047 |
'http_calendrier_clic', array($script, $ancre),
|
|
|
1048 |
$jour_ved, $mois_ved, $annee_ved,
|
|
|
1049 |
$semaine) .
|
|
|
1050 |
"</table>" .
|
|
|
1051 |
"</div>";
|
|
|
1052 |
}
|
|
|
1053 |
|
|
|
1054 |
function http_calendrier_clic($annee, $mois, $jour, $type, $couleur, $perso)
|
|
|
1055 |
{
|
|
|
1056 |
|
|
|
1057 |
list($script, $ancre) = $perso;
|
|
|
1058 |
|
|
|
1059 |
return http_href($script .
|
|
|
1060 |
calendrier_args_date($annee, $mois, $jour) .
|
|
|
1061 |
"&type=$type$ancre",
|
|
|
1062 |
$jour,
|
|
|
1063 |
'',
|
|
|
1064 |
"color: $couleur; font-weight: bold");
|
|
|
1065 |
}
|
|
|
1066 |
|
|
|
1067 |
// typographie un mois sous forme d'un tableau de 7 colonnes
|
|
|
1068 |
|
|
|
1069 |
function http_calendrier_agenda_rv ($annee, $mois, $les_rv, $fclic, $perso='',
|
|
|
1070 |
$jour_ved='', $mois_ved='', $annee_ved='',
|
|
|
1071 |
$semaine='') {
|
|
|
1072 |
global $couleur_foncee, $spip_lang_left, $spip_lang_right;
|
|
|
1073 |
|
|
|
1074 |
// Former une date correcte (par exemple: $mois=13; $annee=2003)
|
|
|
1075 |
$date_test = date("Y-m-d", mktime(0,0,0,$mois, 1, $annee));
|
|
|
1076 |
$mois = mois($date_test);
|
|
|
1077 |
$annee = annee($date_test);
|
|
|
1078 |
if ($semaine)
|
|
|
1079 |
{
|
|
|
1080 |
$jour_semaine_valide = date("w",mktime(1,1,1,$mois_ved,$jour_ved,$annee_ved));
|
|
|
1081 |
if ($jour_semaine_valide==0) $jour_semaine_valide=7;
|
|
|
1082 |
$debut = mktime(1,1,1,$mois_ved,$jour_ved-$jour_semaine_valide+1,$annee_ved);
|
|
|
1083 |
$fin = mktime(1,1,1,$mois_ved,$jour_ved-$jour_semaine_valide+7,$annee_ved);
|
|
|
1084 |
} else { $debut = $fin = '';}
|
|
|
1085 |
|
|
|
1086 |
$today=getdate(time());
|
|
|
1087 |
$jour_today = $today["mday"];
|
|
|
1088 |
$cemois = ($mois == $today["mon"] AND $annee == $today["year"]);
|
|
|
1089 |
|
|
|
1090 |
$total = '';
|
|
|
1091 |
$ligne = '';
|
|
|
1092 |
$jour_semaine = date("w", mktime(1,1,1,$mois,1,$annee));
|
|
|
1093 |
if ($jour_semaine==0) $jour_semaine=7;
|
|
|
1094 |
for ($i=1;$i<$jour_semaine;$i++) $ligne .= "\n\t<td></td>";
|
|
|
1095 |
$style0 = (!isset($couleur_foncee)) ? "" : " style='border: 1px solid $couleur_foncee;'";
|
|
|
1096 |
for ($j=1; (checkdate($mois,$j,$annee)); $j++) {
|
|
|
1097 |
$style = "";
|
|
|
1098 |
$nom = mktime(1,1,1,$mois,$j,$annee);
|
|
|
1099 |
$jour_semaine = date("w",$nom);
|
|
|
1100 |
if ($jour_semaine==0) $jour_semaine=7;
|
|
|
1101 |
|
|
|
1102 |
if ($j == $jour_ved AND $mois == $mois_ved AND $annee == $annee_ved) {
|
|
|
1103 |
$class= 'calendrier-arial11 calendrier-demiagenda';
|
|
|
1104 |
$type = 'jour';
|
|
|
1105 |
$couleur = "black";
|
|
|
1106 |
} else if ($semaine AND $nom >= $debut AND $nom <= $fin) {
|
|
|
1107 |
$class= 'calendrier-arial11 calendrier-demiagenda' .
|
|
|
1108 |
(($jour_semaine==1) ? " calendrier-$spip_lang_left" :
|
|
|
1109 |
(($jour_semaine==7) ? " calendrier-$spip_lang_right" :
|
|
|
1110 |
''));
|
|
|
1111 |
$type = ($semaine ? 'semaine' : 'jour') ;
|
|
|
1112 |
$couleur = "black";
|
|
|
1113 |
} else {
|
|
|
1114 |
if ($j == $jour_today AND $cemois) {
|
|
|
1115 |
$style = $couleur_foncee;
|
|
|
1116 |
if(!$style) $style = '#333333';
|
|
|
1117 |
$couleur = "white";
|
|
|
1118 |
} else {
|
|
|
1119 |
if ($jour_semaine == 7) {
|
|
|
1120 |
$style = "#aaaaaa";
|
|
|
1121 |
$couleur = 'white';
|
|
|
1122 |
} else {
|
|
|
1123 |
$style = "#ffffff";
|
|
|
1124 |
$couleur = "#aaaaaa";
|
|
|
1125 |
}
|
|
|
1126 |
if ($les_rv[$j] > 0) {
|
|
|
1127 |
$style = "#ffffff";
|
|
|
1128 |
$couleur = "black";
|
|
|
1129 |
}
|
|
|
1130 |
}
|
|
|
1131 |
$class= 'calendrier-arial11 calendrier-agenda';
|
|
|
1132 |
$type = ($semaine ? 'semaine' : 'jour') ;
|
|
|
1133 |
}
|
|
|
1134 |
if ($style)
|
|
|
1135 |
$style = " style='background-color: $style'";
|
|
|
1136 |
else $style = $style0;
|
|
|
1137 |
$ligne .= "\n\t<td><div class='$class'$style>" .
|
|
|
1138 |
$fclic($annee,$mois, $j, $type, $couleur, $perso) .
|
|
|
1139 |
"</div></td>";
|
|
|
1140 |
if ($jour_semaine==7)
|
|
|
1141 |
{
|
|
|
1142 |
$total .= "\n<tr>$ligne\n</tr>";
|
|
|
1143 |
$ligne = '';
|
|
|
1144 |
}
|
|
|
1145 |
}
|
|
|
1146 |
return $total . (!$ligne ? '' : "\n<tr>$ligne\n</tr>");
|
|
|
1147 |
}
|
|
|
1148 |
|
|
|
1149 |
// Fonction pour la messagerie et ecrire/index.php
|
|
|
1150 |
|
|
|
1151 |
function http_calendrier_rv($messages, $type) {
|
|
|
1152 |
global $spip_lang_rtl, $spip_lang_left, $spip_lang_right;
|
|
|
1153 |
|
|
|
1154 |
$total = '';
|
|
|
1155 |
if (!$messages) return $total;
|
|
|
1156 |
foreach ($messages as $row) {
|
|
|
1157 |
if (ereg("^=([^[:space:]]+)$",$row['texte'],$match))
|
|
|
1158 |
$url = $match[1];
|
|
|
1159 |
else
|
|
|
1160 |
$url = "message.php3?id_message=".$row['id_message'];
|
|
|
1161 |
|
|
|
1162 |
$rv = ($row['rv'] == 'oui');
|
|
|
1163 |
$date = $row['date_heure'];
|
|
|
1164 |
$date_fin = $row['date_fin'];
|
|
|
1165 |
if ($row['type']=="pb") $bouton = "pense-bete";
|
|
|
1166 |
else if ($row['type']=="affich") $bouton = "annonce";
|
|
|
1167 |
else $bouton = "message";
|
|
|
1168 |
|
|
|
1169 |
if ($rv) {
|
|
|
1170 |
$date_jour = affdate_jourcourt($date);
|
|
|
1171 |
$total .= "<tr><td colspan='2'>" .
|
|
|
1172 |
(($date_jour == $date_rv) ? '' :
|
|
|
1173 |
"<div class='calendrier-arial11'><b>$date_jour</b></div>") .
|
|
|
1174 |
"</td></tr>";
|
|
|
1175 |
}
|
|
|
1176 |
|
|
|
1177 |
$total .= "<tr><td style='width: 24px' valign='middle'>" .
|
|
|
1178 |
http_href($url,
|
|
|
1179 |
($rv ?
|
|
|
1180 |
http_img_pack("rv.gif", 'rv',
|
|
|
1181 |
http_style_background($bouton . '.gif', "no-repeat;' border='0'")) :
|
|
|
1182 |
http_img_pack($bouton.".gif", $bouton, "style='border: 0px'")),
|
|
|
1183 |
'', '') .
|
|
|
1184 |
"</td>" .
|
|
|
1185 |
"<td valign='middle'>" .
|
|
|
1186 |
((!$rv) ? '' :
|
|
|
1187 |
((affdate($date) == affdate($date_fin)) ?
|
|
|
1188 |
("<div class='calendrier-arial9 fond-agenda'>"
|
|
|
1189 |
. heures($date).":".minutes($date)."<br />"
|
|
|
1190 |
. heures($date_fin).":".minutes($date_fin)."</div>") :
|
|
|
1191 |
( "<div class='calendrier-arial9 fond-agenda' style='text-align: center;'>"
|
|
|
1192 |
. heures($date).":".minutes($date)."<br />...</div>" ))) .
|
|
|
1193 |
"<div><b>" .
|
|
|
1194 |
http_href($url, typo($row['titre']), '', '', 'calendrier-verdana10') .
|
|
|
1195 |
"</b></div>" .
|
|
|
1196 |
"</td>" .
|
|
|
1197 |
"</tr>\n";
|
|
|
1198 |
|
|
|
1199 |
$date_rv = $date_jour;
|
|
|
1200 |
}
|
|
|
1201 |
|
|
|
1202 |
if ($type == 'annonces') {
|
|
|
1203 |
$titre = _T('info_annonces_generales');
|
|
|
1204 |
$couleur_titre = "ccaa00";
|
|
|
1205 |
$couleur_texte = "black";
|
|
|
1206 |
$couleur_fond = "#ffffee";
|
|
|
1207 |
}
|
|
|
1208 |
else if ($type == 'pb') {
|
|
|
1209 |
$titre = _T('infos_vos_pense_bete');
|
|
|
1210 |
$couleur_titre = "#3874B0";
|
|
|
1211 |
$couleur_fond = "#EDF3FE";
|
|
|
1212 |
$couleur_texte = "white";
|
|
|
1213 |
}
|
|
|
1214 |
else if ($type == 'rv') {
|
|
|
1215 |
$titre = _T('info_vos_rendez_vous');
|
|
|
1216 |
$couleur_titre = "#666666";
|
|
|
1217 |
$couleur_fond = "#eeeeee";
|
|
|
1218 |
$couleur_texte = "white";
|
|
|
1219 |
}
|
|
|
1220 |
|
|
|
1221 |
return
|
|
|
1222 |
debut_cadre_enfonce("", true, "", $titre) .
|
|
|
1223 |
"<table width='100%' border='0' cellpadding='0' cellspacing='2'>" .
|
|
|
1224 |
$total .
|
|
|
1225 |
"</table>" .
|
|
|
1226 |
fin_cadre_enfonce(true);
|
|
|
1227 |
}
|
|
|
1228 |
|
|
|
1229 |
|
|
|
1230 |
|
|
|
1231 |
//------- fonctions d'appel MySQL.
|
|
|
1232 |
// au dela cette limite, pas de production HTML
|
|
|
1233 |
|
|
|
1234 |
function sql_calendrier_mois($annee,$mois,$jour) {
|
|
|
1235 |
$avant = "'" . date("Y-m-d", mktime(0,0,0,$mois,1,$annee)) . "'";
|
|
|
1236 |
$apres = "'" . date("Y-m-d", mktime(0,0,0,$mois+1,1,$annee)) .
|
|
|
1237 |
" 00:00:00'";
|
|
|
1238 |
return array($avant, $apres);
|
|
|
1239 |
}
|
|
|
1240 |
|
|
|
1241 |
function sql_calendrier_semaine($annee,$mois,$jour) {
|
|
|
1242 |
$w_day = date("w", mktime(0,0,0,$mois, $jour, $annee));
|
|
|
1243 |
if ($w_day == 0) $w_day = 7; // Gaffe: le dimanche est zero
|
|
|
1244 |
$debut = $jour-$w_day;
|
|
|
1245 |
$avant = "'" . date("Y-m-d", mktime(0,0,0,$mois,$debut,$annee)) . "'";
|
|
|
1246 |
$apres = "'" . date("Y-m-d", mktime(1,1,1,$mois,$debut+7,$annee)) .
|
|
|
1247 |
" 23:59:59'";
|
|
|
1248 |
return array($avant, $apres);
|
|
|
1249 |
}
|
|
|
1250 |
|
|
|
1251 |
// ici on prend en fait le jour, la veille et le lendemain
|
|
|
1252 |
|
|
|
1253 |
function sql_calendrier_jour($annee,$mois,$jour) {
|
|
|
1254 |
$avant = "'" . date("Y-m-d", mktime(0,0,0,$mois,$jour-1,$annee)) . "'";
|
|
|
1255 |
$apres = "'" . date("Y-m-d", mktime(1,1,1,$mois,$jour+1,$annee)) .
|
|
|
1256 |
" 23:59:59'";
|
|
|
1257 |
return array($avant, $apres);
|
|
|
1258 |
}
|
|
|
1259 |
|
|
|
1260 |
// retourne un tableau de 2 tableaux indexes par des dates
|
|
|
1261 |
// - le premier indique les evenements du jour, sans indication de duree
|
|
|
1262 |
// - le deuxime indique les evenements commencant ce jour, avec indication de duree
|
|
|
1263 |
|
|
|
1264 |
function sql_calendrier_interval($limites) {
|
|
|
1265 |
list($avant, $apres) = $limites;
|
|
|
1266 |
$evt = array();
|
|
|
1267 |
sql_calendrier_interval_articles($avant, $apres, $evt);
|
|
|
1268 |
sql_calendrier_interval_breves($avant, $apres, $evt);
|
|
|
1269 |
return array($evt, sql_calendrier_interval_rv($avant, $apres));
|
|
|
1270 |
}
|
|
|
1271 |
|
|
|
1272 |
function sql_calendrier_interval_forums($limites, &$evenements) {
|
|
|
1273 |
list($avant, $apres) = $limites;
|
|
|
1274 |
$result=spip_query("
|
|
|
1275 |
SELECT DISTINCT titre, date_heure, id_article
|
|
|
1276 |
FROM spip_forum
|
|
|
1277 |
WHERE date_heure >= $avant
|
|
|
1278 |
AND date_heure < $apres
|
|
|
1279 |
ORDER BY date_heure
|
|
|
1280 |
");
|
|
|
1281 |
while($row=spip_fetch_array($result)){
|
|
|
1282 |
$amj = date_anneemoisjour($row['date_heure']);
|
|
|
1283 |
if (_DIR_RESTREINT)
|
|
|
1284 |
{
|
|
|
1285 |
$script = 'article';
|
|
|
1286 |
$id = $row['id_article'];
|
|
|
1287 |
}
|
|
|
1288 |
else {
|
|
|
1289 |
$script = 'articles_forum';
|
|
|
1290 |
$id = $row['id_article'];
|
|
|
1291 |
}
|
|
|
1292 |
$evenements[$amj][]=
|
|
|
1293 |
array(
|
|
|
1294 |
'URL' => $script . _EXTENSION_PHP . "?id_article=$id",
|
|
|
1295 |
'CATEGORIES' => 'info_liens_syndiques_3',
|
|
|
1296 |
'SUMMARY' => $row['titre']);
|
|
|
1297 |
}
|
|
|
1298 |
}
|
|
|
1299 |
|
|
|
1300 |
# 3 fonctions retournant les evenements d'une periode
|
|
|
1301 |
# le tableau retourne est indexe par les balises du format ics
|
|
|
1302 |
# afin qu'il soit facile de produire de tels documents.
|
|
|
1303 |
# Pour les articles post-dates vus de l'espace public,
|
|
|
1304 |
# on regarde si c'est une redirection pour avoir une url interessante
|
|
|
1305 |
# sinon on prend " ", c'est-a-dire la page d'appel du calendrier
|
|
|
1306 |
|
|
|
1307 |
function sql_calendrier_interval_articles($avant, $apres, &$evenements) {
|
|
|
1308 |
|
|
|
1309 |
$result=spip_query("
|
|
|
1310 |
SELECT id_article, titre, date, descriptif, chapo
|
|
|
1311 |
FROM spip_articles
|
|
|
1312 |
WHERE statut='publie'
|
|
|
1313 |
AND date >= $avant
|
|
|
1314 |
AND date < $apres
|
|
|
1315 |
ORDER BY date
|
|
|
1316 |
");
|
|
|
1317 |
if (!_DIR_RESTREINT)
|
|
|
1318 |
$script = 'articles' . _EXTENSION_PHP . "?id_article=";
|
|
|
1319 |
else
|
|
|
1320 |
{
|
|
|
1321 |
$now = date("Ymd");
|
|
|
1322 |
$script = 'article' . _EXTENSION_PHP . "?id_article=";
|
|
|
1323 |
}
|
|
|
1324 |
|
|
|
1325 |
while($row=spip_fetch_array($result)){
|
|
|
1326 |
$amj = date_anneemoisjour($row['date']);
|
|
|
1327 |
if ((!_DIR_RESTREINT) || ($now >= $amj))
|
|
|
1328 |
$url = $script . $row['id_article'];
|
|
|
1329 |
else {
|
|
|
1330 |
if (substr($row['chapo'], 0, 1) != '=')
|
|
|
1331 |
$url = " ";
|
|
|
1332 |
else {
|
|
|
1333 |
list(,$url) = extraire_lien(array('','','',
|
|
|
1334 |
substr($row['chapo'], 1)));
|
|
|
1335 |
if ($url)
|
|
|
1336 |
$url = texte_script(str_replace('&', '&', $url));
|
|
|
1337 |
else $url = " ";
|
|
|
1338 |
}
|
|
|
1339 |
}
|
|
|
1340 |
|
|
|
1341 |
$evenements[$amj][]=
|
|
|
1342 |
array(
|
|
|
1343 |
'CATEGORIES' => 'info_articles',
|
|
|
1344 |
'DESCRIPTION' => $row['descriptif'],
|
|
|
1345 |
'SUMMARY' => $row['titre'],
|
|
|
1346 |
'URL' => $url);
|
|
|
1347 |
}
|
|
|
1348 |
}
|
|
|
1349 |
|
|
|
1350 |
function sql_calendrier_interval_breves($avant, $apres, &$evenements) {
|
|
|
1351 |
$result=spip_query("
|
|
|
1352 |
SELECT id_breve, titre, date_heure
|
|
|
1353 |
FROM spip_breves
|
|
|
1354 |
WHERE statut='publie'
|
|
|
1355 |
AND date_heure >= $avant
|
|
|
1356 |
AND date_heure < $apres
|
|
|
1357 |
ORDER BY date_heure
|
|
|
1358 |
");
|
|
|
1359 |
while($row=spip_fetch_array($result)){
|
|
|
1360 |
$amj = date_anneemoisjour($row['date_heure']);
|
|
|
1361 |
$script = (_DIR_RESTREINT ? 'breve' : 'breves_voir');
|
|
|
1362 |
$evenements[$amj][]=
|
|
|
1363 |
array(
|
|
|
1364 |
'URL' => $script . _EXTENSION_PHP . "?id_breve=" . $row['id_breve'],
|
|
|
1365 |
'CATEGORIES' => 'info_breves_02',
|
|
|
1366 |
'SUMMARY' => $row['titre']);
|
|
|
1367 |
}
|
|
|
1368 |
}
|
|
|
1369 |
|
|
|
1370 |
function sql_calendrier_interval_rv($avant, $apres) {
|
|
|
1371 |
global $connect_id_auteur;
|
|
|
1372 |
$evenements= array();
|
|
|
1373 |
if (!$connect_id_auteur) return $evenements;
|
|
|
1374 |
$result=spip_query("
|
|
|
1375 |
SELECT messages.id_message, messages.titre, messages.texte,
|
|
|
1376 |
messages.date_heure, messages.date_fin, messages.type
|
|
|
1377 |
FROM spip_messages AS messages,
|
|
|
1378 |
spip_auteurs_messages AS lien
|
|
|
1379 |
WHERE ((lien.id_auteur='$connect_id_auteur'
|
|
|
1380 |
AND lien.id_message=messages.id_message) OR messages.type='affich')
|
|
|
1381 |
AND messages.rv='oui'
|
|
|
1382 |
AND ((messages.date_fin >= $avant OR messages.date_heure >= $avant) AND messages.date_heure <= $apres)
|
|
|
1383 |
AND messages.statut='publie'
|
|
|
1384 |
GROUP BY messages.id_message
|
|
|
1385 |
ORDER BY messages.date_heure
|
|
|
1386 |
");
|
|
|
1387 |
while($row=spip_fetch_array($result)){
|
|
|
1388 |
$date_heure=$row["date_heure"];
|
|
|
1389 |
$date_fin=$row["date_fin"];
|
|
|
1390 |
$type=$row["type"];
|
|
|
1391 |
$id_message=$row['id_message'];
|
|
|
1392 |
|
|
|
1393 |
if ($type=="pb")
|
|
|
1394 |
$cat = 'calendrier-couleur2';
|
|
|
1395 |
else {
|
|
|
1396 |
if ($type=="affich")
|
|
|
1397 |
$cat = 'calendrier-couleur4';
|
|
|
1398 |
else {
|
|
|
1399 |
if ($type!="normal")
|
|
|
1400 |
$cat = 'calendrier-couleur12';
|
|
|
1401 |
else {
|
|
|
1402 |
$cat = 'calendrier-couleur9';
|
|
|
1403 |
$auteurs = array();
|
|
|
1404 |
$result_aut=spip_query("
|
|
|
1405 |
SELECT auteurs.nom
|
|
|
1406 |
FROM spip_auteurs AS auteurs,
|
|
|
1407 |
spip_auteurs_messages AS lien
|
|
|
1408 |
WHERE (lien.id_message='$id_message'
|
|
|
1409 |
AND (auteurs.id_auteur!='$connect_id_auteur'
|
|
|
1410 |
AND lien.id_auteur=auteurs.id_auteur))");
|
|
|
1411 |
while($row_auteur=spip_fetch_array($result_aut)){
|
|
|
1412 |
$auteurs[] = $row_auteur['nom'];
|
|
|
1413 |
}
|
|
|
1414 |
}
|
|
|
1415 |
}
|
|
|
1416 |
}
|
|
|
1417 |
|
|
|
1418 |
$jour_avant = substr($avant, 9,2);
|
|
|
1419 |
$mois_avant = substr($avant, 6,2);
|
|
|
1420 |
$annee_avant = substr($avant, 1,4);
|
|
|
1421 |
$jour_apres = substr($apres, 9,2);
|
|
|
1422 |
$mois_apres = substr($apres, 6,2);
|
|
|
1423 |
$annee_apres = substr($apres, 1,4);
|
|
|
1424 |
$ical_apres = date_anneemoisjour("$annee_apres-$mois_apres-".sprintf("%02d",$jour_apres));
|
|
|
1425 |
|
|
|
1426 |
// Calcul pour les semaines a cheval sur deux mois
|
|
|
1427 |
$j = 0;
|
|
|
1428 |
$amj = date_anneemoisjour("$annee_avant-$mois_avant-".sprintf("%02d", $j+($jour_avant)));
|
|
|
1429 |
|
|
|
1430 |
while ($amj <= $ical_apres) {
|
|
|
1431 |
if (!($amj == date_anneemoisjour($date_fin) AND ereg("00:00:00", $date_fin))) // Ne pas prendre la fin a minuit sur jour precedent
|
|
|
1432 |
$evenements[$amj][$id_message]=
|
|
|
1433 |
array(
|
|
|
1434 |
'URL' => "message.php3?id_message=$id_message",
|
|
|
1435 |
'DTSTART' => date_ical($date_heure),
|
|
|
1436 |
'DTEND' => date_ical($date_fin),
|
|
|
1437 |
'DESCRIPTION' => $row['texte'],
|
|
|
1438 |
'SUMMARY' => $row['titre'],
|
|
|
1439 |
'CATEGORIES' => $cat,
|
|
|
1440 |
'ATTENDEE' => (count($auteurs) == 0) ? '' : join($auteurs,", "));
|
|
|
1441 |
|
|
|
1442 |
$j ++;
|
|
|
1443 |
$ladate = date("Y-m-d",mktime (1,1,1,$mois_avant, ($j + $jour_avant), $annee_avant));
|
|
|
1444 |
|
|
|
1445 |
$amj = date_anneemoisjour($ladate);
|
|
|
1446 |
|
|
|
1447 |
}
|
|
|
1448 |
|
|
|
1449 |
}
|
|
|
1450 |
return $evenements;
|
|
|
1451 |
}
|
|
|
1452 |
|
|
|
1453 |
// fonction SQL, pour la messagerie
|
|
|
1454 |
|
|
|
1455 |
function sql_calendrier_taches_annonces () {
|
|
|
1456 |
global $connect_id_auteur;
|
|
|
1457 |
$r = array();
|
|
|
1458 |
if (!$connect_id_auteur) return $r;
|
|
|
1459 |
$result = spip_query("
|
|
|
1460 |
SELECT * FROM spip_messages
|
|
|
1461 |
WHERE type = 'affich' AND rv != 'oui' AND statut = 'publie' ORDER BY date_heure DESC");
|
|
|
1462 |
if (spip_num_rows($result) > 0)
|
|
|
1463 |
while ($x = spip_fetch_array($result)) $r[] = $x;
|
|
|
1464 |
return $r;
|
|
|
1465 |
}
|
|
|
1466 |
|
|
|
1467 |
function sql_calendrier_taches_pb () {
|
|
|
1468 |
global $connect_id_auteur;
|
|
|
1469 |
$r = array();
|
|
|
1470 |
if (!$connect_id_auteur) return $r;
|
|
|
1471 |
$result = spip_query("
|
|
|
1472 |
SELECT * FROM spip_messages AS messages
|
|
|
1473 |
WHERE id_auteur=$connect_id_auteur AND statut='publie' AND type='pb' AND rv!='oui'");
|
|
|
1474 |
if (spip_num_rows($result) > 0){
|
|
|
1475 |
$r = array();
|
|
|
1476 |
while ($x = spip_fetch_array($result)) $r[] = $x;
|
|
|
1477 |
}
|
|
|
1478 |
return $r;
|
|
|
1479 |
}
|
|
|
1480 |
|
|
|
1481 |
function sql_calendrier_taches_rv () {
|
|
|
1482 |
global $connect_id_auteur;
|
|
|
1483 |
$r = array();
|
|
|
1484 |
if (!$connect_id_auteur) return $r;
|
|
|
1485 |
$result = spip_query("
|
|
|
1486 |
SELECT messages.*
|
|
|
1487 |
FROM spip_messages AS messages, spip_auteurs_messages AS lien
|
|
|
1488 |
WHERE ((lien.id_auteur='$connect_id_auteur'
|
|
|
1489 |
AND lien.id_message=messages.id_message)
|
|
|
1490 |
OR messages.type='affich')
|
|
|
1491 |
AND messages.rv='oui'
|
|
|
1492 |
AND ( (messages.date_heure > DATE_SUB(NOW(), INTERVAL 1 DAY)
|
|
|
1493 |
AND messages.date_heure < DATE_ADD(NOW(), INTERVAL 1 MONTH))
|
|
|
1494 |
OR (messages.date_heure < NOW() AND messages.date_fin > NOW() ))
|
|
|
1495 |
AND messages.statut='publie'
|
|
|
1496 |
GROUP BY messages.id_message
|
|
|
1497 |
ORDER BY messages.date_heure");
|
|
|
1498 |
if (spip_num_rows($result) > 0){
|
|
|
1499 |
$r = array();
|
|
|
1500 |
while ($x = spip_fetch_array($result)) $r[] = $x;
|
|
|
1501 |
}
|
|
|
1502 |
return $r;
|
|
|
1503 |
}
|
|
|
1504 |
|
|
|
1505 |
function sql_calendrier_agenda ($annee, $mois) {
|
|
|
1506 |
global $connect_id_auteur;
|
|
|
1507 |
|
|
|
1508 |
$rv = array();
|
|
|
1509 |
if (!$connect_id_auteur) return $rv;
|
|
|
1510 |
$date = date("Y-m-d", mktime(0,0,0,$mois, 1, $annee));
|
|
|
1511 |
$mois = mois($date);
|
|
|
1512 |
$annee = annee($date);
|
|
|
1513 |
|
|
|
1514 |
// rendez-vous personnels dans le mois
|
|
|
1515 |
$result_messages=spip_query("SELECT messages.date_heure FROM spip_messages AS messages, spip_auteurs_messages AS lien WHERE ((lien.id_auteur='$connect_id_auteur' AND lien.id_message=messages.id_message) OR messages.type='affich') AND messages.rv='oui' AND messages.date_heure >='$annee-$mois-1' AND date_heure < DATE_ADD('$annee-$mois-1', INTERVAL 1 MONTH) AND messages.statut='publie'");
|
|
|
1516 |
while($row=spip_fetch_array($result_messages)){
|
|
|
1517 |
$rv[journum($row['date_heure'])] = 1;
|
|
|
1518 |
}
|
|
|
1519 |
return $rv;
|
|
|
1520 |
}
|
|
|
1521 |
|
|
|
1522 |
?>
|