<?
    /* E X A M P L E -----------------------------------------------
		$feed = new RSS();
		$feed->title       = "RSS Feed Title";
		$feed->link        = "http://website.com";
		$feed->description = "Recent articles on your website.";
 
		$db->query($query);
		$result = $db->result;
		while($row = mysql_fetch_array($result, MYSQL_ASSOC))
		{
			$item = new RSSItem();
			$item->title = $title;
			$item->link  = $link;
			$item->setPubDate($create_date); 
			$item->description = "<![CDATA[ $html ]]>";
			$feed->addItem($item);
		}
		echo $feed->serve();
	---------------------------------------------------------------- */
 
	class RSS
	{
		var $title;
		var $link;
		var $description;
		var $language = "en-us";
		var $pubDate;
		var $items;
		var $tags;
		var $encoding = "utf-8";
 
		function RSS()
		{
			$this->items = array();
			$this->tags  = array();
		}
 
		function addItem($item)
		{
			$this->items[] = $item;
		}
 
		function setPubDate($when)
		{
			if(strtotime($when) == false)
				$this->pubDate = date("D, d M Y H:i:s ", $when) . "GMT";
			else
				$this->pubDate = date("D, d M Y H:i:s ", strtotime($when)) . "GMT";
		}
 
		function getPubDate()
		{
  			if(empty($this->pubDate))
				return date("D, d M Y H:i:s ") . "GMT";
			else
				return $this->pubDate;
		}
 
		function addTag($tag, $value)
		{
			$this->tags[$tag] = $value;
		}
 
		function out()
		{
			$out  = $this->header();
			$out .= "<channel>\n";
			$out .= "<title>" . $this->title . "</title>\n";
			$out .= "<link>" . $this->link . "</link>\n";
			$out .= "<description>" . $this->description . "</description>\n";
			$out .= "<language>" . $this->language . "</language>\n";
			$out .= "<pubDate>" . $this->getPubDate() . "</pubDate>\n";
 
			foreach($this->tags as $key => $val) $out .= "<$key>$val</$key>\n";
			foreach($this->items as $item) $out .= $item->out();
 
			$out .= "</channel>\n";
 
			$out .= $this->footer();
 
			$out = str_replace("&", "&", $out);
 
			return $out;
		}
 
		function serve($contentType = "application/xml")
		{
			$xml = $this->out();
			header("Content-type: $contentType");
			echo $xml;
		}
 
		function header()
		{
			$out  = '<'.'?xml version="1.0" encoding="'.$this->encoding.'"?'.'>' . "\n";
			$out .= '<rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/">' . "\n";
			return $out;
		}
 
		function footer()
		{
			return '</rss>';
		}
	}
 
	class RSSItem
	{
		var $title;
		var $link;
		var $description;
		var $pubDate;
		var $guid;
		var $tags;
		var $attachment;
		var $length;
		var $mimetype;
 
		function RSSItem()
		{ 
			$this->tags = array();
		}
 
		function setPubDate($when)
		{
			if(strtotime($when) == false)
				$this->pubDate = date("D, d M Y H:i:s ", $when) . "GMT";
			else
				$this->pubDate = date("D, d M Y H:i:s ", strtotime($when)) . "GMT";
		}
 
		function getPubDate()
		{
			if(empty($this->pubDate))
				return date("D, d M Y H:i:s ") . "GMT";
			else
				return $this->pubDate;
		}
 
		function addTag($tag, $value)
		{
			$this->tags[$tag] = $value;
		}
 
		function out()
		{
			$out .= "<item>\n";
			$out .= "<title>" . $this->title . "</title>\n";
			$out .= "<link>" . $this->link . "</link>\n";
			$out .= "<description>" . $this->description . "</description>\n";
			$out .= "<pubDate>" . $this->getPubDate() . "</pubDate>\n";
 
			if($this->attachment != "")
				$out .= "<enclosure url='{$this->attachment}' length='{$this->length}' type='{$this->mimetype}' />";
 
			if(empty($this->guid)) $this->guid = $this->link;
			$out .= "<guid>" . $this->guid . "</guid>\n";
 
			foreach($this->tags as $key => $val) $out .= "<$key>$val</$key\n>";
			$out .= "</item>\n";
			return $out;
		}
 
		function enclosure($url, $mimetype, $length)
		{
			$this->attachment = $url;
			$this->mimetype   = $mimetype;
			$this->length     = $length;
		}
	}
?>

<?
require_once('class/simplepie.class.php');
require_once('class/rss_writer.class.php');
 
define("BLOG_RSS_URL", "http://www.PODCASTURL.de/rss.xml");
define("BLOG_VIDEO_URL", "http://PODCAST.SERVER-X.VIDEO.DOMAIN.de/");
define("BLOG_VIDEO_DOWNLOAD_EXTENSION", ".mov.zip");
define("BLOG_VIDEO_TYPE", "video/quicktime");
define("VIDEO_URL", "files/");
define("VIDEO_EXTENSION", ".mov");
define("ABSOLUTE_PATH", "/Users/username/Sites/podcastfeed/");
define("WEB_PATH", "http://192.168.1.1/~username/podcastfeed/");
 
// Parse it
$feed = new SimplePie(BLOG_RSS_URL);
 
// neue Dateien laden
getFilesFromFeed($feed);
 
// Feed erstellen
showRssFromSystemFiles($feed, VIDEO_URL);
 
 
// liefert den RSS-Feed mit Enclosures von den geladenen Dateien
function showRssFromSystemFiles(&$uFeed, $uFolder)
{
    $locFiles = getFileListFromSystem($uFolder);
    header('Content-type: text/xml');
    $rss = new RSS();
    $rss->encoding    = ($uFeed->get_encoding()?$uFeed->get_encoding():'UTF-8');
    $rss->title       = $uFeed->get_title();
    $rss->link        = $uFeed->get_permalink();
    $rss->description = $uFeed->get_description();
    $rss->language    = $uFeed->get_language();
 
    if ($uFeed->data) {
        $items = $uFeed->get_items();
        foreach($items as $thisItem) {
            $rssItem = new RSSItem();
            $locEnclosureLink = getEnclosureLink($thisItem->get_categories());
 
            // Datei aus Feed in System vorhanden, dann in Feed aufnehmen
            if (in_array($locEnclosureLink.VIDEO_EXTENSION, $locFiles))
            {
                $rssItem->title = $thisItem->get_title();
                $rssItem->link  = $thisItem->get_link();
                $rssItem->setPubDate($thisItem->get_date()); 
                $rssItem->description = "<![CDATA[ ".$thisItem->get_description(true)." ]]>";
                if (!is_null($locEnclosureLink)) { 
                    $rssItem->enclosure(WEB_PATH.$uFolder.$locEnclosureLink.VIDEO_EXTENSION, BLOG_VIDEO_TYPE, 12);
                }
                $rss->addItem($rssItem);   
            }          
        }
    }
    echo $rss->serve();
}
 
// liefert den Original-RSS-Feed mit Enclosures 
function showRssFromOrginalFeed(&$uFeed)
{
    header('Content-type: text/xml');
    $rss = new RSS();
    $rss->encoding    = ($uFeed->get_encoding()?$uFeed->get_encoding():'UTF-8');
    $rss->title       = $uFeed->get_title();
    $rss->link        = $uFeed->get_permalink();
    $rss->description = $uFeed->get_description();
    $rss->language    = $uFeed->get_language();
 
    if ($uFeed->data) {
        $items = $uFeed->get_items();
        foreach($items as $thisItem) {
            $rssItem = new RSSItem();
            $rssItem->title = $thisItem->get_title();
            $rssItem->link  = $thisItem->get_link();
            $rssItem->setPubDate($thisItem->get_date()); 
            $rssItem->description = "<![CDATA[ ".$thisItem->get_description(true)." ]]>";
            if (!is_null($locEnclosureLink = getEnclosureLink($thisItem->get_categories()))) { 
                $rssItem->enclosure(BLOG_VIDEO_URL.$locEnclosureLink.BLOG_VIDEO_DOWNLOAD_EXTENSION, BLOG_VIDEO_TYPE, 12);
            }
            $rss->addItem($rssItem);             
        }
    }
    echo $rss->serve();
}
 
// liefert den Enclosure-Link zurück
function getEnclosureLink(&$uEnclosure) {
    $locEnclosureLink = null;
    $locEnclosure = $uEnclosure;
    if (isset($locEnclosure[0])) {
        if (is_array($locEnclosure)) {
            for ($i=0; $i < count($locEnclosure); $i++) {
                //echo $i;
                $locItem = $locEnclosure[$i];
                if (is_object($locItem)) {
                    if (isset($locItem->term)) {
                        if (strpos($locItem->term, date("Y")) !== false) {
                            $locEnclosureLink = $locItem->term;
                        }
                    }
                }
            }
        }
    }
    return $locEnclosureLink;
}
 
 
// läd die Dateien aus dem Feed, die noch nicht im System liegen
// bzw. wenn Datei nicht im Feed aber im System dann löschen
function getFilesFromFeed(&$uFeed) {
    $locFilesInSystem = getFileListFromSystem(VIDEO_URL, true, VIDEO_EXTENSION);
    $locFilesInFeed = getFileListFromFeed($uFeed, BLOG_VIDEO_DOWNLOAD_EXTENSION, true);
 
    // welche Dateien sind im System aber nicht im Feed
    $locDiffSystemToFeed = array_diff($locFilesInSystem, $locFilesInFeed);
 
    // welche Dateien sind im Feed aber nicht im System
    $locDiffFeedToSystem = array_diff($locFilesInFeed, $locFilesInSystem);
 
    // Datei, die nicht im Feed sind vom System löschen
    foreach ($locDiffSystemToFeed as $item) {
        @unlink(VIDEO_URL.$item.VIDEO_EXTENSION);
    }
 
    $locExec = "#!/bin/bash\n";
 
    // Datei, die nicht im System sind aus Feed holen
    foreach ($locDiffFeedToSystem as $item) {
        $submit_url = BLOG_VIDEO_URL.$item.BLOG_VIDEO_DOWNLOAD_EXTENSION;	
        $save_path = VIDEO_URL.$item.BLOG_VIDEO_DOWNLOAD_EXTENSION;	
 
        $locExec .= "/usr/bin/curl ".$submit_url." -o ".$save_path." -L\n"; // Datei laden
        $locExec .= "/usr/bin/unzip ".$save_path." *".VIDEO_EXTENSION." -d ".VIDEO_URL."\n"; // Datei entzippen
        $locExec .= "rm ".$save_path."\n\n"; // Zip löschen
    }
 
    // in eine Datei schreiben und Datei als Script ausführen
    if (count($locDiffFeedToSystem) > 0) {
        $handle = fopen (ABSOLUTE_PATH."loadFeedFiles.sh", "w");
        fputs($handle, $locExec);
        fclose($handle);
        @chmod (ABSOLUTE_PATH."loadFeedFiles.sh", 0777);
 
        // Script ausführen
        exec("./loadFeedFiles.sh > /dev/null &");
    }
}
 
// gibt alle Dateien aus dem Feed als Array zurück
function getFileListFromFeed(&$uFeed, $uExtension="", $uBasename=false) {
    $files = array();
    if ($uFeed->data) {
        $items = $uFeed->get_items();
        foreach($items as $thisItem) {
            if (!is_null($locEnclosureLink = getEnclosureLink($thisItem->get_categories()))) { 
                $files[] = $locEnclosureLink.(($uBasename)?"":$uExtension);
            }   
        }
    }
    return $files;
}
 
// gibt alle Dateien aus dem Ordner als Array zurück
function getFileListFromSystem($uFolder, $uBasename=false, $uExtension="") {
    $files = array();
    if($dir = opendir($uFolder))
    {
        while($file = readdir($dir))
        {
            if (!is_dir($file) && $file != "." && $file != ".." &&  $file != ".DS_Store" & $file != "__MACOSX")
            {
                $files[] = (($uBasename)?basename($file, $uExtension):$file);
            }
        }
        closedir($dir);
    }
    return $files;
}
 
 
?>

<?
// wandelt ein XML-String in ein Objekt mit entsprechender Verschachtelungs-Tiefe
// Quelle: user-contribution von php.net (leicht modifiziert)
class xml2obj
{
   var $path;
 
   function xml2obj($data, $encoding = "ISO-8859-1") {
		$data = str_replace(chr(9), "", $data);
		$data = str_replace(chr(10), "", $data);
		$data = str_replace(chr(13), "", $data);
 
		$this->path = "\$this->result";
		$this->path = "\$this";
		$this->index = 0;
 
		$xml_parser = xml_parser_create($encoding);
		xml_set_object($xml_parser, $this);
		xml_set_element_handler($xml_parser, 'startElement', 'endElement');
		xml_set_character_data_handler($xml_parser, 'characterData');
 
		xml_parse($xml_parser, $data, true);
		xml_parser_free($xml_parser);
		$this->path = null;
		$this->_rawXML = $data;
   }
 
	   function startElement($parser, $tag, $attributeList) {
		   eval("\$vars = get_object_vars(".$this->path.");");
		   $this->path .= "->".$tag;
 
		   if ($vars and array_key_exists($tag, $vars)) 
		   {
				 eval("\$data = ".$this->path.";");
					 if (is_array($data)) 
					 {
						   $index = sizeof($data);
						   $this->path .= "[".$index."]";
					 } 
					 else if (is_object($data)) 
					 {
						   eval($this->path." = array(".$this->path.");");
						   $this->path .= "[1]";
					 }
		   }
		   eval($this->path." = null;");
 
		   foreach($attributeList as $name => $value)
		   {
			   eval($this->path."->".$name." = \$value;");
		   }
 
	   }
 
   function endElement($parser, $tag) {
	   $this->path = substr($this->path, 0, strrpos($this->path, "->"));
   }
 
   function characterData($parser, $data) {
	   eval($this->path." .= '".trim($data)."';");
   }
}
 
?>

<?
header('Content-type: text/xml');
 
require_once("class/class-snoopy.php");
require_once("class/xml2obj.class.php");
 
define("BLOG_RSS_URL", "");
define("BLOG_VIDEO_URL", "");
 
// mit Snoopy das Blog-RSS laden
$snoopy = new Snoopy;	
$submit_url = BLOG_RSS_URL;	
$snoopy->fetch($submit_url);
 
// Blog-RSS in Objekt umwandeln
$xmlObj = new xml2obj($snoopy->results, "UTF-8");
 
// Podcast-Feed erstellen
show_podcastfeed_xml($xmlObj);
 
 
// Podcast-Feed erstellen
function show_podcastfeed_xml($uXmlObj)
{
	$locDateArray = array();
	echo '<?xml version="1.0" encoding="UTF-8"?>'."\n";
	?>
	<rss<?=((isset($uXmlObj->RSS->VERSION))?' version="'.$uXmlObj->RSS->VERSION.'"':'')?>>
	<channel>
		<title><?=((isset($uXmlObj->RSS->CHANNEL->TITLE))?$uXmlObj->RSS->CHANNEL->TITLE:'')?></title>
		<link><?=((isset($uXmlObj->RSS->CHANNEL->LINK))?$uXmlObj->RSS->CHANNEL->LINK:'')?></link>
		<description><?=((isset($uXmlObj->RSS->CHANNEL->DESCRIPTION))?$uXmlObj->RSS->CHANNEL->DESCRIPTION:'')?></description>	
		<language><?=((isset($uXmlObj->RSS->CHANNEL->LANGUAGE))?$uXmlObj->RSS->CHANNEL->LANGUAGE:'')?></language>
		<?
		if (isset($uXmlObj->RSS->CHANNEL->ITEM))
		{
			foreach ($uXmlObj->RSS->CHANNEL->ITEM as $podcast)
			{
				$locText = $podcast->DESCRIPTION;
				$locLink = $podcast->LINK;
				$locLinkArray = explode("/", $locLink);
 
				// Datum des Postings für das Videodatum ermitteln
				$locDate = $locLinkArray[3]."-".$locLinkArray[4]."-".$locLinkArray[5];
				?>
				<item>
					<title><?=$podcast->TITLE?></title>
					<description><![CDATA[<?=html_entity_decode($locText, ENT_QUOTES, "UTF-8")?>]]></description>
					<link><?=$locLink?></link>
					<? 
					if (!in_array($locDate, $locDateArray)) { 						
						$locDateArray[] = $locDate;
						?>
						<enclosure url="<?=BLOG_VIDEO_URL.$locDate?>.mov" length="12" type="video/quicktime"/>
					<? } ?>
				</item>
				<?
			}
		}
		?>
	</channel>
	</rss>	
	<?
}
 
?>