Subversion Repositories Sites.tela-botanica.org

Rev

Rev 609 | Blame | Compare with Previous | Last modification | View Log | RSS feed

<?php

/***************************************************************************\
 *  SPIP, Systeme de publication pour l'internet                           *
 *                                                                         *
 *  Copyright (c) 2001-2005                                                *
 *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
 *                                                                         *
 *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
 *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
\***************************************************************************/


//
// Ce fichier ne sera execute qu'une fois
if (defined("_INC_RSS")) return;
define("_INC_RSS", "1");


// mais d'abord un tri par date (inverse)
function trier_par_date($a, $b) {
        return ($a['date'] < $b['date']);
}


//
// Prend un tableau et l'affiche au format rss
// (fonction inverse de analyser_backend)
// A completer (il manque des tests, des valeurs par defaut, les enclosures,
// differents formats de sortie, etc.)
//
function affiche_rss($rss, $intro = '', $fmt='') {
        if (!$fmt) $fmt = 'rss';
        if (function_exists($f = 'affiche_rss_'.$fmt)) {
                return $f($rss, $intro);
        }
        else
                spip_log("Format $fmt inconnu");
}

function affiche_rss_rss($rss, $intro = '') {
        // entetes
        $u = '<'.'?xml version="1.0" encoding="'.lire_meta('charset').'"?'.">\n";

        $u .= '
<rss version="0.91" xmlns:dc="http://purl.org/dc/elements/1.1/">
<channel>
        <title>'.texte_backend($intro['title']).'</title>
        <link>'.texte_backend(url_absolue($intro['url'])).'</link>
        <description>'.texte_backend($intro['description']).'</description>
        <language>'.texte_backend($intro['language']).'</language>
        ';

        // elements
        if (is_array($rss)) {
                usort($rss, 'trier_par_date');
                foreach ($rss as $article) {
                        if ($article['email'])
                                $article['author'].=' &lt;'.$article['email'].'&gt;';
                        $u .= '
        <item>
                <title>'.texte_backend($article['title']).'</title>
                <link>'.texte_backend(url_absolue($article['url'])).'</link>
                <date>'.texte_backend($article['date']).'</date>
                <description>'.
                        texte_backend(liens_absolus($article['description']))
                .'</description>
                <author>'.texte_backend($article['author']).'</author>
                <dc:date>'.date_iso($article['date']).'</dc:date>
                <dc:format>text/html</dc:format>
                <dc:language>'.texte_backend($article['lang']).'</dc:language>
                <dc:creator>'.texte_backend($article['author']).'</dc:creator>
        </item>
';
                }
        }

        // pied
        $u .= '
        </channel>
</rss>
';

        return array($u, 'Content-Type: text/xml; charset='.lire_meta('charset'));
}

function affiche_rss_ical($rss, $intro = '') {

        // entetes
        $u =
'BEGIN:VCALENDAR
CALSCALE:GREGORIAN
X-WR-CALNAME;VALUE=TEXT:'.filtrer_ical($intro['title']).'
X-WR-RELCALID:'.filtrer_ical(url_absolue($intro['url'])).'
';

        // elements
        if (is_array($rss)) {
                usort($rss, 'trier_par_date');
                foreach ($rss as $article) {

                        // Regler la date de fin a h+60min
                        if (!$article['enddate'])
                                $article['enddate'] = date_ical($article['date'],60);
                        else
                                $article['enddate'] = date_ical($article['enddate']);

                        // Type d'evenement
                        if ($article['type'] == 'todo')
                                $type = 'VTODO';
                        else
                                $type = 'VEVENT';

                        $u .=
'BEGIN:'.$type.'
SUMMARY:'.filtrer_ical($article['title']).'
URL:'.filtrer_ical(url_absolue($article['url'])).'
DTSTAMP:'. date_ical($article['date']).'
DTSTART:'. date_ical($article['date']).'
DTEND:'. $article['enddate'].'
DESCRIPTION:'.filtrer_ical(liens_absolus($article['description'])).'
ORGANIZER:'.filtrer_ical($article['author']).'
CATEGORIES:--
END:'.$type.'
';
                }
        }

        // pied
        $u .= 'END:VCALENDAR';

        return array($u, 'Content-Type: text/calendar; charset=utf-8');
}


//
// Creer un bouton qui renvoie vers la bonne url spip_rss
function bouton_spip_rss($op, $args, $fmt='rss') {
        include_ecrire("inc_acces.php3");

        if (is_array($args))
                foreach ($args as $val => $var)
                        if ($var) $a .= $val.'-'.$var.':';
        $a = substr($a,0,-1);

        $link = new Link("spip_rss.php?op=$op");
        if ($a) $link->addVar('args', $a);
        $link->addVar('id', $GLOBALS['connect_id_auteur']);
        $cle = afficher_low_sec($GLOBALS['connect_id_auteur'], "rss $op $a");
        $link->addVar('cle', $cle);
        $link->addVar('lang', $GLOBALS['spip_lang']);

        $url = $link->getUrl();

        switch($fmt) {
                case 'ical':
                        $url = preg_replace(',^.*?://,', 'webcal://', url_absolue($url))
                        . "&amp;fmt=ical";
                        $button = 'iCal';
                        break;
                case 'rss':
                default:
                        $url = url_absolue($url);
                        $button = 'RSS';
                        break;
        }

        return "<a href='"
        . $url
        . "'>"
        . '<span class="rss-button">'.$button.'</span>'
        . "</a>";
}





//
// Fonctions de remplissage du RSS
//


// Suivi des revisions d'articles
function rss_suivi_versions($a) {
        include_ecrire("inc_suivi_revisions.php");
        include_ecrire("lab_revisions.php");
        include_ecrire("lab_diff.php");
        include_ecrire("inc_presentation.php3");
        $rss = afficher_suivi_versions (0, $a['id_secteur'], $a['id_auteur'], $a['lang_choisie'], true, true);
        return $rss;
}

// Suivi des forums
function rss_suivi_forums($a, $query_forum='', $lien_moderation=false) {
        include_ecrire("inc_forum.php3");

        $result_forum = spip_query("
        SELECT  *
        FROM    spip_forum
        WHERE " . $query_forum . "
        ORDER BY date_heure DESC LIMIT 0,20"
        );

        while ($t = spip_fetch_array($result_forum)) {
                $item = array();
                $item['title'] = typo($t['titre']);
                if ($a['page'] == 'public'
                AND $t['statut']<>'publie'
                )
                        $item['title'] .= ' ('.$t['statut'].')';
                $item['date'] = $t['date_heure'];
                $item['author'] = $t['auteur'];
                $item['email'] = $t['email_auteur'];

                if ($lien_moderation)
                        $item['url'] = _DIR_RESTREINT_ABS
                        .'controle_forum.php3?page='.$a['page']
                        .'&debut_id_forum='.$t['id_forum'];
                else
                        $item['url'] = generer_url_forum($t['id_forum']);

                $item['description'] = propre($t['texte']);
                if ($GLOBALS['les_notes']) {
                        $item['description'] .= '<hr />'.$GLOBALS['les_notes'];
                        $GLOBALS['les_notes'] = '';
                }
                if ($t['nom_site'] OR vider_url($t['url_site']))
                        $item['description'] .= propre("\n- [".$t['nom_site']."->".$t['url_site']."]<br />");

                $rss[] = $item;
        }

        return $rss;
}



// Suivi de la messagerie privee
function rss_suivi_messagerie($a) {
        $rss = array();

        // 1. les messages
        $s = spip_query("SELECT * FROM spip_messages AS messages,
        spip_auteurs_messages AS lien WHERE lien.id_auteur=".$a['id_auteur']
        ." AND lien.id_message=messages.id_message
        GROUP BY messages.id_message ORDER BY messages.date_heure DESC");
        while ($t = spip_fetch_array($s)) {
                if ($compte++<10) {
                        $auteur = spip_fetch_array(spip_query("SELECT
                        auteurs.nom AS nom, auteurs.email AS email
                        FROM spip_auteurs AS auteurs,
                        spip_auteurs_messages AS lien
                        WHERE lien.id_message=".$t['id_message']."
                        AND lien.id_auteur!=".$t['id_auteur']."
                        AND lien.id_auteur = auteurs.id_auteur"));
                        $item = array(
                                'title' => typo($t['titre']),
                                'date' => $t['date_heure'],
                                'author' => typo($auteur['nom']),
                                'email' => $auteur['email'],
                                'description' => propre($t['texte']),
                                'url' => _DIR_RESTREINT_ABS
                                        .'message.php3?id_message='.$t['id_message']
                        );
                        $rss[] = $item;
                }
                $messages_vus[] = $t['id_message'];
        }

        // 2. les reponses aux messages
        if ($messages_vus) {
                $s = spip_query("SELECT * FROM spip_forum WHERE id_message
                IN (".join(',', $messages_vus).")
                ORDER BY date_heure DESC LIMIT 0,10");

                while ($t = spip_fetch_array($s)) {
                        $item = array(
                                'title' => typo($t['titre']),
                                'date' => $t['date_heure'],
                                'description' => propre($t['texte']),
                                'author' => typo($t['auteur']),
                                'email' => $t['email_auteur'],
                                'url' => _DIR_RESTREINT_ABS
                                        .'message.php3?id_message='.$t['id_message']
                                        .'#'.$t['id_forum']
                        );
                        $rss[] = $item;
                }
        }

        return $rss;
}

// Suivi de la page "a suivre" : articles, breves, sites proposes et publies
function rss_a_suivre($a) {
        $rss_articles = rss_articles("statut = 'prop'");
        $rss_breves = rss_breves("statut = 'prop'");
        $rss_sites = rss_sites("statut = 'prop'");

        return array_merge($rss_articles, $rss_breves, $rss_sites);
}

function rss_articles($critere) {
        $s = spip_query("SELECT * FROM spip_articles WHERE $critere
        ORDER BY date DESC LIMIT 0,10");
        while ($t = spip_fetch_array($s)) {
                $auteur = spip_fetch_array(spip_query("SELECT
                        auteurs.nom AS nom, auteurs.email AS email
                        FROM spip_auteurs AS auteurs,
                        spip_auteurs_articles AS lien
                        WHERE lien.id_article=".$t['id_article']."
                        AND lien.id_auteur = auteurs.id_auteur"));
                $item = array(
                        'title' => typo($t['titre']),
                        'date' => $t['date'],
                        'author' => typo($auteur['nom']),
                        'email' => $auteur['email'],
                        'description' => propre(couper("{{".$t['chapo']."}}\n\n".$t['texte'],300)),
                        'url' => _DIR_RESTREINT_ABS
                                .'articles.php3?id_article='.$t['id_article']
                );
                if ($t['statut'] == 'prop')
                        $item['title'] = _T('info_article_propose').' : '.$item['title'];

                $rss[] = $item;
        }
        return $rss;
}


function rss_breves($critere) {
        $s = spip_query("SELECT * FROM spip_breves WHERE $critere
        ORDER BY date_heure DESC LIMIT 0,10");
        while ($t = spip_fetch_array($s)) {
                $item = array(
                        'title' => typo($t['titre']),
                        'date' => $t['date_heure'],
                        'description' => propre(couper($t['texte'],300)),
                        'url' => _DIR_RESTREINT_ABS
                                .'breves_voir.php3?id_breve='.$t['id_breve']
                );
                if ($t['statut'] == 'prop')
                        $item['title'] = _T('titre_breve_proposee').' : '.$item['title'];

                $rss[] = $item;
        }
        return $rss;
}


function rss_sites($critere) {
        $s = spip_query("SELECT * FROM spip_syndic WHERE $critere
        ORDER BY date DESC LIMIT 0,10");
        while ($t = spip_fetch_array($s)) {
                $item = array(
                        'title' => typo($t['titre']." ".$t['url_site']),
                        'date' => $t['date'],
                        'description' => propre(couper($t['texte'],300)),
                        'url' => _DIR_RESTREINT_ABS
                                .'sites.php3?id_syndic='.$t['id_syndic']
                );
                if ($t['statut'] == 'prop')
                        $item['title'] = _T('info_site_attente').' : '.$item['title'];

                $rss[] = $item;
        }
        return $rss;
}


?>