<?php
/*
//      golemrdf.php
//
//      Version:  1.0.0
//      Author:         Jens Ihlenfeld - ji@golem.de
//      Homepage:       http://www.golem.de
//
//      Based on:       freshmeat.php3
//      Version:  2.0.4
//      Author:           Kalle Kiviaho - kivi@chl.chalmers.se
//      Lastmod:        2000-09-24
//      Homepage:       http://swamp.chl.chalmers.se/backends/
*/
//      Customize as you like it

$link_prefix   =  "&nbsp;&nbsp;&middot;&nbsp;";
$link_postfix  =  "<BR>\n";
$cache_file =  "/tmp/golem.de.rdf.cache";
$cache_time =  300;
$max_items  =  20;
$target     =  "_top";

//      End of customizations


$backend        =       "http://www.golem.de/golem_backend.rdf";

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

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) {
//      echo "$errstr ($errno)<br>\n";
//      exit;
        } else {

        $fpwrite = fopen($cache_file, 'w');
                if(!$fpwrite) {
//                      echo "$errstr ($errno)<br>\n";
//                      exit;
                } else {

                while(! feof($fpread) ) {

                        $buffer = ltrim(Chop(fgets($fpread, 256)));

                                if (($buffer == "<item>") && ($items < $max_items)) {
                                        $title = ltrim(Chop(fgets($fpread, 256)));
                                        $link = ltrim(Chop(fgets($fpread, 256)));

                                        $title = ereg_replace( "<title>", "", $title );
                                        $title = ereg_replace( "</title>", "", $title );
                                        $link = ereg_replace( "<link>", "", $link );
                                        $link = ereg_replace( "</link>", "", $link );

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

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