www/ecrire/urls/page.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2016                                                *
   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 define('URLS_PAGE_EXEMPLE', 'spip.php?article12');
  16
  17 ####### modifications possibles dans ecrire/mes_options
  18 # on peut indiquer '.html' pour faire joli
  19 define ('_terminaison_urls_page', '');
  20 # ci-dessous, ce qu'on veut ou presque (de preference pas de '/')
  21 # attention toutefois seuls '' et '=' figurent dans les modes de compatibilite
  22 define ('_separateur_urls_page', '');
  23 # on peut indiquer '' si on a installe le .htaccess
  24 define ('_debut_urls_page', get_spip_script('./').'?');
  25 #######
  26
  27
  28 // http://doc.spip.org/@_generer_url_page
  29 function _generer_url_page($type,$id, $args='', $ancre='') {
  30
  31         if ($generer_url_externe = charger_fonction("generer_url_$type",'urls',true)) {
  32                 $url = $generer_url_externe($id, $args, $ancre);
  33                 if (NULL != $url) return $url;
  34         }
  35
  36         $url = _debut_urls_page . $type . _separateur_urls_page
  37           . $id . _terminaison_urls_page;
  38
  39         if ($args) $args = strpos($url,'?') ? "&$args" : "?$args";
  40         return _DIR_RACINE . $url . $args . ($ancre ? "#$ancre" : '');
  41 }
  42
  43 // retrouve le fond et les parametres d'une URL abregee
  44 // le contexte deja existant est fourni dans args sous forme de tableau ou query string
  45 // http://doc.spip.org/@urls_page_dist
  46 function urls_page_dist($i, &$entite, $args='', $ancre='')
  47 {
  48         if (is_numeric($i))
  49                 return _generer_url_page($entite, $i, $args, $ancre);
  50
  51         // traiter les injections du type domaine.org/spip.php/cestnimportequoi/ou/encore/plus/rubrique23
  52         if ($GLOBALS['profondeur_url']>0 AND $entite=='sommaire'){
  53                 return array(array(),'404');
  54         }
  55
  56         // voir s'il faut recuperer le id_* implicite et les &debut_xx;
  57         if (is_array($args))
  58                 $contexte = $args;
  59         else
  60                 parse_str($args,$contexte);
  61         include_spip('inc/urls');
  62         $r = nettoyer_url_page($i, $contexte);
  63         if ($r) {
  64                 array_pop($r); // nettoyer_url_page renvoie un argument de plus inutile ici
  65                 return $r;
  66         }
  67
  68         /*
  69          * Le bloc qui suit sert a faciliter les transitions depuis
  70          * le mode 'urls-propres' vers les modes 'urls-standard' et 'url-html'
  71          * Il est inutile de le recopier si vous personnalisez vos URLs
  72          * et votre .htaccess
  73          */
  74         // Si on est revenu en mode html, mais c'est une ancienne url_propre
  75         // on ne redirige pas, on assume le nouveau contexte (si possible)
  76         $url = $i;
  77         $url_propre = isset($url)
  78                 ? $url
  79                 : (isset($_SERVER['REDIRECT_url_propre'])
  80                         ? $_SERVER['REDIRECT_url_propre']
  81                         : (isset($_ENV['url_propre'])
  82                                 ? $_ENV['url_propre']
  83                                 : ''
  84                                 ));
  85         if ($url_propre) {
  86                 if ($GLOBALS['profondeur_url']<=0)
  87                         $urls_anciennes = charger_fonction('propres','urls',true);
  88                 else
  89                         $urls_anciennes = charger_fonction('arbo','urls',true);
  90                 return $urls_anciennes?$urls_anciennes($url_propre, $entite, $contexte):'';
  91         }
  92         /* Fin du bloc compatibilite url-propres */
  93 }
  94
  95 ?>