<?
/*
Script adaptado por William Veronesi Rocha (www.wvr.com.br). 
Adapta��o do script rss-br-linux.php 1.0 de Augusto Campos (brain
at matrix.com.br) para abrir qualquer site rss puro. Para usar inclua este arquivo e chame a fun��o exibe_rss passando:

=> endere�o do rss
$backend = "http://www.noticiaslinux.com.br/rss.php";

=> o que vai aparecer antes de cada item:
$link_prefix = "* ";

=>o que vai aparecer ap�s cada item:
$link_postfix = "<BR>\n";

=> o arquivo de cache para diminuir a carga do servidor de not�cias
$cache_file = "/tmp/rss-br-linux.cache";

=> n�mero m�ximo de not�cias que pode ser lido
$max_items = 10;

=> frame de destino. se tiver d�vidas, mantenha o valor "_top"
$target = "_top";
*/

function mensagem($mensagem)
{
echo "<SCRIPT>alert('$mensagem');</SCRIPT>";
}

function exibe_rss($backend, $link_prefix, $link_postfix, $cache_file,
$max_items ,$target)
{

$items = 0;
$time = split(" ", microtime());
$cache_time = 1800;
$saida = 0;

srand((double)microtime()*1000000);
$cache_time_rnd = 300 - rand(0, 600);

if ( (!(file_exists($cache_file))) || ((filectime($cache_file) +
$cache_time - $time[1]) + $cache_time_rnd < 0) ||
(!(filesize($cache_file))) )
{

$fpread = fopen($backend, 'r');
if(!$fpread)
{
mensagem("Erro ao Abrir o Arquivo de RSS");
exit;
}
else
{

$fpwrite = fopen($cache_file, 'w');
if(!$fpwrite)
{
mensagem("Erro ao Abrir o Arquivo de Cache RSS");
exit;
}
else
{

while(!feof($fpread))
{

$buffer = ltrim(Chop(fgets($fpread)));
if ((substr($buffer,0,5) == "<item") && ($items <
$max_items))
{
$title = ltrim(Chop(fgets($fpread)));

while($saida==0)
{
$link = ltrim(Chop(fgets($fpread)));
if (substr($link,0,5) == "<link") {$saida=1;}
}
$saida = 0;

$title = ereg_replace( "<title>", "", $title );
$title = ereg_replace( "</title>", "", $title );
$link = ereg_replace( "<link>", "", $link );
$link = ereg_replace( "</link>", "", $link );
$title = ereg_replace( "<!\[CDATA\[", "", $title );
$title = ereg_replace( "]]>", "", $title );
$link = ereg_replace( "<!\[CDATA\[", "", $link );
$link = ereg_replace( "]]>", "", $link );

fputs($fpwrite, "$link_prefix<A class=link
HREF=\"$link\" TARGET=\"$target\">$title</A>$link_postfix");

$items++;
}
}
}
fclose($fpread);
}
fclose($fpwrite);
}
if (file_exists($cache_file))
{
include($cache_file);
}
}
?>