[SPIP] ~maj v3.0.14-->v3.0.17
[ptitvelo/web/www.git] / www / ecrire / inc / utils.php
index 3516e9d..f9bee58 100644 (file)
@@ -3,7 +3,7 @@
 /***************************************************************************\
  *  SPIP, Systeme de publication pour l'internet                           *
  *                                                                         *
- *  Copyright (c) 2001-2012                                                *
+ *  Copyright (c) 2001-2014                                                *
  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
  *                                                                         *
  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
@@ -45,7 +45,7 @@ function charger_fonction($nom, $dossier='exec', $continue=false) {
 
        if (!preg_match(',^\w+$,', $f)){
                if ($continue) return false; //appel interne, on passe
-               die(htmlspecialchars($nom)." pas autorise");
+               die(spip_htmlspecialchars($nom)." pas autorise");
        }
 
        // passer en minuscules (cf les balises de formulaires)
@@ -66,7 +66,7 @@ function charger_fonction($nom, $dossier='exec', $continue=false) {
 
        include_spip('inc/minipres');
        echo minipres(_T('forum_titre_erreur'),
-                _T('fichier_introuvable', array('fichier'=> '<b>'.htmlentities($d).'</b>')));
+                _T('fichier_introuvable', array('fichier'=> '<b>'.spip_htmlentities($d).'</b>')));
        exit;
 }
 
@@ -114,7 +114,6 @@ function minipipe($fonc,&$val){
        // fonction
        if (function_exists($fonc))
                $val = call_user_func($fonc, $val);
-
        // Class::Methode
        else if (preg_match("/^(\w*)::(\w*)$/S", $fonc, $regs)
        AND $methode = array($regs[1], $regs[2])
@@ -239,8 +238,12 @@ function _request($var, $c=false) {
        AND isset($GLOBALS['meta']['charset'])
        AND $GLOBALS['meta']['charset'] != 'utf-8'
        AND is_string($a)
-       AND preg_match(',[\x80-\xFF],', $a)) {
-               include_spip('inc/charsets');
+       // check rapide mais pas fiable
+       AND preg_match(',[\x80-\xFF],', $a)
+       // check fiable
+       AND include_spip('inc/charsets')
+       AND is_utf8($a)
+       ) {
                return importer_charset($a, 'utf-8');
        }
 
@@ -377,14 +380,18 @@ function ancre_url($url, $ancre) {
        return $url . (strlen($ancre) ? '#'. $ancre : '');
 }
 
-//
-// pour le nom du cache, les types_urls et self
-//
-// http://doc.spip.org/@nettoyer_uri
-function nettoyer_uri()
+/**
+ * pour le nom du cache, les types_urls et self
+ * http://doc.spip.org/@nettoyer_uri
+ *
+ * @param string|null $reset
+ * @return string
+ */
+function nettoyer_uri($reset = null)
 {
        static $done = false;
        static $propre = '';
+       if (!is_null($reset)) return $propre=$reset;
        if ($done) return $propre;
        $done = true;
 
@@ -399,11 +406,16 @@ function nettoyer_uri()
        return $propre = (preg_replace(',[?&]$,', '', $uri1));
 }
 
-//
-// donner l'URL de base d'un lien vers "soi-meme", modulo
-// les trucs inutiles
-//
-// http://doc.spip.org/@self
+
+/**
+ * Donner l'URL de base d'un lien vers "soi-meme", modulo les trucs inutiles
+ *
+ * @param string $amp
+ *    Style des esperluettes
+ * @param bool $root
+ * @return string
+ *    URL vers soi-même
+**/
 function self($amp = '&amp;', $root = false) {
        $url = nettoyer_uri();
        if (!$root
@@ -429,7 +441,8 @@ function self($amp = '&amp;', $root = false) {
        }
 
        // eviter les hacks
-       $url = htmlspecialchars($url);
+       include_spip('inc/filtres_mini');
+       $url = spip_htmlspecialchars($url);
 
        // &amp; ?
        if ($amp != '&amp;')
@@ -504,7 +517,7 @@ function _T($texte, $args=array(), $options=array()) {
                $text = $texte;
 
                // pour les chaines non traduites, assurer un service minimum
-               if (!$GLOBALS['test_i18n'])
+               if (!$GLOBALS['test_i18n'] AND (_request('var_mode') != 'traduction'))
                        $text = str_replace('_', ' ',
                                 (($n = strpos($text,':')) === false ? $texte :
                                        substr($texte, $n+1)));
@@ -533,8 +546,8 @@ function _L($text, $args=array(), $class=null) {
                if ($args) spip_log("$f:  variables inutilisees " . join(', ', array_keys($args)),_LOG_DEBUG);
        }
 
-       if ($GLOBALS['test_i18n'] AND $class===null)
-               return "<blink style='color:red;'>$text</blink>";
+       if (($GLOBALS['test_i18n'] OR (_request('var_mode') == 'traduction')) AND $class===null)
+               return "<span class=debug-traduction-erreur>$text</span>";
        else
                return $text;
 }
@@ -629,14 +642,17 @@ function action_cron() {
  * @return bool
  */
 function cron ($taches=array(), $taches_old= array()) {
-       // si pas en mode cron force
-       // ou si base inaccessible, laisser tomber.
-       if (!defined('_DIRECT_CRON_FORCE') OR !spip_connect()) return false;
-       spip_log("cron !",'jq'._LOG_DEBUG);
+       // si pas en mode cron force, laisser tomber.
+       if (!defined('_DIRECT_CRON_FORCE')) return false;
        if (!is_array($taches)) $taches = $taches_old; // compat anciens appels
+       // si taches a inserer en base et base inaccessible, laisser tomber
+       // sinon on ne verifie pas la connexion tout de suite, car si ca se trouve
+       // queue_sleep_time_to_next_job() dira qu'il n'y a rien a faire
+       // et on evite d'ouvrir une connexion pour rien (utilisation de _DIRECT_CRON_FORCE dans mes_options.php)
+       if ($taches AND count($taches) AND !spip_connect())  return false;
+       spip_log("cron !",'jq'._LOG_DEBUG);
        if ($genie = charger_fonction('genie', 'inc', true)) {
-               $genie($taches);
-               return true;
+               return $genie($taches);
        }
        return false;
 }
@@ -1197,20 +1213,32 @@ function test_valeur_serveur($truc) {
 //
 // Fonctions de fabrication des URL des scripts de Spip
 //
-
-// l'URL de base du site, sans se fier a meta(adresse_site) qui
-// peut etre fausse (sites a plusieurs noms d'hotes, deplacements, erreurs)
-// Note : la globale $profondeur_url doit etre initialisee de maniere a
-// indiquer le nombre de sous-repertoires de l'url courante par rapport a la
-// racine de SPIP : par exemple, sur ecrire/ elle vaut 1, sur sedna/ 1, et a
-// la racine 0. Sur url/perso/ elle vaut 2
-// http://doc.spip.org/@url_de_base
-function url_de_base() {
+/**
+ * l'URL de base du site, sans se fier a meta(adresse_site) qui
+ * peut etre fausse (sites a plusieurs noms d'hotes, deplacements, erreurs)
+ * Note : la globale $profondeur_url doit etre initialisee de maniere a
+ * indiquer le nombre de sous-repertoires de l'url courante par rapport a la
+ * racine de SPIP : par exemple, sur ecrire/ elle vaut 1, sur sedna/ 1, et a
+ * la racine 0. Sur url/perso/ elle vaut 2
+ * http://doc.spip.org/@url_de_base
+ *
+ * @param int|boo|array $profondeur
+ *    si non renseignee : retourne l'url pour la profondeur $GLOBALS['profondeur_url']
+ *    si int : indique que l'on veut l'url pour la prondeur indiquee
+ *    si bool : retourne le tableau static complet
+ *    si array : reinitialise le tableau static complet avec la valeur fournie
+ * @return string|array
+ */
+function url_de_base($profondeur=null) {
 
        static $url = array();
+       if (is_array($profondeur)) return $url = $profondeur;
+       if ($profondeur===false) return $url;
+
+       if (is_null($profondeur)) $profondeur = $GLOBALS['profondeur_url'];
 
-       if (isset($url[$GLOBALS['profondeur_url']]))
-               return $url[$GLOBALS['profondeur_url']];
+       if (isset($url[$profondeur]))
+               return $url[$profondeur];
 
        $http = (
                (isset($_SERVER["SCRIPT_URI"]) AND
@@ -1237,9 +1265,9 @@ function url_de_base() {
                }
        }
 
-       $url[$GLOBALS['profondeur_url']] = url_de_($http,$host,$GLOBALS['REQUEST_URI'],$GLOBALS['profondeur_url']);
+       $url[$profondeur] = url_de_($http,$host,$GLOBALS['REQUEST_URI'],$profondeur);
 
-       return $url[$GLOBALS['profondeur_url']];
+       return $url[$profondeur];
 }
 /**
  * fonction testable de construction d'une url appelee par url_de_base()
@@ -1775,6 +1803,9 @@ function spip_initialisation_suite() {
                else
                        if (!defined('_INTERDIRE_COMPACTE_HEAD_ECRIRE')) define('_INTERDIRE_COMPACTE_HEAD_ECRIRE',true); // evite une page blanche car on ne saura pas calculer la css dans ce hit
        }
+       // Protocoles a normaliser dans les chaines de langues
+       if (!defined('_PROTOCOLES_STD'))
+               define('_PROTOCOLES_STD', 'http|https|ftp|mailto|webcal');
 
        init_var_mode();
 }
@@ -1793,7 +1824,7 @@ function init_var_mode(){
                                if (!defined('_VAR_MODE')) define('_VAR_MODE',$_GET['var_mode']);
                        }
                        // preview, debug, blocs, urls et images necessitent une autorisation
-                       else if (in_array($_GET['var_mode'],array('preview','debug','inclure','urls','images'))) {
+                       else if (in_array($_GET['var_mode'],array('preview','debug','inclure','urls','images','traduction'))) {
                                include_spip('inc/autoriser');
                                if (autoriser(
                                        ($_GET['var_mode'] == 'preview')
@@ -1801,6 +1832,12 @@ function init_var_mode(){
                                                : 'debug'
                                )) {
                                        switch($_GET['var_mode']){
+                                               case 'traduction':
+                                                       // forcer le calcul pour passer dans traduire
+                                                       if (!defined('_VAR_MODE')) define('_VAR_MODE','calcul');
+                                                       // et ne pas enregistrer de cache pour ne pas trainer les surlignages sur d'autres pages
+                                                       if (!defined('_VAR_NOCACHE')) define('_VAR_NOCACHE',true);
+                                                       break;
                                                case 'preview':
                                                        // basculer sur les criteres de preview dans les boucles
                                                        if (!defined('_VAR_PREVIEW')) define('_VAR_PREVIEW',true);
@@ -2114,7 +2151,7 @@ function recuperer_fond($fond, $contexte=array(), $options = array(), $connect='
                }
 
                $page = pipeline('recuperer_fond',array(
-                       'args'=>array('fond'=>$fond,'contexte'=>$contexte,'options'=>$options,'connect'=>$connect),
+                       'args'=>array('fond'=>$f,'contexte'=>$contexte,'options'=>$options,'connect'=>$connect),
                        'data'=>$page
                ));
                if (isset($options['ajax']) AND $options['ajax']){