3 /***************************************************************************\
4 * SPIP, Systeme de publication pour l'internet *
6 * Copyright (c) 2001-2014 *
7 * Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James *
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 \***************************************************************************/
13 if (!defined('_ECRIRE_INC_VERSION')) return;
15 include_spip('inc/filtres');
16 // http://code.spip.net/@calendrier_categories
17 function calendrier_categories($table, $num, $objet)
19 if (function_exists('generer_calendrier_class'))
20 return generer_calendrier_class($table, $num, $objet);
23 $num= sql_getfetsel((($objet != 'id_breve') ?
'id_secteur' : 'id_rubrique') . " AS id", $table, "$objet=$num");
25 return 'calendrier-couleur' . (($num%14
)+
1);
29 // ici on prend en fait le jour, la veille et le lendemain
31 // http://code.spip.net/@quete_calendrier_jour
32 function quete_calendrier_jour($annee,$mois,$jour) {
33 $avant = "'" . date("Y-m-d", mktime(0,0,0,$mois,$jour-1,$annee)) . "'";
34 $apres = "'" . date("Y-m-d", mktime(1,1,1,$mois,$jour+
1,$annee)) .
36 return array($avant, $apres);
39 // retourne un tableau de 2 tableaux indexes par des dates
40 // - le premier indique les evenements du jour, sans indication de duree
41 // - le deuxime indique les evenements commencant ce jour, avec indication de duree
43 // http://code.spip.net/@quete_calendrier_interval
44 function quete_calendrier_interval($limites) {
45 include_spip('inc/urls');
46 list($avant, $apres) = $limites;
48 quete_calendrier_interval_articles($avant, $apres, $evt);
49 quete_calendrier_interval_breves($avant, $apres, $evt);
50 quete_calendrier_interval_rubriques($avant, $apres, $evt);
51 return array($evt, quete_calendrier_interval_rv($avant, $apres));
54 // http://code.spip.net/@quete_calendrier_interval_forums
55 function quete_calendrier_interval_forums($limites, &$evenements) {
56 list($avant, $apres) = $limites;
57 $result=sql_select("DISTINCT titre, date_heure, id_forum", "spip_forum", "date_heure >= $avant AND date_heure < $apres", '', "date_heure");
58 while($row=sql_fetch($result)){
59 $amj = date_anneemoisjour($row['date_heure']);
60 $id = $row['id_forum'];
61 if (autoriser('voir','forum',$id))
64 'URL' => generer_url_entite($id, 'forum'),
65 'CATEGORIES' => 'calendrier-couleur7',
66 'SUMMARY' => $row['titre'],
67 'DTSTART' => date_ical($row['date_heure']));
71 # 3 fonctions retournant les evenements d'une periode
72 # le tableau retourne est indexe par les balises du format ics
73 # afin qu'il soit facile de produire de tels documents.
74 # L'URL de chacun de ces evenements est celle de l'espace prive
75 # pour faciliter la navigation, ce qu'on obtient utilisant
76 # le 4e argument des fonctions generer_url_ecrire_$table
78 // http://code.spip.net/@quete_calendrier_interval_articles
79 function quete_calendrier_interval_articles($avant, $apres, &$evenements) {
81 $result=sql_select('id_article, titre, date, descriptif, chapo, lang', 'spip_articles', "statut='publie' AND date >= $avant AND date < $apres", '', "date");
84 $objets = explode(',', $GLOBALS['meta']['multi_objets']);
86 if (in_array('spip_articles', $objets)) {
87 include_spip('inc/lang_liste');
88 $langues = $GLOBALS['codes_langues'];
89 } else $langues = array();
90 while($row=sql_fetch($result)){
91 $amj = date_anneemoisjour($row['date']);
92 $id = $row['id_article'];
93 if (autoriser('voir','article',$id))
96 'CATEGORIES' => calendrier_categories('spip_articles', $id, 'id_article'),
97 'DESCRIPTION' => $row['descriptif'] ?
$row['descriptif'] : $langues[$row['lang']],
98 'SUMMARY' => $row['titre'],
99 'URL' => generer_url_ecrire_objet('article',$id, '','','prop'));
103 // http://code.spip.net/@quete_calendrier_interval_rubriques
104 function quete_calendrier_interval_rubriques($avant, $apres, &$evenements) {
106 $result=sql_select('DISTINCT R.id_rubrique, titre, descriptif, date', 'spip_rubriques AS R, spip_documents_liens AS L', "statut='publie' AND date >= $avant AND date < $apres AND R.id_rubrique = L.id_objet AND L.objet='rubrique'",'', "date");
107 while($row=sql_fetch($result)){
108 $amj = date_anneemoisjour($row['date']);
109 $id = $row['id_rubrique'];
110 if (autoriser('voir','rubrique',$id))
113 'CATEGORIES' => calendrier_categories('spip_rubriques', $id, 'id_rubrique'),
114 'DESCRIPTION' => $row['descriptif'],
115 'SUMMARY' => $row['titre'],
116 'URL' => generer_url_ecrire_objet('rubrique',$id, '','', 'prop'));
120 // http://code.spip.net/@quete_calendrier_interval_breves
121 function quete_calendrier_interval_breves($avant, $apres, &$evenements) {
122 $result=sql_select("id_breve, titre, date_heure, id_rubrique", 'spip_breves', "statut='publie' AND date_heure >= $avant AND date_heure < $apres", '', "date_heure");
123 while($row=sql_fetch($result)){
124 $amj = date_anneemoisjour($row['date_heure']);
125 $id = $row['id_breve'];
126 $ir = $row['id_rubrique'];
127 if (autoriser('voir','breve',$id))
130 'URL' => generer_url_ecrire_objet('breve',$id, '','', 'prop'),
131 'CATEGORIES' => calendrier_categories('spip_breves', $ir, 'id_breve'),
132 'SUMMARY' => $row['titre']);
136 // http://code.spip.net/@quete_calendrier_interval_rv
137 function quete_calendrier_interval_rv($avant, $apres) {
138 include_spip('inc/session');
139 $connect_id_auteur = session_get('id_auteur');
141 $evenements= array();
142 if (!$connect_id_auteur) return $evenements;
143 $result=sql_select("M.id_message, M.titre, M.texte, M.date_heure, M.date_fin, M.type",
144 "spip_messages AS M LEFT JOIN spip_auteurs_liens AS L ON (L.id_objet=M.id_message)",
145 "((L.objet='message' AND (L.id_auteur=$connect_id_auteur OR M.type='affich')) OR (L.objet IS NULL AND M.id_auteur=$connect_id_auteur AND ".sql_in('M.type',array('pb','affich'))."))"
146 ." AND M.rv='oui' AND ((M.date_fin >= $avant OR M.date_heure >= $avant) AND M.date_heure <= $apres) AND M.statut='publie'",
147 "M.id_message", "M.date_heure");
148 while($row=sql_fetch($result)){
149 $date_heure=$row["date_heure"];
150 $date_fin=$row["date_fin"];
152 $id_message=$row['id_message'];
155 $cat = 'calendrier-couleur2';
158 $cat = 'calendrier-couleur4';
161 $cat = 'calendrier-couleur12';
163 $cat = 'calendrier-couleur9';
164 $auteurs = array_map('array_shift', sql_allfetsel("nom", "spip_auteurs AS A LEFT JOIN spip_auteurs_liens AS L ON L.id_auteur=A.id_auteur", "(L.objet='message' AND L.id_objet=$id_message AND (A.id_auteur!=$connect_id_auteur))"));
169 $jour_avant = substr($avant, 9,2);
170 $mois_avant = substr($avant, 6,2);
171 $annee_avant = substr($avant, 1,4);
172 $jour_apres = substr($apres, 9,2);
173 $mois_apres = substr($apres, 6,2);
174 $annee_apres = substr($apres, 1,4);
175 $ical_apres = date_anneemoisjour("$annee_apres-$mois_apres-".sprintf("%02d",$jour_apres));
177 // Calcul pour les semaines a cheval sur deux mois
179 $amj = date_anneemoisjour("$annee_avant-$mois_avant-".sprintf("%02d", $j+
($jour_avant)));
181 while ($amj <= $ical_apres) {
182 if (!($amj == date_anneemoisjour($date_fin) AND preg_match(",00:00:00,", $date_fin))) // Ne pas prendre la fin a minuit sur jour precedent
183 $evenements[$amj][$id_message]=
185 'URL' => generer_url_ecrire("message","id_message=$id_message"),
186 'DTSTART' => date_ical($date_heure),
187 'DTEND' => date_ical($date_fin),
188 'DESCRIPTION' => $row['texte'],
189 'SUMMARY' => $row['titre'],
190 'CATEGORIES' => $cat,
191 'ATTENDEE' => (count($auteurs) == 0) ?
'' : join($auteurs,", "));
194 $ladate = date("Y-m-d",mktime (1,1,1,$mois_avant, ($j +
$jour_avant), $annee_avant));
196 $amj = date_anneemoisjour($ladate);
204 // http://code.spip.net/@quete_calendrier_agenda
205 function quete_calendrier_agenda ($annee, $mois) {
206 include_spip('inc/session');
207 $connect_id_auteur = session_get('id_auteur');
210 if (!$connect_id_auteur) return $rv;
211 $date = date("Y-m-d", mktime(0,0,0,$mois, 1, $annee));
213 $annee = annee($date);
215 // rendez-vous personnels dans le mois
216 $result_messages = sql_select("M.titre AS summary, M.texte AS description, M.id_message AS uid, M.date_heure", "spip_messages AS M, spip_auteurs_liens AS L", "((L.id_auteur=$connect_id_auteur AND L.id_objet=M.id_message AND L.objet='message') OR M.type='affich') AND M.rv='oui' AND M.date_heure >='$annee-$mois-1' AND date_heure < DATE_ADD('$annee-$mois-1', INTERVAL 1 MONTH) AND M.statut='publie'");
217 while($row=sql_fetch($result_messages)) {
218 $rv[journum($row['date_heure'])] = $row;