Rev 208 | Rev 417 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// +------------------------------------------------------------------------------------------------------+// | PHP version 4.1 |// +------------------------------------------------------------------------------------------------------+// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |// +------------------------------------------------------------------------------------------------------+// | This library is free software; you can redistribute it and/or |// | modify it under the terms of the GNU General Public |// | License as published by the Free Software Foundation; either |// | version 2.1 of the License, or (at your option) any later version. |// | |// | This library is distributed in the hope that it will be useful, |// | but WITHOUT ANY WARRANTY; without even the implied warranty of |// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |// | General Public License for more details. |// | |// | You should have received a copy of the GNU General Public |// | License along with this library; if not, write to the Free Software |// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |// +------------------------------------------------------------------------------------------------------+// CVS : $Id: messages_mois.php,v 1.3 2008-08-25 15:24:09 alexandre_tb Exp $/*** Application projet** Action forums**@package projet//Auteur original :*@author Alexandre Granier <alexandre@tela-botanica.org>//Autres auteurs :*@author Aucun*@copyright Tela-Botanica 2000-2008*@version $Revision: 1.3 $// +------------------------------------------------------------------------------------------------------+*/include_once 'ezmlm-php-2.0/ezmlm.php' ;// Parametrage de la liste$info = new ezmlm_listinfo();if (!$info) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;$info->forcehref = $url;$info->listdir = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;$info->listname = $liste;$info->listdomain = $domaine ;/** Calcul du cache */require_once('Cache/Lite.php');// Set a id for this cache$id = 'cachemonth_'.$domaine.'_'.$liste.'_'.$actionargs[0];// Set a few options$options = array('cacheDir' => 'tmp/','lifeTime' => 360000);// Create a Cache_Lite object$Cache_Lite = new Cache_Lite($options);if ($xml = $Cache_Lite->get($id)) {} else {include_once 'XML/Util.php' ;$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;ob_start() ;$html = $info->show_month($actionargs[0]);if (!$html) {$xml .= XML_Util::createStartElement ('ezmlm_erreur', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;$xml .= '<![CDATA[Les fichiers de la liste ne sont pas visibles sur le serveur]]>';$xml .= XML_Util::createEndElement('ezmlm_erreur') ;}$html = ob_get_contents() ;ob_end_clean() ;$xml .= XML_Util::createStartElement ('ezmlm_messages_mois', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;$xml .= '<![CDATA[ '.$html.']]>';$xml .= XML_Util::createEndElement('ezmlm_messages_mois') ;$Cache_Lite->save($xml);}header ('Content-type: text/xml');echo $xml ;/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* +-- Fin du code ----------------------------------------------------------------------------------------+*/?>