<?php
// Tampereen kaupungin RSS-lukija
// Klaus Nylamo, klaus.nylamo@tt.tampere.fi
// Luotu 10.8.2004
// Muokattu 4.11.2004
// www.tampere.fi/tiedotus/rajapinnat
// Parsitaan ja tulostetaan tiedot ennalta määrätyistä tai käyttäjän 
// osoittamista RSS-lähteistä, tallennetaan tiedot paikallisesti tarkistusvälin ajaksi
// Koodia saa vapaasti muokata ja levittää, tältä pohjalta tiedon lukeminen
// RSS-lähteestä ja sen parsiminen taulukoksi onnistuu kohtuullisen yksinkertaisesti
// Lisää esimerkkejä ja ohjeita XML-tiedoston käsittelyyn: www.php.net/manual/ref.xml.php
// Huom! Älä tarkista ulkopuolista RSS-lähdettä joka kerta kun sivusi ladataan,
// vaan tallenna lähde tai koko sivu tiedostoon ja tarkista uudelleen vasta kun
// tiedosto on esim. 5-15 minuuttia vanha

// Valitaan luettava RSS-lähde
// Käyttäjän antama
if (strlen($_GET['ulkovirta']) > 1) { 
$ulkovirta = preg_replace("/\s+/","",$_GET['ulkovirta']);
if (!preg_match("/^http:\/\//", $ulkovirta)) $ulkovirta = "http://".$ulkovirta;
if (!preg_match("/^http:\/\//", $ulkovirta)) $ulkovirta = "http://".$ulkovirta;
if (@implode("", @file($ulkovirta))) $RSS_lahde = $ulkovirta;
else {
$RSS_lahde = "hip";
$vikailmo = "Antamasi osoite ei ollut kelvollinen";
}
}
// Listalta valittu
else if ($_GET['virta'] && $_GET['virta'] != "hip") {
switch ($_GET['virta']) {
case 1: $RSS_lahde = "http://www.tampere.fi/rss/tiedotteet.xml"; break;
case 2: $RSS_lahde = "http://www.tampere.fi/rss/ilmoitukset.xml"; break;
case 3: $RSS_lahde = "http://www.tampere.fi/rss/kuulutukset.xml"; break;
case 4: $RSS_lahde = "http://www.tampere.fi/rss/tyopaikat.xml"; break;
case 5: $RSS_lahde = "http://inter2.tampere.fi/osallistu/keskustelu/rss/index.php"; break;
case 6: $RSS_lahde = "http://inter2.tampere.fi/osallistu/tapahtumakalenteri/rss/"; break;
case 7: $RSS_lahde = "http://inter2.tampere.fi/osallistu/tapahtumakalenteri/rss/viikko"; break;
case 8: $RSS_lahde = "http://www.tampereenkaupunki.com/rss/uimavedet/index.php"; break;
case 9: $RSS_lahde = "http://www.tampereenkaupunki.com/rss/vesi/index.php"; break;
}
}
else { 
$RSS_lahde = "hip";
}

// Ei jatketa, jos lähdettä ei ole valittu
if ($RSS_lahde != "hip") {
// TILAPÄISTIEDOSTON LUOMINEN ALKAA
// Tarkistetaan onko lähde tallennettu levylle, jos ei ole, niin tallennetaan
// Nimetään tiedosto osoitteen mukaan base64:lla, tallennuskansio tässä nykyinen,
// muista loppuun / -merkki jos muutat. Muista myös kansion oikeudet.
// Tarkistusväli minuuttia.
$RSS_lahde_alku = $RSS_lahde;
$RSS_file = base64_encode($RSS_lahde).".xml";
$RSS_file_kansio = "";
$RSS_file_tarkistusvali = "15";
$RSS_file_uusittava = "0";
if (file_exists($RSS_file_kansio.$RSS_file)) {
// Jos löytyi, tarkistetaan ettei ole tarkistuväliä vanhempi
$RSS_file_ika = mktime() - filemtime($RSS_file_kansio.$RSS_file);
if ($RSS_file_ika > ($RSS_file_tarkistusvali*60)) $RSS_file_uusittava = "1";
// Jos tiedosto on vielä tuore, vaihdetaan lähde osoittamaan siihen
else $RSS_lahde = $RSS_file_kansio.$RSS_file;
} 
else $RSS_file_uusittava = "1";
// Jos on merkitty uusittavaksi, niin kirjoitetaan tiedosto
if ($RSS_file_uusittava == "1") {
$kahva = fopen($RSS_file_kansio.$RSS_file, 'w');
if (!@fwrite($kahva, implode("", file($RSS_lahde))) === FALSE) {
// Jos tallennuksessa ei tule virhettä, vaihdetaan lähde osoittamaan levylle
$RSS_lahde = $RSS_file_kansio.$RSS_file;
}
fclose($kahva);
}
// TILAPÄISTIEDOSTON LUOMINEN LOPPUU

function lueRSS ($http_data) {
// Luodaan parseri ja tehdään asetukset
$data = implode("", file($http_data));
$parseri = xml_parser_create();
xml_parser_set_option($parseri, XML_OPTION_CASE_FOLDING, 0);
xml_parser_set_option($parseri, XML_OPTION_SKIP_WHITE, 1);		
xml_parser_set_option($parseri, XML_OPTION_TARGET_ENCODING, "ISO-8859-1");
// Luetaan RSS-data ja vapautetaan parseri
xml_parse_into_struct($parseri, $data, $arvo, $tagi);
xml_parser_free($parseri);
// Puretaan rakenne taulukkoon
foreach ($tagi as $key=>$val) {
if ($key == "item") {
$tdb[] = parsi_RSS($arvo);
} else {
continue;
}
}
return $tdb;
}

function parsi_RSS($RSS_arvot) {
$alku = 0;
$item_alku = 0;
// Käydään läpi koko taulukko XML:n tagi/arvo -pareja 
for ($i=0; $i < count($RSS_arvot); $i++) {
$tagi_nyt = $RSS_arvot[$i]["tag"];
$arvo_nyt = $RSS_arvot[$i]["value"];
if ($tagi_nyt == "image") $alku = 1;
if ($tagi_nyt == "item") $alku = 2;
// Luetaan metatiedot/kuvan tiedot, trimmataan data ja poistetaan peräkkäisistä väleistä ylimääräiset
if ($alku < 2) $RSS_item[$alku][$tagi_nyt] =  trim(preg_replace("/\s+/"," ",$arvo_nyt));
// Normaali data
else if ($alku == 2) {
// Huomaa taulukon uusi ulottuvuus - itemeitahan voi ja yleensä onkin useita
$RSS_item[$alku][$item_alku][$tagi_nyt] =  trim(preg_replace("/\s+/"," ",$arvo_nyt));
// Jos alkaa uusi item, niin siirrytään taulukon seuraavaan indeksiin
if ($tagi_nyt == "item") $item_alku++;
}
}
return $RSS_item;
}
// Haetaan valittu lähde taulukkoon
$db = lueRSS($RSS_lahde);
if (count($db[0]) < 2) $vikailmo = "Antamasi osoite ei sisältänyt kelvollista RSS-lähdettä";
// Linkkien muodostus - ehdot, joiden mukaan tulostetaan www-osoitteet linkkeinä 
$www_pattern = "/(http(s)?:\/\/[^\s\t\r\n]*)\b(\/)?/i";
$www_replacement = "<a href=\"\${0}\">\${0}</a>";

} // Loppuu if ($RSS_lahde != "hip")

//
// TÄHÄN LOPPUU VARSINAINEN XML-TIEDON PARSINTA
// Loppu on sovelluskohtaista - html:ää ja erilaisia tulostuksia taulukkoon tallennetusta tiedosta 
// 

// Listataulun aloitus
$taulun_alku = "<table width=\"100%\" cellpadding=\"0\" cellspacing=\"0\" border=\"0\">
<tr><td class=\"punatausta\">
<table width=\"100%\" cellpadding=\"6\" cellspacing=\"1\" border=\"0\">";
// Listataulun lopetus
$taulun_loppu = "\n</table>\n</td></tr>\n</table>\n";
?>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN" "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" xml:lang="fi">
<head>
<title>Tampereen kaupunki - RSS-lukija ja ohjeita</title>
<meta http-equiv="Content-Type" content="text/html;charset=iso-8859-1" />
<meta name="DC.Title" content="Tampereen kaupunki - RSS-lukija ja ohjeita" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Title" />
<meta name="avainhakusana" content="Tampereen kaupunki" />
<meta name="keywords" content="tampere, tampereen kaupunki, city of tampere, rss, lukija, lukuohjelma" />
<meta name="DC.Publisher" content="Tampereen kaupunki"/>
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Publisher" />
<meta name="DC.Date" scheme="W3C-DTF" content="<?php echo date("Y-m-d");?>" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Date" />
<meta name="DC.Date.issued" scheme="W3C-DTF" content="2004-09-06" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Date.issued" />
<meta name="DC.Format" scheme="IMT" content="text/html" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Format" />
<meta name="DC.Language" scheme="RFC1766" content="fi" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Language" />
<meta name="DC.Creator" content="Tampereen kaupunki" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_elements#Creator" />
<meta name="DC.Date.X-metadataLastModified" scheme="ISO8601" content="<?php echo date("Y-m-d",mktime());?>" />
<link rel="SCHEMA.dc" href="http://purl.org/metadata/dublin_core_element#date" />
<style type="text/css">
<!--
body {
font-family: Verdana,sans-serif;
}
h1, h2 {
color: #C00000;
}
h1 {
font-size: 140%;
}
h2 {
font-size: 120%;
}
.vikailmo {
color: red;
font-weight: bolder;
}
.tietolahde {
width: 90%;
border: dotted 1px #A95E05;
background-color: #FFFFC0;
padding: 6px;
font-size: 80%;
}
.valkotausta, .valkotausta2 {
background-color: #ffffff;
}
.harmaatausta, .harmaatausta2 {
background-color: #efefef;
}
.punatausta {
background-color: #ff0000;
}
.harmaatausta {
width: 33%;
}
.harmaatausta2 {
width: 40%;
}
.validi {
text-align: right;
}
-->
</style>

</head>

<body>

<h1>Tampereen kaupungin RSS-lukija</h1>

<?php
// Kannattanee koettaa vardumppia hahmottamisen apuna - taulukon rakenne on melko monimutkainen
// echo "\n<pre>\n";
// var_dump($db);
// echo "\n</pre>\n";

// Tulostetaan alkupuheet vain, jos ei ole valittu lähdettä
if ($RSS_lahde == "hip") {
?>

<p>
Tampereen kaupunki tarjoaa useita erilaisia RSS-pohjaisia avoimia rajapintoja käytettäväksi joko lukijan kautta tai siten, että tieto upotetaan omille sivuille. Tämä www-pohjainen lukija on tarkoitettu kehittäjille RSS-lähteiden tietojen selailua ja suunnittelua helpottamaan.
</p>

<p><strong>Huomioitavaa</strong>:</p>
<ul>
<li>Tutustu ensin kaupungin rajapintojen <a href="http://www.tampere.fi/tiedotus/rajapinnat/ohjeet/index.html">käyttöehtoihin ja ohjeisiin</a></li>
<li>Tallenna tarvitsemasi XML-tiedosto paikallisesti (<strong>kuten tämä lukijakin tekee</strong>) ja tarkista alkuperäinen lähde esim. 5-15 minuutin välein (Vihje: muodosta upotettava osa valmiiksi ja tallenna se)</li>
<li>Monet ilmaiset sisällönhallintaohjelmistot (esim. PHPNuke) sisältävät valmiit työkalut RSS-lähteiden käsittelyyn</li>
</ul>

<p>
Tämän lukijan php-koodi (päivitetty 4.11.): <a href="rss_lukija.txt">rss_lukija.txt</a>
</p>

<?php
}
else {
echo "\n<p>\n<a href=\"index.php\">Lukijan etusivu</a>\n</p>\n";
}
?>
<p>
Valitse Tampereen kaupungin RSS-lähde
</p>
<form method="get" action="<?php echo $PHP_SELF;?>">
<p>
<select name="virta">
<option value="hip" <?php if($_GET['virta'] == "hip") echo "selected=\"selected\"";?>>-- Valitse</option>
<option value="1" <?php if($_GET['virta'] == '1') echo "selected=\"selected\"";?>>Tiedotteet (25 uusinta)</option>
<option value="2" <?php if($_GET['virta'] == '2') echo "selected=\"selected\"";?>>Ilmoitukset</option>
<option value="3" <?php if($_GET['virta'] == '3') echo "selected=\"selected\"";?>>Kuulutukset</option>
<option value="4" <?php if($_GET['virta'] == '4') echo "selected=\"selected\"";?>>Avoimet työpaikat</option>
<option value="5" <?php if($_GET['virta'] == '5') echo "selected=\"selected\"";?>>Keskustelualueen viestit (10 uusinta)</option>
<option value="6" <?php if($_GET['virta'] == '6') echo "selected=\"selected\"";?>>Tapahtumat tänään</option>
<option value="7" <?php if($_GET['virta'] == '7') echo "selected=\"selected\"";?>>Tapahtumat tällä viikolla</option>
<option value="9" <?php if($_GET['virta'] == '9') echo "selected=\"selected\"";?>>Viinikanlahden sääasema</option>
<option value="8" <?php if($_GET['virta'] == '8') echo "selected=\"selected\"";?>>Uimavesien lämpötilat</option>
</select>
<input type="submit" value=" Lähetä " />
</p>
<p>
tai syötä muun RSS-lähteen osoite
</p>
<p>
<input type="text" name="ulkovirta" size="36" /> 
<input type="submit" value=" Lähetä " />
</p>
</form>
<?php
// Tulostetaan mahdolliset virheet ja lopetetaan jos niitä oli
if (strlen($vikailmo) > 1) echo "<p class=\"vikailmo\">\n".$vikailmo."</p>\n";
// Jatketaan, jos lähde on valittu
else if ($RSS_lahde != "hip") {
// Kerrotaan haettiinko tiedosto alkuperäisestä lähteestä vai käytettiinkö
// paikallista tiedostoa sekä tarkitusväli ja käytetyn tiedoston ikä
if (floor($RSS_file_ika/60) < "1") {
if ($RSS_file_ika == "1") $RSS_file_ika_muotoiltu = $RSS_file_ika." sekunti";
else $RSS_file_ika_muotoiltu = $RSS_file_ika." sekuntia";
}
if (floor($RSS_file_ika/60) == "1") $RSS_file_ika_muotoiltu = "1 minuutti";
if (floor($RSS_file_ika/60) > "1") $RSS_file_ika_muotoiltu = floor($RSS_file_ika/60)." minuuttia";
echo "<p class=\"tietolahde\">\n";
if ($RSS_file_uusittava == "0") echo "Käytettiin paikallista tiedostoa. Tarkistusväli on ".$RSS_file_tarkistusvali." minuuttia, tiedoston ikä nyt ".$RSS_file_ika_muotoiltu.", alkuperäinen lähde:<br /><strong>".$RSS_lahde_alku."</strong></p>\n";
if ($RSS_file_uusittava == "1") echo "Haettiin www-osoitteesta <strong>".$RSS_lahde_alku."</strong> ja tallennettin tiedot paikalliseen tiedostoon.</p>\n";

// Ei tulosteta jos virtaa ei ole valittu
if ($RSS_lahde != "hip") {
echo "<h2>".$db[0][0]["title"]."</h2>";
?>

<p>
<strong>1. Käyttöesimerkki - otsikot linkkeinä</strong>
</p>

<?php
// Tulostetaan otsikot linkkeinä
$loytyi_otsalinkki = '0';
foreach ($db[0][2] as $key=>$val) {
foreach ($val as $key2=>$val2) {
if ($key2 == "link") $linkki = $val2;
if ($key2 == "title") $otsikko = $val2;
if (strlen($otsikko) > 0 && strlen($linkki) > 0) {
if ($loytyi_otsalinkki == '0') echo "\n<p>\n";
echo "<a href=\"".$linkki."\">".$otsikko."</a><br />\n";
$loytyi_otsalinkki = '1';
// Nollataan aina uuden itemin alkuun linkki ja otsikko
$linkki = "";
$otsikko = "";
}
}
}
if ($loytyi_otsalinkki == '1') echo "</p>\n";
else echo "\n<p>\n<em>Ei löytynyt linkki-otsikko -pareja</em>\n</p>\n";
} // Loppuu else - if (strlen($vikailmo) > 1)
?>

<h2>Kaikki RSS-lähteen tiedot</h2>

<p>
<strong>Metatiedot</strong>
</p>

<?php
// Tulostetaan lähteen metatiedot
echo $taulun_alku;
foreach ($db[0][0] as $key=>$val) {
if (strlen($val) > 0) {
echo "\n<tr valign=\"top\">\n";
echo "<td class=\"harmaatausta\"><strong>".$key."</strong></td>\n";
echo "<td class=\"valkotausta\">".preg_replace($www_pattern, $www_replacement,$val)."</td>\n";
echo "</tr>\n";
}
}
echo $taulun_loppu;
?>

<p>
<strong>Kuva</strong>
</p>

<?php
// Tulostetaan kuva
// Jos kuvaa ei ole, ei tulosteta mitään
if ($kuva_mitat_array = @getimagesize($db[0][1]['url'])) {
echo $taulun_alku;
// Luetaan oikea kuvakoko
$kuva_mitat = $kuva_mitat_array[3];
echo "\n<tr valign=\"top\">\n";
echo "<td colspan=\"2\" class=\"valkotausta\">";
echo "<img src=\"".$db[0][1]['url']."\" alt=\"".$db[0][1]['title']."\" ".$kuva_mitat." /></td>\n";
echo "</tr>\n";
foreach ($db[0][1] as $key=>$val) {
if (strlen($val) > 0) {
echo "\n<tr valign=\"top\">\n";
echo "<td class=\"harmaatausta\"><strong>".$key."</strong></td>\n";
echo "<td class=\"valkotausta\">".preg_replace($www_pattern, $www_replacement,$val)."</td>\n";
echo "</tr>\n";
}
}
echo $taulun_loppu;
}
else echo "\n<p>\n<strong>Ei kuvaa</strong>\n</p>\n";
?>

<p>
<strong>Itemit</strong>
</p>
<?php
// Tulostetaan itemit
$uusi_taulu = '1';
$item_nro = '1';
foreach ($db[0][2] as $key=>$val) {
foreach ($val as $key2=>$val2) {
// Tulostetaan vain ne tagit, joilla on arvo
if (strlen($val2) > 0) {
if ($uusi_taulu == '1') {
echo  "\n<p>\n<em>item: ".$item_nro."</em>\n</p>\n" . $taulun_alku;
$uusi_taulu = '0';
$item_nro++;
}
echo "\n<tr valign=\"top\">\n";
echo "<td class=\"harmaatausta\"><strong>".$key2."</strong></td>\n";
// Muutetaan vain linkin sisältö linkiksi
if ($key2 == "link") echo "<td class=\"valkotausta\">".preg_replace($www_pattern, $www_replacement,$val2)."</td>\n";
// Tulostetaan muut tagit normaalisti
else echo "<td class=\"valkotausta\">".str_replace("<BR/>","<br />",$val2)."</td>\n";
echo "</tr>\n";
}
// Jos taulukko on uusi ja sisältöä löytyi, tulostetaan uusi html-taulu
if ($key2 == "item" && $uusi_taulu == '0') echo $taulun_loppu;
}
$uusi_taulu = '1';
}
} // Loppuu if ($RSS_lahde != "hip")
?>

<hr />

<p>&copy; 
<a href="http://www.tampere.fi">Tampereen kaupunki</a> <?php echo date("Y",mktime());?>

</p>

<p class="validi">
<a href="http://validator.w3.org/check?uri=referer"><img src="valid-xhtml11.png" alt="Valid XHTML 1.1!" height="31" width="88" /></a>
</p>

</body>
</html>