spip / SPIP

ecrire/inc/modifier.php

Indentation +181 added lines, -181 removed lines

@@ -37,28 +37,28 @@ 
  *     Tableau des champs et valeurs collectées 
  */
 function collecter_requests($white_list, $black_list, $set=null, $tous=false){
-	$c = $set;
-	if (!$c){
-		$c = array();
-		foreach($white_list as $champ) {
-			// on ne collecte que les champs reellement envoyes par defaut.
-			// le cas d'un envoi de valeur NULL peut du coup poser probleme.
-			$val = _request($champ);
-			if ($tous OR $val !== NULL) {
-				$c[$champ] = $val;
-			}
-		}
-		// on ajoute toujours la lang en saisie possible
-		// meme si pas prevu au depart pour l'objet concerne
-		if ($l = _request('changer_lang')){
-			$c['lang'] = $l;
-		}
-	}
-	foreach($black_list as $champ) {
-		unset($c[$champ]);
-	}
+    $c = $set;
+    if (!$c){
+        $c = array();
+        foreach($white_list as $champ) {
+            // on ne collecte que les champs reellement envoyes par defaut.
+            // le cas d'un envoi de valeur NULL peut du coup poser probleme.
+            $val = _request($champ);
+            if ($tous OR $val !== NULL) {
+                $c[$champ] = $val;
+            }
+        }
+        // on ajoute toujours la lang en saisie possible
+        // meme si pas prevu au depart pour l'objet concerne
+        if ($l = _request('changer_lang')){
+            $c['lang'] = $l;
+        }
+    }
+    foreach($black_list as $champ) {
+        unset($c[$champ]);
+    }
 	
-	return $c;
+    return $c;
 }
 
 /**
@@ -95,183 +95,183 @@ 
  *     - chaîne : Texte d'un message d'erreur
  */
 function objet_modifier_champs($objet, $id_objet, $options, $c=null, $serveur='') {
-	if (!$id_objet = intval($id_objet)) {
-		spip_log('Erreur $id_objet non defini', 'warn');
-		return _T('erreur_technique_enregistrement_impossible');
-	}
+    if (!$id_objet = intval($id_objet)) {
+        spip_log('Erreur $id_objet non defini', 'warn');
+        return _T('erreur_technique_enregistrement_impossible');
+    }
 
-	include_spip('inc/filtres');
+    include_spip('inc/filtres');
 
-	$table_objet = table_objet($objet,$serveur);
-	$spip_table_objet = table_objet_sql($objet,$serveur);
-	$id_table_objet = id_table_objet($objet,$serveur);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($spip_table_objet, $serveur);
+    $table_objet = table_objet($objet,$serveur);
+    $spip_table_objet = table_objet_sql($objet,$serveur);
+    $id_table_objet = id_table_objet($objet,$serveur);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($spip_table_objet, $serveur);
 
-	// Appels incomplets (sans $c)
-	if (!is_array($c)) {
-		spip_log('erreur appel objet_modifier_champs('.$objet.'), manque $c');
-		return _T('erreur_technique_enregistrement_impossible');
-	}
+    // Appels incomplets (sans $c)
+    if (!is_array($c)) {
+        spip_log('erreur appel objet_modifier_champs('.$objet.'), manque $c');
+        return _T('erreur_technique_enregistrement_impossible');
+    }
 
-	// Securite : certaines variables ne sont jamais acceptees ici
-	// car elles ne relevent pas de autoriser(xxx, modifier) ;
-	// il faut passer par instituer_XX()
-	// TODO: faut-il passer ces variables interdites
-	// dans un fichier de description separe ?
-	unset($c['statut']);
-	unset($c['id_parent']);
-	unset($c['id_rubrique']);
-	unset($c['id_secteur']);
+    // Securite : certaines variables ne sont jamais acceptees ici
+    // car elles ne relevent pas de autoriser(xxx, modifier) ;
+    // il faut passer par instituer_XX()
+    // TODO: faut-il passer ces variables interdites
+    // dans un fichier de description separe ?
+    unset($c['statut']);
+    unset($c['id_parent']);
+    unset($c['id_rubrique']);
+    unset($c['id_secteur']);
 
-	// Gerer les champs non vides
-	if (isset($options['nonvide']) AND is_array($options['nonvide'])) {
-		foreach ($options['nonvide'] as $champ => $sinon) {
-			if ($c[$champ] === '') {
-				$c[$champ] = $sinon;
-			}
-		}
-	}
+    // Gerer les champs non vides
+    if (isset($options['nonvide']) AND is_array($options['nonvide'])) {
+        foreach ($options['nonvide'] as $champ => $sinon) {
+            if ($c[$champ] === '') {
+                $c[$champ] = $sinon;
+            }
+        }
+    }
 
 
-	// N'accepter que les champs qui existent
-	// TODO: ici aussi on peut valider les contenus
-	// en fonction du type
-	$champs = array();
-	foreach($desc['field'] as $champ => $ignore)
-		if (isset($c[$champ]))
-			$champs[$champ] = $c[$champ];
+    // N'accepter que les champs qui existent
+    // TODO: ici aussi on peut valider les contenus
+    // en fonction du type
+    $champs = array();
+    foreach($desc['field'] as $champ => $ignore)
+        if (isset($c[$champ]))
+            $champs[$champ] = $c[$champ];
 
-	// Nettoyer les valeurs
-	$champs = array_map('corriger_caracteres', $champs);
+    // Nettoyer les valeurs
+    $champs = array_map('corriger_caracteres', $champs);
 
-	// Envoyer aux plugins
-	$champs = pipeline('pre_edition',
-		array(
-			'args' => array(
-				'table' => $spip_table_objet, // compatibilite
-				'table_objet' => $table_objet,
-				'spip_table_objet' => $spip_table_objet,
-				'type' =>$objet,
-				'id_objet' => $id_objet,
-				'champs' => isset($options['champs']) ? $options['champs'] : array(), // [doc] c'est quoi ?
-				'serveur' => $serveur,
-				'action' => isset($options['action']) ? $options['action'] : 'modifier'
-			),
-			'data' => $champs
-		)
-	);
+    // Envoyer aux plugins
+    $champs = pipeline('pre_edition',
+        array(
+            'args' => array(
+                'table' => $spip_table_objet, // compatibilite
+                'table_objet' => $table_objet,
+                'spip_table_objet' => $spip_table_objet,
+                'type' =>$objet,
+                'id_objet' => $id_objet,
+                'champs' => isset($options['champs']) ? $options['champs'] : array(), // [doc] c'est quoi ?
+                'serveur' => $serveur,
+                'action' => isset($options['action']) ? $options['action'] : 'modifier'
+            ),
+            'data' => $champs
+        )
+    );
 
-	if (!$champs) return false;
+    if (!$champs) return false;
 
 
-	// marquer le fait que l'objet est travaille par toto a telle date
-	if ($GLOBALS['meta']['articles_modif'] != 'non') {
-		include_spip('inc/drapeau_edition');
-		signale_edition ($id_objet, $GLOBALS['visiteur_session'], $objet);
-	}
+    // marquer le fait que l'objet est travaille par toto a telle date
+    if ($GLOBALS['meta']['articles_modif'] != 'non') {
+        include_spip('inc/drapeau_edition');
+        signale_edition ($id_objet, $GLOBALS['visiteur_session'], $objet);
+    }
 
-	// Verifier si les mises a jour sont pertinentes, datees, en conflit etc
-	include_spip('inc/editer');
-	if (!isset($options['data']) OR is_null($options['data'])){
-		$options['data'] = &$_POST;
-	}
-	$conflits = controler_md5($champs, $options['data'], $objet, $id_objet, $serveur);
-	// cas hypothetique : normalement inc/editer verifie en amont le conflit edition
-	// et gere l'interface
-	// ici on ne renvoie donc qu'un messsage d'erreur, au cas ou on y arrive quand meme
-	if ($conflits)
-		return _T('titre_conflit_edition');
+    // Verifier si les mises a jour sont pertinentes, datees, en conflit etc
+    include_spip('inc/editer');
+    if (!isset($options['data']) OR is_null($options['data'])){
+        $options['data'] = &$_POST;
+    }
+    $conflits = controler_md5($champs, $options['data'], $objet, $id_objet, $serveur);
+    // cas hypothetique : normalement inc/editer verifie en amont le conflit edition
+    // et gere l'interface
+    // ici on ne renvoie donc qu'un messsage d'erreur, au cas ou on y arrive quand meme
+    if ($conflits)
+        return _T('titre_conflit_edition');
 
-	if ($champs) {
-		// cas particulier de la langue : passer par instituer_langue_objet
-		if (isset($champs['lang'])){
-			if ($changer_lang=$champs['lang']){
-				$id_rubrique = 0;
-				if ($desc['field']['id_rubrique']){
-					$parent = ($objet=='rubrique')?'id_parent':'id_rubrique';
-					$id_rubrique = sql_getfetsel($parent, $spip_table_objet, "$id_table_objet=".intval($id_objet));
-				}
-				$instituer_langue_objet = charger_fonction('instituer_langue_objet', 'action');
-				$champs['lang'] = $instituer_langue_objet($objet, $id_objet, $id_rubrique, $changer_lang, $serveur);
-			}
-			// on laisse 'lang' dans $champs,
-			// ca permet de passer dans le pipeline post_edition et de journaliser
-			// et ca ne gene pas qu'on refasse un sql_updateq dessus apres l'avoir
-			// deja pris en compte
-		}
+    if ($champs) {
+        // cas particulier de la langue : passer par instituer_langue_objet
+        if (isset($champs['lang'])){
+            if ($changer_lang=$champs['lang']){
+                $id_rubrique = 0;
+                if ($desc['field']['id_rubrique']){
+                    $parent = ($objet=='rubrique')?'id_parent':'id_rubrique';
+                    $id_rubrique = sql_getfetsel($parent, $spip_table_objet, "$id_table_objet=".intval($id_objet));
+                }
+                $instituer_langue_objet = charger_fonction('instituer_langue_objet', 'action');
+                $champs['lang'] = $instituer_langue_objet($objet, $id_objet, $id_rubrique, $changer_lang, $serveur);
+            }
+            // on laisse 'lang' dans $champs,
+            // ca permet de passer dans le pipeline post_edition et de journaliser
+            // et ca ne gene pas qu'on refasse un sql_updateq dessus apres l'avoir
+            // deja pris en compte
+        }
 
-		// la modif peut avoir lieu
+        // la modif peut avoir lieu
 
-		// faut-il ajouter date_modif ?
-		if (isset($options['date_modif']) AND $options['date_modif']
-		AND !isset($champs[$options['date_modif']]))
-			$champs[$options['date_modif']] = date('Y-m-d H:i:s');
+        // faut-il ajouter date_modif ?
+        if (isset($options['date_modif']) AND $options['date_modif']
+        AND !isset($champs[$options['date_modif']]))
+            $champs[$options['date_modif']] = date('Y-m-d H:i:s');
 
-		// allez on commit la modif
-		sql_updateq($spip_table_objet, $champs, "$id_table_objet=".intval($id_objet), $serveur);
+        // allez on commit la modif
+        sql_updateq($spip_table_objet, $champs, "$id_table_objet=".intval($id_objet), $serveur);
 
-		// on verifie si elle est bien passee
-		$moof = sql_fetsel(array_keys($champs), $spip_table_objet, "$id_table_objet=".intval($id_objet), array(), array(), '', array(), $serveur);
-		// si difference entre les champs, reperer les champs mal enregistres
-		if ($moof != $champs) {
-			$liste = array();
-			foreach($moof as $k=>$v)
-				if ($v !== $champs[$k]
-					// ne pas alerter si le champ est numerique est que les valeurs sont equivalentes
-					AND (!is_numeric($v) OR intval($v)!=intval($champs[$k]))
-					) {
-					$liste[] = $k;
-					$conflits[$k]['post'] = $champs[$k];
-					$conflits[$k]['save'] = $v;
-				}
-			// si un champ n'a pas ete correctement enregistre, loger et retourner une erreur
-			// c'est un cas exceptionnel
-			if (count($liste)){
-				spip_log("Erreur enregistrement en base $objet/$id_objet champs :".var_export($conflits,true),'modifier.'._LOG_CRITIQUE);
-				return _T('erreur_technique_enregistrement_champs',array('champs'=>"<i>'".implode("'</i>,<i>'",$liste)."'</i>"));
-			}
-		}
+        // on verifie si elle est bien passee
+        $moof = sql_fetsel(array_keys($champs), $spip_table_objet, "$id_table_objet=".intval($id_objet), array(), array(), '', array(), $serveur);
+        // si difference entre les champs, reperer les champs mal enregistres
+        if ($moof != $champs) {
+            $liste = array();
+            foreach($moof as $k=>$v)
+                if ($v !== $champs[$k]
+                    // ne pas alerter si le champ est numerique est que les valeurs sont equivalentes
+                    AND (!is_numeric($v) OR intval($v)!=intval($champs[$k]))
+                    ) {
+                    $liste[] = $k;
+                    $conflits[$k]['post'] = $champs[$k];
+                    $conflits[$k]['save'] = $v;
+                }
+            // si un champ n'a pas ete correctement enregistre, loger et retourner une erreur
+            // c'est un cas exceptionnel
+            if (count($liste)){
+                spip_log("Erreur enregistrement en base $objet/$id_objet champs :".var_export($conflits,true),'modifier.'._LOG_CRITIQUE);
+                return _T('erreur_technique_enregistrement_champs',array('champs'=>"<i>'".implode("'</i>,<i>'",$liste)."'</i>"));
+            }
+        }
 
-		// Invalider les caches
-		if (isset($options['invalideur']) and $options['invalideur']) {
-			include_spip('inc/invalideur');
-			if (is_array($options['invalideur']))
-				array_map('suivre_invalideur',$options['invalideur']);
-			else
-				suivre_invalideur($options['invalideur']);
-		}
+        // Invalider les caches
+        if (isset($options['invalideur']) and $options['invalideur']) {
+            include_spip('inc/invalideur');
+            if (is_array($options['invalideur']))
+                array_map('suivre_invalideur',$options['invalideur']);
+            else
+                suivre_invalideur($options['invalideur']);
+        }
 
-		// Notifications, gestion des revisions...
-		// en standard, appelle |nouvelle_revision ci-dessous
-		pipeline('post_edition',
-			array(
-				'args' => array(
-					'table' => $spip_table_objet,
-					'table_objet' => $table_objet,
-					'spip_table_objet' => $spip_table_objet,
-					'type' =>$objet,
-					'id_objet' => $id_objet,
-					'champs' => isset($options['champs']) ? $options['champs'] : array(), // [doc] kesako ?
-					'serveur' => $serveur,
-					'action' => isset($options['action']) ? $options['action'] : 'modifier'
-				),
-				'data' => $champs
-			)
-		);
-	}
+        // Notifications, gestion des revisions...
+        // en standard, appelle |nouvelle_revision ci-dessous
+        pipeline('post_edition',
+            array(
+                'args' => array(
+                    'table' => $spip_table_objet,
+                    'table_objet' => $table_objet,
+                    'spip_table_objet' => $spip_table_objet,
+                    'type' =>$objet,
+                    'id_objet' => $id_objet,
+                    'champs' => isset($options['champs']) ? $options['champs'] : array(), // [doc] kesako ?
+                    'serveur' => $serveur,
+                    'action' => isset($options['action']) ? $options['action'] : 'modifier'
+                ),
+                'data' => $champs
+            )
+        );
+    }
 
-	// journaliser l'affaire
-	// message a affiner :-)
-	include_spip('inc/filtres_mini');
-	$qui = ((isset($GLOBALS['visiteur_session']['nom']) AND $GLOBALS['visiteur_session']['nom'])?$GLOBALS['visiteur_session']['nom']:$GLOBALS['ip']);
-	journal(_L($qui.' a &#233;dit&#233; l&#8217;'.$objet.' '.$id_objet.' ('.join('+',array_diff(array_keys($champs), array('date_modif'))).')'), array(
-		'faire' => 'modifier',
-		'quoi' => $objet,
-		'id' => $id_objet
-	));
+    // journaliser l'affaire
+    // message a affiner :-)
+    include_spip('inc/filtres_mini');
+    $qui = ((isset($GLOBALS['visiteur_session']['nom']) AND $GLOBALS['visiteur_session']['nom'])?$GLOBALS['visiteur_session']['nom']:$GLOBALS['ip']);
+    journal(_L($qui.' a &#233;dit&#233; l&#8217;'.$objet.' '.$id_objet.' ('.join('+',array_diff(array_keys($champs), array('date_modif'))).')'), array(
+        'faire' => 'modifier',
+        'quoi' => $objet,
+        'id' => $id_objet
+    ));
 
-	return '';
+    return '';
 }
 
 /**
@@ -296,8 +296,8 @@ 
  *     false sinon (erreur ou aucun champ modifié)
  */
 function modifier_contenu($type, $id, $options, $c=null, $serveur='') {
-	$res = objet_modifier_champs($type, $id, $options, $c, $serveur);
-	return ($res===''?true:false);
+    $res = objet_modifier_champs($type, $id, $options, $c, $serveur);
+    return ($res===''?true:false);
 }
 
 /**
@@ -318,9 +318,9 @@ 
  * @return mixed|string
  */
 function revision_objet($objet,$id_objet,$c=null){
-	$objet = objet_type($objet); // securite
-	include_spip('action/editer_objet');
-	return objet_modifier($objet,$id_objet,$c);
+    $objet = objet_type($objet); // securite
+    include_spip('action/editer_objet');
+    return objet_modifier($objet,$id_objet,$c);
 }
 
 

ecrire/inc/securiser_action.php

Indentation +104 added lines, -104 removed lines

@@ -34,18 +34,18 @@ 
  */
 function inc_securiser_action_dist($action='', $arg='', $redirect="", $mode=false, $att='', $public=false)
 {
-	if ($action)
-		return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
-	else {
-		$arg = _request('arg');
-		$hash = _request('hash');
-		$action = _request('action')?_request('action'):_request('formulaire_action');
-		if ($a = verifier_action_auteur("$action-$arg", $hash))
-			return $arg;
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	}
+    if ($action)
+        return securiser_action_auteur($action, $arg, $redirect, $mode, $att, $public);
+    else {
+        $arg = _request('arg');
+        $hash = _request('hash');
+        $action = _request('action')?_request('action'):_request('formulaire_action');
+        if ($a = verifier_action_auteur("$action-$arg", $hash))
+            return $arg;
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    }
 }
 
 /**
@@ -68,27 +68,27 @@ 
  */
 function securiser_action_auteur($action, $arg, $redirect="", $mode=false, $att='', $public=false) {
 
-	// mode URL ou array
-	if (!is_string($mode)){
-		$hash = calculer_action_auteur("$action-$arg",is_numeric($att)?$att:null);
+    // mode URL ou array
+    if (!is_string($mode)){
+        $hash = calculer_action_auteur("$action-$arg",is_numeric($att)?$att:null);
 
-		$r = rawurlencode($redirect);
-		if ($mode===-1)
-			return array('action'=>$action,'arg'=>$arg,'hash'=>$hash);
-		else
-			return generer_url_action($action, "arg=$arg&hash=$hash" . (!$r ? '' : "&redirect=$r"), $mode, $public);
-	}
+        $r = rawurlencode($redirect);
+        if ($mode===-1)
+            return array('action'=>$action,'arg'=>$arg,'hash'=>$hash);
+        else
+            return generer_url_action($action, "arg=$arg&hash=$hash" . (!$r ? '' : "&redirect=$r"), $mode, $public);
+    }
 
-	// mode formulaire
-	$hash = calculer_action_auteur("$action-$arg");
-	$att .= " style='margin: 0px; border: 0px'";
-	if ($redirect)
-		$redirect = "\n\t\t<input name='redirect' type='hidden' value='". str_replace("'", '&#39;', $redirect) ."' />";
-	$mode .= $redirect . "
+    // mode formulaire
+    $hash = calculer_action_auteur("$action-$arg");
+    $att .= " style='margin: 0px; border: 0px'";
+    if ($redirect)
+        $redirect = "\n\t\t<input name='redirect' type='hidden' value='". str_replace("'", '&#39;', $redirect) ."' />";
+    $mode .= $redirect . "
 <input name='hash' type='hidden' value='$hash' />
 <input name='arg' type='hidden' value='$arg' />";
 
-	return generer_form_action($action, $mode, $att, $public);
+    return generer_form_action($action, $mode, $att, $public);
 }
 
 /**
@@ -100,41 +100,41 @@ 
  * @return array
  */
 function caracteriser_auteur($id_auteur=null) {
-	static $caracterisation = array();
+    static $caracterisation = array();
 
-	if (is_null($id_auteur) AND !isset($GLOBALS['visiteur_session']['id_auteur'])) {
-	// si l'auteur courant n'est pas connu alors qu'il peut demander une action
-	// c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
-	// S'il n'avait pas le droit de realiser cette action, le hash sera faux.
-		if (isset($_COOKIE['spip_session'])
-		AND (preg_match('/^(\d+)/',$_COOKIE['spip_session'],$r))) {
-			  return array($r[1], '');
-			  // Necessaire aux forums anonymes.
-			  // Pour le reste, ca echouera.
-		} else return array('0','');
-	}
-	// Eviter l'acces SQL si le pass est connu de PHP
-	if (is_null($id_auteur)){
-		$id_auteur = isset($GLOBALS['visiteur_session']['id_auteur'])?$GLOBALS['visiteur_session']['id_auteur']:0;
-		if (isset($GLOBALS['visiteur_session']['pass']) AND $GLOBALS['visiteur_session']['pass'])
-			return $caracterisation[$id_auteur] = array($id_auteur, $GLOBALS['visiteur_session']['pass']);
-	}
+    if (is_null($id_auteur) AND !isset($GLOBALS['visiteur_session']['id_auteur'])) {
+    // si l'auteur courant n'est pas connu alors qu'il peut demander une action
+    // c'est une connexion par php_auth ou 1 instal, on se rabat sur le cookie.
+    // S'il n'avait pas le droit de realiser cette action, le hash sera faux.
+        if (isset($_COOKIE['spip_session'])
+        AND (preg_match('/^(\d+)/',$_COOKIE['spip_session'],$r))) {
+                return array($r[1], '');
+                // Necessaire aux forums anonymes.
+                // Pour le reste, ca echouera.
+        } else return array('0','');
+    }
+    // Eviter l'acces SQL si le pass est connu de PHP
+    if (is_null($id_auteur)){
+        $id_auteur = isset($GLOBALS['visiteur_session']['id_auteur'])?$GLOBALS['visiteur_session']['id_auteur']:0;
+        if (isset($GLOBALS['visiteur_session']['pass']) AND $GLOBALS['visiteur_session']['pass'])
+            return $caracterisation[$id_auteur] = array($id_auteur, $GLOBALS['visiteur_session']['pass']);
+    }
 
-	if (isset($caracterisation[$id_auteur])) return $caracterisation[$id_auteur];
+    if (isset($caracterisation[$id_auteur])) return $caracterisation[$id_auteur];
 
-	if ($id_auteur) {
-		include_spip('base/abstract_sql');
-		$t = sql_fetsel("id_auteur, pass", "spip_auteurs", "id_auteur=$id_auteur");
-		if ($t)
-			return $caracterisation[$id_auteur] = array($t['id_auteur'], $t['pass']);
-		include_spip('inc/minipres');
-		echo minipres();
-		exit;
-	}
-	// Visiteur anonyme, pour ls forums par exemple
-	else {
-		return array('0','');
-	}
+    if ($id_auteur) {
+        include_spip('base/abstract_sql');
+        $t = sql_fetsel("id_auteur, pass", "spip_auteurs", "id_auteur=$id_auteur");
+        if ($t)
+            return $caracterisation[$id_auteur] = array($t['id_auteur'], $t['pass']);
+        include_spip('inc/minipres');
+        echo minipres();
+        exit;
+    }
+    // Visiteur anonyme, pour ls forums par exemple
+    else {
+        return array('0','');
+    }
 }
 
 /**
@@ -151,25 +151,25 @@ 
  * @return string
  */
 function _action_auteur($action, $id_auteur, $pass, $alea) {
-	static $sha = array();
-	if (!isset($sha[$id_auteur.$pass.$alea])){
-		if (!isset($GLOBALS['meta'][$alea]) AND _request('exec')!=='install') {
-			include_spip('base/abstract_sql');
-			$GLOBALS['meta'][$alea] = sql_getfetsel('valeur', 'spip_meta', "nom=" . sql_quote($alea));
-			if (!($GLOBALS['meta'][$alea])) {
-				include_spip('inc/minipres');
-				echo minipres();
-				spip_log("$alea indisponible");
-				exit;
-			}
-		}
-		include_spip('auth/sha256.inc');
-		$sha[$id_auteur.$pass.$alea] = _nano_sha256($id_auteur.$pass.@$GLOBALS['meta'][$alea]);
-	}
-	if (function_exists('sha1'))
-		return sha1($action.$sha[$id_auteur.$pass.$alea]);
-	else
-		return md5($action.$sha[$id_auteur.$pass.$alea]);
+    static $sha = array();
+    if (!isset($sha[$id_auteur.$pass.$alea])){
+        if (!isset($GLOBALS['meta'][$alea]) AND _request('exec')!=='install') {
+            include_spip('base/abstract_sql');
+            $GLOBALS['meta'][$alea] = sql_getfetsel('valeur', 'spip_meta', "nom=" . sql_quote($alea));
+            if (!($GLOBALS['meta'][$alea])) {
+                include_spip('inc/minipres');
+                echo minipres();
+                spip_log("$alea indisponible");
+                exit;
+            }
+        }
+        include_spip('auth/sha256.inc');
+        $sha[$id_auteur.$pass.$alea] = _nano_sha256($id_auteur.$pass.@$GLOBALS['meta'][$alea]);
+    }
+    if (function_exists('sha1'))
+        return sha1($action.$sha[$id_auteur.$pass.$alea]);
+    else
+        return md5($action.$sha[$id_auteur.$pass.$alea]);
 }
 
 /**
@@ -181,8 +181,8 @@ 
  * @return string
  */
 function calculer_action_auteur($action, $id_auteur=null) {
-	list($id_auteur, $pass) = caracteriser_auteur($id_auteur);
-	return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
+    list($id_auteur, $pass) = caracteriser_auteur($id_auteur);
+    return _action_auteur($action, $id_auteur, $pass, 'alea_ephemere');
 }
 
 
@@ -196,12 +196,12 @@ 
  * @return bool
  */
 function verifier_action_auteur($action, $hash) {
-	list($id_auteur, $pass) = caracteriser_auteur();
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere'))
-		return true;
-	if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien'))
-		return true;
-	return false;
+    list($id_auteur, $pass) = caracteriser_auteur();
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere'))
+        return true;
+    if ($hash == _action_auteur($action, $id_auteur, $pass, 'alea_ephemere_ancien'))
+        return true;
+    return false;
 }
 
 //
@@ -219,18 +219,18 @@ 
  * @return string
  */
 function secret_du_site() {
-	if (!isset($GLOBALS['meta']['secret_du_site'])){
-		include_spip('base/abstract_sql');
-		$GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
-	}
-	if (!isset($GLOBALS['meta']['secret_du_site'])
-	  OR (strlen($GLOBALS['meta']['secret_du_site'])<64)) {
-		include_spip('inc/acces');
-		include_spip('auth/sha256.inc');
-		ecrire_meta('secret_du_site', _nano_sha256($_SERVER["DOCUMENT_ROOT"] . $_SERVER["SERVER_SIGNATURE"] . creer_uniqid()), 'non');
-		lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
-	}
-	return $GLOBALS['meta']['secret_du_site'];
+    if (!isset($GLOBALS['meta']['secret_du_site'])){
+        include_spip('base/abstract_sql');
+        $GLOBALS['meta']['secret_du_site'] = sql_getfetsel('valeur', 'spip_meta', "nom='secret_du_site'");
+    }
+    if (!isset($GLOBALS['meta']['secret_du_site'])
+      OR (strlen($GLOBALS['meta']['secret_du_site'])<64)) {
+        include_spip('inc/acces');
+        include_spip('auth/sha256.inc');
+        ecrire_meta('secret_du_site', _nano_sha256($_SERVER["DOCUMENT_ROOT"] . $_SERVER["SERVER_SIGNATURE"] . creer_uniqid()), 'non');
+        lire_metas(); // au cas ou ecrire_meta() ne fonctionne pas
+    }
+    return $GLOBALS['meta']['secret_du_site'];
 }
 
 /**
@@ -241,10 +241,10 @@ 
  * @return string
  */
 function calculer_cle_action($action) {
-	if (function_exists('sha1'))
-		return sha1($action . secret_du_site());
-	else
-		return md5($action . secret_du_site());
+    if (function_exists('sha1'))
+        return sha1($action . secret_du_site());
+    else
+        return md5($action . secret_du_site());
 }
 
 /**
@@ -256,7 +256,7 @@ 
  * @return bool
  */
 function verifier_cle_action($action, $cle) {
-	return ($cle == calculer_cle_action($action));
+    return ($cle == calculer_cle_action($action));
 }
 
 ?>

ecrire/inc/layer.php

Indentation +87 added lines, -87 removed lines

@@ -14,69 +14,69 @@ 
 
 // http://doc.spip.org/@cadre_depliable
 function cadre_depliable($icone,$titre,$deplie,$contenu,$ids='',$style_cadre='r'){
-	$bouton = bouton_block_depliable($titre,$deplie,$ids);
-	return 
-		debut_cadre($style_cadre,$icone,'',$bouton, '', '', false)
-		. debut_block_depliable($deplie,$ids)
-		. "<div class='cadre_padding'>\n"
-		. $contenu
-		. "</div>\n"
-		. fin_block()
-		. fin_cadre();
+    $bouton = bouton_block_depliable($titre,$deplie,$ids);
+    return 
+        debut_cadre($style_cadre,$icone,'',$bouton, '', '', false)
+        . debut_block_depliable($deplie,$ids)
+        . "<div class='cadre_padding'>\n"
+        . $contenu
+        . "</div>\n"
+        . fin_block()
+        . fin_cadre();
 }
 
 // http://doc.spip.org/@block_parfois_visible
 function block_parfois_visible($nom, $invite, $masque, $style='', $visible=false){
-	return "\n"
-	. bouton_block_depliable($invite,$visible,$nom)
-	. debut_block_depliable($visible,$nom)
-	. $masque
-	. fin_block();
+    return "\n"
+    . bouton_block_depliable($invite,$visible,$nom)
+    . debut_block_depliable($visible,$nom)
+    . $masque
+    . fin_block();
 }
 
 // http://doc.spip.org/@debut_block_depliable
 function debut_block_depliable($deplie,$id=""){
-	$class=' blocdeplie';
-	// si on n'accepte pas js, ne pas fermer
-	if (!$deplie)
-		$class=" blocreplie";
-	return "<div ".($id?"id='$id' ":"")."class='bloc_depliable$class'>";	
+    $class=' blocdeplie';
+    // si on n'accepte pas js, ne pas fermer
+    if (!$deplie)
+        $class=" blocreplie";
+    return "<div ".($id?"id='$id' ":"")."class='bloc_depliable$class'>";	
 }
 // http://doc.spip.org/@fin_block
 function fin_block() {
-	return "<div class='nettoyeur'></div>\n</div>";
+    return "<div class='nettoyeur'></div>\n</div>";
 }
 // $texte : texte du bouton
 // $deplie : true (deplie) ou false (plie) ou -1 (inactif) ou 'incertain' pour que le bouton s'auto init au chargement de la page 
 // $ids : id des div lies au bouton (facultatif, par defaut c'est le div.bloc_depliable qui suit)
 // http://doc.spip.org/@bouton_block_depliable
 function bouton_block_depliable($texte,$deplie,$ids=""){
-	$bouton_id = 'b'.substr(md5($texte.microtime()),0,8);
+    $bouton_id = 'b'.substr(md5($texte.microtime()),0,8);
 
-	$class = ($deplie===true)?" deplie":(($deplie==-1)?" impliable":" replie");
-	if (strlen($ids)){
-		$cible = explode(',',$ids);
-		$cible = '#'.implode(",#",$cible);
-	}
-	else{
-		$cible = "#$bouton_id + div.bloc_depliable";
-	}
+    $class = ($deplie===true)?" deplie":(($deplie==-1)?" impliable":" replie");
+    if (strlen($ids)){
+        $cible = explode(',',$ids);
+        $cible = '#'.implode(",#",$cible);
+    }
+    else{
+        $cible = "#$bouton_id + div.bloc_depliable";
+    }
 
-	$b = (strpos($texte,"<h")===false?'h3':'div');
-	return "<$b "
-	  .($bouton_id?"id='$bouton_id' ":"")
-	  ."class='titrem$class'"
-	  . (($deplie===-1)
-	  	?""
-	  	:" onmouseover=\"jQuery(this).depliant('$cible');\""
-	  )
-	  .">"
-	  // une ancre pour rendre accessible au clavier le depliage du sous bloc
-	  . "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
-	  . "$texte</$b>"
-	  . http_script( ($deplie==='incertain')
-			? "jQuery(document).ready(function(){if (jQuery('$cible').is(':visible')) $('#$bouton_id').addClass('deplie').removeClass('replie');});"
-			: '');
+    $b = (strpos($texte,"<h")===false?'h3':'div');
+    return "<$b "
+        .($bouton_id?"id='$bouton_id' ":"")
+        ."class='titrem$class'"
+        . (($deplie===-1)
+          ?""
+          :" onmouseover=\"jQuery(this).depliant('$cible');\""
+        )
+        .">"
+        // une ancre pour rendre accessible au clavier le depliage du sous bloc
+        . "<a href='#' onclick=\"return jQuery(this).depliant_clicancre('$cible');\" class='titremancre'></a>"
+        . "$texte</$b>"
+        . http_script( ($deplie==='incertain')
+            ? "jQuery(document).ready(function(){if (jQuery('$cible').is(':visible')) $('#$bouton_id').addClass('deplie').removeClass('replie');});"
+            : '');
 }
 
 //
@@ -85,51 +85,51 @@ 
 // http://doc.spip.org/@verif_butineur
 function verif_butineur() {
 
-	global $browser_name, $browser_version;
-	global $browser_description, $browser_rev, $browser_barre;
-	preg_match(",^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,", $_SERVER['HTTP_USER_AGENT'], $match);
-	$browser_name = $match[1];
-	$browser_version = $match[2];
-	$browser_description = $match[3];
-	$GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
-	$browser_barre = '';
+    global $browser_name, $browser_version;
+    global $browser_description, $browser_rev, $browser_barre;
+    preg_match(",^([A-Za-z]+)/([0-9]+\.[0-9]+) (.*)$,", $_SERVER['HTTP_USER_AGENT'], $match);
+    $browser_name = $match[1];
+    $browser_version = $match[2];
+    $browser_description = $match[3];
+    $GLOBALS['browser_layer'] = ' '; // compat avec vieux scripts qui testent la valeur
+    $browser_barre = '';
 
-	if (!preg_match(",opera,i", $browser_description)&&preg_match(",opera,i", $browser_name)) {
-		$browser_name = "Opera";
-		$browser_version = $match[2];
-		$browser_barre = ($browser_version >= 8.5);
-	}
-	else if (preg_match(",opera,i", $browser_description)) {
-		preg_match(",Opera ([^\ ]*),i", $browser_description, $match);
-		$browser_name = "Opera";
-		$browser_version = $match[1];
-		$browser_barre = ($browser_version >= 8.5);
-	}
-	else if (preg_match(",msie,i", $browser_description)) {
-		preg_match(",MSIE ([^;]*),i", $browser_description, $match);
-		$browser_name = "MSIE";
-		$browser_version = $match[1];
-		$browser_barre = ($browser_version >= 5.5);
-	}
-	else if (preg_match(",KHTML,i", $browser_description) &&
-		preg_match(",Safari/([^;]*),", $browser_description, $match)) {
-		$browser_name = "Safari";
-		$browser_version = $match[1];
-		$browser_barre = ($browser_version >= 5.0);
-	}
-	else if (preg_match(",mozilla,i", $browser_name) AND $browser_version >= 5) {
-		// Numero de version pour Mozilla "authentique"
-		if (preg_match(",rv:([0-9]+\.[0-9]+),", $browser_description, $match))
-			$browser_rev = doubleval($match[1]);
-		// Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
-		else if (strpos($browser_description, "Gecko") and !strpos($browser_description, "KHTML"))
-			$browser_rev = 1.4;
-		// Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
-		else $browser_rev = 1.0;
-		$browser_barre = $browser_rev >= 1.3;
-	}
+    if (!preg_match(",opera,i", $browser_description)&&preg_match(",opera,i", $browser_name)) {
+        $browser_name = "Opera";
+        $browser_version = $match[2];
+        $browser_barre = ($browser_version >= 8.5);
+    }
+    else if (preg_match(",opera,i", $browser_description)) {
+        preg_match(",Opera ([^\ ]*),i", $browser_description, $match);
+        $browser_name = "Opera";
+        $browser_version = $match[1];
+        $browser_barre = ($browser_version >= 8.5);
+    }
+    else if (preg_match(",msie,i", $browser_description)) {
+        preg_match(",MSIE ([^;]*),i", $browser_description, $match);
+        $browser_name = "MSIE";
+        $browser_version = $match[1];
+        $browser_barre = ($browser_version >= 5.5);
+    }
+    else if (preg_match(",KHTML,i", $browser_description) &&
+        preg_match(",Safari/([^;]*),", $browser_description, $match)) {
+        $browser_name = "Safari";
+        $browser_version = $match[1];
+        $browser_barre = ($browser_version >= 5.0);
+    }
+    else if (preg_match(",mozilla,i", $browser_name) AND $browser_version >= 5) {
+        // Numero de version pour Mozilla "authentique"
+        if (preg_match(",rv:([0-9]+\.[0-9]+),", $browser_description, $match))
+            $browser_rev = doubleval($match[1]);
+        // Autres Gecko => equivalents 1.4 par defaut (Galeon, etc.)
+        else if (strpos($browser_description, "Gecko") and !strpos($browser_description, "KHTML"))
+            $browser_rev = 1.4;
+        // Machins quelconques => equivalents 1.0 par defaut (Konqueror, etc.)
+        else $browser_rev = 1.0;
+        $browser_barre = $browser_rev >= 1.3;
+    }
 
-	if (!$browser_name) $browser_name = "Mozilla";
+    if (!$browser_name) $browser_name = "Mozilla";
 }
 
 verif_butineur();

ecrire/inc/charger_php_extension.php

Indentation +43 added lines, -43 removed lines

@@ -16,53 +16,53 @@
 //
 // http://doc.spip.org/@inc_charger_php_extension_dist
 function inc_charger_php_extension_dist($module){
-	if (extension_loaded($module)) {
-		return true;
-	}
+    if (extension_loaded($module)) {
+        return true;
+    }
 
-	// A-t-on le droit de faire un dl() ; si on peut, on memorise la reponse,
-	// lourde a calculer, dans les meta
-	if (!isset($GLOBALS['meta']['dl_allowed'])) {
-		if (!@ini_get('safe_mode') 
-		  && @ini_get('enable_dl')
-		  && @function_exists('dl')) {
-			ob_start();
-			phpinfo(INFO_GENERAL); /* Only general info */
-			$a = strip_tags(ob_get_contents());
-			ob_end_clean();
-			if (preg_match('@Thread Safety[[:space:]]*enabled@', $a)) {
-				if (preg_match('@Server API[[:space:]]*\(CGI\|CLI\)@', $a)) {
-					$GLOBALS['meta']['dl_allowed'] = true;
-				} else {
-					$GLOBALS['meta']['dl_allowed'] = false;
-				}
-			} else {
-				$GLOBALS['meta']['dl_allowed'] = true;
-			}
-		} else {
-			$GLOBALS['meta']['dl_allowed'] = false;
-		}
+    // A-t-on le droit de faire un dl() ; si on peut, on memorise la reponse,
+    // lourde a calculer, dans les meta
+    if (!isset($GLOBALS['meta']['dl_allowed'])) {
+        if (!@ini_get('safe_mode') 
+          && @ini_get('enable_dl')
+          && @function_exists('dl')) {
+            ob_start();
+            phpinfo(INFO_GENERAL); /* Only general info */
+            $a = strip_tags(ob_get_contents());
+            ob_end_clean();
+            if (preg_match('@Thread Safety[[:space:]]*enabled@', $a)) {
+                if (preg_match('@Server API[[:space:]]*\(CGI\|CLI\)@', $a)) {
+                    $GLOBALS['meta']['dl_allowed'] = true;
+                } else {
+                    $GLOBALS['meta']['dl_allowed'] = false;
+                }
+            } else {
+                $GLOBALS['meta']['dl_allowed'] = true;
+            }
+        } else {
+            $GLOBALS['meta']['dl_allowed'] = false;
+        }
 
-		// Attention, le ecrire_meta() echouera si on le tente ici ;
-		// donc on ne fait rien, et on attend qu'un prochain ecrire_meta()
-		// se produisant apres cette sequence enregistre sa valeur.
-		#include_spip('inc/meta');
-		#ecrire_meta('dl_allowed', $GLOBALS['meta']['dl_allowed'], 'non');
-	}
+        // Attention, le ecrire_meta() echouera si on le tente ici ;
+        // donc on ne fait rien, et on attend qu'un prochain ecrire_meta()
+        // se produisant apres cette sequence enregistre sa valeur.
+        #include_spip('inc/meta');
+        #ecrire_meta('dl_allowed', $GLOBALS['meta']['dl_allowed'], 'non');
+    }
 
-	if (!$GLOBALS['meta']['dl_allowed']) {
-		return false;
-	}
+    if (!$GLOBALS['meta']['dl_allowed']) {
+        return false;
+    }
 
-	/* Once we require PHP >= 4.3, we might use PHP_SHLIB_SUFFIX here */
-	if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
-		$module_file = 'php_' . $module . '.dll';
-	} elseif (PHP_OS=='HP-UX') {
-		$module_file = $module . '.sl';
-	} else {
-		$module_file = $module . '.so';
-	}
+    /* Once we require PHP >= 4.3, we might use PHP_SHLIB_SUFFIX here */
+    if (strtoupper(substr(PHP_OS, 0, 3)) === 'WIN') {
+        $module_file = 'php_' . $module . '.dll';
+    } elseif (PHP_OS=='HP-UX') {
+        $module_file = $module . '.sl';
+    } else {
+        $module_file = $module . '.so';
+    }
 
-	return @dl($module_file);
+    return @dl($module_file);
 }
 ?>

ecrire/inc/lien.php

Indentation +194 added lines, -194 removed lines

@@ -22,7 +22,7 @@ 
 
 function inc_lien_dist($lien, $texte='', $class='', $title='', $hlang='', $rel='', $connect='', $env=array()) {
 
-	return $lien;
+    return $lien;
 }
 
 // Regexp des raccourcis, aussi utilisee pour la fusion de sauvegarde Spip
@@ -34,12 +34,12 @@ 
 // http://doc.spip.org/@expanser_liens
 function expanser_liens($t, $connect='', $env=array()){
 
-	$t = pipeline('pre_liens', $t);
+    $t = pipeline('pre_liens', $t);
 
-	// on passe a traiter_modeles la liste des liens reperes pour lui permettre
-	// de remettre le texte d'origine dans les parametres du modele
-	$t = traiter_modeles($t, false, false, $connect);
-	return $t;
+    // on passe a traiter_modeles la liste des liens reperes pour lui permettre
+    // de remettre le texte d'origine dans les parametres du modele
+    $t = traiter_modeles($t, false, false, $connect);
+    return $t;
 }
 
 // Meme analyse mais pour eliminer les liens
@@ -49,7 +49,7 @@ 
 {
 
 
-	return $texte;
+    return $texte;
 }
 
 
@@ -58,9 +58,9 @@ 
 // la langue et la bulle eventuelles
 // http://doc.spip.org/@traiter_raccourci_lien_atts
 function traiter_raccourci_lien_atts($texte) {
-	$bulle='';
-	$hlang='';
-	return array(trim($texte), $bulle, $hlang);
+    $bulle='';
+    $hlang='';
+    return array(trim($texte), $bulle, $hlang);
 }
 
 
@@ -79,7 +79,7 @@ 
  * @return string
  */
 function virtuel_redirige($virtuel, $url=false){
-	return $virtuel;
+    return $virtuel;
 }
 
 
@@ -94,8 +94,8 @@ 
 
 // http://doc.spip.org/@calculer_url
 function calculer_url ($ref, $texte='', $pour='url', $connect='', $echappe_typo = true) {
-	$r = traiter_lien_implicite($ref, $texte, $pour, $connect, $echappe_typo);
-	return $r ? $r : traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
+    $r = traiter_lien_implicite($ref, $texte, $pour, $connect, $echappe_typo);
+    return $r ? $r : traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
 }
 
 define('_EXTRAIRE_LIEN', ',^\s*(?:' . _PROTOCOLES_STD . '):?/?/?\s*$,iS');
@@ -103,78 +103,78 @@ 
 // http://doc.spip.org/@traiter_lien_explicite
 function traiter_lien_explicite ($ref, $texte='', $pour='url', $connect='', $echappe_typo = true)
 {
-	if (preg_match(_EXTRAIRE_LIEN, $ref))
-		return ($pour != 'tout') ? '' : array('','','','');
-
-	$lien = entites_html(trim($ref));
-
-	// Liens explicites
-	if (!$texte) {
-		$texte = str_replace('"', '', $lien);
-		// evite l'affichage de trops longues urls.
-		$lien_court = charger_fonction('lien_court', 'inc');
-		$texte = $lien_court($texte);
-		if ($echappe_typo){
-			$texte = "<html>".quote_amp($texte)."</html>";
-		}
-	}
-
-	// petites corrections d'URL
-	if (preg_match('/^www\.[^@]+$/S',$lien))
-		$lien = "http://".$lien;
-	else if (strpos($lien, "@") && email_valide($lien)) {
-		if (!$texte) $texte = $lien;
-		$lien = "mailto:".$lien;
-	}
+    if (preg_match(_EXTRAIRE_LIEN, $ref))
+        return ($pour != 'tout') ? '' : array('','','','');
+
+    $lien = entites_html(trim($ref));
+
+    // Liens explicites
+    if (!$texte) {
+        $texte = str_replace('"', '', $lien);
+        // evite l'affichage de trops longues urls.
+        $lien_court = charger_fonction('lien_court', 'inc');
+        $texte = $lien_court($texte);
+        if ($echappe_typo){
+            $texte = "<html>".quote_amp($texte)."</html>";
+        }
+    }
+
+    // petites corrections d'URL
+    if (preg_match('/^www\.[^@]+$/S',$lien))
+        $lien = "http://".$lien;
+    else if (strpos($lien, "@") && email_valide($lien)) {
+        if (!$texte) $texte = $lien;
+        $lien = "mailto:".$lien;
+    }
 	
-	if ($pour == 'url') return $lien;
+    if ($pour == 'url') return $lien;
 
-	if ($pour == 'titre') return $texte;
+    if ($pour == 'titre') return $texte;
 
-	return array('url' => $lien, 'titre' => $texte);
+    return array('url' => $lien, 'titre' => $texte);
 }
 
 function liens_implicite_glose_dist($texte,$id,$type,$args,$ancre,$connect=''){
-	if (function_exists($f = 'glossaire_' . $ancre))
-		$url = $f($texte, $id);
-	else
-		$url = glossaire_std($texte);
-	return $url;
+    if (function_exists($f = 'glossaire_' . $ancre))
+        $url = $f($texte, $id);
+    else
+        $url = glossaire_std($texte);
+    return $url;
 }
 
 // http://doc.spip.org/@traiter_lien_implicite
 function traiter_lien_implicite ($ref, $texte='', $pour='url', $connect='')
 {
-	if (!($match = typer_raccourci($ref))) return false;
-	@list($type,,$id,,$args,,$ancre) = $match;
+    if (!($match = typer_raccourci($ref))) return false;
+    @list($type,,$id,,$args,,$ancre) = $match;
 # attention dans le cas des sites le lien doit pointer non pas sur
 # la page locale du site, mais directement sur le site lui-meme
-	if ($f = charger_fonction("implicite_$type","liens",true))
-		$url = $f($texte,$id,$type,$args,$ancre,$connect);
-	if (!$url)
-		$url = generer_url_entite($id,$type,$args,$ancre,$connect ? $connect : NULL);
-	if (!$url) return false;
-	if (is_array($url)) {
-		@list($type,$id) = $url;
-		$url = generer_url_entite($id,$type,$args,$ancre,$connect ? $connect : NULL);
-	}
-	if ($pour === 'url') return $url;
-	$r = traiter_raccourci_titre($id, $type, $connect);
-	if ($r) $r['class'] =  ($type == 'site')?'spip_out':'spip_in';
-	if ($texte = trim($texte)) $r['titre'] = $texte;
-	if (!@$r['titre']) $r['titre'] =  _T($type) . " $id";
-	if ($pour=='titre') return $r['titre'];
-	$r['url'] = $url;
-
-	// dans le cas d'un lien vers un doc, ajouter le type='mime/type'
-	if ($type == 'document'
-	AND $mime = sql_getfetsel('mime_type', 'spip_types_documents',
-			"extension IN (".sql_get_select("extension","spip_documents","id_document=".sql_quote($id)).")",
-			'','','','',$connect)
-	)
-		$r['mime'] = $mime;
-
-	return $r;
+    if ($f = charger_fonction("implicite_$type","liens",true))
+        $url = $f($texte,$id,$type,$args,$ancre,$connect);
+    if (!$url)
+        $url = generer_url_entite($id,$type,$args,$ancre,$connect ? $connect : NULL);
+    if (!$url) return false;
+    if (is_array($url)) {
+        @list($type,$id) = $url;
+        $url = generer_url_entite($id,$type,$args,$ancre,$connect ? $connect : NULL);
+    }
+    if ($pour === 'url') return $url;
+    $r = traiter_raccourci_titre($id, $type, $connect);
+    if ($r) $r['class'] =  ($type == 'site')?'spip_out':'spip_in';
+    if ($texte = trim($texte)) $r['titre'] = $texte;
+    if (!@$r['titre']) $r['titre'] =  _T($type) . " $id";
+    if ($pour=='titre') return $r['titre'];
+    $r['url'] = $url;
+
+    // dans le cas d'un lien vers un doc, ajouter le type='mime/type'
+    if ($type == 'document'
+    AND $mime = sql_getfetsel('mime_type', 'spip_types_documents',
+            "extension IN (".sql_get_select("extension","spip_documents","id_document=".sql_quote($id)).")",
+            '','','','',$connect)
+    )
+        $r['mime'] = $mime;
+
+    return $r;
 }
 
 // analyse des raccourcis issus de [TITRE->RACCOURCInnn] et connexes
@@ -183,34 +183,34 @@ 
 
 // http://doc.spip.org/@typer_raccourci
 function typer_raccourci ($lien) {
-	if (!preg_match(_RACCOURCI_URL, $lien, $match)) return array();
-	$f = $match[1];
-	// valeur par defaut et alias historiques
-	if (!$f) $f = 'article';
-	else if ($f == 'art') $f = 'article';
-	else if ($f == 'br') $f = 'breve';
-	else if ($f == 'rub') $f = 'rubrique';
-	else if ($f == 'aut') $f = 'auteur';
-	else if ($f == 'doc' OR $f == 'im' OR $f == 'img' OR $f == 'image' OR $f == 'emb')
-		$f = 'document';
-	else if (preg_match('/^br..?ve$/S', $f)) $f = 'breve'; # accents :(
-	$match[0] = $f;
-	return $match;
+    if (!preg_match(_RACCOURCI_URL, $lien, $match)) return array();
+    $f = $match[1];
+    // valeur par defaut et alias historiques
+    if (!$f) $f = 'article';
+    else if ($f == 'art') $f = 'article';
+    else if ($f == 'br') $f = 'breve';
+    else if ($f == 'rub') $f = 'rubrique';
+    else if ($f == 'aut') $f = 'auteur';
+    else if ($f == 'doc' OR $f == 'im' OR $f == 'img' OR $f == 'image' OR $f == 'emb')
+        $f = 'document';
+    else if (preg_match('/^br..?ve$/S', $f)) $f = 'breve'; # accents :(
+    $match[0] = $f;
+    return $match;
 }
 
 // Retourne le champ textuel associe a une cle primaire, et sa langue
 function traiter_raccourci_titre($id, $type, $connect=NULL)
 {
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table(table_objet($type));
-	if (!($desc AND $s = $desc['titre'])) return array();
-	$_id = $desc['key']['PRIMARY KEY'];
-	$r = sql_fetsel($s, $desc['table'], "$_id=$id", '','','','',$connect);
-	if (!$r) return array();
-	$r['titre'] = supprimer_numero($r['titre']);
-	if (!$r['titre']) $r['titre'] = $r['surnom'];
-	if (!isset($r['lang'])) $r['lang'] = '';
-	return $r;
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table(table_objet($type));
+    if (!($desc AND $s = $desc['titre'])) return array();
+    $_id = $desc['key']['PRIMARY KEY'];
+    $r = sql_fetsel($s, $desc['table'], "$_id=$id", '','','','',$connect);
+    if (!$r) return array();
+    $r['titre'] = supprimer_numero($r['titre']);
+    if (!$r['titre']) $r['titre'] = $r['surnom'];
+    if (!isset($r['lang'])) $r['lang'] = '';
+    return $r;
 }
 
 // traite les modeles (dans la fonction typo), en remplacant
@@ -222,107 +222,107 @@ 
 // http://doc.spip.org/@traiter_modeles
 
 define('_RACCOURCI_MODELE', 
-	 '(<([a-z_-]{3,})' # <modele
-	.'\s*([0-9]*)\s*' # id
-	.'([|](?:<[^<>]*>|[^>])*?)?' # |arguments (y compris des tags <...>)
-	.'\s*/?'.'>)' # fin du modele >
-	.'\s*(<\/a>)?' # eventuel </a>
-       );
+        '(<([a-z_-]{3,})' # <modele
+    .'\s*([0-9]*)\s*' # id
+    .'([|](?:<[^<>]*>|[^>])*?)?' # |arguments (y compris des tags <...>)
+    .'\s*/?'.'>)' # fin du modele >
+    .'\s*(<\/a>)?' # eventuel </a>
+        );
 
 define('_RACCOURCI_MODELE_DEBUT', '@^' . _RACCOURCI_MODELE .'@isS');
 
 // http://doc.spip.org/@traiter_modeles
 function traiter_modeles($texte, $doublons=false, $echap='', $connect='', $liens = null, $env = array()) {
-	// preserver la compatibilite : true = recherche des documents
-	if ($doublons===true)
-		$doublons = array('documents'=>array('doc','emb','img'));
-	// detecter les modeles (rapide)
-	if (strpos($texte,"<")!==false AND
-	  preg_match_all('/<[a-z_-]{3,}\s*[0-9|]+/iS', $texte, $matches, PREG_SET_ORDER)) {
-		include_spip('public/assembler');
-		$wrap_embed_html = charger_fonction("wrap_embed_html","inc",true);
-		foreach ($matches as $match) {
-			// Recuperer l'appel complet (y compris un eventuel lien)
-
-			$a = strpos($texte,$match[0]);
-			preg_match(_RACCOURCI_MODELE_DEBUT,
-			substr($texte, $a), $regs);
-			$regs[]=""; // s'assurer qu'il y a toujours un 5e arg, eventuellement vide
-			list(,$mod, $type, $id, $params, $fin) = $regs;
-			if ($fin AND
-			preg_match('/<a\s[^<>]*>\s*$/i',
-					substr($texte, 0, $a), $r)) {
-				$lien = array(
-					'href' => extraire_attribut($r[0],'href'),
-					'class' => extraire_attribut($r[0],'class'),
-					'mime' => extraire_attribut($r[0],'type'),
-					'title' => extraire_attribut($r[0],'title'),
-					'hreflang' => extraire_attribut($r[0],'hreflang')
-				);
-				$n = strlen($r[0]);
-				$a -= $n;
-				$cherche = $n + strlen($regs[0]);
-			} else {
-				$lien = false;
-				$cherche = strlen($mod);
-			}
-
-			// calculer le modele
-			# hack indexation
-			if ($doublons)
-				$texte .= preg_replace(',[|][^|=]*,s',' ',$params);
-			# version normale
-			else {
-				// si un tableau de liens a ete passe, reinjecter le contenu d'origine
-				// dans les parametres, plutot que les liens echappes
-				if (!is_null($liens))
-					$params = str_replace($liens[0], $liens[1], $params);
-				$modele = inclure_modele($type, $id, $params, $lien, $connect, $env);
-				// en cas d'echec, 
-				// si l'objet demande a une url, 
-				// creer un petit encadre vers elle
-				if ($modele === false) {
-					if (!$lien)
-						$lien = traiter_lien_implicite("$type$id", '', 'tout', $connect);
-					if ($lien)
-						$modele = '<a href="'
-						  .$lien['url']
-						  .'" class="spip_modele'
-						  . '">'
-						  .sinon($lien['titre'], _T('ecrire:info_sans_titre'))
-						  ."</a>";
-					else {
-						$modele = "";
-						if (test_espace_prive()) {
-							$modele = entites_html(substr($texte,$a,$cherche));
-							if (!is_null($liens))
-								$modele = "<pre>".str_replace($liens[0], $liens[1], $modele)."</pre>";
-						}
-					}
-				}
-				// le remplacer dans le texte
-				if ($modele !== false) {
-					$modele = protege_js_modeles($modele);
-					if ($wrap_embed_html){
-						$modele = $wrap_embed_html($mod,$modele);
-					}
-					$rempl = code_echappement($modele, $echap);
-					$texte = substr($texte, 0, $a)
-						. $rempl
-						. substr($texte, $a+$cherche);
-				}
-			}
-
-			// hack pour tout l'espace prive
-			if (((!_DIR_RESTREINT) OR ($doublons)) AND ($id)){
-				foreach($doublons?$doublons:array('documents'=>array('doc','emb','img')) as $quoi=>$modeles)
-					if (in_array($type,$modeles))
-						$GLOBALS["doublons_{$quoi}_inclus"][] = $id;
-			}
-		}
-	}
-
-	return $texte;
+    // preserver la compatibilite : true = recherche des documents
+    if ($doublons===true)
+        $doublons = array('documents'=>array('doc','emb','img'));
+    // detecter les modeles (rapide)
+    if (strpos($texte,"<")!==false AND
+      preg_match_all('/<[a-z_-]{3,}\s*[0-9|]+/iS', $texte, $matches, PREG_SET_ORDER)) {
+        include_spip('public/assembler');
+        $wrap_embed_html = charger_fonction("wrap_embed_html","inc",true);
+        foreach ($matches as $match) {
+            // Recuperer l'appel complet (y compris un eventuel lien)
+
+            $a = strpos($texte,$match[0]);
+            preg_match(_RACCOURCI_MODELE_DEBUT,
+            substr($texte, $a), $regs);
+            $regs[]=""; // s'assurer qu'il y a toujours un 5e arg, eventuellement vide
+            list(,$mod, $type, $id, $params, $fin) = $regs;
+            if ($fin AND
+            preg_match('/<a\s[^<>]*>\s*$/i',
+                    substr($texte, 0, $a), $r)) {
+                $lien = array(
+                    'href' => extraire_attribut($r[0],'href'),
+                    'class' => extraire_attribut($r[0],'class'),
+                    'mime' => extraire_attribut($r[0],'type'),
+                    'title' => extraire_attribut($r[0],'title'),
+                    'hreflang' => extraire_attribut($r[0],'hreflang')
+                );
+                $n = strlen($r[0]);
+                $a -= $n;
+                $cherche = $n + strlen($regs[0]);
+            } else {
+                $lien = false;
+                $cherche = strlen($mod);
+            }
+
+            // calculer le modele
+            # hack indexation
+            if ($doublons)
+                $texte .= preg_replace(',[|][^|=]*,s',' ',$params);
+            # version normale
+            else {
+                // si un tableau de liens a ete passe, reinjecter le contenu d'origine
+                // dans les parametres, plutot que les liens echappes
+                if (!is_null($liens))
+                    $params = str_replace($liens[0], $liens[1], $params);
+                $modele = inclure_modele($type, $id, $params, $lien, $connect, $env);
+                // en cas d'echec, 
+                // si l'objet demande a une url, 
+                // creer un petit encadre vers elle
+                if ($modele === false) {
+                    if (!$lien)
+                        $lien = traiter_lien_implicite("$type$id", '', 'tout', $connect);
+                    if ($lien)
+                        $modele = '<a href="'
+                            .$lien['url']
+                            .'" class="spip_modele'
+                            . '">'
+                            .sinon($lien['titre'], _T('ecrire:info_sans_titre'))
+                            ."</a>";
+                    else {
+                        $modele = "";
+                        if (test_espace_prive()) {
+                            $modele = entites_html(substr($texte,$a,$cherche));
+                            if (!is_null($liens))
+                                $modele = "<pre>".str_replace($liens[0], $liens[1], $modele)."</pre>";
+                        }
+                    }
+                }
+                // le remplacer dans le texte
+                if ($modele !== false) {
+                    $modele = protege_js_modeles($modele);
+                    if ($wrap_embed_html){
+                        $modele = $wrap_embed_html($mod,$modele);
+                    }
+                    $rempl = code_echappement($modele, $echap);
+                    $texte = substr($texte, 0, $a)
+                        . $rempl
+                        . substr($texte, $a+$cherche);
+                }
+            }
+
+            // hack pour tout l'espace prive
+            if (((!_DIR_RESTREINT) OR ($doublons)) AND ($id)){
+                foreach($doublons?$doublons:array('documents'=>array('doc','emb','img')) as $quoi=>$modeles)
+                    if (in_array($type,$modeles))
+                        $GLOBALS["doublons_{$quoi}_inclus"][] = $id;
+            }
+        }
+    }
+
+    return $texte;
 }
 
 //
@@ -331,19 +331,19 @@ 
 // http://doc.spip.org/@traiter_raccourci_ancre
 function traiter_raccourci_ancre($letexte)
 {
-	return $letexte;
+    return $letexte;
 }
 
 // http://doc.spip.org/@traiter_raccourci_glossaire
 function traiter_raccourci_glossaire($texte)
 {
-	return $texte;
+    return $texte;
 }
 
 // http://doc.spip.org/@glossaire_std
 function glossaire_std($terme)
 {
-	return  $terme;
+    return  $terme;
 }
 
 ?>

ecrire/inc/autoriser.php

Indentation +386 added lines, -386 removed lines

@@ -41,8 +41,8 @@ 
 
 // mes_fonctions peut aussi declarer des autorisations, donc il faut donc le charger
 if ($f = find_in_path('mes_fonctions.php')) {
-	global $dossier_squelettes;
-	include_once(_ROOT_CWD . $f);
+    global $dossier_squelettes;
+    include_once(_ROOT_CWD . $f);
 }
 
 
@@ -82,14 +82,14 @@ 
  * @return bool
  *   true si la personne peut effectuer l'action
  */
-	function autoriser($faire, $type='', $id=0, $qui = NULL, $opt = NULL) {
-		// Charger les fonctions d'autorisation supplementaires
-		static $pipe;
-		if (!isset($pipe)) { $pipe = 1; pipeline('autoriser'); }
-
-		$args = func_get_args();
-		return call_user_func_array('autoriser_dist', $args);
-	}
+    function autoriser($faire, $type='', $id=0, $qui = NULL, $opt = NULL) {
+        // Charger les fonctions d'autorisation supplementaires
+        static $pipe;
+        if (!isset($pipe)) { $pipe = 1; pipeline('autoriser'); }
+
+        $args = func_get_args();
+        return call_user_func_array('autoriser_dist', $args);
+    }
 }
 
 
@@ -117,62 +117,62 @@ 
  */
 function autoriser_dist($faire, $type='', $id=0, $qui = NULL, $opt = NULL) {
 
-	// Qui ? visiteur_session ?
-	// si null ou '' (appel depuis #AUTORISER) on prend l'auteur loge
-	if ($qui === NULL OR $qui==='')
-	  $qui = $GLOBALS['visiteur_session'] ? $GLOBALS['visiteur_session'] : array('statut' => '', 'id_auteur' =>0, 'webmestre' => 'non');
-	elseif (is_numeric($qui)) {
-		$qui = sql_fetsel("*", "spip_auteurs", "id_auteur=".$qui);
-	}
-
-	// Admins restreints, on construit ici (pas generique mais...)
-	// le tableau de toutes leurs rubriques (y compris les sous-rubriques)
-	if (_ADMINS_RESTREINTS AND is_array($qui)) {
-		$qui['restreint'] = isset($qui['id_auteur']) ? liste_rubriques_auteur($qui['id_auteur']) : array();
-	}
-
-	if (_DEBUG_AUTORISER) spip_log("autoriser $faire $type $id (" . (isset($qui['nom']) ? $qui['nom'] : '') . ") ?");
-
-	// passer par objet_type pour avoir les alias
-	// et supprimer les _
-	$type = str_replace('_','',  strncmp($type,"_",1)==0?$type:objet_type($type,false));
-
-	// Si une exception a ete decretee plus haut dans le code, l'appliquer
-	if (isset($GLOBALS['autoriser_exception'][$faire][$type][$id])
-	AND autoriser_exception($faire,$type,$id,'verifier'))
-		return true;
-
-	// Chercher une fonction d'autorisation
-	// Dans l'ordre on va chercher autoriser_type_faire[_dist], autoriser_type[_dist],
-	// autoriser_faire[_dist], autoriser_defaut[_dist]
-	$fonctions = $type
-		? array (
-			'autoriser_'.$type.'_'.$faire,
-			'autoriser_'.$type.'_'.$faire.'_dist',
-			'autoriser_'.$type,
-			'autoriser_'.$type.'_dist',
-			'autoriser_'.$faire,
-			'autoriser_'.$faire.'_dist',
-			'autoriser_defaut',
-			'autoriser_defaut_dist'
-		)
-		: array (
-			'autoriser_'.$faire,
-			'autoriser_'.$faire.'_dist',
-			'autoriser_defaut',
-			'autoriser_defaut_dist'
-		);
-
-	foreach ($fonctions as $f) {
-		if (function_exists($f)) {
-			$a = $f($faire,$type,$id,$qui,$opt);
-			break;
-		}
-	}
-
-	if (_DEBUG_AUTORISER) spip_log("$f($faire,$type,$id," . (isset($qui['nom']) ? $qui['nom'] : '') . "): ".($a?'OK':'niet'));
-
-	return $a;
+    // Qui ? visiteur_session ?
+    // si null ou '' (appel depuis #AUTORISER) on prend l'auteur loge
+    if ($qui === NULL OR $qui==='')
+        $qui = $GLOBALS['visiteur_session'] ? $GLOBALS['visiteur_session'] : array('statut' => '', 'id_auteur' =>0, 'webmestre' => 'non');
+    elseif (is_numeric($qui)) {
+        $qui = sql_fetsel("*", "spip_auteurs", "id_auteur=".$qui);
+    }
+
+    // Admins restreints, on construit ici (pas generique mais...)
+    // le tableau de toutes leurs rubriques (y compris les sous-rubriques)
+    if (_ADMINS_RESTREINTS AND is_array($qui)) {
+        $qui['restreint'] = isset($qui['id_auteur']) ? liste_rubriques_auteur($qui['id_auteur']) : array();
+    }
+
+    if (_DEBUG_AUTORISER) spip_log("autoriser $faire $type $id (" . (isset($qui['nom']) ? $qui['nom'] : '') . ") ?");
+
+    // passer par objet_type pour avoir les alias
+    // et supprimer les _
+    $type = str_replace('_','',  strncmp($type,"_",1)==0?$type:objet_type($type,false));
+
+    // Si une exception a ete decretee plus haut dans le code, l'appliquer
+    if (isset($GLOBALS['autoriser_exception'][$faire][$type][$id])
+    AND autoriser_exception($faire,$type,$id,'verifier'))
+        return true;
+
+    // Chercher une fonction d'autorisation
+    // Dans l'ordre on va chercher autoriser_type_faire[_dist], autoriser_type[_dist],
+    // autoriser_faire[_dist], autoriser_defaut[_dist]
+    $fonctions = $type
+        ? array (
+            'autoriser_'.$type.'_'.$faire,
+            'autoriser_'.$type.'_'.$faire.'_dist',
+            'autoriser_'.$type,
+            'autoriser_'.$type.'_dist',
+            'autoriser_'.$faire,
+            'autoriser_'.$faire.'_dist',
+            'autoriser_defaut',
+            'autoriser_defaut_dist'
+        )
+        : array (
+            'autoriser_'.$faire,
+            'autoriser_'.$faire.'_dist',
+            'autoriser_defaut',
+            'autoriser_defaut_dist'
+        );
+
+    foreach ($fonctions as $f) {
+        if (function_exists($f)) {
+            $a = $f($faire,$type,$id,$qui,$opt);
+            break;
+        }
+    }
+
+    if (_DEBUG_AUTORISER) spip_log("$f($faire,$type,$id," . (isset($qui['nom']) ? $qui['nom'] : '') . "): ".($a?'OK':'niet'));
+
+    return $a;
 }
 
 // une globale pour aller au plus vite dans la fonction generique ci dessus
@@ -190,17 +190,17 @@ 
  * @return bool
  */
 function autoriser_exception($faire,$type,$id,$autoriser=true){
-	// une static innaccessible par url pour verifier que la globale est positionnee a bon escient
-	static $autorisation;
-	if ($autoriser==='verifier')
-			return isset($autorisation[$faire][$type][$id]);
-	if ($autoriser===true)
-		$GLOBALS['autoriser_exception'][$faire][$type][$id] = $autorisation[$faire][$type][$id] = true;
-	if ($autoriser===false) {
-		unset($GLOBALS['autoriser_exception'][$faire][$type][$id]);
-		unset($autorisation[$faire][$type][$id]);
-	}
-	return false;
+    // une static innaccessible par url pour verifier que la globale est positionnee a bon escient
+    static $autorisation;
+    if ($autoriser==='verifier')
+            return isset($autorisation[$faire][$type][$id]);
+    if ($autoriser===true)
+        $GLOBALS['autoriser_exception'][$faire][$type][$id] = $autorisation[$faire][$type][$id] = true;
+    if ($autoriser===false) {
+        unset($GLOBALS['autoriser_exception'][$faire][$type][$id]);
+        unset($autorisation[$faire][$type][$id]);
+    }
+    return false;
 }
 
  
@@ -217,9 +217,9 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_defaut_dist($faire, $type, $id, $qui, $opt) {
-	return
-		$qui['statut'] == '0minirezo'
-		AND !$qui['restreint'];
+    return
+        $qui['statut'] == '0minirezo'
+        AND !$qui['restreint'];
 }
 
 
@@ -234,7 +234,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_ecrire_dist($faire, $type, $id, $qui, $opt) {
-	return in_array($qui['statut'], array('0minirezo', '1comite'));
+    return in_array($qui['statut'], array('0minirezo', '1comite'));
 }
 
 /**
@@ -251,7 +251,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_creer_dist($faire, $type, $id, $qui, $opt) {
-	return in_array($qui['statut'], array('0minirezo', '1comite'));
+    return in_array($qui['statut'], array('0minirezo', '1comite'));
 }
 
 /**
@@ -265,32 +265,32 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_previsualiser_dist($faire, $type, $id, $qui, $opt) {
-	// si auteur pas autorise, NIET
-	if (strpos($GLOBALS['meta']['preview'], ",". $qui['statut'] .",")===false)
-		return false;
-	// si pas de type et statut fourni, c'est une autorisation generale => OK
-	if (!$type)
-		return true;
-
-	include_spip('base/objets');
-	$infos = lister_tables_objets_sql(table_objet_sql($type));
-	if (isset($infos['statut']))
-		foreach($infos['statut'] as $c){
-			if (isset($c['publie'])){
-				if (!isset($c['previsu'])) return false; // pas de previsu definie => NIET
-				$champ = $c['champ'];
-				if (!isset($opt[$champ])) return false; // pas de champ passe a la demande => NIET
-				$previsu = explode(',',$c['previsu']);
-				// regarder si ce statut est autorise pour l'auteur
-				if (in_array($opt[$champ]."/auteur",$previsu)){
-					if (!sql_countsel("spip_auteurs_liens","id_auteur=".intval($qui['id_auteur'])." AND objet=".sql_quote($type)." AND id_objet=".intval($id)))
-						return false;  // pas auteur de cet objet => NIET
-				}
-				elseif (!in_array($opt[$champ],$previsu)) // le statut n'est pas dans ceux definis par la previsu => NIET
-					return false;
-			}
-		}
-	return true;
+    // si auteur pas autorise, NIET
+    if (strpos($GLOBALS['meta']['preview'], ",". $qui['statut'] .",")===false)
+        return false;
+    // si pas de type et statut fourni, c'est une autorisation generale => OK
+    if (!$type)
+        return true;
+
+    include_spip('base/objets');
+    $infos = lister_tables_objets_sql(table_objet_sql($type));
+    if (isset($infos['statut']))
+        foreach($infos['statut'] as $c){
+            if (isset($c['publie'])){
+                if (!isset($c['previsu'])) return false; // pas de previsu definie => NIET
+                $champ = $c['champ'];
+                if (!isset($opt[$champ])) return false; // pas de champ passe a la demande => NIET
+                $previsu = explode(',',$c['previsu']);
+                // regarder si ce statut est autorise pour l'auteur
+                if (in_array($opt[$champ]."/auteur",$previsu)){
+                    if (!sql_countsel("spip_auteurs_liens","id_auteur=".intval($qui['id_auteur'])." AND objet=".sql_quote($type)." AND id_objet=".intval($id)))
+                        return false;  // pas auteur de cet objet => NIET
+                }
+                elseif (!in_array($opt[$champ],$previsu)) // le statut n'est pas dans ceux definis par la previsu => NIET
+                    return false;
+            }
+        }
+    return true;
 }
 
 /**
@@ -304,7 +304,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_changerlangue_dist($faire, $type, $id, $qui, $opt) {
-	return autoriser('modifier',$type,$id,$qui,$opt);
+    return autoriser('modifier',$type,$id,$qui,$opt);
 }
 
 /**
@@ -318,25 +318,25 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_dater_dist($faire, $type, $id, $qui, $opt) {
-	if (!isset($opt['statut'])){
-		$table = table_objet($type);
-		$trouver_table = charger_fonction('trouver_table','base');
-		$desc = $trouver_table($table);
-		if (!$desc)
-			return false;
-		if (isset($desc['field']['statut'])){
-			$statut = sql_getfetsel("statut", $desc['table'], id_table_objet($type)."=".intval($id));
-		}
-		else
-			$statut = 'publie'; // pas de statut => publie
-	}
-	else
-		$statut = $opt['statut'];
-
-	if ($statut == 'publie'
-	 OR ($statut == 'prop' AND $type=='article' AND $GLOBALS['meta']["post_dates"] == "non"))
-		return autoriser('modifier', $type, $id);
-	return false;
+    if (!isset($opt['statut'])){
+        $table = table_objet($type);
+        $trouver_table = charger_fonction('trouver_table','base');
+        $desc = $trouver_table($table);
+        if (!$desc)
+            return false;
+        if (isset($desc['field']['statut'])){
+            $statut = sql_getfetsel("statut", $desc['table'], id_table_objet($type)."=".intval($id));
+        }
+        else
+            $statut = 'publie'; // pas de statut => publie
+    }
+    else
+        $statut = $opt['statut'];
+
+    if ($statut == 'publie'
+     OR ($statut == 'prop' AND $type=='article' AND $GLOBALS['meta']["post_dates"] == "non"))
+        return autoriser('modifier', $type, $id);
+    return false;
 }
 
 /**
@@ -353,7 +353,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_instituer_dist($faire, $type, $id, $qui, $opt) {
-	return autoriser('modifier',$type,$id,$qui,$opt);
+    return autoriser('modifier',$type,$id,$qui,$opt);
 }
 
 /**
@@ -369,31 +369,31 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_publierdans_dist($faire, $type, $id, $qui, $opt) {
-	return
-		($qui['statut'] == '0minirezo')
-		AND (
-			!$qui['restreint'] OR !$id
-			OR in_array($id, $qui['restreint'])
-		);
+    return
+        ($qui['statut'] == '0minirezo')
+        AND (
+            !$qui['restreint'] OR !$id
+            OR in_array($id, $qui['restreint'])
+        );
 }
 
- /**
- * Autorisation de créer une rubrique
- *
- * Il faut être administrateur pour pouvoir publier à la racine
- * 
- * @param  string $faire Action demandée
- * @param  string $type  Type d'objet sur lequel appliquer l'action
- * @param  int    $id    Identifiant de l'objet
- * @param  array  $qui   Description de l'auteur demandant l'autorisation
- * @param  array  $opt   Options de cette autorisation
- * @return bool          true s'il a le droit, false sinon
+    /**
+     * Autorisation de créer une rubrique
+     *
+     * Il faut être administrateur pour pouvoir publier à la racine
+     * 
+     * @param  string $faire Action demandée
+     * @param  string $type  Type d'objet sur lequel appliquer l'action
+     * @param  int    $id    Identifiant de l'objet
+     * @param  array  $qui   Description de l'auteur demandant l'autorisation
+     * @param  array  $opt   Options de cette autorisation
+     * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_creer_dist($faire, $type, $id, $qui, $opt) {
-	return 
-		((!$id AND autoriser('defaut',null,null,$qui, $opt))
-		OR $id AND autoriser('creerrubriquedans','rubrique', $id, $qui, $opt)
-		);
+    return 
+        ((!$id AND autoriser('defaut',null,null,$qui, $opt))
+        OR $id AND autoriser('creerrubriquedans','rubrique', $id, $qui, $opt)
+        );
 }
 
 /**
@@ -409,10 +409,10 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_creerrubriquedans_dist($faire, $type, $id, $qui, $opt) {
-	return
-		($id OR ($qui['statut'] == '0minirezo' AND !$qui['restreint']))
-		AND autoriser('voir','rubrique',$id)
-		AND autoriser('publierdans','rubrique',$id);
+    return
+        ($id OR ($qui['statut'] == '0minirezo' AND !$qui['restreint']))
+        AND autoriser('voir','rubrique',$id)
+        AND autoriser('publierdans','rubrique',$id);
 }
 
 /**
@@ -428,10 +428,10 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_creerarticledans_dist($faire, $type, $id, $qui, $opt) {
-	return
-		$id
-		AND autoriser('voir','rubrique',$id)
-		AND autoriser('creer', 'article');
+    return
+        $id
+        AND autoriser('voir','rubrique',$id)
+        AND autoriser('creer', 'article');
 }
 
 
@@ -448,8 +448,8 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_modifier_dist($faire, $type, $id, $qui, $opt) {
-	return
-		autoriser('publierdans', 'rubrique', $id, $qui, $opt);
+    return
+        autoriser('publierdans', 'rubrique', $id, $qui, $opt);
 }
 
 /**
@@ -465,21 +465,21 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_supprimer_dist($faire, $type, $id, $qui, $opt) {
-	if (!$id = intval($id))
-		return false;
+    if (!$id = intval($id))
+        return false;
 
-	if (sql_countsel('spip_rubriques', "id_parent=".intval($id)))
-		return false;
+    if (sql_countsel('spip_rubriques', "id_parent=".intval($id)))
+        return false;
 
-	if (sql_countsel('spip_articles', "id_rubrique=".intval($id)." AND (statut<>'poubelle')"))
-		return false;
+    if (sql_countsel('spip_articles', "id_rubrique=".intval($id)." AND (statut<>'poubelle')"))
+        return false;
 
-	$compte = pipeline('objet_compte_enfants',array('args'=>array('objet'=>'rubrique','id_objet'=>$id),'data'=>array()));
-	foreach($compte as $objet => $n)
-		if ($n)
-			return false;
+    $compte = pipeline('objet_compte_enfants',array('args'=>array('objet'=>'rubrique','id_objet'=>$id),'data'=>array()));
+    foreach($compte as $objet => $n)
+        if ($n)
+            return false;
 
-	return autoriser('modifier','rubrique',$id);
+    return autoriser('modifier','rubrique',$id);
 }
 
 
@@ -497,39 +497,39 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_article_modifier_dist($faire, $type, $id, $qui, $opt) {
-	$r = sql_fetsel("id_rubrique,statut", "spip_articles", "id_article=".sql_quote($id));
-
-	if (!function_exists('auteurs_article'))
-		include_spip('inc/auth'); // pour auteurs_article si espace public
-
-	return
-		$r
-		AND
-		(
-			autoriser('publierdans', 'rubrique', $r['id_rubrique'], $qui, $opt)
-			OR (
-				(!isset($opt['statut']) OR $opt['statut']!=='publie')
-				AND in_array($qui['statut'], array('0minirezo', '1comite'))
-				AND in_array($r['statut'], array('prop','prepa', 'poubelle'))
-				AND auteurs_article($id, "id_auteur=".$qui['id_auteur'])
-			)
-		);
+    $r = sql_fetsel("id_rubrique,statut", "spip_articles", "id_article=".sql_quote($id));
+
+    if (!function_exists('auteurs_article'))
+        include_spip('inc/auth'); // pour auteurs_article si espace public
+
+    return
+        $r
+        AND
+        (
+            autoriser('publierdans', 'rubrique', $r['id_rubrique'], $qui, $opt)
+            OR (
+                (!isset($opt['statut']) OR $opt['statut']!=='publie')
+                AND in_array($qui['statut'], array('0minirezo', '1comite'))
+                AND in_array($r['statut'], array('prop','prepa', 'poubelle'))
+                AND auteurs_article($id, "id_auteur=".$qui['id_auteur'])
+            )
+        );
 }
 
- /**
- * Autorisation de créer un article
- *
- * Il faut qu'une rubrique existe et être au moins rédacteur
- * 
- * @param  string $faire Action demandée
- * @param  string $type  Type d'objet sur lequel appliquer l'action
- * @param  int    $id    Identifiant de l'objet
- * @param  array  $qui   Description de l'auteur demandant l'autorisation
- * @param  array  $opt   Options de cette autorisation
- * @return bool          true s'il a le droit, false sinon
+    /**
+     * Autorisation de créer un article
+     *
+     * Il faut qu'une rubrique existe et être au moins rédacteur
+     * 
+     * @param  string $faire Action demandée
+     * @param  string $type  Type d'objet sur lequel appliquer l'action
+     * @param  int    $id    Identifiant de l'objet
+     * @param  array  $qui   Description de l'auteur demandant l'autorisation
+     * @param  array  $opt   Options de cette autorisation
+     * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_article_creer_dist($faire, $type, $id, $qui, $opt) {
-	return (sql_countsel('spip_rubriques')>0 AND in_array($qui['statut'], array('0minirezo', '1comite')));
+    return (sql_countsel('spip_rubriques')>0 AND in_array($qui['statut'], array('0minirezo', '1comite')));
 }
 
 /**
@@ -549,24 +549,24 @@ 
  * @return bool          true s'il a le droit, false sinon
  */
 function autoriser_article_voir_dist($faire, $type, $id, $qui, $opt){
-	if ($qui['statut'] == '0minirezo') return true;
-	// cas des articles : depend du statut de l'article et de l'auteur
-	if (isset($opt['statut']))
-		$statut = $opt['statut'];
-	else {
-		if (!$id) return false;
-		$statut = sql_getfetsel("statut", "spip_articles", "id_article=".intval($id));
-	}
-
-	return
-		// si on est pas auteur de l'article,
-		// seuls les propose et publies sont visibles
-		in_array($statut, array('prop', 'publie'))
-		// sinon si on est auteur, on a le droit de le voir, evidemment !
-		OR
-		($id AND $qui['id_auteur']
-		     AND (function_exists('auteurs_article') OR include_spip('inc/auth'))
-		     AND auteurs_article($id, "id_auteur=".$qui['id_auteur']));
+    if ($qui['statut'] == '0minirezo') return true;
+    // cas des articles : depend du statut de l'article et de l'auteur
+    if (isset($opt['statut']))
+        $statut = $opt['statut'];
+    else {
+        if (!$id) return false;
+        $statut = sql_getfetsel("statut", "spip_articles", "id_article=".intval($id));
+    }
+
+    return
+        // si on est pas auteur de l'article,
+        // seuls les propose et publies sont visibles
+        in_array($statut, array('prop', 'publie'))
+        // sinon si on est auteur, on a le droit de le voir, evidemment !
+        OR
+        ($id AND $qui['id_auteur']
+             AND (function_exists('auteurs_article') OR include_spip('inc/auth'))
+             AND auteurs_article($id, "id_auteur=".$qui['id_auteur']));
 }
 
 
@@ -583,18 +583,18 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_voir_dist($faire, $type, $id, $qui, $opt) {
-	# securite, mais on aurait pas du arriver ici !
-	if (function_exists($f='autoriser_'.$type.'_voir') OR function_exists($f='autoriser_'.$type.'_voir_dist')){
-		return $f($faire, $type, $id, $qui, $opt);
-	}
-
-	if ($qui['statut'] == '0minirezo') return true;
-	// admins et redacteurs peuvent voir un auteur
-	if ($type == 'auteur')
-		return in_array($qui['statut'], array('0minirezo', '1comite'));
-	// sinon par defaut tout est visible
-	// sauf cas particuliers traites separemment (ie article)
-	return true;
+    # securite, mais on aurait pas du arriver ici !
+    if (function_exists($f='autoriser_'.$type.'_voir') OR function_exists($f='autoriser_'.$type.'_voir_dist')){
+        return $f($faire, $type, $id, $qui, $opt);
+    }
+
+    if ($qui['statut'] == '0minirezo') return true;
+    // admins et redacteurs peuvent voir un auteur
+    if ($type == 'auteur')
+        return in_array($qui['statut'], array('0minirezo', '1comite'));
+    // sinon par defaut tout est visible
+    // sauf cas particuliers traites separemment (ie article)
+    return true;
 }
 
 
@@ -615,13 +615,13 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_webmestre_dist($faire, $type, $id, $qui, $opt) {
-	return
-		(defined('_ID_WEBMESTRES')?
-			in_array($qui['id_auteur'], explode(':', _ID_WEBMESTRES))
-			:$qui['webmestre']=='oui')
-		AND $qui['statut'] == '0minirezo'
-		AND !$qui['restreint']
-		;
+    return
+        (defined('_ID_WEBMESTRES')?
+            in_array($qui['id_auteur'], explode(':', _ID_WEBMESTRES))
+            :$qui['webmestre']=='oui')
+        AND $qui['statut'] == '0minirezo'
+        AND !$qui['restreint']
+        ;
 }
 
 /**
@@ -637,10 +637,10 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_configurer_dist($faire, $type, $id, $qui, $opt) {
-	return
-		$qui['statut'] == '0minirezo'
-		AND !$qui['restreint']
-		;
+    return
+        $qui['statut'] == '0minirezo'
+        AND !$qui['restreint']
+        ;
 }
 
 /**
@@ -656,9 +656,9 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_sauvegarder_dist($faire, $type, $id, $qui, $opt) {
-	return
-		$qui['statut'] == '0minirezo'
-		;
+    return
+        $qui['statut'] == '0minirezo'
+        ;
 }
 
 /**
@@ -674,8 +674,8 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_detruire_dist($faire, $type, $id, $qui, $opt) {
-	return
-		autoriser('webmestre', null, null, $qui, $opt);
+    return
+        autoriser('webmestre', null, null, $qui, $opt);
 }
 
 /**
@@ -692,12 +692,12 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_auteur_previsualiser_dist($faire, $type, $id, $qui, $opt) {
-	// les admins peuvent "previsualiser" une page auteur
-	if ($qui['statut'] == '0minirezo'
-		AND !$qui['restreint']) return true;
-	// "Voir en ligne" si l'auteur a un article publie
-	$n = sql_fetsel('A.id_article', 'spip_auteurs_liens AS L LEFT JOIN spip_articles AS A ON (L.objet=\'article\' AND L.id_objet=A.id_article)', "A.statut='publie' AND L.id_auteur=".sql_quote($id));
-	return $n ? true : false;
+    // les admins peuvent "previsualiser" une page auteur
+    if ($qui['statut'] == '0minirezo'
+        AND !$qui['restreint']) return true;
+    // "Voir en ligne" si l'auteur a un article publie
+    $n = sql_fetsel('A.id_article', 'spip_auteurs_liens AS L LEFT JOIN spip_articles AS A ON (L.objet=\'article\' AND L.id_objet=A.id_article)', "A.statut='publie' AND L.id_auteur=".sql_quote($id));
+    return $n ? true : false;
 }
 
 /**
@@ -724,7 +724,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_auteur_creer_dist($faire, $type, $id, $qui, $opt) {
-	return ($qui['statut'] == '0minirezo');
+    return ($qui['statut'] == '0minirezo');
 }
 
 
@@ -744,63 +744,63 @@ 
 **/
 function autoriser_auteur_modifier_dist($faire, $type, $id, $qui, $opt) {
 
-	// Ni admin ni redacteur => non
-	if (!in_array($qui['statut'], array('0minirezo', '1comite')))
-		return false;
-
-	// Un redacteur peut modifier ses propres donnees mais ni son login/email
-	// ni son statut (qui sont le cas echeant passes comme option)
-	if ($qui['statut'] == '1comite') {
-		if ($opt['webmestre'])
-			return false;
-		elseif ($opt['statut'] OR $opt['restreintes'] OR $opt['email'])
-			return false;
-		elseif ($id == $qui['id_auteur'])
-			return true;
-		else
-			return false;
-	}
-
-	// Un admin restreint peut modifier/creer un auteur non-admin mais il
-	// n'a le droit ni de le promouvoir admin, ni de changer les rubriques
-	if ($qui['restreint']) {
-		if ($opt['webmestre'])
-			return false;
-		elseif ($opt['statut'] == '0minirezo' OR $opt['restreintes'])
-			return false;
-		else {
-			if ($id == $qui['id_auteur']) {
-				if ($opt['statut'])
-					return false;
-				else
-					return true;
-			}
-			else if ($id_auteur = intval($id)) {
-				$t = sql_fetsel("statut", "spip_auteurs", "id_auteur=$id_auteur");
-				if ($t AND $t['statut'] != '0minirezo')
-					return true;
-				else
-					return false;
-			}
-			// id = 0 => creation
-			else
-				return true;
-		}
-	}
-
-	// Un admin complet fait ce qu'elle veut
-	// sauf se degrader
-	if ($id == $qui['id_auteur'] && $opt['statut'])
-		return false;
-	// et toucher au statut webmestre si il ne l'est pas lui meme
-	// ou si les webmestres sont fixes par constante (securite)
-	elseif (isset($opt['webmestre']) AND $opt['webmestre'] AND (defined('_ID_WEBMESTRES') OR !autoriser('webmestre')))
-		return false;
-	// et modifier un webmestre si il ne l'est pas lui meme
-	elseif (intval($id) AND autoriser('webmestre','',0,$id) AND !autoriser('webmestre'))
-		return false;
-	else
-		return true;
+    // Ni admin ni redacteur => non
+    if (!in_array($qui['statut'], array('0minirezo', '1comite')))
+        return false;
+
+    // Un redacteur peut modifier ses propres donnees mais ni son login/email
+    // ni son statut (qui sont le cas echeant passes comme option)
+    if ($qui['statut'] == '1comite') {
+        if ($opt['webmestre'])
+            return false;
+        elseif ($opt['statut'] OR $opt['restreintes'] OR $opt['email'])
+            return false;
+        elseif ($id == $qui['id_auteur'])
+            return true;
+        else
+            return false;
+    }
+
+    // Un admin restreint peut modifier/creer un auteur non-admin mais il
+    // n'a le droit ni de le promouvoir admin, ni de changer les rubriques
+    if ($qui['restreint']) {
+        if ($opt['webmestre'])
+            return false;
+        elseif ($opt['statut'] == '0minirezo' OR $opt['restreintes'])
+            return false;
+        else {
+            if ($id == $qui['id_auteur']) {
+                if ($opt['statut'])
+                    return false;
+                else
+                    return true;
+            }
+            else if ($id_auteur = intval($id)) {
+                $t = sql_fetsel("statut", "spip_auteurs", "id_auteur=$id_auteur");
+                if ($t AND $t['statut'] != '0minirezo')
+                    return true;
+                else
+                    return false;
+            }
+            // id = 0 => creation
+            else
+                return true;
+        }
+    }
+
+    // Un admin complet fait ce qu'elle veut
+    // sauf se degrader
+    if ($id == $qui['id_auteur'] && $opt['statut'])
+        return false;
+    // et toucher au statut webmestre si il ne l'est pas lui meme
+    // ou si les webmestres sont fixes par constante (securite)
+    elseif (isset($opt['webmestre']) AND $opt['webmestre'] AND (defined('_ID_WEBMESTRES') OR !autoriser('webmestre')))
+        return false;
+    // et modifier un webmestre si il ne l'est pas lui meme
+    elseif (intval($id) AND autoriser('webmestre','',0,$id) AND !autoriser('webmestre'))
+        return false;
+    else
+        return true;
 }
 
 
@@ -817,7 +817,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_associerauteurs_dist($faire, $type, $id, $qui, $opt){
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 
@@ -834,7 +834,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_chargerftp_dist($faire, $type, $id, $qui, $opt) {
-	return $qui['statut'] == '0minirezo';
+    return $qui['statut'] == '0minirezo';
 }
 
 /**
@@ -850,7 +850,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_debug_dist($faire, $type, $id, $qui, $opt) {
-	return $qui['statut'] == '0minirezo';
+    return $qui['statut'] == '0minirezo';
 }
 
 /**
@@ -867,40 +867,40 @@ 
  * @return array          Liste des rubriques
 **/
 function liste_rubriques_auteur($id_auteur, $raz=false) {
-	static $restreint = array();
-
-	if (!$id_auteur = intval($id_auteur)) return array();
-	if ($raz) unset($restreint[$id_auteur]);
-	elseif (isset($restreint[$id_auteur])) return $restreint[$id_auteur];
-
-	$rubriques = array();
-	if (
-		(!isset($GLOBALS['meta']['version_installee']) OR $GLOBALS['meta']['version_installee']>16428)
-	  AND $r = sql_allfetsel('id_objet', 'spip_auteurs_liens', "id_auteur=".intval($id_auteur)." AND objet='rubrique' AND id_objet!=0")
-	  AND count($r)) {
-		$r = array_map('reset',$r);
-
-		// recuperer toute la branche, au format chaine enumeration
-		include_spip('inc/rubriques');
-		$r = calcul_branche_in($r);
-		$r = explode(',',$r);
-
-		// passer les rubriques en index, elimine les doublons
-		$r = array_flip($r);
-		// recuperer les index seuls
-		$r = array_keys($r);
-		// combiner pour avoir un tableau id_rubrique=>id_rubrique
-		// est-ce vraiment utile ? (on preserve la forme donnee par le code precedent)
-		$rubriques = array_combine($r,$r);
-	}
-
-	// Affecter l'auteur session le cas echeant
-	if (isset($GLOBALS['visiteur_session']['id_auteur'])
-	  AND $GLOBALS['visiteur_session']['id_auteur'] == $id_auteur)
-		$GLOBALS['visiteur_session']['restreint'] = $rubriques;
-
-
-	return $restreint[$id_auteur] = $rubriques;
+    static $restreint = array();
+
+    if (!$id_auteur = intval($id_auteur)) return array();
+    if ($raz) unset($restreint[$id_auteur]);
+    elseif (isset($restreint[$id_auteur])) return $restreint[$id_auteur];
+
+    $rubriques = array();
+    if (
+        (!isset($GLOBALS['meta']['version_installee']) OR $GLOBALS['meta']['version_installee']>16428)
+      AND $r = sql_allfetsel('id_objet', 'spip_auteurs_liens', "id_auteur=".intval($id_auteur)." AND objet='rubrique' AND id_objet!=0")
+      AND count($r)) {
+        $r = array_map('reset',$r);
+
+        // recuperer toute la branche, au format chaine enumeration
+        include_spip('inc/rubriques');
+        $r = calcul_branche_in($r);
+        $r = explode(',',$r);
+
+        // passer les rubriques en index, elimine les doublons
+        $r = array_flip($r);
+        // recuperer les index seuls
+        $r = array_keys($r);
+        // combiner pour avoir un tableau id_rubrique=>id_rubrique
+        // est-ce vraiment utile ? (on preserve la forme donnee par le code precedent)
+        $rubriques = array_combine($r,$r);
+    }
+
+    // Affecter l'auteur session le cas echeant
+    if (isset($GLOBALS['visiteur_session']['id_auteur'])
+      AND $GLOBALS['visiteur_session']['id_auteur'] == $id_auteur)
+        $GLOBALS['visiteur_session']['restreint'] = $rubriques;
+
+
+    return $restreint[$id_auteur] = $rubriques;
 }
 
 /**
@@ -916,7 +916,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_modifierurl_dist($faire, $type, $id, $qui, $opt) {
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 /**
@@ -932,7 +932,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_previsualiser_dist($faire,$type,$id,$qui,$opt){
-	return autoriser('previsualiser');
+    return autoriser('previsualiser');
 }
 
 /**
@@ -948,7 +948,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_rubrique_iconifier_dist($faire,$type,$id,$qui,$opt){
-	return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
+    return autoriser('publierdans', 'rubrique', $id, $qui, $opt);
 }
 
 /**
@@ -964,8 +964,8 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_auteur_iconifier_dist($faire,$type,$id,$qui,$opt){
- return (($id == $qui['id_auteur']) OR
- 		(($qui['statut'] == '0minirezo') AND !$qui['restreint']));
+    return (($id == $qui['id_auteur']) OR
+         (($qui['statut'] == '0minirezo') AND !$qui['restreint']));
 }
 
 /**
@@ -981,8 +981,8 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_iconifier_dist($faire,$type,$id,$qui,$opt){
-	// par defaut, on a le droit d'iconifier si on a le droit de modifier
-	return autoriser('modifier', $type, $id, $qui, $opt);
+    // par defaut, on a le droit d'iconifier si on a le droit de modifier
+    return autoriser('modifier', $type, $id, $qui, $opt);
 }
 
 
@@ -1029,10 +1029,10 @@ 
  * @return bool          false
 **/
 function autoriser_base_reparer_dist($faire, $type, $id, $qui, $opt) {
-	if (!autoriser('detruire') OR _request('reinstall'))
-		return false;
+    if (!autoriser('detruire') OR _request('reinstall'))
+        return false;
 
-	return true;
+    return true;
 }
 
 /**
@@ -1048,7 +1048,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_infosperso_dist($faire,$type,$id,$qui,$opt) {
-	return true;
+    return true;
 }
 
 /**
@@ -1064,7 +1064,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_langage_configurer_dist($faire,$type,$id,$qui,$opt) {
-	return true;
+    return true;
 }
 
 /**
@@ -1080,7 +1080,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_configurerlangage_dist($faire,$type,$id,$qui,$opt) {
-	return autoriser('configurer', '_langage', $id, $qui, $opt);
+    return autoriser('configurer', '_langage', $id, $qui, $opt);
 }
 
 /**
@@ -1096,7 +1096,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_preferences_configurer_dist($faire,$type,$id,$qui,$opt) {
-	return true;
+    return true;
 }
 
 /**
@@ -1112,7 +1112,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_configurerpreferences_dist($faire,$type,$id,$qui,$opt) {
-	return autoriser('configurer', '_preferences', $id, $qui, $opt);
+    return autoriser('configurer', '_preferences', $id, $qui, $opt);
 }
 
 /**
@@ -1170,7 +1170,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_articlecreer_menu_dist($faire, $type, $id, $qui, $opt){
-	return verifier_table_non_vide();
+    return verifier_table_non_vide();
 }
 
 /**
@@ -1188,7 +1188,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_auteurcreer_menu_dist($faire, $type, $id, $qui, $opt) {
-	return autoriser('creer', 'auteur', $id, $qui, $opt);
+    return autoriser('creer', 'auteur', $id, $qui, $opt);
 }
 
 /**
@@ -1204,7 +1204,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_suiviedito_menu_dist($faire, $type, $id, $qui, $opt){
-	return $qui['statut']=='0minirezo';
+    return $qui['statut']=='0minirezo';
 }
 
 /**
@@ -1220,7 +1220,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_synchro_menu_dist($faire, $type, $id, $qui, $opt){
-	return $qui['statut']=='0minirezo';
+    return $qui['statut']=='0minirezo';
 }
 
 /**
@@ -1236,7 +1236,7 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_queue_purger_dist($faire, $type, $id, $qui, $opt){
-	return autoriser('webmestre');
+    return autoriser('webmestre');
 }
 
 
@@ -1254,10 +1254,10 @@ 
  * @return bool          true s'il a le droit, false sinon
 **/
 function autoriser_echafauder_dist($faire, $type, $id, $qui, $opt){
-	if (test_espace_prive())
-		return intval($qui['id_auteur'])?true:false;
-	else
-		return autoriser('webmestre','',$id,$qui,$opt);
+    if (test_espace_prive())
+        return intval($qui['id_auteur'])?true:false;
+    else
+        return autoriser('webmestre','',$id,$qui,$opt);
 }
 
 
@@ -1274,7 +1274,7 @@ 
  */
 function auteurs_article($id_article, $cond='')
 {
-	return sql_allfetsel("id_auteur", "spip_auteurs_liens", "objet='article' AND id_objet=$id_article". ($cond ? " AND $cond" : ''));
+    return sql_allfetsel("id_auteur", "spip_auteurs_liens", "objet='article' AND id_objet=$id_article". ($cond ? " AND $cond" : ''));
 }
 
 
@@ -1287,9 +1287,9 @@ 
  * @return bool             true si administrateur de cette rubrique, false sinon.
  */
 function acces_restreint_rubrique($id_rubrique) {
-	global $connect_id_rubrique;
+    global $connect_id_rubrique;
 
-	return (isset($connect_id_rubrique[$id_rubrique]));
+    return (isset($connect_id_rubrique[$id_rubrique]));
 }
 
 
@@ -1302,10 +1302,10 @@ 
  * @return bool             true si un parent existe
  */
 function verifier_table_non_vide($table='spip_rubriques') {
-	static $done = array();
-	if (!isset($done[$table]))
-		 $done[$table] = sql_countsel($table)>0;
-	return $done[$table];
+    static $done = array();
+    if (!isset($done[$table]))
+            $done[$table] = sql_countsel($table)>0;
+    return $done[$table];
 }
 
 /**
@@ -1326,17 +1326,17 @@ 
  */
 function autoriser_inscrireauteur_dist($faire, $quoi, $id, $qui, $opt){
 
-	$s = array_search($quoi, $GLOBALS['liste_des_statuts']);
-	switch ($s) {
+    $s = array_search($quoi, $GLOBALS['liste_des_statuts']);
+    switch ($s) {
 
-		case 'info_redacteurs' :
-		  return ($GLOBALS['meta']['accepter_inscriptions'] == 'oui');
+        case 'info_redacteurs' :
+          return ($GLOBALS['meta']['accepter_inscriptions'] == 'oui');
 
-		case 'info_visiteurs' :
-		  return ($GLOBALS['meta']['accepter_visiteurs'] == 'oui' OR $GLOBALS['meta']['forums_publics'] == 'abo');
+        case 'info_visiteurs' :
+          return ($GLOBALS['meta']['accepter_visiteurs'] == 'oui' OR $GLOBALS['meta']['forums_publics'] == 'abo');
 
-	}
+    }
 
-	return false;
+    return false;
 }
 ?>

ecrire/inc/selectionner.php

Indentation +89 added lines, -89 removed lines

@@ -21,106 +21,106 @@
 // http://doc.spip.org/@inc_selectionner_dist
 function inc_selectionner_dist ($sel, $idom="", $exclus=0, $aff_racine=false, $recur=true, $do='aff') {
 
-	if ($recur) $recur = mini_hier($sel); else $sel = 0;
-
-	if ($aff_racine) {
-		$info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
-		$idom3 = $idom . "_selection";
-
-		$onClick = "jQuery(this).parent().addClass('on');jQuery('#choix_parent_principal .on').removeClass('on'); aff_selection(0, '$idom3', '$info', event);return false;";
-
-		$ondbClick = strtr(str_replace("'", "’",
-				str_replace('"', """,
-					textebrut(_T('info_racine_site')))),
-				"\n\r", "  ");
-
-		$js_func = $do . '_selection_titre';
-		$ondbClick = "$js_func('$ondbClick',0,'selection_rubrique','id_parent');";
-
-		$aff_racine = "<div class='petite-racine item'>"
-		. "<a href='#'"
-			. "onclick=\""
-			. $onClick
-			. "\"\nondbclick=\""
-			. $ondbClick
-			. $onClick
-		. "\">"
-		. _T("info_racine_site")
-		. "</a></div>";
-	}
-
-	$url_init = generer_url_ecrire('plonger',"rac=$idom&exclus=$exclus&id=0&col=1&do=$do");
-
-	$plonger = charger_fonction('plonger', 'inc');
-	$plonger_r = $plonger($sel, $idom, $recur, 1, $exclus, $do);
-
-	// url completee par la fonction JS onkeypress_rechercher
-	$url = generer_url_ecrire('rechercher', "exclus=$exclus&rac=$idom&do=$do&type=");
-	return construire_selectionner_hierarchie($idom, $plonger_r, $aff_racine, $url, 'id_parent', $url_init);
+    if ($recur) $recur = mini_hier($sel); else $sel = 0;
+
+    if ($aff_racine) {
+        $info = generer_url_ecrire('informer', "type=rubrique&rac=$idom&do=$do&id=");
+        $idom3 = $idom . "_selection";
+
+        $onClick = "jQuery(this).parent().addClass('on');jQuery('#choix_parent_principal .on').removeClass('on'); aff_selection(0, '$idom3', '$info', event);return false;";
+
+        $ondbClick = strtr(str_replace("'", "&#8217;",
+                str_replace('"', "&#34;",
+                    textebrut(_T('info_racine_site')))),
+                "\n\r", "  ");
+
+        $js_func = $do . '_selection_titre';
+        $ondbClick = "$js_func('$ondbClick',0,'selection_rubrique','id_parent');";
+
+        $aff_racine = "<div class='petite-racine item'>"
+        . "<a href='#'"
+            . "onclick=\""
+            . $onClick
+            . "\"\nondbclick=\""
+            . $ondbClick
+            . $onClick
+        . "\">"
+        . _T("info_racine_site")
+        . "</a></div>";
+    }
+
+    $url_init = generer_url_ecrire('plonger',"rac=$idom&exclus=$exclus&id=0&col=1&do=$do");
+
+    $plonger = charger_fonction('plonger', 'inc');
+    $plonger_r = $plonger($sel, $idom, $recur, 1, $exclus, $do);
+
+    // url completee par la fonction JS onkeypress_rechercher
+    $url = generer_url_ecrire('rechercher', "exclus=$exclus&rac=$idom&do=$do&type=");
+    return construire_selectionner_hierarchie($idom, $plonger_r, $aff_racine, $url, 'id_parent', $url_init);
 }
 
 // http://doc.spip.org/@construire_selectionner_hierarchie
 function construire_selectionner_hierarchie($idom, $liste, $racine, $url, $name, $url_init='')
 {
-	global $spip_lang_right;
-
-	$idom1 = $idom . "_champ_recherche";
-	$idom2 = $idom . "_principal";
-	$idom3 = $idom . "_selection";
-	$idom4 = $idom . "_col_1";
-	$idom5 = 'img_' . $idom4;
-	$idom6 = $idom."_fonc";
-
-	return "<div id='$idom'>"
-	. "<a id='$idom6' style='visibility: hidden;'"
-	. ($url_init ?  "\nhref='$url_init'" : '')
-	. "></a>"
-	. "<div class='recherche_rapide_parent'>"
-	. http_img_pack("searching.gif", "*", "style='visibility: hidden;float:$spip_lang_right' id='$idom5'")
-	. ""
-	. "<input style='width: 100px;float:$spip_lang_right;' type='search' id='$idom1'"
-	  // eliminer Return car il provoque la soumission (balise unique)
-	  // ce serait encore mieux de ne le faire que s'il y a encore plusieurs
-	  // resultats retournes par la recherche
-	. "\nonkeypress=\"k=event.keyCode;if (k==13 || k==3){return false;}\""
-	  // lancer la recherche apres le filtrage ci-dessus
-	. "\nonkeyup=\"return onkey_rechercher(this.value,"
-	  // la destination de la recherche
-	. "'$idom4'"
+    global $spip_lang_right;
+
+    $idom1 = $idom . "_champ_recherche";
+    $idom2 = $idom . "_principal";
+    $idom3 = $idom . "_selection";
+    $idom4 = $idom . "_col_1";
+    $idom5 = 'img_' . $idom4;
+    $idom6 = $idom."_fonc";
+
+    return "<div id='$idom'>"
+    . "<a id='$idom6' style='visibility: hidden;'"
+    . ($url_init ?  "\nhref='$url_init'" : '')
+    . "></a>"
+    . "<div class='recherche_rapide_parent'>"
+    . http_img_pack("searching.gif", "*", "style='visibility: hidden;float:$spip_lang_right' id='$idom5'")
+    . ""
+    . "<input style='width: 100px;float:$spip_lang_right;' type='search' id='$idom1'"
+        // eliminer Return car il provoque la soumission (balise unique)
+        // ce serait encore mieux de ne le faire que s'il y a encore plusieurs
+        // resultats retournes par la recherche
+    . "\nonkeypress=\"k=event.keyCode;if (k==13 || k==3){return false;}\""
+        // lancer la recherche apres le filtrage ci-dessus
+    . "\nonkeyup=\"return onkey_rechercher(this.value,"
+        // la destination de la recherche
+    . "'$idom4'"
 #	. "this.parentNode.parentNode.parentNode.parentNode.nextSibling.firstChild.id"
-	. ",'"
-	  // l'url effectuant la recherche
-	. $url
-	. "',"	
-	  // le noeud contenant un gif anime 
-	  // . "'idom5'"
-	. "this.parentNode.previousSibling.firstChild"
-	. ",'"
-	  // la valeur de l'attribut Name a remplir
-	.  $name
-	. "','"
-	  // noeud invisible memorisant l'URL initiale (pour re-initialisation)
-	. $idom6
-	. "')\"" 
-	. " />"
-	. "\n</div>"
-	. ($racine?"<div>$racine</div>":"")
-	. "<div id='"
-	.  $idom2
-	.  "'><div id='$idom4'"
-	. " class=''>"
-	. $liste
-	. "</div></div>\n<div id='$idom3'></div></div>\n";
+    . ",'"
+        // l'url effectuant la recherche
+    . $url
+    . "',"	
+        // le noeud contenant un gif anime 
+        // . "'idom5'"
+    . "this.parentNode.previousSibling.firstChild"
+    . ",'"
+        // la valeur de l'attribut Name a remplir
+    .  $name
+    . "','"
+        // noeud invisible memorisant l'URL initiale (pour re-initialisation)
+    . $idom6
+    . "')\"" 
+    . " />"
+    . "\n</div>"
+    . ($racine?"<div>$racine</div>":"")
+    . "<div id='"
+    .  $idom2
+    .  "'><div id='$idom4'"
+    . " class=''>"
+    . $liste
+    . "</div></div>\n<div id='$idom3'></div></div>\n";
 }
 
 // http://doc.spip.org/@mini_hier
 function mini_hier ($id_rubrique) {
 	
-	$liste = $id_rubrique;
-	$id_rubrique = intval($id_rubrique);
-	while ($id_rubrique = sql_getfetsel("id_parent", "spip_rubriques", "id_rubrique = " . $id_rubrique))
-		$liste = $id_rubrique . ",$liste";
-	return explode(',',"0,$liste");
+    $liste = $id_rubrique;
+    $id_rubrique = intval($id_rubrique);
+    while ($id_rubrique = sql_getfetsel("id_parent", "spip_rubriques", "id_rubrique = " . $id_rubrique))
+        $liste = $id_rubrique . ",$liste";
+    return explode(',',"0,$liste");
 }
 
 ?>

ecrire/inc/boutons.php

Indentation +46 added lines, -46 removed lines

@@ -18,24 +18,24 @@ 
  */
 // http://doc.spip.org/@Bouton
 class Bouton {
-  var $icone;         /* l'icone a mettre dans le bouton */
-  var $libelle;       /* le nom de l'entree d'i18n associe */
-  var $url= null;     /* l'url de la page (null => ?exec=nom) */
-  var $urlArg= null;  /* arguments supplementaires de l'url */
-  var $url2= null;    /* url jscript */
-  var $target= null;  /* pour ouvrir dans une fenetre a part */
-  var $sousmenu= null;/* sous barre de boutons / onglets */
+    var $icone;         /* l'icone a mettre dans le bouton */
+    var $libelle;       /* le nom de l'entree d'i18n associe */
+    var $url= null;     /* l'url de la page (null => ?exec=nom) */
+    var $urlArg= null;  /* arguments supplementaires de l'url */
+    var $url2= null;    /* url jscript */
+    var $target= null;  /* pour ouvrir dans une fenetre a part */
+    var $sousmenu= null;/* sous barre de boutons / onglets */
 
 // http://doc.spip.org/@Bouton
-  function Bouton($icone, $libelle, $url=null, $urlArg=null,
-				  $url2=null, $target=null) {
-	$this->icone  = $icone;
-	$this->libelle= $libelle;
-	$this->url    = $url;
-	$this->urlArg = $urlArg;
-	$this->url2   = $url2;
-	$this->target = $target;
-  }
+    function Bouton($icone, $libelle, $url=null, $urlArg=null,
+                    $url2=null, $target=null) {
+    $this->icone  = $icone;
+    $this->libelle= $libelle;
+    $this->url    = $url;
+    $this->urlArg = $urlArg;
+    $this->url2   = $url2;
+    $this->target = $target;
+    }
 }
 
 
@@ -46,44 +46,44 @@ 
 // http://doc.spip.org/@definir_barre_onglets
 function definir_barre_onglets($script) {
 
-	$onglets=array();
-	$liste_onglets = array();
-
-	// ajouter les onglets issus des plugin via plugin.xml
-	if (function_exists('onglets_plugins'))
-		$liste_onglets = onglets_plugins();
-
-
-	foreach($liste_onglets as $id => $infos){
-		if (($parent = $infos['parent'])
-			&& $parent == $script
-			&& autoriser('onglet',"_$id")) {
-				$onglets[$id] = new Bouton(
-					find_in_theme($infos['icone']),  // icone
-					$infos['titre'],	// titre
-					(isset($infos['action']) and $infos['action'])
-						? generer_url_ecrire($infos['action'],(isset($infos['parametres']) AND $infos['parametres'])?$infos['parametres']:'')
-						: null
-					);
-		}
-	}
-
-	return pipeline('ajouter_onglets', array('data'=>$onglets,'args'=>$script));
+    $onglets=array();
+    $liste_onglets = array();
+
+    // ajouter les onglets issus des plugin via plugin.xml
+    if (function_exists('onglets_plugins'))
+        $liste_onglets = onglets_plugins();
+
+
+    foreach($liste_onglets as $id => $infos){
+        if (($parent = $infos['parent'])
+            && $parent == $script
+            && autoriser('onglet',"_$id")) {
+                $onglets[$id] = new Bouton(
+                    find_in_theme($infos['icone']),  // icone
+                    $infos['titre'],	// titre
+                    (isset($infos['action']) and $infos['action'])
+                        ? generer_url_ecrire($infos['action'],(isset($infos['parametres']) AND $infos['parametres'])?$infos['parametres']:'')
+                        : null
+                    );
+        }
+    }
+
+    return pipeline('ajouter_onglets', array('data'=>$onglets,'args'=>$script));
 }
 
 
 // http://doc.spip.org/@barre_onglets
 function barre_onglets($rubrique, $ongletCourant, $class="barre_onglet"){
-	include_spip('inc/presentation');
+    include_spip('inc/presentation');
 
-	$res = '';
+    $res = '';
 
-	foreach(definir_barre_onglets($rubrique) as $exec => $onglet) {
-		$url= $onglet->url ? $onglet->url : generer_url_ecrire($exec);
-		$res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
-	}
+    foreach(definir_barre_onglets($rubrique) as $exec => $onglet) {
+        $url= $onglet->url ? $onglet->url : generer_url_ecrire($exec);
+        $res .= onglet(_T($onglet->libelle), $url, $exec, $ongletCourant, $onglet->icone);
+    }
 
-	return  !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
+    return  !$res ? '' : (debut_onglet($class) . $res . fin_onglet());
 }
 
 

ecrire/balise/info_.php

Indentation +16 added lines, -16 removed lines

@@ -19,22 +19,22 @@
  * 
  */
 function balise_INFO__dist($p){
-	$info = $p->nom_champ;
-	$type_objet = interprete_argument_balise(1,$p);
-	$id_objet = interprete_argument_balise(2,$p);
-	if ($info === 'INFO_' or !$type_objet or !$id_objet) {
-		$msg = _T('zbug_balise_sans_argument', array('balise' => ' INFO_'));
-		erreur_squelette($msg, $p);
-		$p->interdire_scripts = true;
-		return $p;
-	}
-	else {
-		$info_sql = strtolower(substr($info,5));
-		$code = "generer_info_entite($id_objet, $type_objet, '$info_sql'".($p->etoile?","._q($p->etoile):"").")";
-		$p->code = champ_sql($info, $p, $code);
-		$p->interdire_scripts = true;
-		return $p;
-	}
+    $info = $p->nom_champ;
+    $type_objet = interprete_argument_balise(1,$p);
+    $id_objet = interprete_argument_balise(2,$p);
+    if ($info === 'INFO_' or !$type_objet or !$id_objet) {
+        $msg = _T('zbug_balise_sans_argument', array('balise' => ' INFO_'));
+        erreur_squelette($msg, $p);
+        $p->interdire_scripts = true;
+        return $p;
+    }
+    else {
+        $info_sql = strtolower(substr($info,5));
+        $code = "generer_info_entite($id_objet, $type_objet, '$info_sql'".($p->etoile?","._q($p->etoile):"").")";
+        $p->code = champ_sql($info, $p, $code);
+        $p->interdire_scripts = true;
+        return $p;
+    }
 }
 
 ?>