Rev 249 | 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 $/*** 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.4 $// +------------------------------------------------------------------------------------------------------+*/include_once 'ezmlm-php-2.0/ezmlm.php' ;// Parametrage de la liste$message = new ezmlm_msgdisplay();if (!$message) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;$message->forcehref = $url;$message->listdir = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;$message->listname = $liste;$message->listdomain = $domaine ;$id_rep = $actionargs[0] ;$num_message = $actionargs[1] ;if ($id_rep =='' || $num_message == '') exit();$html = $message->display ($id_rep.'/'.$num_message) ;$num = split (':', file_get_contents($message->listdir.'/num'));$numero_dernier_message = $num[0];include_once 'XML/Util.php' ;$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;if (!$html) {$xml .= XML_Util::createStartElement ('erreur') ;$xml .= 'Le message n\'existe pas';$xml .= XML_Util::createEndElement('erreur') ;header ('Content-type: text/xml');echo $xml;exit();}$xml .= XML_Util::createStartElement ('ezmlm_message', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;$xml .= "\n".'<![CDATA[ '.$html.']]>';$xml .= XML_Util::createStartElement ('numero', array ('total_message' => $numero_dernier_message));$xml .= ($id_rep == 0 ? '': $id_rep).$num_message;$xml .= XML_Util::createEndElement('numero');$info_suivant = $message->getInfoSuivant() ;$xml .= XML_Util::createStartElement ('message_suivant', array ('numero' => $info_suivant['fichier_suivant'],'numero_repertoire' => $info_suivant['repertoire_suivant'])) ;$xml .= XML_Util::createEndElement('message_suivant') ;$xml .= XML_Util::createStartElement ('message_precedent', array ('numero' => $info_suivant['fichier_precedent'],'numero_repertoire' => $info_suivant['repertoire_precedent'])) ;$xml .= XML_Util::createEndElement('message_precedent') ;$xml .= XML_Util::createEndElement('ezmlm_message') ;header ('Content-type: text/xml');echo $xml ;/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>