######################################################################
# phpRS RSS 1.0.8 (RSS version 2.00)
######################################################################
// Copyright (c) 2001-2005 by Jiri Lukas (jirilukas@supersvet.cz)
// http://www.supersvet.cz/phprs/
// This program is free software. - Toto je bezplatny a svobodny software.
// vyuzivane tabulky: rs_topic, rs_clanky
/*
Tento soubor zajistuje generovani RSS souboru pro moznost vzajemne vymeny clanku mezi informacnimi servery.
Generuje RSS verze 2.0.
Promenna $mnozstvi definuje pocet clanku v RSS souboru. Default hodnota = 5
*/
define('IN_CODE',true); // inic. ochranne konstanty
include_once("config.php");
function Hlavicka($data)
{
echo "
\t
\t\t".$GLOBALS["wwwname"]."
\t\t".$GLOBALS["baseadr"]."
\t\tČáslav, Kutná Hora a okolí - informace o regionu
\t\tcs
\t\t".GMDate("D, d M Y H:i:s")." GMT\r\n
\t\tredakce@caslavsko.net (Čáslav, Kutná Hora a okolí)
\t\tredakce@caslavsko.net (Čáslav, Kutná Hora a okolí)
\t\t".Date("Y")." ".$GLOBALS["wwwname"].". All rights reserved."; // GMDate() - GMT
echo $data;
echo "\t";
}
$dnesnidatum=Date("Y-m-d H:i:s"); // dnesni datum ve formatu datetime
if (!isset($GLOBALS["mnozstvi"])): $GLOBALS["mnozstvi"]=5; else: $GLOBALS["mnozstvi"]=addslashes($GLOBALS["mnozstvi"]); endif; // test na pritomnost promenne mnozstvi
// generovani RSS souboru - obsahuje nejakt. clanku
$dotazcl=mysql_query("select c.link,c.titulek,c.uvod,date_format(datum,'%a, %d %b %Y %H:%i:%S ') as datum,t.nazev from ".$GLOBALS["rspredpona"]."clanky as c,".$GLOBALS["rspredpona"]."topic as t where c.tema=t.idt and c.visible='1' and datum<'".$dnesnidatum."' order by c.datum desc limit 0,".$GLOBALS["mnozstvi"],$GLOBALS["dbspojeni"]);
$pocetcl=mysql_num_rows($dotazcl);
$prdata="";
//$datumek=;
if ($pocetcl>0): // existuji nejake clanky
// z nazev a uvodu clanku jsou odstraneny vsechy HTML tagy
for($pom=0;$pom<$pocetcl;$pom++):
$pole_data=mysql_fetch_assoc($dotazcl);
$prdata .="\t\t\r\n";
$prdata .="\t\t\t".htmlspecialchars(strip_tags($pole_data["titulek"]))."\r\n"; // nazev. cl
$prdata .="\t\t\t".$baseadr."view.php?cisloclanku=".$pole_data["link"]."\r\n"; // link cl.
$prdata .="\t\t\t".$pole_data["datum"]." GMT\r\n"; // datum vydani
$prdata .="\t\t\t".htmlspecialchars(strip_tags($pole_data["uvod"]))."\r\n"; // uvodni cast
$prdata .="\t\t\t".$pole_data["nazev"]."\r\n"; // kategorie
$prdata .="\t\t\r\n";
endfor;
endif;
header("Content-Type: text/xml; charset=windows-1250");
Hlavicka($prdata);
?>