www/ecrire/inc/site.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2014                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   9  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
  10  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  11 \***************************************************************************/
  12
  13 if (!defined('_ECRIRE_INC_VERSION')) return;
  14
  15
  16 // http://doc.spip.org/@analyser_site
  17 function analyser_site($url) {
  18         include_spip('inc/filtres');
  19         include_spip('inc/distant');
  20
  21         // Accepter les URLs au format feed:// ou qui ont oublie le http://
  22         $url = preg_replace(',^feed://,i', 'http://', $url);
  23         if (!preg_match(',^[a-z]+://,i', $url)) $url = 'http://'.$url;
  24
  25         $texte = recuperer_page($url, true);
  26         if (!$texte) return false;
  27
  28         if (preg_match(',<(channel|feed)([\:[:space:]][^>]*)?'
  29         .'>(.*)</\1>,ims', $texte, $regs)) {
  30                 $result['syndication'] = 'oui';
  31                 $result['url_syndic'] = $url;
  32                 $channel = $regs[3];
  33
  34                 // Pour recuperer l'entete, on supprime tous les items
  35                 $b = array_merge(
  36                         extraire_balises($channel, 'item'),
  37                         extraire_balises($channel, 'entry')
  38                 );
  39                 $header = str_replace($b,array(),$channel);
  40
  41                 if ($t = extraire_balise($header, 'title'))
  42                         $result['nom_site'] = supprimer_tags($t);
  43                 if ($t = extraire_balises($header, 'link')) {
  44                         foreach ($t as $link) {
  45                                 $u = supprimer_tags(filtrer_entites($link));
  46                                 if (!strlen($u))
  47                                         $u = extraire_attribut($link, 'href');
  48                                 if (strlen($u)) {
  49                                         // on installe l'url comme url du site
  50                                         // si c'est non vide, en donnant la priorite a rel=alternate
  51                                         if (preg_match(',\balternate\b,', extraire_attribut($link, 'rel'))
  52                                         OR !isset($result['url_site']))
  53                                                 $result['url_site'] = filtrer_entites($u);
  54                                 }
  55                         }
  56                 }
  57                 $result['url_site'] = url_absolue($result['url_site'], $url);
  58
  59                 if ($a = extraire_balise($header, 'description')
  60                 OR $a = extraire_balise($header, 'tagline')) {
  61                         $result['descriptif'] = supprimer_tags($a);
  62                 }
  63
  64                 if (preg_match(',<image.*<url.*>(.*)</url>.*</image>,Uims',
  65                 $header, $r)
  66                 AND preg_match(',(https?://.*/.*(gif|png|jpg)),ims', $r[1], $r)
  67                 AND $image = recuperer_infos_distantes($r[1])) {
  68                         if (in_array($image['extension'], array('gif', 'jpg', 'png'))) {
  69                                 $result['format_logo'] = $image['extension'];
  70                                 $result['logo'] = $r[1];
  71                         }
  72                         else if ($image['fichier']) {
  73                                 spip_unlink($image['fichier']);
  74                         }
  75                 }
  76         }
  77         else {
  78                 $result['syndication'] = 'non';
  79                 $result['url_site'] = $url;
  80                 if (preg_match(',<head>(.*(description|title).*)</head>,Uims', $texte, $regs)) {
  81                         $head = filtrer_entites($regs[1]);
  82                 } else
  83                         $head = $texte;
  84                 if (preg_match(',<title[^>]*>(.*),i', $head, $regs))
  85                         $result['nom_site'] = filtrer_entites(supprimer_tags(preg_replace(',</title>.*,i', '', $regs[1])));
  86                 if ($a = array_merge(
  87                         extraire_balises($head, 'meta'),
  88                         extraire_balises($head, 'http-equiv')
  89                 )) {
  90                         foreach($a as $meta) {
  91                                 if (extraire_attribut($meta, 'name') == 'description') {
  92                                         $desc = trim(extraire_attribut($meta, 'content'));
  93                                         if (!strlen($desc))
  94                                                 $desc = trim(extraire_attribut($meta, 'value'));
  95                                         $result['descriptif'] = $desc;
  96                                 }
  97                         }
  98                 }
  99
 100                 // Cherchons quand meme un backend
 101                 include_spip('inc/distant');
 102                 include_spip('inc/feedfinder');
 103                 $feeds = get_feed_from_url($url, $texte);
 104                 // si on a a trouve un (ou plusieurs) on le note avec select:
 105                 // ce qui constitue un signal pour exec=sites qui proposera de choisir
 106                 // si on syndique, et quelle url.
 107                 if (count($feeds)>=1) {
 108                         spip_log("feedfinder.php :\n".join("\n", $feeds));
 109                         $result['url_syndic'] = "select: ".join(' ',$feeds);
 110                 }
 111         }
 112
 113         return $result;
 114 }
 115
 116 ?>