Subversion Repositories Applications.projet

Rev

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

Rev Author Line No. Line
208 neiluj 1
<?php
407 raphael 2
//error_reporting(E_ALL ^ E_STRICT ^ E_NOTICE ^ E_DEPRECATED);
3
error_reporting(-1); //E_ALL ^ E_STRICT ^ E_NOTICE ^ E_DEPRECATED);
4
//error_reporting(0);
208 neiluj 5
include_once 'ezmlm-php-2.0/ezmlm.php' ;
6
 
7
 
8
// Parametrage de la liste
9
$info = new ezmlm_threads();
10
if (!$info) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
407 raphael 11
 
12
extract($_GET, EXTR_OVERWRITE);
13
 
208 neiluj 14
$info->forcehref = $url;
407 raphael 15
$info->listdir = '/home/raphael/domains/'.$domaine.'/'.$liste ;
208 neiluj 16
$info->listname = $liste;
17
$info->listdomain = $domaine ;
18
 
359 aperonnet 19
ob_start() ;
20
if (!$info->listmessages()) {
21
    if (!$info) return 'Les fichiers de la liste ne sont pas visible sur le serveur' ;
407 raphael 22
 
359 aperonnet 23
}
407 raphael 24
 
359 aperonnet 25
$html = ob_get_contents() ;
26
ob_end_clean() ;
208 neiluj 27
 
359 aperonnet 28
include_once 'XML/Util.php' ;
208 neiluj 29
 
317 alexandre_ 30
$xml = XML_Util::getXMLDeclaration('1.0', 'ISO-8859-15', 'no') ;
208 neiluj 31
 
359 aperonnet 32
$xml .= XML_Util::createStartElement ('ezmlm_calendrier_messages', array('domaine' => $domaine, 'liste' => $liste, 'langue' => $langue)) ;
317 alexandre_ 33
 
359 aperonnet 34
$xml .= '<![CDATA[ '.$html.']]>';
317 alexandre_ 35
 
359 aperonnet 36
$xml .= XML_Util::createEndElement('ezmlm_calendrier_messages') ;
208 neiluj 37
header ('Content-type: text/xml');
38
echo $xml ;
359 aperonnet 39
?>