Permalink
Switch branches/tags
Nothing to show
Find file Copy path
Fetching contributors…
Cannot retrieve contributors at this time
executable file 162 lines (146 sloc) 4.34 KB
<?php
// $Id: rss10.inc,v 1.3 2001/05/20 17:58:02 edmundd Exp $
//
// A convenience class to make it easy to write RSS classes
// Edd Dumbill <mailto:edd+rsswriter@usefulinc.com>
//
// $Log: rss10.inc,v $
// Revision 1.3 2001/05/20 17:58:02 edmundd
// Final distribution tweaks.
//
// Revision 1.2 2001/05/20 17:41:30 edmundd
// Ready for distribution.
//
// Revision 1.1 2001/05/20 17:01:43 edmundd
// First functional draft of code working.
//
// Revision 1.1 2001/05/17 18:17:46 edmundd
// Start of a convenience library to help RSS1.0 creation
//
class RSSWriter {
function RSSWriter($uri, $title, $description, $meta=array()) {
$this->chaninfo=array();
$this->website=$uri;
$this->chaninfo["link"]=$uri;
$this->chaninfo["description"]=$description;
$this->chaninfo["title"]=$title;
$this->items=array();
$this->modules=array("dc" => "http://purl.org/dc/elements/1.1/");
// thanks James Mills for bugfix to this line
$this->channelURI=str_replace("&", "&amp;", "http://" . $GLOBALS["SERVER_NAME"] . $GLOBALS["REQUEST_URI"]);
foreach ($meta as $key => $value) {
$this->chaninfo[$key]=$value;
}
}
function useModule($prefix, $uri) {
$this->modules[$prefix]=$uri;
}
function setImage($imgURI, $imgAlt, $imgWidth=88, $imgHeight=31) {
$this->image=array(
"uri" => $imgURI, "title" => $imgAlt, "width" => $imgWidth,
"height" => $imgHeight);
}
function addItem($uri, $title, $meta=array()) {
$item=array("uri" => $uri, "link" => $uri,
"title" => $this->deTag($title));
foreach ($meta as $key => $value) {
if ($key == "description" || $key == "dc:description") {
$value=$this->deTag($value);
}
$item[$key]=$value;
}
$this->items[]=$item;
}
function serialize() {
$this->preamble();
$this->channelinfo();
$this->image();
$this->items();
$this->postamble();
}
function deTag($in) {
while(ereg('<[^>]+>', $in)) {
$in=ereg_replace('<[^>]+>', '', $in);
}
return $in;
}
function preamble() {
//header("Content-type: text/xml");
header ('Content-type: text/xml; charset=UTF-8');
print '<?xml version="1.0" encoding="UTF-8"?>
<rdf:RDF
xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
xmlns="http://purl.org/rss/1.0/"
xmlns:mn="http://usefulinc.com/rss/manifest/"
';
foreach ($this->modules as $prefix => $uri) {
print " xmlns:${prefix}=\"${uri}\"\n";
}
print ">\n\n";
}
function channelinfo() {
print ' <channel rdf:about="' . $this->channelURI . '">
';
$i=$this->chaninfo;
foreach (array("title", "link", "dc:source", "description", "dc:language", "dc:publisher",
"dc:creator", "dc:rights") as $f) {
if (isset($i[$f])) {
print " <${f}>" . htmlspecialchars($i[$f]) . "</${f}>\n";
}
}
if (isset($this->image)) {
print " <image rdf:resource=\"" . htmlspecialchars($this->image["uri"]) . "\" />\n";
}
print " <items>\n";
print " <rdf:Seq>\n";
foreach ($this->items as $i) {
print " <rdf:li rdf:resource=\"" . htmlspecialchars($i["uri"]) . "\" />\n";
}
print " </rdf:Seq>\n";
print " </items>\n";
print " </channel>\n\n";
}
function image() {
if (isset($this->image)) {
print " <image rdf:about=\"" . htmlspecialchars($this->image["uri"]) . "\">\n";
print " <title>" . htmlspecialchars($this->image["title"]) . "</title>\n";
print " <url>" . htmlspecialchars($this->image["uri"]) . "</url>\n";
print " <link>" . htmlspecialchars($this->website) . "</link>\n";
if ($this->chaninfo["description"])
print " <dc:description>" . htmlspecialchars($this->chaninfo["description"]) .
"</dc:description>\n";
print " </image>\n\n";
}
}
function postamble() {
print ' <rdf:Description rdf:ID="manifest">
<mn:channels>
<rdf:Seq>
<rdf:li rdf:resource="' . $this->channelURI . '" />
</rdf:Seq>
</mn:channels>
</rdf:Description>
</rdf:RDF>
';
}
function items() {
foreach ($this->items as $item) {
print " <item rdf:about=\"" . $item["uri"] . "\">\n";
foreach ($item as $key => $value) {
if ($key!="uri") {
if (is_array($value)) {
foreach ($value as $v1) {
print " <${key}>" . $value . "</${key}>\n";
//print " <${key}>" . htmlspecialchars($v1) . "</${key}>\n";
}
} else {
print " <${key}>" . $value . "</${key}>\n";
//print " <${key}>" . '<![CDATA[' . htmlspecialchars($value) . "]]></${key}>\n";
}
}
}
print " </item>\n\n";
}
}
}
?>