Rev 489 | Blame | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// Copyright (C) 1999-2004 Tela Botanica (accueil@tela-botanica.org)//// Ce logiciel est un programme informatique servant à gérer du contenu et des// applications web.// Ce logiciel est régi par la licence CeCILL soumise au droit français et// respectant les principes de diffusion des logiciels libres. Vous pouvez// utiliser, modifier et/ou redistribuer ce programme sous les conditions// de la licence CeCILL telle que diffusée par le CEA, le CNRS et l'INRIA// sur le site "http://www.cecill.info".// En contrepartie de l'accessibilité au code source et des droits de copie,// de modification et de redistribution accordés par cette licence, il n'est// offert aux utilisateurs qu'une garantie limitée. Pour les mêmes raisons,// seule une responsabilité restreinte pèse sur l'auteur du programme, le// titulaire des droits patrimoniaux et les concédants successifs.// A cet égard l'attention de l'utilisateur est attirée sur les risques// associés au chargement, à l'utilisation, à la modification et/ou au// développement et à la reproduction du logiciel par l'utilisateur étant// donné sa spécificité de logiciel libre, qui peut le rendre complexe à// manipuler et qui le réserve donc à des développeurs et des professionnels// avertis possédant des connaissances informatiques approfondies. Les// utilisateurs sont donc invités à charger et tester l'adéquation du// logiciel à leurs besoins dans des conditions permettant d'assurer la// sécurité de leurs systèmes et ou de leurs données et, plus généralement,// à l'utiliser et l'exploiter dans les mêmes conditions de sécurité.// Le fait que vous puissiez accéder à cet en-tête signifie que vous avez// pris connaissance de la licence CeCILL, et que vous en avez accepté les// termes.// ----// CVS : $Id: bazar.calendrier.php,v 1.2 2005-09-30 14:58:00 ddelon Exp $/*** bazar_calendrier : programme affichant les evenements du bazar sous forme de Calendrier***@package Bazar//Auteur original :*@author David DELON <david.delon@clapas.net>*@version $Revision: 1.2 $ $Date: 2005-09-30 14:58:00 $// +------------------------------------------------------------------------------------------------------+*/// TODO : afficher evenement sur plusieur jours// TODO : traduction entete mois calendrier// Parametrage EVENEMENT : template// Fonction Calendrier de Pearrequire_once 'Calendar/Month/Weekdays.php';require_once 'Calendar/Day.php';require_once 'Calendar/Decorator.php';// Classe Utilitaire pour Calendrierclass DiaryEvent extends Calendar_Decorator {var $entry;function DiaryEvent($calendar) {Calendar_Decorator::Calendar_Decorator($calendar);}function setEntry($entry) {$this->entry = $entry;}function getEntry() {return $this->entry;}}function afficherContenuCorps() {$url = $GLOBALS['_GEN_commun']['url'] ;$db = &$GLOBALS['_GEN_commun']['pear_db'] ;$auth = &$GLOBALS['_GEN_commun']['pear_auth'] ;if (!isset($_GET['y'])) {$_GET['y'] = date('Y');}if (!isset($_GET['m'])) {$_GET['m'] = date('m');}if (!isset($_GET['d'])) {$_GET['d'] = date('d');}// Construction Mois en Cours$month = new Calendar_Month_Weekdays($_GET['y'],$_GET['m']);$curStamp=$month->getTimeStamp();// Navigation$prevStamp = $month->prevMonth(true);$url->addQueryString ('y', date('Y',$prevStamp));$url->addQueryString ('m', date('n',$prevStamp));$url->addQueryString ('d', date('j',$prevStamp));$prev = $url->getUrl();$nextStamp = $month->nextMonth(true);$url->addQueryString ('y', date('Y',$nextStamp));$url->addQueryString ('m', date('n',$nextStamp));$url->addQueryString ('d', date('j',$nextStamp));$next = $url->getUrl();$fr_month=array("1"=>"Janvier","2"=>"Fevrier","3"=>"Mars","4"=>"Avril","5"=>"Mai","6"=>"Juin","7"=>"Juillet","8"=>"Aout","9"=>"Septembre","10"=>"Octobre","11"=>"Novembre","12"=>"Decembre");echo "<div class=\"navi\">";echo "<a href=\"".$prev."\"> << </a>";echo $fr_month[(date('n',$curStamp))];echo " ";echo (date('Y',$curStamp));echo "<a href=\"".$next."\"> >> </a>";echo "</div>";// Recherche evenement de la periode selectionnée$EvenementSelection=$this->tag.date('Y',$curStamp).date('m',$curStamp);$selection = array();// TODO : Selectionner element du mois en cours$requete_evenements = "SELECT DISTINCT bf_id_fiche, bf_titre, bf_lieu_evenement, bf_date_debut_evenement, bf_date_fin_evenement, bf_description FROM bazar_fiche, bazar_nature where bf_date_debut_evenement=".$EvenementSelection." and bf_ce_nature=bn_id_nature and bn_label_nature='Évènements'";$resultat_evenement = $db->query($requete_evenements);(DB::isError($resultat_evenement))? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_evenement->getMessage(), $requete_evenements)): '';$calcom="";while ($ligne_evenements = $resultat_evenement->fetchRow(DB_FETCHMODE_OBJECT)) {$Day = new Calendar_Day(date('Y',$curStamp),date('m',$curStamp), substr($page ['tag'], -2));$DiaryEvent = new DiaryEvent($Day);$dayStamp = $Day->thisDay(true);$url->addQueryString ('y', date('Y',$dayStamp));$url->addQueryString ('m', date('n',$dayStamp));$url->addQueryString ('d', date('j',$dayStamp));$ref = $url->getUrl();$calcom="</br>".$ligne_evenements->bf_titre.$calcom;// Attach the payload$DiaryEvent->setEntry($calcom);// Add the decorator to the selection$selection[] = $DiaryEvent;}// Affichage Calendrier$month->build($selection);echo ( "<tr>\n" );echo ( "<td>\n" );echo "<table class=\"calendar\"><tr><th> Lundi </th><th> Mardi </th><th> Mercredi </th><th> Jeudi </th><th> Vendredi </th><th> Samedi </th><th> Dimanche </th></tr>";$todayStamp=time();while ( $day = $month->fetch() ) {$dayStamp = $day->thisDay(true);if ( $day->isEmpty() ) {$class = "other_month";}else {if ($todayStamp>$dayStamp) {$class="previous_month";}else {$class="current_month";}}$link =$_SERVER['PHP_SELF'].'?wiki='.$this->tag.date('Y',$dayStamp).date('m',$dayStamp).date('d',$dayStamp);// isFirst() to find start of weekif ( $day->isFirst() )echo ( "<tr>\n" );echo ( "<td class=\"".$class."\"><a href=\"".$link."\">".$day->thisDay()."</a>\n" );if ( $day->isSelected() ) {echo ( "<a href=\"".$link."\">".$day->getEntry()."</a>\n" );}echo ( "</td>\n" );// isLast() to find end of weekif ( $day->isLast() )echo ( "</tr>\n" );}echo "</table>";}?>