Subversion Repositories Applications.projet

Rev

Rev 315 | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
208 neiluj 1
<?php
359 aperonnet 2
 
208 neiluj 3
include_once 'ezmlm-php-2.0/ezmlm.php' ;
4
 
5
 
6
// Parametrage de la liste
7
$message = new ezmlm_msgdisplay();
8
if (!$message) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
9
$message->forcehref = $url;
10
$message->listdir = '/home/vpopmail/domains/'.$domaine.'/'.$liste ;
11
$message->listname = $liste;
12
$message->listdomain = $domaine ;
13
$id_rep = $actionargs[0] ;
14
$num_message = $actionargs[1] ;
15
if ($id_rep =='' || $num_message == '') exit();
16
 
249 alexandre_ 17
 
208 neiluj 18
$html = $message->display ($id_rep.'/'.$num_message) ;
19
 
20
include_once 'XML/Util.php' ;
21
 
22
$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;
23
 
249 alexandre_ 24
if (!$html) {
359 aperonnet 25
	$xml .= XML_Util::createStartElement ('ezmlm_erreur') ;
249 alexandre_ 26
	$xml .= 'Le message n\'existe pas';
359 aperonnet 27
	$xml .= XML_Util::createEndElement('ezmlm_erreur') ;
249 alexandre_ 28
	header ('Content-type: text/xml');
29
	echo $xml;
30
	exit();
31
}
32
 
33
 
34
 
208 neiluj 35
$xml .= XML_Util::createStartElement ('ezmlm_message', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;
36
 
37
$xml .= "\n".'<![CDATA[ '.$html.']]>';
38
$info_suivant = $message->getInfoSuivant() ;
39
$xml .= XML_Util::createStartElement ('message_suivant', array ('numero' => $info_suivant['fichier_suivant'],
40
	                                                        'numero_repertoire' => $info_suivant['repertoire_suivant'])) ;
41
$xml .= XML_Util::createEndElement('message_suivant') ;
42
 
43
$xml .= XML_Util::createStartElement ('message_precedent', array ('numero' => $info_suivant['fichier_precedent'],
44
	                                                        'numero_repertoire' => $info_suivant['repertoire_precedent'])) ;
45
$xml .= XML_Util::createEndElement('message_precedent') ;
46
 
47
$xml .= XML_Util::createEndElement('ezmlm_message') ;
48
header ('Content-type: text/xml');
49
echo $xml ;
50
?>