Subversion Repositories Applications.bazar

Rev

Rev 258 | Rev 267 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
30 ddelon 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This library is free software; you can redistribute it and/or                                        |
9 
// | modify it under the terms of the GNU Lesser General Public                                           |
10 
// | License as published by the Free Software Foundation; either                                         |
11 
// | version 2.1 of the License, or (at your option) any later version.                                   |
12 
// |                                                                                                      |
13 
// | This library is distributed in the hope that it will be useful,                                      |
14 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
15 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU                                    |
16 
// | Lesser General Public License for more details.                                                      |
17 
// |                                                                                                      |
18 
// | You should have received a copy of the GNU Lesser General Public                                     |
19 
// | License along with this library; if not, write to the Free Software                                  |
20 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21 
// +------------------------------------------------------------------------------------------------------+
263 alexandre_ 22 
// CVS : $Id: bazar.fonct.cal.php,v 1.20 2007-06-25 12:15:06 alexandre_tb Exp $
30 ddelon 23 
/**
24 
*
25 
* Fonctions calendrier du module bazar
26 
*
27 
*@package bazar
28 
//Auteur original :
29 
*@author        David Delon <david.delon@clapas.net>
30 
//Autres auteurs :
31 
*@copyright     Tela-Botanica 2000-2004
263 alexandre_ 32 
*@version       $Revision: 1.20 $ $Date: 2007-06-25 12:15:06 $
30 ddelon 33 
// +------------------------------------------------------------------------------------------------------+
34 
*/
35 
 
36 
// +------------------------------------------------------------------------------------------------------+
37 
// |                                            ENTETE du PROGRAMME                                       |
38 
// +------------------------------------------------------------------------------------------------------+
225 neiluj 39 
 
55 florian 40 
require_once PAP_CHEMIN_RACINE.'api/pear/Calendar/Month/Weekdays.php';
41 
require_once PAP_CHEMIN_RACINE.'api/pear/Calendar/Day.php';
42 
require_once PAP_CHEMIN_RACINE.'api/pear/Calendar/Decorator.php';
30 ddelon 43 
 
44 
// +------------------------------------------------------------------------------------------------------+
45 
// |                                           LISTE de FONCTIONS                                         |
46 
// +------------------------------------------------------------------------------------------------------+
47 
 
48 
// Classe Utilitaire pour Calendrier
49 
class DiaryEvent extends Calendar_Decorator {
205 jp_milcent 50 
	var $entry = array();
51 
	function DiaryEvent($calendar)
52 
	{
30 ddelon 53 
		Calendar_Decorator::Calendar_Decorator($calendar);
54 
	}
205 jp_milcent 55 
	function setEntry($entry)
56 
	{
57 
		$this->entry[] = $entry;
30 ddelon 58 
 
59 
	}
205 jp_milcent 60 
	function getEntry()
61 
	{
30 ddelon 62 
		return $this->entry;
63 
	}
64 
}
65 
 
66 
 
42 ddelon 67 
// $type : calendrier
68 
// $type : calendrier_appplette
258 alexandre_ 69 
function GestionAffichageCalendrier($arguments = array(), $type = 'calendrier') {
30 ddelon 70 
 
258 alexandre_ 71 
	// recuperation des arguments de l applette
72 
	$balise = isset ($arguments[0]) ? $arguments[0] : '';
73 
    $tab_arguments = $arguments;
74 
	unset($tab_arguments[0]);
75 
	if (is_array($tab_arguments)) {
76 
	    foreach($tab_arguments as $argument) {
77 
	    	if ($argument != '') {
78 
		    	$tab_parametres = explode('=', $argument, 2);
79 
		    	$options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
80 
	    	}
81 
	    }
82 
	}
83 
 
84 
    if (!isset($options['template'])) {
85 
		$options['template'] = BAZ_CHEMIN_SQUELETTE.BAZ_SQUELETTE_DEFAUT;
86 
	} else {
87 
		if (file_exists(BAZ_CHEMIN_SQUELETTE.$options['template'])) {
88 
			$options['template'] = BAZ_CHEMIN_SQUELETTE.$options['template'];
89 
		}
90 
	}
91 
 
208 jp_milcent 92 
	$retour = '';
225 neiluj 93 
 
30 ddelon 94 
	$url = $GLOBALS['_GEN_commun']['url'] ;
205 jp_milcent 95 
	$db =& $GLOBALS['_GEN_commun']['pear_db'] ;
96 
	$auth =& $GLOBALS['_GEN_commun']['pear_auth'] ;
30 ddelon 97 
 
98 
	if (!isset($_GET['y'])) {
99 
		$_GET['y'] = date('Y');
100 
	}
101 
 
102 
	if (!isset($_GET['m'])) {
103 
		$_GET['m'] = date('m');
104 
	}
105 
 
106 
	// 	Construction Mois en Cours
107 
	$month = new Calendar_Month_Weekdays($_GET['y'],$_GET['m']);
108 
 
205 jp_milcent 109 
	$curStamp = $month->getTimeStamp();
110 
	$url->addQueryString('y', date('Y',$curStamp));
111 
	$url->addQueryString('m', date('n',$curStamp));
112 
	$url->addQueryString('d', date('j',$curStamp));
30 ddelon 113 
	$cur = $url->getUrl();
114 
 
115 
	// Navigation
116 
	$prevStamp = $month->prevMonth(true);
205 jp_milcent 117 
	$url->addQueryString('y', date('Y',$prevStamp));
118 
	$url->addQueryString('m', date('n',$prevStamp));
119 
	$url->addQueryString('d', date('j',$prevStamp));
30 ddelon 120 
	$prev = $url->getUrl();
205 jp_milcent 121 
 
30 ddelon 122 
	$nextStamp = $month->nextMonth(true);
205 jp_milcent 123 
	$url->addQueryString('y', date('Y',$nextStamp));
124 
	$url->addQueryString('m', date('n',$nextStamp));
125 
	$url->addQueryString('d', date('j',$nextStamp));
30 ddelon 126 
	$next = $url->getUrl();
205 jp_milcent 127 
 
128 
	$fr_month = array(	"1"=>BAZ_JANVIER,"2"=>BAZ_FEVRIER,"3"=>BAZ_MARS,"4"=>BAZ_AVRIL,"5"=>BAZ_MAI,"6"=>BAZ_JUIN,
129 
						"7"=>BAZ_JUILLET,"8"=>BAZ_AOUT,"9"=>BAZ_SEPTEMBRE,"10"=>BAZ_OCTOBRE,"11"=>BAZ_NOVEMBRE,"12"=>BAZ_DECEMBRE);
30 ddelon 130 
 
258 alexandre_ 131 
	// Appel du template
225 neiluj 132 
 
258 alexandre_ 133 
	ob_start();
134 
	include ($options['template']);
135 
	$retour .= ob_get_contents();
136 
	ob_end_clean();
137 
 
225 neiluj 138 
 
42 ddelon 139 
	// Vue Mois calendrier ou vue applette
140 
 
141 
	if ((!isset($_GET['id_fiche']) && ($type=='calendrier')) || ($type=='calendrier_applette')){
30 ddelon 142 
 
143 
		// Recherche evenement de la periode selectionnée
225 neiluj 144 
 
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 ".
185 jp_milcent 148 
								"FROM bazar_fiche, bazar_nature ".
225 neiluj 149 
								"WHERE YEAR(bf_date_debut_evenement) = ".date('Y',$curStamp)." ".
150 
								"AND month(bf_date_debut_evenement) = ".date('m',$curStamp)." ".
185 jp_milcent 151 
								"AND bf_ce_nature = bn_id_nature ".
213 jp_milcent 152 
								"AND bn_id_nature IN (".BAZ_NUM_ANNONCE_CALENDRIER.") ".
263 alexandre_ 153 
								"AND bf_statut_fiche = 1 ".
154 
								"ORDER BY bf_jour_debut_evenement";
225 neiluj 155 
 
30 ddelon 156 
	   	$resultat_evenement = $db->query($requete_evenements);
225 neiluj 157 
 
30 ddelon 158 
	    (DB::isError($resultat_evenement))
159 
	    ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_evenement->getMessage(), $requete_evenements))
160 
	    : '';
225 neiluj 161 
 
162 
		$calcom="";
163 
 
164 
		$selection=array();
165 
		$evenements=array();
166 
 
167 
		$prev_curday_ymd=0;
168 
 
30 ddelon 169 
	    while ($ligne_evenements = $resultat_evenement->fetchRow(DB_FETCHMODE_OBJECT)) {
225 neiluj 170 
 
171 
			$curday_ymd=date('Ym',$curStamp).$ligne_evenements->bf_jour_debut_evenement;
172 
			if ($curday_ymd!=$prev_curday_ymd) {
173 
				$Day = new Calendar_Day(date('Y',$curStamp),date('m',$curStamp), $ligne_evenements->bf_jour_debut_evenement);
174 
				$DiaryEvent = new DiaryEvent($Day);
175 
				$prev_curday_ymd=$curday_ymd;
176 
			}
30 ddelon 177 
 
225 neiluj 178 
			$DiaryEvent->setEntry($ligne_evenements);
30 ddelon 179 
 
225 neiluj 180 
			// Add the decorator to the selection
181 
			$selection[] = $DiaryEvent;
182 
 
30 ddelon 183 
		}
184 
 
185 
		// Affichage Calendrier
225 neiluj 186 
 
187 
 
30 ddelon 188 
		$month->build($selection);
225 neiluj 189 
 
190 
		if ($type=='calendrier') {
191 
			$retour.= "<table class=\"calendar\">
192 
			 <tr>
42 ddelon 193 
 
194 
			  <th> ". BAZ_LUNDI ."</th>
195 
			  <th> ". BAZ_MARDI ."</th>
196 
			  <th> ". BAZ_MERCREDI ."</th>
197 
			  <th> ". BAZ_JEUDI ."</th>
198 
			  <th> ". BAZ_VENDREDI ."</th>
199 
			  <th> ". BAZ_SAMEDI ."</th>
200 
			  <th> ". BAZ_DIMANCHE ."</th>
201 
			 </tr>
225 neiluj 202 
			 ";
42 ddelon 203 
		}
204 
		else {
225 neiluj 205 
			$retour.= "<table class=\"calendar\">
206 
			 <tr>
42 ddelon 207 
 
208 
			  <th> ". BAZ_LUNDI_COURT ."</th>
209 
			  <th> ". BAZ_MARDI_COURT ."</th>
210 
			  <th> ". BAZ_MERCREDI_COURT ."</th>
211 
			  <th> ". BAZ_JEUDI_COURT ."</th>
212 
			  <th> ". BAZ_VENDREDI_COURT ."</th>
213 
			  <th> ". BAZ_SAMEDI_COURT ."</th>
214 
			  <th> ". BAZ_DIMANCHE_COURT ."</th>
215 
			 </tr>
225 neiluj 216 
			 ";
42 ddelon 217 
		}
30 ddelon 218 
 
42 ddelon 219 
 
30 ddelon 220 
		$todayStamp=time();
221 
 
222 
		$today_ymd=date('Ymd',$todayStamp);
223 
 
224 
		// Other month : mois
225 
		//
226 
 
227 
		while ($day = $month->fetch() ) {
228 
 
229 
				$dayStamp = $day->thisDay(true);
230 
				$day_ymd=date('Ymd',$dayStamp);
231 
 
232 
				if ( $day->isEmpty() ) {
225 neiluj 233 
						$class = "other_month";
30 ddelon 234 
				}
235 
				else {
236 
					if (($day_ymd < $today_ymd)) {
225 neiluj 237 
						$class= "previous_month";
30 ddelon 238 
					}
239 
					else {
240 
						 if ($day_ymd == $today_ymd) {
225 neiluj 241 
						 	$class= "current_day";
30 ddelon 242 
						 }
243 
						 else {
225 neiluj 244 
							$class="current_month";
30 ddelon 245 
						 }
246 
					}
247 
				}
248 
 
249 
				$url->addQueryString ('y', date('Y',$dayStamp));
250 
				$url->addQueryString ('m', date('n',$dayStamp));
251 
				$url->addQueryString ('d', date('j',$dayStamp));
225 neiluj 252 
 
30 ddelon 253 
				$link = $url->getUrl();
254 
 
255 
				// isFirst() to find start of week
225 neiluj 256 
				if ($day->isFirst())
30 ddelon 257 
					$retour.= ( "<tr>\n" );
225 neiluj 258 
 
259 
				//$retour.= ( "<td class=\"".$class."\"><a href=\"".$link."\">".$day->thisDay()."</a>\n" );
260 
 
261 
				if ($type=='calendrier') {
262 
					$retour.= "<td class=\"".$class."\">".$day->thisDay()."\n";
42 ddelon 263 
					if ($day->isSelected() ) {
225 neiluj 264 
						$evenements=$day->getEntry();
265 
						while ($ligne_evenement=array_pop($evenements)) {
266 
							$id_fiches=array();
267 
							$id_fiches[]=$ligne_evenement->bf_id_fiche;
42 ddelon 268 
							$url->addQueryString ('id_fiches',$id_fiches);
269 
							$link = $url->getUrl();
225 neiluj 270 
							$retour.= "<a href=\"".$link."\">".$ligne_evenement->bf_titre."</a>\n";
42 ddelon 271 
							$url->removeQueryString ('id_fiches');
272 
						}
273 
					}
225 neiluj 274 
				}
275 
				else {
258 alexandre_ 276 
 
42 ddelon 277 
					$lien_date= "<td class=\"".$class."\">".$day->thisDay()."\n";
278 
					if ($day->isSelected() ) {
279 
						$evenements=$day->getEntry();
280 
						$id_fiches=array();
281 
						while ($ligne_evenement=array_pop($evenements)) {
282 
							$id_fiches[]=$ligne_evenement->bf_id_fiche;
283 
						}
284 
						$url->addQueryString ('id_fiches',$id_fiches);
30 ddelon 285 
						$link = $url->getUrl();
42 ddelon 286 
						$lien_date= "<td class=\"".$class."\"><a href=\"".$link."\">".$day->thisDay()."</a>\n";
287 
						$url->removeQueryString ('id_fiches');
30 ddelon 288 
					}
42 ddelon 289 
					$retour.=$lien_date;
30 ddelon 290 
				}
291 
 
292 
				$retour.= ( "</td>\n" );
293 
 
294 
				// isLast() to find end of week
295 
				if ( $day->isLast() )
296 
					$retour.= ( "</tr>\n" );
297 
			}
298 
 
225 neiluj 299 
			$retour.= "</table>";
30 ddelon 300 
 
42 ddelon 301 
 
302 
		}
225 neiluj 303 
 
42 ddelon 304 
		// Vue detail
305 
 
306 
		if ((isset($_GET['id_fiches']))) {
225 neiluj 307 
				// Ajout des styles du bazar
308 
				if (defined('PAP_VERSION')) { //si on est dans Papyrus
309 
					GEN_stockerStyleExterne( 'bazar_interne2', 'client/bazar/bazar.interne.css');
310 
				}
311 
 
85 alexandre_ 312 
				// Ajout d'un titre pour la page avec la date
313 
				$jours = array ('lundi', 'mardi', 'mercredi', 'jeudi', 'vendredi', 'samedi', 'dimanche') ;
314 
				$mois = array ('janvier', 'février', 'mars', 'avril', 'mai', 'juin', 'juillet', 'août', 'septembre',
315 
								'octobre', 'novembre', 'décembre') ;
316 
				$timestamp = strtotime ($_GET['y'].'/'.$_GET['m'].'/'.$_GET['d']) ;
317 
				$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_CORPS'] = '<h1>'.$jours[date('w', $timestamp)].
147 alexandre_ 318 
								' '.$_GET['d'].' '.$mois[$_GET['m']-1].' '.$_GET['y'].'</h1>' ;
85 alexandre_ 319 
				$GLOBALS['_PAPYRUS_']['rendu']['CONTENU_CORPS'] .= baz_voir_fiches(0,$_GET['id_fiches'] );
30 ddelon 320 
		}
205 jp_milcent 321 
 
322 
		// Nettoyage de l'url
323 
		$url->removeQueryString('id_fiches');
324 
		$url->removeQueryString('y');
325 
		$url->removeQueryString('m');
326 
		$url->removeQueryString('d');
42 ddelon 327 
 
328 
		return $retour;
30 ddelon 329 
	}
330 
?>