| 1,457 → 1,491 |
|---|
| <?php |
| /*vim: set expandtab tabstop=4 shiftwidth=4: */ |
| // +------------------------------------------------------------------------------------------------------+ |
| // | PHP version 5.1 | |
| // +------------------------------------------------------------------------------------------------------+ |
| // | Copyright (C) 1999-2006 Tela Botanica (accueil@tela-botanica.org) | |
| // +------------------------------------------------------------------------------------------------------+ |
| // | This file is part of papyrus_bp. | |
| // | | |
| // | Foobar is free software; you can redistribute it and/or modify | |
| // | it under the terms of the GNU General Public License as published by | |
| // | the Free Software Foundation; either version 2 of the License, or | |
| // | (at your option) any later version. | |
| // | | |
| // | Foobar is distributed in the hope that it will be useful, | |
| // | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| // | GNU General Public License for more details. | |
| // | | |
| // | You should have received a copy of the GNU General Public License | |
| // | along with Foobar; if not, write to the Free Software | |
| // | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
| // +------------------------------------------------------------------------------------------------------+ |
| // CVS : $Id: syndication.php,v 1.11 2008-10-29 15:55:56 alexandre_tb Exp $ |
| /** |
| * papyrus_bp - syndication.php |
| * |
| * Description : |
| * |
| *@package papyrus_bp |
| //Auteur original : |
| *@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
| //Autres auteurs : |
| *@author Aucun |
| *@copyright Tela-Botanica 1999-2006 |
| *@version $Revision: 1.11 $ $Date: 2008-10-29 15:55:56 $ |
| // +------------------------------------------------------------------------------------------------------+ |
| */ |
| |
| // +------------------------------------------------------------------------------------------------------+ |
| // | ENTÊTE du PROGRAMME | |
| // +------------------------------------------------------------------------------------------------------+ |
| $GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherSyndication'; |
| $GLOBALS['_GEN_commun']['info_applette_balise'] = '\{\{[Ss]yndication'. |
| '(?:\s*'. |
| '(?:'. |
| '(url="[^"]*")|'. |
| '(titre="[^"]*")|'. |
| '(nb="?\d+"?)|'. |
| '(tailledesc="?\d+"?)|'. |
| '(voirsuite="[^"]*")|'. |
| '(dureecache="?\d+"?)|'. |
| '(id="[^"]*")|'. |
| '(nbmax="?\d+"?)|'. |
| '(nouvellefenetre="?(?:0|1)"?)|'. |
| '(formatdate="[^"]*")|'. |
| '(formatdatepro="[^"]*")|'. |
| '(template=".*")|'. |
| ')'. |
| ')+'. |
| '\s*\}\}'; |
| // +------------------------------------------------------------------------------------------------------+ |
| /** Inclusion du fichier de configuration de cette application.*/ |
| require_once GEN_CHEMIN_APPLETTE.'syndication'.GEN_SEP.'configuration'.GEN_SEP.'synd_configuration.inc.php'; |
| |
| /** Inclusion du fichier de fonctions de cette application.*/ |
| require_once GEN_CHEMIN_APPLETTE.'syndication'.GEN_SEP.'bibliotheque'.GEN_SEP.'syndication.fonct.php'; |
| |
| // Inclusion des fichiers de traduction de l'applette SYND de Papyrus |
| if (file_exists(SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) { |
| /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
| require_once SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php'; |
| } else { |
| /** Inclusion du fichier de traduction par défaut.*/ |
| require_once SYND_CHEMIN_LANGUE.'synd_langue_'.SYND_I18N_DEFAUT.'.inc.php'; |
| } |
| |
| /** Inclusion du fichier de la bibliotheque permettant de manipuler les flux RSS.*/ |
| //require_once(MAGPIE_DIR.'rss_fetch.inc'); |
| require_once PAP_CHEMIN_API_PEAR.'XML/Feed/Parser.php'; |
| // +------------------------------------------------------------------------------------------------------+ |
| // | CORPS du PROGRAMME | |
| // +------------------------------------------------------------------------------------------------------+ |
| /** Fonction afficherSyndication() - Retourne la liste des pages des sites syndiqués. |
| * |
| * Cette fonction retourne la liste des pages des sites syndiqués. |
| * |
| * @param array contient les arguments de la fonction. |
| * @param array tableau global de Papyrus. |
| * @return string XHTML la liste des pages. |
| */ |
| function afficherSyndication($tab_applette_arguments, $_GEN_commun) |
| { |
| // Initialisation des variables |
| $sortie = ''; |
| $GLOBALS['_SYNDICATION_']['erreurs'] = array(); |
| $GLOBALS['_SYNDICATION_']['informations'] = array(); |
| $GLOBALS['_SYNDICATION_']['sites'] = array(); |
| |
| |
| $string_arguments = ""; |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Gestion des arguments |
| $balise = $tab_applette_arguments[0]; |
| $tab_arguments = $tab_applette_arguments; |
| |
| unset($tab_arguments[0]); |
| foreach($tab_arguments as $argument) { |
| if ($argument != '') { |
| $string_arguments .= $argument; |
| $tab_parametres = explode('=', $argument, 2); |
| $options[$tab_parametres[0]] = trim($tab_parametres[1], '"'); |
| } |
| } |
| |
| $id_cache = md5($string_arguments); |
| //Greg : possibilité d'ajouter une durée au cache |
| if (!isset($options['dureecache'])) { |
| $options['dureecache'] = CACHE_LIFETIME; |
| } |
| |
| if($contenu_cache = verifierCache($id_cache, $options['dureecache'])) { |
| return $contenu_cache; |
| } |
| // |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Gestion des erreurs de paramétrage |
| |
| if (!isset($options['url'])) { |
| $GLOBALS['_SYNDICATION_']['erreurs'][] = sprintf(SYND_LG_ERREUR_URL, $balise); |
| } |
| if (!isset($options['titre'])) { |
| $options['titre'] = ''; |
| } |
| if (!isset($options['nb'])) { |
| $options['nb'] = SYND_NOMBRE; |
| } |
| if (!isset($options['nbmax'])) { |
| $options['nbmax'] = SYND_NOMBRE_MAX; |
| } |
| if (!isset($options['nouvellefenetre'])) { |
| $options['nouvellefenetre'] = SYND_OUVRIR_LIEN_RSS_NOUVELLE_FENETRE; |
| } |
| if (!isset($options['formatdate'])) { |
| $options['formatdate'] = SYND_FORMAT_DATE; |
| } |
| if (!isset($options['formatdatepro'])) { |
| $options['formatdatepro'] = false; |
| } |
| if (!isset($options['template'])) { |
| $options['template'] = SYND_CHEMIN_SQUELETTE.SYND_SQUELETTE_LISTE; |
| } else { |
| if (file_exists(SYND_CHEMIN_SQUELETTE.$options['template'])) { |
| $options['template'] = SYND_CHEMIN_SQUELETTE.$options['template']; |
| } |
| } |
| |
| |
| |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Recuperation des donnees |
| if (count($GLOBALS['_SYNDICATION_']['erreurs']) == 0) { |
| $tab_url = array_map('trim', explode(',', $options['url'])); |
| foreach ($tab_url as $cle => $url) { |
| if ($url != '') { |
| $aso_site = array(); |
| // Liste des encodages acceptés pour les flux |
| $encodages = 'UTF-8, ISO-8859-1, ISO-8859-15'; |
| try { |
| $xml = file_get_contents($url); |
| $feed = new XML_Feed_Parser($xml); |
| } catch (XML_Feed_Parser_Exception $e) { |
| creer_cache('erreur', $xml, 86400); |
| return('Le flux RSS est invalide : ' . $e->getMessage()); |
| } |
| |
| if ($options['template'] != '' && !file_exists($options['template'])) { |
| $i = 0 ; |
| $res= ''; |
| foreach ($feed as $item) { |
| // Le test suivant pour savoir s il faut reduire l excendent de description |
| // Si {all} est present dans le template on ne reduit pas |
| if (preg_match ('/{all}/', $options['template'])) { |
| $template = str_replace('{all}', '', $options['template']); |
| $all = true ; |
| } else { |
| $all = false; |
| } |
| if (isset($item->summary)) { |
| $item->description = mb_convert_encoding($item->summary, 'HTML-ENTITIES', $encodages); |
| } else { |
| if (strlen($item->description) > 200 && !$all) { |
| $item->description = substr(mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), 0, 300). |
| '... <a href="'.htmlentities($item->link).'">Lire la suite</a>'; |
| } |
| } |
| if (!isset($item->pubdate)) { |
| $item->pubdate = date('dmY'); |
| } |
| // Le code ci-apres est pour rattraper les dates du type 01012005 parsees par magpie |
| // lorsque les flux donne des dates au format iso |
| if (preg_match('/^([0-3][0-9])([0-1][0-9])([0-9][0-9][0-9][0-9])$/', $item->pubdate, $match)) { |
| $item->pubdate = $match[3].'-'.$match[2].'-'.$match[1]; |
| //echo $item['pubdate']; |
| } |
| $res .= str_replace ('{num}', ++$i, |
| str_replace ('{item}', '<a href="'.htmlentities($item->link).'" target="_top">'.mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages).'</a>', |
| str_replace ('{date}', strftime('%d.%m.%Y',strtotime($item->pubdate)), |
| str_replace ('{description}', mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), $options['template'])))) ; |
| $res .= "\n"; |
| if ($i > $options['nb']) { |
| break; |
| } |
| } |
| return $res; |
| } |
| // Gestion du titre |
| if ( $options['titre'] == '' ) { |
| $aso_site['titre'] = mb_convert_encoding($feed->title, 'HTML-ENTITIES', $encodages); |
| } else if ( $options['titre'] != '0' ) { |
| $aso_site['titre'] = $options['titre']; |
| } |
| |
| //Gestion de l'ID |
| if ( $options['id'] != '' ) { |
| $aso_site['id'] = $options['id']; |
| } |
| |
| //Gestion du lien vers la suite |
| if ( $options['voirsuite'] != '' ) { |
| $aso_site['voirsuite'] = $options['voirsuite']; |
| } |
| |
| // Gestion de l'url du site |
| $aso_site['url'] = htmlentities($feed->link); |
| |
| // Ouverture du lien dans une nouvelle fenetre |
| $aso_site['ext'] = false; |
| if ($options['nouvellefenetre'] == 1) { |
| $aso_site['ext'] = true; |
| } |
| // Gestion des pages syndiquees |
| $i = 0; |
| $nb_item = $feed->numberEntries; |
| |
| foreach ($feed as $item) { |
| |
| if ($options['nb'] != 0 && $nb_item >= $options['nb'] && $i >= $options['nb']) { |
| break; |
| } |
| $i++; |
| |
| $aso_page = array(); |
| $aso_page['site'] = $aso_site; |
| $aso_page['url'] = htmlentities($item->link); |
| $aso_page['titre'] = mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages); |
| $aso_page['description'] = mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages); |
| |
| /* Extraction de l'image si incluse dans description */ |
| $image = ""; |
| $description = $aso_page['description']; |
| |
| $taille = $options['tailledesc']; |
| |
| if (!(strpos($description, '<img') === false)) { |
| $pos_debut = strpos($description, '<img'); |
| $pos_fin_image = strpos($description, '>', $posimage) + 1; |
| $image = substr($description, $pos_debut, ($pos_fin_image - $pos_debut)); |
| $description = substr_replace($description,' ', $pos_debut, ($pos_fin_image - $pos_debut)); |
| } |
| |
| $aso_page['image'] = $image; |
| $aso_page['description_sans_image'] = $description; |
| |
| if ($taille != null) { |
| |
| //Attention : si on coupe simplement, on peut couper une balise en plein milieu. |
| //On va donc vérifier |
| //1. recherche de tags simples <i> ou <b> |
| $description = html_entity_decode($description); |
| $description = strip_tags($description, "<i><b>"); |
| |
| //Va-ton couper un mot ? |
| |
| if ($description[$taille] != ' ' && $description[$taille+1] != ' ' && $description[$taille-1] != ' ') { |
| $strpos = strpos($description, ' ', $taille); |
| if ($strpos === true) { |
| $taille = $strpos; |
| } |
| } |
| |
| |
| $description = substr($description, 0, $taille); |
| $description.='(...)'; |
| |
| $pattern = '#<([ib])[ ]*[a-z]*>(.*?)</\1>#i'; |
| //1. remplacer toutes le s balises fermées |
| $chaine = preg_replace($pattern, '$2', $description); |
| $nb_occurences_i = substr_count($chaine, '<i'); |
| for ($occurences = 0; $occurences < $nb_occurences_i; $occurences++) { |
| $description .= "</i>"; |
| } |
| |
| $nb_occurences_b = substr_count($chaine, '<b'); |
| for ($occurences = 0; $occurences < $nb_occurences_b; $occurences++) { |
| $description .= "</b>"; |
| } |
| } |
| |
| $aso_page['description_light'] = $description; |
| |
| //Greg : ajout GUID |
| $aso_page['guid'] = mb_convert_encoding($item->model->getElementsByTagName('guid')->item(0)->nodeValue, 'HTML-ENTITIES', $encodages); |
| |
| $aso_page['category'] = mb_convert_encoding($item->model->getElementsByTagName('category')->item(0)->nodeValue, 'HTML-ENTITIES', $encodages); |
| $aso_page['author'] = mb_convert_encoding($item->author, 'HTML-ENTITIES', $encodages); |
| |
| |
| $aso_page['date'] = $item->pubDate; |
| if ($options['formatdatepro']) { |
| switch ($options['formatdatepro']) { |
| case 'jm' : |
| $aso_page['date'] = strftime('%d.%m', $aso_page['date']); |
| break; |
| case 'jma' : |
| $aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']); |
| break; |
| case 'jmh' : |
| $aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']); |
| break; |
| case 'jmah' : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| break; |
| default : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| } |
| } else { |
| switch ($options['formatdate']) { |
| case 'jm' : |
| $aso_page['date'] = strftime('%d.%m', $aso_page['date']); |
| break; |
| case 'jma' : |
| $aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']); |
| break; |
| case 'jmh' : |
| $aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']); |
| break; |
| case 'jmah' : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| break; |
| default : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| } |
| } |
| $aso_site['pages'][] = $aso_page; |
| $GLOBALS['_SYNDICATION_']['pages'][strtotime($aso_page['date'])] = $aso_page; |
| } |
| $GLOBALS['_SYNDICATION_']['sites'][] = $aso_site; |
| } |
| } |
| } |
| // Trie des pages par date |
| krsort($GLOBALS['_SYNDICATION_']['pages']); |
| |
| $GLOBALS['_SYNDICATION_']['sites'] = array_slice($GLOBALS['_SYNDICATION_']['sites'],0,$options['nbmax'],true) ; |
| $GLOBALS['_SYNDICATION_']['pages'] = array_slice($GLOBALS['_SYNDICATION_']['pages'],0,$options['nbmax'],true) ; |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Extrait les variables et les ajoutes a l'espace de noms local |
| // Gestion des squelettes |
| extract($GLOBALS['_SYNDICATION_']); |
| // Demarre le buffer |
| ob_start(); |
| // Inclusion du fichier |
| include($options['template']); |
| // Recuperer le contenu du buffer |
| $sortie = ob_get_contents(); |
| creer_cache($id_cache,$sortie, $options['dureecache']); |
| // Arrete et detruit le buffer |
| ob_end_clean(); |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Sortie |
| return $sortie; |
| } |
| |
| function transcribe_cp1252_to_latin1($cp1252) { |
| return strtr( |
| $cp1252, |
| array( |
| "\x80" => "e", "\x81" => " ", "\x82" => "'", "\x83" => 'f', |
| "\x84" => '"', "\x85" => "...", "\x86" => "+", "\x87" => "#", |
| "\x88" => "^", "\x89" => "0/00", "\x8A" => "S", "\x8B" => "<", |
| "\x8C" => "OE", "\x8D" => " ", "\x8E" => "Z", "\x8F" => " ", |
| "\x90" => " ", "\x91" => "`", "\x92" => "'", "\x93" => '"', |
| "\x94" => '"', "\x95" => "*", "\x96" => "-", "\x97" => "--", |
| "\x98" => "~", "\x99" => "(TM)", "\x9A" => "s", "\x9B" => ">", |
| "\x9C" => "oe", "\x9D" => " ", "\x9E" => "z", "\x9F" => "Y")); |
| } |
| |
| /* +--Fin du code ----------------------------------------------------------------------------------------+ |
| * |
| * $Log: not supported by cvs2svn $ |
| * Revision 1.10 2007-12-13 14:10:51 alexandre_tb |
| * Fusion avec la livraison AHA : 13 decembre 2007 |
| * |
| * Revision 1.9 2007-12-03 14:54:14 jp_milcent |
| * Fusion avec la livraison AHA : 3 décembre 2007 |
| * |
| * Revision 1.7.2.2 2007-12-03 14:52:21 jp_milcent |
| * Correction bogue : & dans les urls. |
| * |
| * Revision 1.8 2007-11-30 14:17:30 jp_milcent |
| * Fusion avec la livraison AHA : 30 novembre 2007 |
| * |
| * Revision 1.7.2.1 2007-11-30 14:15:02 jp_milcent |
| * Amélioration du décodage utf8. |
| * |
| * Revision 1.7 2007-07-25 15:09:44 jp_milcent |
| * Fusion avec la livraison Narmer. |
| * |
| * Revision 1.5.2.4 2007-07-25 15:07:52 jp_milcent |
| * Correction problème url. |
| * |
| * Revision 1.5.2.3 2007-07-25 14:50:21 jp_milcent |
| * Corrections, meilleure utilisation de XML_Feed_Parser. |
| * |
| * Revision 1.5.2.2 2007-07-25 09:45:07 jp_milcent |
| * Utilisation de XML_Feed_Parser de Pear pour l'applette Syndication. |
| * |
| * Revision 1.6 2007-06-25 12:15:07 alexandre_tb |
| * merge from narmer |
| * |
| * Revision 1.5.2.1 2007-06-06 15:24:37 jp_milcent |
| * Amélioration de la compatibilité avec les anciennes version des balises de l'applette syndication. |
| * |
| * Revision 1.5 2007-04-20 12:50:18 florian |
| * correction bugs suite au merge |
| * |
| * Revision 1.4 2007/03/28 15:53:27 florian |
| * correction pb date, encodage utf-8 |
| * |
| * Revision 1.3 2007/01/23 14:17:19 alexandre_tb |
| * backport : hack pour rattraper les dates du type 01012005 parsees par magpie |
| * lorsque les flux donne des dates au format iso |
| * |
| * Revision 1.2 2006/12/13 17:20:51 jp_milcent |
| * Correction bogue : paramètre nb non pris en compte |
| * |
| * Revision 1.1 2006/12/13 17:06:36 jp_milcent |
| * Ajout de l'applette Syndication. |
| * |
| * |
| * +-- Fin du code ----------------------------------------------------------------------------------------+ |
| */ |
| ?> |
| <?php |
| /*vim: set expandtab tabstop=4 shiftwidth=4: */ |
| // +------------------------------------------------------------------------------------------------------+ |
| // | PHP version 5.1 | |
| // +------------------------------------------------------------------------------------------------------+ |
| // | Copyright (C) 1999-2006 Tela Botanica (accueil@tela-botanica.org) | |
| // +------------------------------------------------------------------------------------------------------+ |
| // | This file is part of papyrus_bp. | |
| // | | |
| // | Foobar is free software; you can redistribute it and/or modify | |
| // | it under the terms of the GNU General Public License as published by | |
| // | the Free Software Foundation; either version 2 of the License, or | |
| // | (at your option) any later version. | |
| // | | |
| // | Foobar is distributed in the hope that it will be useful, | |
| // | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| // | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| // | GNU General Public License for more details. | |
| // | | |
| // | You should have received a copy of the GNU General Public License | |
| // | along with Foobar; if not, write to the Free Software | |
| // | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
| // +------------------------------------------------------------------------------------------------------+ |
| // CVS : $Id: syndication.php,v 1.11 2008-10-29 15:55:56 alexandre_tb Exp $ |
| /** |
| * papyrus_bp - syndication.php |
| * |
| * Description : |
| * |
| *@package papyrus_bp |
| //Auteur original : |
| *@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
| //Autres auteurs : |
| *@author Aucun |
| *@copyright Tela-Botanica 1999-2006 |
| *@version $Revision: 1.11 $ $Date: 2008-10-29 15:55:56 $ |
| // +------------------------------------------------------------------------------------------------------+ |
| */ |
| |
| // +------------------------------------------------------------------------------------------------------+ |
| // | ENTÊTE du PROGRAMME | |
| // +------------------------------------------------------------------------------------------------------+ |
| $GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherSyndication'; |
| $GLOBALS['_GEN_commun']['info_applette_balise'] = '\{\{[Ss]yndication'. |
| '(?:\s*'. |
| '(?:'. |
| '(url="[^"]*")|'. |
| '(titre="[^"]*")|'. |
| '(nb="?\d+"?)|'. |
| '(tailledesc="?\d+"?)|'. |
| '(voirsuite="[^"]*")|'. |
| '(dureecache="?\d+"?)|'. |
| '(id="[^"]*")|'. |
| '(nbmax="?\d+"?)|'. |
| '(nouvellefenetre="?(?:0|1)"?)|'. |
| '(formatdate="[^"]*")|'. |
| '(formatdatepro="[^"]*")|'. |
| '(template=".*")|'. |
| ')'. |
| ')+'. |
| '\s*\}\}'; |
| // +------------------------------------------------------------------------------------------------------+ |
| /** Inclusion du fichier de configuration de cette application.*/ |
| require_once GEN_CHEMIN_APPLETTE.'syndication'.GEN_SEP.'configuration'.GEN_SEP.'synd_configuration.inc.php'; |
| |
| /** Inclusion du fichier de fonctions de cette application.*/ |
| require_once GEN_CHEMIN_APPLETTE.'syndication'.GEN_SEP.'bibliotheque'.GEN_SEP.'syndication.fonct.php'; |
| |
| // Inclusion des fichiers de traduction de l'applette SYND de Papyrus |
| if (file_exists(SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) { |
| /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
| require_once SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php'; |
| } else { |
| /** Inclusion du fichier de traduction par défaut.*/ |
| require_once SYND_CHEMIN_LANGUE.'synd_langue_'.SYND_I18N_DEFAUT.'.inc.php'; |
| } |
| |
| /** Inclusion du fichier de la bibliotheque permettant de manipuler les flux RSS.*/ |
| //require_once(MAGPIE_DIR.'rss_fetch.inc'); |
| require_once PAP_CHEMIN_API_PEAR.'XML/Feed/Parser.php'; |
| // +------------------------------------------------------------------------------------------------------+ |
| // | CORPS du PROGRAMME | |
| // +------------------------------------------------------------------------------------------------------+ |
| |
| // l'applette est un peu teubée et ne comprend pas certains flux |
| // pourtant valides, par sécurité, on supprime donc certains caractères |
| function supprimerXmlDangereux($xml) |
| { |
| $ret = ""; |
| $encours; |
| if (empty($xml)) |
| { |
| return $ret; |
| } |
| |
| $lg = strlen($xml); |
| for ($i=0; $i < $lg; $i++) |
| { |
| $encours = ord($xml{$i}); |
| if (($encours == 0x9) || |
| ($encours == 0xA) || |
| ($encours == 0xD) || |
| (($encours >= 0x20) && ($encours <= 0xD7FF)) || |
| (($encours >= 0xE000) && ($encours <= 0xFFFD)) || |
| (($encours >= 0x10000) && ($encours <= 0x10FFFF))) |
| { |
| $ret .= chr($encours); |
| } |
| else |
| { |
| $ret .= " "; |
| } |
| } |
| return $ret; |
| } |
| |
| /** Fonction afficherSyndication() - Retourne la liste des pages des sites syndiqués. |
| * |
| * Cette fonction retourne la liste des pages des sites syndiqués. |
| * |
| * @param array contient les arguments de la fonction. |
| * @param array tableau global de Papyrus. |
| * @return string XHTML la liste des pages. |
| */ |
| function afficherSyndication($tab_applette_arguments, $_GEN_commun) |
| { |
| // Initialisation des variables |
| $sortie = ''; |
| $GLOBALS['_SYNDICATION_']['erreurs'] = array(); |
| $GLOBALS['_SYNDICATION_']['informations'] = array(); |
| $GLOBALS['_SYNDICATION_']['sites'] = array(); |
| |
| |
| $string_arguments = ""; |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Gestion des arguments |
| $balise = $tab_applette_arguments[0]; |
| $tab_arguments = $tab_applette_arguments; |
| |
| unset($tab_arguments[0]); |
| foreach($tab_arguments as $argument) { |
| if ($argument != '') { |
| $string_arguments .= $argument; |
| $tab_parametres = explode('=', $argument, 2); |
| $options[$tab_parametres[0]] = trim($tab_parametres[1], '"'); |
| } |
| } |
| |
| $id_cache = md5($string_arguments); |
| //Greg : possibilité d'ajouter une durée au cache |
| if (!isset($options['dureecache'])) { |
| $options['dureecache'] = CACHE_LIFETIME; |
| } |
| |
| if($contenu_cache = verifierCache($id_cache, $options['dureecache'])) { |
| return $contenu_cache; |
| } |
| // |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Gestion des erreurs de paramétrage |
| |
| if (!isset($options['url'])) { |
| $GLOBALS['_SYNDICATION_']['erreurs'][] = sprintf(SYND_LG_ERREUR_URL, $balise); |
| } |
| if (!isset($options['titre'])) { |
| $options['titre'] = ''; |
| } |
| if (!isset($options['nb'])) { |
| $options['nb'] = SYND_NOMBRE; |
| } |
| if (!isset($options['nbmax'])) { |
| $options['nbmax'] = SYND_NOMBRE_MAX; |
| } |
| if (!isset($options['nouvellefenetre'])) { |
| $options['nouvellefenetre'] = SYND_OUVRIR_LIEN_RSS_NOUVELLE_FENETRE; |
| } |
| if (!isset($options['formatdate'])) { |
| $options['formatdate'] = SYND_FORMAT_DATE; |
| } |
| if (!isset($options['formatdatepro'])) { |
| $options['formatdatepro'] = false; |
| } |
| if (!isset($options['template'])) { |
| $options['template'] = SYND_CHEMIN_SQUELETTE.SYND_SQUELETTE_LISTE; |
| } else { |
| if (file_exists(SYND_CHEMIN_SQUELETTE.$options['template'])) { |
| $options['template'] = SYND_CHEMIN_SQUELETTE.$options['template']; |
| } |
| } |
| |
| |
| |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Recuperation des donnees |
| if (count($GLOBALS['_SYNDICATION_']['erreurs']) == 0) { |
| $tab_url = array_map('trim', explode(',', $options['url'])); |
| foreach ($tab_url as $cle => $url) { |
| if ($url != '') { |
| $aso_site = array(); |
| // Liste des encodages acceptés pour les flux |
| $encodages = 'UTF-8, ISO-8859-1, ISO-8859-15'; |
| try { |
| $xml = file_get_contents($url); |
| $xml = supprimerXmlDangereux($xml); |
| $feed = new XML_Feed_Parser($xml); |
| } catch (XML_Feed_Parser_Exception $e) { |
| creer_cache('erreur', $xml, 86400); |
| return('Le flux RSS est invalide : ' . $e->getMessage()); |
| } |
| |
| if ($options['template'] != '' && !file_exists($options['template'])) { |
| $i = 0 ; |
| $res= ''; |
| foreach ($feed as $item) { |
| // Le test suivant pour savoir s il faut reduire l excendent de description |
| // Si {all} est present dans le template on ne reduit pas |
| if (preg_match ('/{all}/', $options['template'])) { |
| $template = str_replace('{all}', '', $options['template']); |
| $all = true ; |
| } else { |
| $all = false; |
| } |
| if (isset($item->summary)) { |
| $item->description = mb_convert_encoding($item->summary, 'HTML-ENTITIES', $encodages); |
| } else { |
| if (strlen($item->description) > 200 && !$all) { |
| $item->description = substr(mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), 0, 300). |
| '... <a href="'.htmlentities($item->link).'">Lire la suite</a>'; |
| } |
| } |
| if (!isset($item->pubdate)) { |
| $item->pubdate = date('dmY'); |
| } |
| // Le code ci-apres est pour rattraper les dates du type 01012005 parsees par magpie |
| // lorsque les flux donne des dates au format iso |
| if (preg_match('/^([0-3][0-9])([0-1][0-9])([0-9][0-9][0-9][0-9])$/', $item->pubdate, $match)) { |
| $item->pubdate = $match[3].'-'.$match[2].'-'.$match[1]; |
| //echo $item['pubdate']; |
| } |
| $res .= str_replace ('{num}', ++$i, |
| str_replace ('{item}', '<a href="'.htmlentities($item->link).'" target="_top">'.mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages).'</a>', |
| str_replace ('{date}', strftime('%d.%m.%Y',strtotime($item->pubdate)), |
| str_replace ('{description}', mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), $options['template'])))) ; |
| $res .= "\n"; |
| if ($i > $options['nb']) { |
| break; |
| } |
| } |
| return $res; |
| } |
| // Gestion du titre |
| if ( $options['titre'] == '' ) { |
| $aso_site['titre'] = mb_convert_encoding($feed->title, 'HTML-ENTITIES', $encodages); |
| } else if ( $options['titre'] != '0' ) { |
| $aso_site['titre'] = $options['titre']; |
| } |
| |
| //Gestion de l'ID |
| if ( $options['id'] != '' ) { |
| $aso_site['id'] = $options['id']; |
| } |
| |
| //Gestion du lien vers la suite |
| if ( $options['voirsuite'] != '' ) { |
| $aso_site['voirsuite'] = $options['voirsuite']; |
| } |
| |
| // Gestion de l'url du site |
| $aso_site['url'] = htmlentities($feed->link); |
| |
| // Ouverture du lien dans une nouvelle fenetre |
| $aso_site['ext'] = false; |
| if ($options['nouvellefenetre'] == 1) { |
| $aso_site['ext'] = true; |
| } |
| // Gestion des pages syndiquees |
| $i = 0; |
| $nb_item = $feed->numberEntries; |
| |
| foreach ($feed as $item) { |
| |
| if ($options['nb'] != 0 && $nb_item >= $options['nb'] && $i >= $options['nb']) { |
| break; |
| } |
| $i++; |
| |
| $aso_page = array(); |
| $aso_page['site'] = $aso_site; |
| $aso_page['url'] = htmlentities($item->link); |
| $aso_page['titre'] = mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages); |
| $aso_page['description'] = mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages); |
| |
| /* Extraction de l'image si incluse dans description */ |
| $image = ""; |
| $description = $aso_page['description']; |
| |
| $taille = $options['tailledesc']; |
| |
| if (!(strpos($description, '<img') === false)) { |
| $pos_debut = strpos($description, '<img'); |
| $pos_fin_image = strpos($description, '>', $posimage) + 1; |
| $image = substr($description, $pos_debut, ($pos_fin_image - $pos_debut)); |
| $description = substr_replace($description,' ', $pos_debut, ($pos_fin_image - $pos_debut)); |
| } |
| |
| $aso_page['image'] = $image; |
| $aso_page['description_sans_image'] = $description; |
| |
| if ($taille != null) { |
| |
| //Attention : si on coupe simplement, on peut couper une balise en plein milieu. |
| //On va donc vérifier |
| //1. recherche de tags simples <i> ou <b> |
| $description = html_entity_decode($description); |
| $description = strip_tags($description, "<i><b>"); |
| |
| //Va-ton couper un mot ? |
| |
| if ($description[$taille] != ' ' && $description[$taille+1] != ' ' && $description[$taille-1] != ' ') { |
| $strpos = strpos($description, ' ', $taille); |
| if ($strpos === true) { |
| $taille = $strpos; |
| } |
| } |
| |
| |
| $description = substr($description, 0, $taille); |
| $description.='(...)'; |
| |
| $pattern = '#<([ib])[ ]*[a-z]*>(.*?)</\1>#i'; |
| //1. remplacer toutes le s balises fermées |
| $chaine = preg_replace($pattern, '$2', $description); |
| $nb_occurences_i = substr_count($chaine, '<i'); |
| for ($occurences = 0; $occurences < $nb_occurences_i; $occurences++) { |
| $description .= "</i>"; |
| } |
| |
| $nb_occurences_b = substr_count($chaine, '<b'); |
| for ($occurences = 0; $occurences < $nb_occurences_b; $occurences++) { |
| $description .= "</b>"; |
| } |
| } |
| |
| $aso_page['description_light'] = $description; |
| |
| //Greg : ajout GUID |
| $aso_page['guid'] = mb_convert_encoding($item->model->getElementsByTagName('guid')->item(0)->nodeValue, 'HTML-ENTITIES', $encodages); |
| |
| $aso_page['category'] = mb_convert_encoding($item->model->getElementsByTagName('category')->item(0)->nodeValue, 'HTML-ENTITIES', $encodages); |
| $aso_page['author'] = mb_convert_encoding($item->author, 'HTML-ENTITIES', $encodages); |
| |
| |
| $aso_page['date'] = $item->pubDate; |
| if ($options['formatdatepro']) { |
| switch ($options['formatdatepro']) { |
| case 'jm' : |
| $aso_page['date'] = strftime('%d.%m', $aso_page['date']); |
| break; |
| case 'jma' : |
| $aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']); |
| break; |
| case 'jmh' : |
| $aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']); |
| break; |
| case 'jmah' : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| break; |
| default : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| } |
| } else { |
| switch ($options['formatdate']) { |
| case 'jm' : |
| $aso_page['date'] = strftime('%d.%m', $aso_page['date']); |
| break; |
| case 'jma' : |
| $aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']); |
| break; |
| case 'jmh' : |
| $aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']); |
| break; |
| case 'jmah' : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| break; |
| default : |
| $aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']); |
| } |
| } |
| $aso_site['pages'][] = $aso_page; |
| $GLOBALS['_SYNDICATION_']['pages'][strtotime($aso_page['date'])] = $aso_page; |
| } |
| $GLOBALS['_SYNDICATION_']['sites'][] = $aso_site; |
| } |
| } |
| } |
| // Trie des pages par date |
| krsort($GLOBALS['_SYNDICATION_']['pages']); |
| |
| $GLOBALS['_SYNDICATION_']['sites'] = array_slice($GLOBALS['_SYNDICATION_']['sites'],0,$options['nbmax'],true) ; |
| $GLOBALS['_SYNDICATION_']['pages'] = array_slice($GLOBALS['_SYNDICATION_']['pages'],0,$options['nbmax'],true) ; |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Extrait les variables et les ajoutes a l'espace de noms local |
| // Gestion des squelettes |
| extract($GLOBALS['_SYNDICATION_']); |
| // Demarre le buffer |
| ob_start(); |
| // Inclusion du fichier |
| include($options['template']); |
| // Recuperer le contenu du buffer |
| $sortie = ob_get_contents(); |
| creer_cache($id_cache,$sortie, $options['dureecache']); |
| // Arrete et detruit le buffer |
| ob_end_clean(); |
| |
| //+----------------------------------------------------------------------------------------------------------------+ |
| // Sortie |
| return $sortie; |
| } |
| |
| function transcribe_cp1252_to_latin1($cp1252) { |
| return strtr( |
| $cp1252, |
| array( |
| "\x80" => "e", "\x81" => " ", "\x82" => "'", "\x83" => 'f', |
| "\x84" => '"', "\x85" => "...", "\x86" => "+", "\x87" => "#", |
| "\x88" => "^", "\x89" => "0/00", "\x8A" => "S", "\x8B" => "<", |
| "\x8C" => "OE", "\x8D" => " ", "\x8E" => "Z", "\x8F" => " ", |
| "\x90" => " ", "\x91" => "`", "\x92" => "'", "\x93" => '"', |
| "\x94" => '"', "\x95" => "*", "\x96" => "-", "\x97" => "--", |
| "\x98" => "~", "\x99" => "(TM)", "\x9A" => "s", "\x9B" => ">", |
| "\x9C" => "oe", "\x9D" => " ", "\x9E" => "z", "\x9F" => "Y")); |
| } |
| |
| /* +--Fin du code ----------------------------------------------------------------------------------------+ |
| * |
| * $Log: not supported by cvs2svn $ |
| * Revision 1.10 2007-12-13 14:10:51 alexandre_tb |
| * Fusion avec la livraison AHA : 13 decembre 2007 |
| * |
| * Revision 1.9 2007-12-03 14:54:14 jp_milcent |
| * Fusion avec la livraison AHA : 3 décembre 2007 |
| * |
| * Revision 1.7.2.2 2007-12-03 14:52:21 jp_milcent |
| * Correction bogue : & dans les urls. |
| * |
| * Revision 1.8 2007-11-30 14:17:30 jp_milcent |
| * Fusion avec la livraison AHA : 30 novembre 2007 |
| * |
| * Revision 1.7.2.1 2007-11-30 14:15:02 jp_milcent |
| * Amélioration du décodage utf8. |
| * |
| * Revision 1.7 2007-07-25 15:09:44 jp_milcent |
| * Fusion avec la livraison Narmer. |
| * |
| * Revision 1.5.2.4 2007-07-25 15:07:52 jp_milcent |
| * Correction problème url. |
| * |
| * Revision 1.5.2.3 2007-07-25 14:50:21 jp_milcent |
| * Corrections, meilleure utilisation de XML_Feed_Parser. |
| * |
| * Revision 1.5.2.2 2007-07-25 09:45:07 jp_milcent |
| * Utilisation de XML_Feed_Parser de Pear pour l'applette Syndication. |
| * |
| * Revision 1.6 2007-06-25 12:15:07 alexandre_tb |
| * merge from narmer |
| * |
| * Revision 1.5.2.1 2007-06-06 15:24:37 jp_milcent |
| * Amélioration de la compatibilité avec les anciennes version des balises de l'applette syndication. |
| * |
| * Revision 1.5 2007-04-20 12:50:18 florian |
| * correction bugs suite au merge |
| * |
| * Revision 1.4 2007/03/28 15:53:27 florian |
| * correction pb date, encodage utf-8 |
| * |
| * Revision 1.3 2007/01/23 14:17:19 alexandre_tb |
| * backport : hack pour rattraper les dates du type 01012005 parsees par magpie |
| * lorsque les flux donne des dates au format iso |
| * |
| * Revision 1.2 2006/12/13 17:20:51 jp_milcent |
| * Correction bogue : paramètre nb non pris en compte |
| * |
| * Revision 1.1 2006/12/13 17:06:36 jp_milcent |
| * Ajout de l'applette Syndication. |
| * |
| * |
| * +-- Fin du code ----------------------------------------------------------------------------------------+ |
| */ |
| ?> |