/***************************************************************************\
* 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. *
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)
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;
}
// 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])
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');
}
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;
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 = '&', $root = false) {
$url = nettoyer_uri();
if (!$root
}
// eviter les hacks
- $url = htmlspecialchars($url);
+ include_spip('inc/filtres_mini');
+ $url = spip_htmlspecialchars($url);
// & ?
if ($amp != '&')
$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)));
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;
}
* @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;
}
//
// 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
}
}
- $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()
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();
}
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')
: '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);
}
$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']){