FLUX RSS DES COMMENTAIRES SUR UN SKYBLOG

<?php

/*
 Codé par Pierre GROS
 Si ca peux vous servir, faites vous plaisir
 Changez le tant que vous voulez
 mais si vous pouviez laisser ce bandeau, ca ferais plaisir à mon égo

 Modifié par Dell'Aiera Pol.(d.paolino@gmail.com)

 Ce script permet de créer un flux RSS pour les commentaires d'un skyblog (enfin tant que l'architecture de leurs pages sera celle d'aujourd'hui)

 Pour que ca marche, mettez ce fichier sur un server web gérant le PHP et le flux rss sera a l'adresse: http://adresse_du_fichier/rss.php?blogger=nom_du_blog

 Dernière version: 12 juillet 2006

 */

$nb_pages_max=-1;//mettre -1 pour tous
if (!empty($_GET['blogger'])){
    $blogger=urlencode($_GET['blogger']);//blogger à surveiller

function dotimestamp($date)
	{
	$semaine[1]="Lundi";
	$semaine[2]="Mardi";
	$semaine[3]="Mercredi";
	$semaine[4]="Jeudi";
	$semaine[5]="Vendredi";
	$semaine[6]="Samedi";
	$semaine[7]="Dimanche";

	$tabmois[1]="Janvier";
	$tabmois[2]="Février";
	$tabmois[3]="Mars";
	$tabmois[4]="Avril";
	$tabmois[5]="Mai";
	$tabmois[6]="Juin";
	$tabmois[7]="Juillet";
	$tabmois[8]="Août";
	$tabmois[9]="Septembre";
	$tabmois[10]="Octobre";
	$tabmois[11]="Novembre";
	$tabmois[12]="Décembre";

	$date = explode(" ",$date);
	$jour = array_search($date[0],$semaine);
	$journum = $date[1];
	$mois = array_search($date[2],$tabmois);

	if ($date[3] == "à")
		{
		$an = 2006;
		$temps = explode(":",$date[4]);
		$heure = $temps[0];
		$minute = $temps[1];
		}
	else
		{
		$an = $date[3];
		$temps = explode(":",$date[5]);
		$heure = $temps[0];
		$minute = $temps[1];
		}

	$timestamp = mktime($heure,$minute,00,$mois,$journum,$an);

	$date = date('l d F Y H:i',$timestamp);
	$string = "$journum/$mois/$an $heure:$minute $timestamp $date";
	return $timestamp;
	}


    function nettoie_phrase ($phrase) //a ameliorer, ce sont les problemes que j'ai rencontré
    {//cette fonction nettoie une ligne de code html pour la renvoyer proprement

        $phrase = utf8_encode($phrase);

        $phrase = strip_tags($phrase);//enleve les balises html

        //pose probleme si ca coupe un code html
        /*if (strlen($phrase) > 100) {
             $phrase = substr($phrase, 0, 100);//ne prends que les 100 1ers caracteres
             $phrase .= "...";
         }*/

        $phrase = trim($phrase);//vire les caracteres illisibles en début et fin de phrase

        return ($phrase);//renvoie la phrase propre
    }

    function retourne_date ($date)//prends la date au format skyblog et la renvoie au format RSS
    {
        //Posté le vendredi 28 avril 2006 à 01:33
        //deviens
        //Fri, 28 Apr 2006 01:33:00 +0200
        $francais = array("Posté le ", "à ", "janvier", "février", "mars", "avril", "mai", "juin", "juillet", "août", "septembre", "novembre", "décembre", "lundi", "mardi", "mercredi", "jeudi", "vendredi", "samedi", "dimanche");
        $anglais = array("", "", "Jan", "Feb", "Mar", "Apr", "May", "Jun", "Jul", "Aug", "Sep", "Nov", "Dec", "Mon,", "Tue,", "Wed,", "Thu,", "Fri,", "Sat,", "Sun,");
        $date = str_replace($francais, $anglais, $date);
        $date .= ':00 '.date("O");
         return ($date);
     }


     if (!$fp = fopen("http://$blogger.skyblog.com/","r"))
	{
        echo 'ERREUR!'."\n";
	}
     else
	{


         // NOMBRE DE PAGES
         $page_courante = 1;
         $nb_pages = 0;
         $fini = false;
         while (!$fini AND !feof($fp)) { //on parcours toutes les lignes
             $page = fgets($fp, 4096);
             if (strpos($page,'var blog_nb_page = ') !== false) {//quand on trouve la ligne indiquant le nombre de page, on récupere la donée
                 $nb_pages = str_replace('var blog_nb_page = ','',$page);
                 $nb_pages = str_replace(';','',$nb_pages);
                 $fini = true;
             }
         }
         if ($nb_pages_max<0 or $nb_pages_max > $nb_pages) //remet bien la valeur de $nb_pages_max
             $nb_pages_max = $nb_pages;

         // TITRE DU BLOG
         $en_tete = false;
         while (!$en_tete AND !feof($fp))
 	     {
             $page = fgets($fp, 4096);
             if (strpos($page,'Nom du Skyblog :') !== false)
	         {
                 //en tete du flux rss
                 header('Content-type: text/xml');
                 echo '<?xml version="1.0" encoding="UTF-8" ?>'."\n";
                 echo '<rss version="2.0">'."\n";
                 echo '<channel>'."\n";
                 echo '<title>'.$blogger.'</title>'."\n";
                 echo '<lastBuildDate>'.date("r").'</lastBuildDate>'."\n";//date de l'instant ou le fichier est appelé
                 echo '<link>http://'.$blogger.'.skyblog.com/</link>'."\n";
                 echo '<description>' . nettoie_phrase (fgets($fp, 4096)) . '</description>'."\n";
                 echo '<language>fr</language>'."\n";
                 echo '<copyright>'.$blogger.'</copyright>'."\n";//mets le nom du blogger en copyright
                 $en_tete = true;
                 }
            }




        //debut des articles
        $page_courante = 1;
        while ($page_courante <= $nb_pages_max)
	    {//tant qu'on a pas dépassé la derniere page, on lit

            if ($page_courante == 1) $page_a_voir='';
             else $page_a_voir = $page_courante.'.html';//affiche la page de base ou la suivante

             if (!$fp = fopen('http://'.$blogger.'.skyblog.com/'.$page_a_voir,"r")) {
                $page_courante = $nb_pages + 1;
            } else {

                //articles de la page en cours
                $fini = false;
                while (!$fini AND !feof($fp)) {
                    $page = fgets($fp, 4096);
                    if ((strpos($page,'<div class="article"') !== false) and (strpos($page,'id="pagination"') === false)) {//$page contiens la ligne ou il y a l'ID et ce n'est pas la merdouille à la fin
                        $id=substr($page,strpos($page,"id=\"")+6);    //recupere l'ID du message.
                        $id=substr($id,0,strpos($id,"\""));
                        //on affiche le tout
                        $ids[] = $id;
                    }
                }

            }

            $page_courante++;//on passe a la page suivante

        }

// La structure de la page est différente si il n'y a qu'un seul article!

        foreach ($ids as $id)
	    {

            $page_a_voir = $id.'_comment_1.html?14';//affiche la page de base ou la suivant

	    if ($fp = fopen('http://'.$blogger.'.skyblog.com/'.$page_a_voir,"r"))
		{
                //articles de la page en cours
                while (!feof($fp))
		    {
                    $page = fgets($fp, 4096);

		    $from = nettoie_phrase($page);
		    $from = explode(",",$from);

		    $who = substr($from[0],3);
		    $date = substr($from[1],11);


		    if ((strpos($page,'<p class="title"') !== false))
			{
			$comm = nettoie_phrase (fgets($fp, 4096));
                        echo '<item>'."\n";
			echo '    <page>'.$page_a_voir.'</page>'."\n";
			echo '    <from>'.$who.'</from>'."\n";
			echo '    <date>'.dotimestamp($date).'</date>'."\n";
                        echo '    <description>'.nettoie_phrase($comm).'</description>'."\n";
                        echo '</item>'."\n";
 			flush();
			}
                    }
                }

            }





        //fin du flux
        if ($en_tete) {
            echo '</channel>'."\n";
            echo '</rss>'."\n";
        } else echo "Blog inexistant!";
    }
} else {
    echo 'Veuillez indiquer un blogger'."\n";
}

?>