Subversion Repositories Applications.papyrus

Rev

Details | Last modification | View Log | RSS feed

Rev Author Line No. Line
1165 jp_milcent 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 5.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 1999-2006 Tela Botanica (accueil@tela-botanica.org)                                    |
7 
// +------------------------------------------------------------------------------------------------------+
1283 florian 8 
// | This file is part of papyrus_bp.                                                                     |
1165 jp_milcent 9 
// |                                                                                                      |
10 
// | Foobar is free software; you can redistribute it and/or modify                                       |
11 
// | it under the terms of the GNU General Public License as published by                                 |
12 
// | the Free Software Foundation; either version 2 of the License, or                                    |
13 
// | (at your option) any later version.                                                                  |
14 
// |                                                                                                      |
15 
// | Foobar is distributed in the hope that it will be useful,                                            |
16 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18 
// | GNU General Public License for more details.                                                         |
19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
1766 alexandre_ 24 
// CVS : $Id: syndication.php,v 1.7.2.3 2007-12-13 14:09:02 alexandre_tb Exp $
1165 jp_milcent 25 
/**
26 
* papyrus_bp - syndication.php
27 
*
28 
* Description :
29 
*
30 
*@package papyrus_bp
31 
//Auteur original :
32 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
33 
//Autres auteurs :
34 
*@author        Aucun
35 
*@copyright     Tela-Botanica 1999-2006
1766 alexandre_ 36 
*@version       $Revision: 1.7.2.3 $ $Date: 2007-12-13 14:09:02 $
1165 jp_milcent 37 
// +------------------------------------------------------------------------------------------------------+
38 
*/
39 
 
40 
// +------------------------------------------------------------------------------------------------------+
41 
// |                                            ENTÊTE du PROGRAMME                                       |
42 
// +------------------------------------------------------------------------------------------------------+
43 
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherSyndication';
44 
$GLOBALS['_GEN_commun']['info_applette_balise'] = 	'\{\{[Ss]yndication'.
45 
													'(?:\s*'.
46 
														'(?:'.
47 
															'(url="[^"]*")|'.
48 
															'(titre="[^"]*")|'.
1471 alexandre_ 49 
															'(nb="?\d+"?)|'.
50 
															'(nouvellefenetre="?(?:0|1)"?)|'.
1165 jp_milcent 51 
															'(formatdate="[^"]*")|'.
52 
															'(formatdatepro="[^"]*")|'.
1471 alexandre_ 53 
															'(template=".*")|'.
1165 jp_milcent 54 
														')'.
55 
													')+'.
56 
													'\s*\}\}';
57 
// +------------------------------------------------------------------------------------------------------+
58 
/** Inclusion du fichier de configuration de cette application.*/
59 
require_once GEN_CHEMIN_APPLETTE.'syndication'.GEN_SEP.'configuration'.GEN_SEP.'synd_configuration.inc.php';
60 
 
61 
// Inclusion des fichiers de traduction de l'applette SYND de Papyrus
62 
if (file_exists(SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) {
63 
    /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/
64 
    require_once SYND_CHEMIN_LANGUE.'synd_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php';
65 
} else {
66 
    /** Inclusion du fichier de traduction par défaut.*/
67 
    require_once SYND_CHEMIN_LANGUE.'synd_langue_'.SYND_I18N_DEFAUT.'.inc.php';
68 
}
69 
/** Inclusion du fichier de la bibliotheque permettant de manipuler les flux RSS.*/
1283 florian 70 
//require_once(MAGPIE_DIR.'rss_fetch.inc');
1529 jp_milcent 71 
require_once PAP_CHEMIN_API_PEAR.'XML/Feed/Parser.php';
1165 jp_milcent 72 
// +------------------------------------------------------------------------------------------------------+
73 
// |                                            CORPS du PROGRAMME                                        |
74 
// +------------------------------------------------------------------------------------------------------+
75 
/** Fonction afficherSyndication() - Retourne la liste des pages des sites syndiqués.
76 
*
77 
* Cette fonction retourne la liste des pages des sites syndiqués.
78 
*
79 
* @param  array contient les arguments de la fonction.
80 
* @param  array  tableau global de Papyrus.
81 
* @return string XHTML la liste des pages.
82 
*/
83 
function afficherSyndication($tab_applette_arguments, $_GEN_commun)
84 
{
85 
	// Initialisation des variables
86 
    $sortie = '';
87 
	$GLOBALS['_SYNDICATION_']['erreurs'] = array();
88 
	$GLOBALS['_SYNDICATION_']['informations'] = array();
89 
	$GLOBALS['_SYNDICATION_']['sites'] = array();
90 
 
91 
	//+----------------------------------------------------------------------------------------------------------------+
92 
	// Gestion des arguments
93 
	$balise = $tab_applette_arguments[0];
94 
    $tab_arguments = $tab_applette_arguments;
95 
	unset($tab_arguments[0]);
96 
    foreach($tab_arguments as $argument) {
97 
    	if ($argument != '') {
1283 florian 98 
	    	$tab_parametres = explode('=', $argument, 2);
1165 jp_milcent 99 
	    	$options[$tab_parametres[0]] = trim($tab_parametres[1], '"');
100 
    	}
101 
    }
102 
 
103 
	//+----------------------------------------------------------------------------------------------------------------+
1283 florian 104 
    // Gestion des erreurs de paramétrage
1165 jp_milcent 105 
	if (!isset($options['url'])) {
106 
		$GLOBALS['_SYNDICATION_']['erreurs'][] = sprintf(SYND_LG_ERREUR_URL, $balise);
107 
	}
108 
	if (!isset($options['titre'])) {
109 
		$options['titre'] = '';
110 
	}
111 
	if (!isset($options['nb'])) {
112 
		$options['nb'] = SYND_NOMBRE;
113 
	}
114 
    if (!isset($options['nouvellefenetre'])) {
115 
		$options['nouvellefenetre'] = SYND_OUVRIR_LIEN_RSS_NOUVELLE_FENETRE;
116 
	}
117 
	if (!isset($options['formatdate'])) {
118 
		$options['formatdate'] = SYND_FORMAT_DATE;
119 
	}
120 
	if (!isset($options['formatdatepro'])) {
1471 alexandre_ 121 
		$options['formatdatepro'] = false;
1165 jp_milcent 122 
	}
123 
	if (!isset($options['template'])) {
124 
		$options['template'] = SYND_CHEMIN_SQUELETTE.SYND_SQUELETTE_LISTE;
125 
	} else {
126 
		if (file_exists(SYND_CHEMIN_SQUELETTE.$options['template'])) {
127 
			$options['template'] = SYND_CHEMIN_SQUELETTE.$options['template'];
128 
		}
129 
	}
130 
 
131 
    //+----------------------------------------------------------------------------------------------------------------+
1283 florian 132 
    // Recuperation des donnees
1165 jp_milcent 133 
    if (count($GLOBALS['_SYNDICATION_']['erreurs']) == 0) {
134 
		$tab_url = array_map('trim', explode(',', $options['url']));
135 
        foreach ($tab_url as $cle => $url) {
136 
			if ($url != '') {
137 
				$aso_site = array();
1744 jp_milcent 138 
				// Liste des encodages acceptés pour les flux
139 
				$encodages = 'UTF-8, ISO-8859-1, ISO-8859-15';
1529 jp_milcent 140 
				try {
141 
					$feed = new XML_Feed_Parser(file_get_contents($url));
142 
				} catch (XML_Feed_Parser_Exception $e) {
1766 alexandre_ 143 
					return('Le flux RSS est invalide : ' . $e->getMessage());
1529 jp_milcent 144 
				}
145 
 
1165 jp_milcent 146 
				if ($options['template'] != '' && !file_exists($options['template'])) {
147 
					$i = 0 ;
148 
					$res= '';
1529 jp_milcent 149 
					foreach ($feed as $item) {
1165 jp_milcent 150 
						// Le test suivant pour savoir s il faut reduire l excendent de description
151 
						// Si {all} est present dans le template on ne reduit pas
152 
						if (preg_match ('/{all}/', $options['template'])) {
153 
							$template = str_replace('{all}', '', $options['template']);
154 
							$all = true ;
155 
						} else {
156 
							$all = false;
157 
						}
1529 jp_milcent 158 
						if (isset($item->summary)) {
1744 jp_milcent 159 
							$item->description = mb_convert_encoding($item->summary, 'HTML-ENTITIES', $encodages);
1165 jp_milcent 160 
						} else {
1529 jp_milcent 161 
							if (strlen($item->description) > 200 && !$all) {
1744 jp_milcent 162 
								$item->description = 	substr(mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), 0, 300).
163 
														'... <a href="'.htmlentities($item->link).'">Lire la suite</a>';
1165 jp_milcent 164 
							}
165 
						}
1529 jp_milcent 166 
						if (!isset($item->pubdate)) {
167 
							$item->pubdate = date('dmY');
1165 jp_milcent 168 
						}
1204 alexandre_ 169 
						// Le code ci-apres est pour rattraper les dates du type 01012005 parsees par magpie
170 
						// lorsque les flux donne des dates au format iso
1529 jp_milcent 171 
						if (preg_match('/^([0-3][0-9])([0-1][0-9])([0-9][0-9][0-9][0-9])$/', $item->pubdate, $match)) {
172 
							$item->pubdate = $match[3].'-'.$match[2].'-'.$match[1];
1204 alexandre_ 173 
							//echo $item['pubdate'];
174 
						}
1165 jp_milcent 175 
						$res .= str_replace ('{num}', ++$i,
1744 jp_milcent 176 
								str_replace ('{item}', '<a href="'.htmlentities($item->link).'" target="_top">'.mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages).'</a>',
1529 jp_milcent 177 
								str_replace ('{date}', strftime('%d.%m.%Y',strtotime($item->pubdate)),
1744 jp_milcent 178 
								str_replace ('{description}', mb_convert_encoding($item->description, 'HTML-ENTITIES', $encodages), $options['template'])))) ;
1165 jp_milcent 179 
						$res .= "\n";
180 
						if ($i > $options['nb']) {
181 
							break;
182 
						}
183 
					}
184 
					return $res;
185 
				}
186 
				// Gestion du titre
187 
				if ( $options['titre'] == '' ) {
1744 jp_milcent 188 
					$aso_site['titre'] = mb_convert_encoding($feed->title, 'HTML-ENTITIES', $encodages);
1165 jp_milcent 189 
				} else if ( $options['titre'] != '0' ) {
1529 jp_milcent 190 
					$aso_site['titre'] = $options['titre'];
1165 jp_milcent 191 
				}
192 
				// Gestion de l'url du site
1529 jp_milcent 193 
				$aso_site['url'] = htmlentities($feed->link);
194 
 
1283 florian 195 
				// Ouverture du lien dans une nouvelle fenetre
1165 jp_milcent 196 
				$aso_site['ext'] = false;
197 
				if ($options['nouvellefenetre'] == 1) {
198 
					$aso_site['ext'] = true;
199 
				}
1283 florian 200 
				// Gestion des pages syndiquees
1165 jp_milcent 201 
				$i = 0;
1529 jp_milcent 202 
			    $nb_item = $feed->numberEntries;
203 
				foreach ($feed as $item) {
204 
					//echo '<pre>'.print_r($item, true).'</pre>';
1170 jp_milcent 205 
					if ($options['nb'] != 0 && $nb_item >= $options['nb'] && $i >= $options['nb']) {
206 
						break;
207 
					}
208 
					$i++;
1165 jp_milcent 209 
					$aso_page = array();
210 
					$aso_page['site'] = $aso_site;
1744 jp_milcent 211 
					$aso_page['url'] = htmlentities($item->link);
212 
					$aso_page['titre'] = mb_convert_encoding($item->title, 'HTML-ENTITIES', $encodages);
1529 jp_milcent 213 
					$aso_page['date'] = $item->pubDate;
1165 jp_milcent 214 
					if ($options['formatdatepro']) {
1283 florian 215 
						switch ($options['formatdatepro']) {
216 
							case 'jm' :
1529 jp_milcent 217 
								$aso_page['date'] = strftime('%d.%m', $aso_page['date']);
1283 florian 218 
								break;
219 
							case 'jma' :
1529 jp_milcent 220 
								$aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']);
1283 florian 221 
								break;
222 
							case 'jmh' :
1529 jp_milcent 223 
								$aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']);
1283 florian 224 
								break;
225 
							case 'jmah' :
1529 jp_milcent 226 
								$aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']);
1283 florian 227 
								break;
228 
							default :
1529 jp_milcent 229 
								$aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']);
1283 florian 230 
						}
1165 jp_milcent 231 
					} else {
232 
						switch ($options['formatdate']) {
233 
							case 'jm' :
1529 jp_milcent 234 
								$aso_page['date'] = strftime('%d.%m', $aso_page['date']);
1165 jp_milcent 235 
								break;
236 
							case 'jma' :
1529 jp_milcent 237 
								$aso_page['date'] = strftime('%d.%m.%Y', $aso_page['date']);
1165 jp_milcent 238 
								break;
239 
							case 'jmh' :
1529 jp_milcent 240 
								$aso_page['date'] = strftime('%d.%m %H:%M', $aso_page['date']);
1165 jp_milcent 241 
								break;
242 
							case 'jmah' :
1529 jp_milcent 243 
								$aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']);
1165 jp_milcent 244 
								break;
245 
							default :
1529 jp_milcent 246 
								$aso_page['date'] = strftime('%d.%m.%Y %H:%M', $aso_page['date']);
1165 jp_milcent 247 
						}
248 
					}
249 
					$aso_site['pages'][] = $aso_page;
250 
					$GLOBALS['_SYNDICATION_']['pages'][strtotime($aso_page['date'])] = $aso_page;
251 
				}
252 
				$GLOBALS['_SYNDICATION_']['sites'][] = $aso_site;
253 
			}
254 
        }
255 
    }
256 
	// Trie des pages par date
1359 florian 257 
	//var_dump($GLOBALS['_SYNDICATION_']['pages']);
1165 jp_milcent 258 
	krsort($GLOBALS['_SYNDICATION_']['pages']);
259 
 
260 
	//+----------------------------------------------------------------------------------------------------------------+
1283 florian 261 
    // Extrait les variables et les ajoutes a l'espace de noms local
1165 jp_milcent 262 
	// Gestion des squelettes
263 
	extract($GLOBALS['_SYNDICATION_']);
1283 florian 264 
	// Demarre le buffer
1165 jp_milcent 265 
	ob_start();
266 
	// Inclusion du fichier
267 
	include($options['template']);
1283 florian 268 
	// Recuperer le  contenu du buffer
1165 jp_milcent 269 
	$sortie = ob_get_contents();
1283 florian 270 
	// Arrete et detruit le buffer
1165 jp_milcent 271 
	ob_end_clean();
272 
 
273 
	//+----------------------------------------------------------------------------------------------------------------+
274 
	// Sortie
275 
    return $sortie;
276 
}
277 
 
278 
/* +--Fin du code ----------------------------------------------------------------------------------------+
279 
*
280 
* $Log: not supported by cvs2svn $
1766 alexandre_ 281 
* Revision 1.7.2.2  2007-12-03 14:52:21  jp_milcent
282 
* Correction bogue : & dans les urls.
283 
*
1744 jp_milcent 284 
* Revision 1.7.2.1  2007-11-30 14:15:02  jp_milcent
285 
* Amélioration du décodage utf8.
286 
*
1738 jp_milcent 287 
* Revision 1.7  2007-07-25 15:09:44  jp_milcent
288 
* Fusion avec la livraison Narmer.
289 
*
1529 jp_milcent 290 
* Revision 1.5.2.4  2007-07-25 15:07:52  jp_milcent
291 
* Correction problème url.
292 
*
293 
* Revision 1.5.2.3  2007-07-25 14:50:21  jp_milcent
294 
* Corrections, meilleure utilisation de XML_Feed_Parser.
295 
*
296 
* Revision 1.5.2.2  2007-07-25 09:45:07  jp_milcent
297 
* Utilisation de XML_Feed_Parser de Pear pour l'applette Syndication.
298 
*
299 
* Revision 1.6  2007-06-25 12:15:07  alexandre_tb
300 
* merge from narmer
301 
*
1471 alexandre_ 302 
* Revision 1.5.2.1  2007-06-06 15:24:37  jp_milcent
303 
* Amélioration de la compatibilité avec les anciennes version des balises de l'applette syndication.
304 
*
305 
* Revision 1.5  2007-04-20 12:50:18  florian
306 
* correction bugs suite au merge
307 
*
1359 florian 308 
* Revision 1.4  2007/03/28 15:53:27  florian
309 
* correction pb date, encodage utf-8
310 
*
1283 florian 311 
* Revision 1.3  2007/01/23 14:17:19  alexandre_tb
312 
* backport : hack pour rattraper les dates du type 01012005 parsees par magpie
313 
* lorsque les flux donne des dates au format iso
314 
*
1204 alexandre_ 315 
* Revision 1.2  2006/12/13 17:20:51  jp_milcent
316 
* Correction bogue : paramètre nb non pris en compte
317 
*
1170 jp_milcent 318 
* Revision 1.1  2006/12/13 17:06:36  jp_milcent
319 
* Ajout de l'applette Syndication.
1165 jp_milcent 320 
*
1170 jp_milcent 321 
*
1165 jp_milcent 322 
* +-- Fin du code ----------------------------------------------------------------------------------------+
323 
*/
324 
?>