<?php 
// =========================
// Auteur : Robert Viseur
// Contact : info@ecocentric.be
// Version : 1 (2005)
// Licence : CPL (Common Public Licence)
// =========================

// Le code suivant est basé sur un code disponible ici : 
// http://www.sitepoint.com/examples/phpxml/sitepointcover.php.txt
// ameliore sur base de (pour l'aspect objet)
// http://www.ayrsoft.com/~airvine/dloads/
// et de (pour utf-8 et problèmes d'encodage)
// http://linuxfr.org/~ecocentric/12409.html
// http://be.php.net/manual/en/function.utf8-decode.php

/*function unhtmlentities ($string)
{
   $trans_tbl = get_html_translation_table (HTML_ENTITIES);
   $trans_tbl = array_flip ($trans_tbl);
   return strtr ($string, $trans_tbl);
}*/


if (!function_exists('html_entity_decode'))
	require_once ("function.html_entity_decode.php");

class NewsItem
{
	var $title;
	var $url;
	var $description;
};

class RSSEngine

{
	// informations publiques
	var $item			= array();
	var $recordmax		= 10;
	var $recordcount	= 0;
	
	var $errormsg;

	// informations internes a la classe
	var $_insideitem = false;
	var $_tag = "";
	var $_title = "";
	var $_description = "";
	var $_link = "";
	var $_recordinc		= 0;

function filtertext ($string)
{
	if ($string)
	{
		// filtrage de texte pour la gestion des encodages
		$string2	= html_entity_decode($string);
		$string3 	= preg_replace('/&#([0-9]+);/ei', 'chr(intval(\'\\1\'))', $string2);
		$string4 	= $string3; //html_entity_decode(htmlentities($string3, ENT_COMPAT, 'UTF-8'));
		$trans 		= array("&ndash;" => "-", "&ldquo;" => "\"", "&rdquo;" => "\"", "&rsquo;" => "'");//, "& " => "&amp; ");
		$string5 	= strtr($string4, $trans);
	}
	return $string;
}	

function _startElement($parser, $name, $attrs) 
{
	// xml
	if ($this->_insideitem) 
	{
		$this->_tag = $name;
	} elseif ($name == "ITEM") 
	{
		$this->_insideitem = true;
	}
}

function _endElement($parser, $name) 
{
	// xml
	if ($name == "ITEM") 
	{
		if ($this->_recordinc<$this->recordmax)  //
		{			
			// gestion utf-8
			$this->_title 		= $this->filtertext($this->_title);
			$this->_description = $this->filtertext($this->_description);
			
			// affectation dans le tableau
			$this->item[$this->_recordinc] 				= new NewsItem;
			$this->item[$this->_recordinc]->url			= trim($this->_link);
			$this->item[$this->_recordinc]->title		= htmlspecialchars(trim($this->_title));
			$this->item[$this->_recordinc]->description	= htmlspecialchars(trim($this->_description));
			
			// incrementation
			$this->_recordinc++;
			
		}		
		$this->recordcount 	= $this->_recordinc;
		
		$this->_title 		= "";
		$this->_description = "";
		$this->_link 		= "";
		$this->_insideitem 	= false;
	}
}

function _characterData($parser, $data) 
{
	// xml
	if ($this->_insideitem) 
	{
		switch ($this->_tag) {
			case "TITLE":
			$this->_title .= $data;
			break;
			case "DESCRIPTION":
			$this->_description .= $data;
			break;
			case "LINK":
			$this->_link .= $data;
			break;
		}
	}
}

function xml_main ($file)
{
	$OK = 1;
	// fonction principale pour lancement de la lecture
	$this->_recordinc =0;
	// creation de l'objet parser xml
	$xml_parser = xml_parser_create();
	// on indique que le parser est dans un objet !
	xml_set_object($xml_parser, $this);
	xml_parser_set_option($xml_parser,XML_OPTION_CASE_FOLDING,1);	
	
	xml_set_element_handler($xml_parser, _startElement, _endElement);
	xml_set_character_data_handler($xml_parser, _characterData);
	// ouverture du fichier RSS : le @ permet de ne pas afficher 
	// le message d'erreur si probleme a l'ouverture
	$fp = @fopen($file,"r");
		//or die("Error reading RSS data.");
	if ($fp)
	{
		while ($data = fread($fp, 4096))
		{
			$ret = xml_parse($xml_parser, $data, feof($fp));
			if (!$ret) 
			{
				$OK = 0;
				$this->errormsg = sprintf("Erreur XML : %s à la ligne %d", 
					xml_error_string(xml_get_error_code($xml_parser)), 
					xml_get_current_line_number($xml_parser));	
			}
		}
		fclose($fp);
	}
	else
	{
		$OK = 0;	
		$this->errormsg = "Une erreur est survenue lors de l'ouverture du fichier RSS.";
	}
	xml_parser_free($xml_parser);
	return $OK;
}

function run ($filename)
{
	// point d'entree public
	$ret = $this->xml_main ($filename);
	return $ret;
}

};

?>