spip / SPIP

ecrire/public/quete.php

Indentation +237 added lines, -237 removed lines

@@ -29,7 +29,7 @@ 
  * @return array|bool|null
  */
 function quete_virtuel($id_article, $connect) {
-	return sql_getfetsel('virtuel', 'spip_articles', array("id_article=".intval($id_article), "statut='publie'"), '','','','',$connect);
+    return sql_getfetsel('virtuel', 'spip_articles', array("id_article=".intval($id_article), "statut='publie'"), '','','','',$connect);
 }
 
 /**
@@ -43,25 +43,25 @@ 
  * @return array
  */
 function quete_parent_lang($table,$id,$connect=''){
-	static $cache_quete = array();
-
-	if (!isset($cache_quete[$connect][$table][$id])) {
-		if (!isset($cache_quete[$connect][$table]['_select'])){
-			$trouver_table = charger_fonction('trouver_table','base');
-			if (!$desc=$trouver_table($table,$connect) OR !isset($desc['field']['id_rubrique']))
-				// pas de parent rubrique, on passe
-				$cache_quete[$connect][$table]['_select'] = false; 
-			else {
-				$select = ($table=='spip_rubriques'?'id_parent':'id_rubrique');
-				$select .= isset($desc['field']['lang'])?", lang":"";
-				$cache_quete[$connect][$table]['_select'] = $select;
-				$cache_quete[$connect][$table]['_id'] = id_table_objet(objet_type($table));
-			}
-		}
-		if ($cache_quete[$connect][$table]['_select'])
-			$cache_quete[$connect][$table][$id] = sql_fetsel($cache_quete[$connect][$table]['_select'], $table,$cache_quete[$connect][$table]['_id']."=".intval($id),'','','','',$connect);
-	}
-	return isset($cache_quete[$connect][$table][$id]) ? $cache_quete[$connect][$table][$id] : null;
+    static $cache_quete = array();
+
+    if (!isset($cache_quete[$connect][$table][$id])) {
+        if (!isset($cache_quete[$connect][$table]['_select'])){
+            $trouver_table = charger_fonction('trouver_table','base');
+            if (!$desc=$trouver_table($table,$connect) OR !isset($desc['field']['id_rubrique']))
+                // pas de parent rubrique, on passe
+                $cache_quete[$connect][$table]['_select'] = false; 
+            else {
+                $select = ($table=='spip_rubriques'?'id_parent':'id_rubrique');
+                $select .= isset($desc['field']['lang'])?", lang":"";
+                $cache_quete[$connect][$table]['_select'] = $select;
+                $cache_quete[$connect][$table]['_id'] = id_table_objet(objet_type($table));
+            }
+        }
+        if ($cache_quete[$connect][$table]['_select'])
+            $cache_quete[$connect][$table][$id] = sql_fetsel($cache_quete[$connect][$table]['_select'], $table,$cache_quete[$connect][$table]['_id']."=".intval($id),'','','','',$connect);
+    }
+    return isset($cache_quete[$connect][$table][$id]) ? $cache_quete[$connect][$table][$id] : null;
 }
 
 
@@ -77,10 +77,10 @@ 
  * @return int
  */
 function quete_parent($id_rubrique, $connect='') {
-	if (!$id_rubrique = intval($id_rubrique))
-		return 0;
-	$id_parent = quete_parent_lang('spip_rubriques',$id_rubrique,$connect);
-	return $id_parent['id_parent'];
+    if (!$id_rubrique = intval($id_rubrique))
+        return 0;
+    $id_parent = quete_parent_lang('spip_rubriques',$id_rubrique,$connect);
+    return $id_parent['id_parent'];
 }
 
 /**
@@ -95,8 +95,8 @@ 
  * @return
  */
 function quete_rubrique($id_article, $serveur) {
-	$id_parent = quete_parent_lang('spip_articles',$id_article,$serveur);
-	return $id_parent['id_rubrique'];
+    $id_parent = quete_parent_lang('spip_articles',$id_article,$serveur);
+    return $id_parent['id_rubrique'];
 }
 
 
@@ -110,12 +110,12 @@ 
  * @return int
  */
 function quete_profondeur($id, $connect='') {
-	$n = 0;
-	while ($id) {
-		$n++;
-		$id = quete_parent($id, $connect);
-	}
-	return $n;
+    $n = 0;
+    while ($id) {
+        $n++;
+        $id = quete_parent($id, $connect);
+    }
+    return $n;
 }
 
 
@@ -126,13 +126,13 @@ 
  * @return string
  */
 function quete_condition_postdates($champ_date, $serveur='', $ignore_previsu=false) {
-	if (defined('_VAR_PREVIEW') AND _VAR_PREVIEW AND !$ignore_previsu)
-		return "1=1";
-	return
-	  (isset($GLOBALS['meta']['date_prochain_postdate'])
-	     AND $GLOBALS['meta']['date_prochain_postdate'] > time())
-			? "$champ_date<".sql_quote(date('Y-m-d H:i:s',$GLOBALS['meta']['date_prochain_postdate']),$serveur)
-	    : "1=1" ;
+    if (defined('_VAR_PREVIEW') AND _VAR_PREVIEW AND !$ignore_previsu)
+        return "1=1";
+    return
+        (isset($GLOBALS['meta']['date_prochain_postdate'])
+         AND $GLOBALS['meta']['date_prochain_postdate'] > time())
+            ? "$champ_date<".sql_quote(date('Y-m-d H:i:s',$GLOBALS['meta']['date_prochain_postdate']),$serveur)
+        : "1=1" ;
 }
 
 
@@ -150,67 +150,67 @@ 
  * @return array
  */
 function quete_condition_statut($mstatut,$previsu,$publie, $serveur='', $ignore_previsu=false){
-	static $cond = array();
-	$key = func_get_args();
-	$key = implode("-",$key);
-	if (isset($cond[$key])) return $cond[$key];
-
-	$liste = $publie;
-	if (defined('_VAR_PREVIEW') AND _VAR_PREVIEW AND !$ignore_previsu)
-		$liste = $previsu;
-	$not = false;
-	if (strncmp($liste,'!',1)==0){
-		$not = true;
-	  $liste = substr($liste,1);
-	}
-	// '' => ne rien afficher, '!'=> ne rien filtrer
-	if (!strlen($liste))
-		return $cond[$key]=($not?"1=1":"'0=1'");
-
-	$liste = explode(',',$liste);
-	$where = array();
-	foreach($liste as $k=>$v) {
-		// filtrage /auteur pour limiter les objets d'un statut (prepa en general)
-		// a ceux de l'auteur identifie
-		if (strpos($v,"/")!==false){
-			$v = explode("/",$v);
-			$filtre = end($v);
-			$v = reset($v);
-			$v = preg_replace(",\W,","",$v);
-			if ($filtre=="auteur"
-				AND isset($GLOBALS['visiteur_session']['id_auteur'])
-				AND intval($GLOBALS['visiteur_session']['id_auteur'])
-				AND (strpos($mstatut,".")!==false)
-			  AND $objet = explode(".",$mstatut)
-				AND $id_table = reset($objet)
-			  AND $objet = objet_type($id_table)){
-				$primary = id_table_objet($objet);
-				$where[] = "($mstatut<>".sql_quote($v)." OR $id_table.$primary IN (".sql_get_select("ssss.id_objet","spip_auteurs_liens AS ssss","ssss.objet=".sql_quote($objet)." AND ssss.id_auteur=".intval($GLOBALS['visiteur_session']['id_auteur']),'','','','',$serveur)."))";
-			}
-			// ignorer ce statut si on ne sait pas comment le filtrer
-			else
-				$v = "";
-		}
-		// securite
-		$liste[$k] = preg_replace(",\W,","",$v);
-	}
-	$liste = array_filter($liste);
-  if (count($liste)==1){
-		$where[] = array('=', $mstatut, sql_quote(reset($liste),$serveur));
-  }
-  else {
-	  $where[] = sql_in($mstatut,$liste,$not,$serveur);
-  }
-
-	while (count($where)>1){
-		$and = array('AND',array_pop($where),array_pop($where));
-		$where[] = $and;
-	}
-	$cond[$key] = reset($where);
-	if ($not)
-		$cond[$key] = array('NOT',$cond[$key]);
-
-	return $cond[$key];
+    static $cond = array();
+    $key = func_get_args();
+    $key = implode("-",$key);
+    if (isset($cond[$key])) return $cond[$key];
+
+    $liste = $publie;
+    if (defined('_VAR_PREVIEW') AND _VAR_PREVIEW AND !$ignore_previsu)
+        $liste = $previsu;
+    $not = false;
+    if (strncmp($liste,'!',1)==0){
+        $not = true;
+        $liste = substr($liste,1);
+    }
+    // '' => ne rien afficher, '!'=> ne rien filtrer
+    if (!strlen($liste))
+        return $cond[$key]=($not?"1=1":"'0=1'");
+
+    $liste = explode(',',$liste);
+    $where = array();
+    foreach($liste as $k=>$v) {
+        // filtrage /auteur pour limiter les objets d'un statut (prepa en general)
+        // a ceux de l'auteur identifie
+        if (strpos($v,"/")!==false){
+            $v = explode("/",$v);
+            $filtre = end($v);
+            $v = reset($v);
+            $v = preg_replace(",\W,","",$v);
+            if ($filtre=="auteur"
+                AND isset($GLOBALS['visiteur_session']['id_auteur'])
+                AND intval($GLOBALS['visiteur_session']['id_auteur'])
+                AND (strpos($mstatut,".")!==false)
+              AND $objet = explode(".",$mstatut)
+                AND $id_table = reset($objet)
+              AND $objet = objet_type($id_table)){
+                $primary = id_table_objet($objet);
+                $where[] = "($mstatut<>".sql_quote($v)." OR $id_table.$primary IN (".sql_get_select("ssss.id_objet","spip_auteurs_liens AS ssss","ssss.objet=".sql_quote($objet)." AND ssss.id_auteur=".intval($GLOBALS['visiteur_session']['id_auteur']),'','','','',$serveur)."))";
+            }
+            // ignorer ce statut si on ne sait pas comment le filtrer
+            else
+                $v = "";
+        }
+        // securite
+        $liste[$k] = preg_replace(",\W,","",$v);
+    }
+    $liste = array_filter($liste);
+    if (count($liste)==1){
+        $where[] = array('=', $mstatut, sql_quote(reset($liste),$serveur));
+    }
+    else {
+        $where[] = sql_in($mstatut,$liste,$not,$serveur);
+    }
+
+    while (count($where)>1){
+        $and = array('AND',array_pop($where),array_pop($where));
+        $where[] = $and;
+    }
+    $cond[$key] = reset($where);
+    if ($not)
+        $cond[$key] = array('NOT',$cond[$key]);
+
+    return $cond[$key];
 }
 
 /**
@@ -223,7 +223,7 @@ 
  * @return array|bool|null
  */
 function quete_fichier($id_document, $serveur='') {
-	return sql_getfetsel('fichier', 'spip_documents', ("id_document=" . intval($id_document)),	'',array(), '', '', $serveur);
+    return sql_getfetsel('fichier', 'spip_documents', ("id_document=" . intval($id_document)),	'',array(), '', '', $serveur);
 }
 
 /**
@@ -234,7 +234,7 @@ 
  * @return array|bool
  */
 function quete_document($id_document, $serveur='') {
-	return sql_fetsel('*', 'spip_documents', ("id_document=" . intval($id_document)),	'',array(), '', '', $serveur);
+    return sql_fetsel('*', 'spip_documents', ("id_document=" . intval($id_document)),	'',array(), '', '', $serveur);
 }
 
 /**
@@ -247,8 +247,8 @@ 
  * @return array|bool|null
  */
 function quete_meta($nom, $serveur) {
-	return sql_getfetsel("valeur", "spip_meta", "nom=" . sql_quote($nom),
-			     '','','','',$serveur);
+    return sql_getfetsel("valeur", "spip_meta", "nom=" . sql_quote($nom),
+                    '','','','',$serveur);
 }
 
 /**
@@ -265,38 +265,38 @@ 
  * @return array|string
  */
 function quete_logo($type, $onoff, $id, $id_rubrique, $flag) {
-	static $chercher_logo;
-	if (is_null($chercher_logo))
-		$chercher_logo = charger_fonction('chercher_logo', 'inc');
-	$nom = strtolower($onoff);
-
-	while (1) {
-		$on = $chercher_logo($id, $type, $nom);
-		if ($on) {
-			if ($flag)
-				return "$on[2].$on[3]";
-			else {
-				$taille = @getimagesize($on[0]);
-				$off = ($onoff != 'ON') ? '' :
-					$chercher_logo($id, $type, 'off');
-				// on retourne une url du type IMG/artonXX?timestamp
-				// qui permet de distinguer le changement de logo
-				// et placer un expire sur le dossier IMG/
-				return array ($on[0].($on[4]?"?$on[4]":""),
-					($off ? $off[0] . ($off[4]?"?$off[4]":"") : ''),
-					(!$taille ? '' : (" ".$taille[3])));
-			}
-		}
+    static $chercher_logo;
+    if (is_null($chercher_logo))
+        $chercher_logo = charger_fonction('chercher_logo', 'inc');
+    $nom = strtolower($onoff);
+
+    while (1) {
+        $on = $chercher_logo($id, $type, $nom);
+        if ($on) {
+            if ($flag)
+                return "$on[2].$on[3]";
+            else {
+                $taille = @getimagesize($on[0]);
+                $off = ($onoff != 'ON') ? '' :
+                    $chercher_logo($id, $type, 'off');
+                // on retourne une url du type IMG/artonXX?timestamp
+                // qui permet de distinguer le changement de logo
+                // et placer un expire sur le dossier IMG/
+                return array ($on[0].($on[4]?"?$on[4]":""),
+                    ($off ? $off[0] . ($off[4]?"?$off[4]":"") : ''),
+                    (!$taille ? '' : (" ".$taille[3])));
+            }
+        }
         else if (defined('_LOGO_RUBRIQUE_DESACTIVER_HERITAGE'))
             return '';
-		else if ($id_rubrique) {
-			$type = 'id_rubrique';
-			$id = $id_rubrique;
-			$id_rubrique = 0;
-		} else if ($id AND $type == 'id_rubrique')
-			$id = quete_parent($id);
-		else return '';
-	}
+        else if ($id_rubrique) {
+            $type = 'id_rubrique';
+            $id = $id_rubrique;
+            $id_rubrique = 0;
+        } else if ($id AND $type == 'id_rubrique')
+            $id = quete_parent($id);
+        else return '';
+    }
 }
 
 /**
@@ -309,19 +309,19 @@ 
  * @return bool|string
  */
 function quete_logo_file($row, $connect=NULL) {
-	include_spip('inc/documents');
-	$logo = vignette_logo_document($row, $connect);
-	if (!$logo) $logo = image_du_document($row);
-	if (!$logo){
-		$f = charger_fonction('vignette','inc');
-		$logo = $f($row['extension'], false);
-	}
-	// si c'est une vignette type doc, la renvoyer direct
-	if (strcmp($logo,_DIR_PLUGINS)==0
-		OR strcmp($logo,_DIR_PLUGINS_DIST)==0
-		OR strcmp($logo,_DIR_RACINE.'prive/')==0)
-		return $logo;
-	return get_spip_doc($logo);
+    include_spip('inc/documents');
+    $logo = vignette_logo_document($row, $connect);
+    if (!$logo) $logo = image_du_document($row);
+    if (!$logo){
+        $f = charger_fonction('vignette','inc');
+        $logo = $f($row['extension'], false);
+    }
+    // si c'est une vignette type doc, la renvoyer direct
+    if (strcmp($logo,_DIR_PLUGINS)==0
+        OR strcmp($logo,_DIR_PLUGINS_DIST)==0
+        OR strcmp($logo,_DIR_RACINE.'prive/')==0)
+        return $logo;
+    return get_spip_doc($logo);
 }
 
 /**
@@ -348,16 +348,16 @@ 
  * @return string
  */
 function quete_logo_document($row, $lien, $align, $mode_logo, $x, $y, $connect=NULL) {
-	include_spip('inc/documents');
-	$logo = '';
-	if (!in_array($mode_logo,array('icone','apercu')))
-		$logo = vignette_logo_document($row, $connect);
-	// si on veut explicitement la vignette, ne rien renvoyer si il n'y en a pas
-	if ($mode_logo == 'vignette' AND !$logo)
-		return '';
-	if ($mode_logo == 'icone')
-		$row['fichier'] = '';
-	return vignette_automatique($logo, $row, $lien, $x, $y, $align);
+    include_spip('inc/documents');
+    $logo = '';
+    if (!in_array($mode_logo,array('icone','apercu')))
+        $logo = vignette_logo_document($row, $connect);
+    // si on veut explicitement la vignette, ne rien renvoyer si il n'y en a pas
+    if ($mode_logo == 'vignette' AND !$logo)
+        return '';
+    if ($mode_logo == 'icone')
+        $row['fichier'] = '';
+    return vignette_automatique($logo, $row, $lien, $x, $y, $align);
 }
 
 /**
@@ -371,17 +371,17 @@ 
  */
 function vignette_logo_document($row, $connect='')
 {
-	if (!$row['id_vignette']) return '';
-	$fichier = quete_fichier($row['id_vignette'], $connect);
-	if ($connect) {
-		$site = quete_meta('adresse_site', $connect);
-		$dir = quete_meta('dir_img', $connect);
-		return "$site/$dir$fichier";
-	}
-	$f = get_spip_doc($fichier);
-	if ($f AND @file_exists($f)) return $f;
-	if ($row['mode'] !== 'vignette') return '';
-	return generer_url_entite($row['id_document'], 'document','','', $connect);
+    if (!$row['id_vignette']) return '';
+    $fichier = quete_fichier($row['id_vignette'], $connect);
+    if ($connect) {
+        $site = quete_meta('adresse_site', $connect);
+        $dir = quete_meta('dir_img', $connect);
+        return "$site/$dir$fichier";
+    }
+    $f = get_spip_doc($fichier);
+    if ($f AND @file_exists($f)) return $f;
+    if ($row['mode'] !== 'vignette') return '';
+    return generer_url_entite($row['id_document'], 'document','','', $connect);
 }
 
 /**
@@ -399,60 +399,60 @@ 
  * @return bool|string
  */
 function calcul_exposer ($id, $prim, $reference, $parent, $type, $connect='') {
-	static $exposer = array();
-
-	// Que faut-il exposer ? Tous les elements de $reference
-	// ainsi que leur hierarchie ; on ne fait donc ce calcul
-	// qu'une fois (par squelette) et on conserve le resultat
-	// en static.
-	if (!isset($exposer[$m=md5(serialize($reference))][$prim])) {
-		$principal = isset($reference[$type])?$reference[$type]:
-			// cas de la pagination indecte @xx qui positionne la page avec l'id xx
-			// et donne la reference dynamique @type=xx dans le contexte
-			(isset($reference["@$type"])?$reference["@$type"]:'');
-		// le parent fournit en argument est le parent de $id, pas celui de $principal
-		// il n'est donc pas utile
-		$parent = 0;
-		if (!$principal) { // regarder si un enfant est dans le contexte, auquel cas il expose peut etre le parent courant
-			$enfants = array('id_rubrique'=>array('id_article'),'id_groupe'=>array('id_mot'));
-			if (isset($enfants[$type]))
-				foreach($enfants[$type] as $t)
-					if (isset($reference[$t])
-						// cas de la reference donnee dynamiquement par la pagination
-						OR isset($reference["@$t"])) {
-						$type = $t;
-						$principal = isset($reference[$type])?$reference[$type]:$reference["@$type"];
-						continue;
-					}
-		}
-		$exposer[$m][$type] = array();
-		if ($principal) {
-			$principaux = is_array($principal)?$principal:array($principal);
-			foreach($principaux as $principal){
-				$exposer[$m][$type][$principal] = true;
-				if ($type == 'id_mot'){
-					if (!$parent) {
-						$parent = sql_getfetsel('id_groupe','spip_mots',"id_mot=" . intval($principal), '','','','',$connect);
-					}
-					if ($parent)
-						$exposer[$m]['id_groupe'][$parent] = true;
-				}
-				else if ($type != 'id_groupe') {
-				  if (!$parent) {
-				  	if ($type == 'id_rubrique')
-				  		$parent = $principal;
-				  	if ($type == 'id_article') {
-						$parent = quete_rubrique($principal,$connect);
-				  	}
-				  }
-				  do { $exposer[$m]['id_rubrique'][$parent] = true; }
-				  while ($parent = quete_parent($parent, $connect));
-				}
-			}
-		}
-	}
-	// And the winner is...
-	return isset($exposer[$m][$prim]) ? isset($exposer[$m][$prim][$id]) : '';
+    static $exposer = array();
+
+    // Que faut-il exposer ? Tous les elements de $reference
+    // ainsi que leur hierarchie ; on ne fait donc ce calcul
+    // qu'une fois (par squelette) et on conserve le resultat
+    // en static.
+    if (!isset($exposer[$m=md5(serialize($reference))][$prim])) {
+        $principal = isset($reference[$type])?$reference[$type]:
+            // cas de la pagination indecte @xx qui positionne la page avec l'id xx
+            // et donne la reference dynamique @type=xx dans le contexte
+            (isset($reference["@$type"])?$reference["@$type"]:'');
+        // le parent fournit en argument est le parent de $id, pas celui de $principal
+        // il n'est donc pas utile
+        $parent = 0;
+        if (!$principal) { // regarder si un enfant est dans le contexte, auquel cas il expose peut etre le parent courant
+            $enfants = array('id_rubrique'=>array('id_article'),'id_groupe'=>array('id_mot'));
+            if (isset($enfants[$type]))
+                foreach($enfants[$type] as $t)
+                    if (isset($reference[$t])
+                        // cas de la reference donnee dynamiquement par la pagination
+                        OR isset($reference["@$t"])) {
+                        $type = $t;
+                        $principal = isset($reference[$type])?$reference[$type]:$reference["@$type"];
+                        continue;
+                    }
+        }
+        $exposer[$m][$type] = array();
+        if ($principal) {
+            $principaux = is_array($principal)?$principal:array($principal);
+            foreach($principaux as $principal){
+                $exposer[$m][$type][$principal] = true;
+                if ($type == 'id_mot'){
+                    if (!$parent) {
+                        $parent = sql_getfetsel('id_groupe','spip_mots',"id_mot=" . intval($principal), '','','','',$connect);
+                    }
+                    if ($parent)
+                        $exposer[$m]['id_groupe'][$parent] = true;
+                }
+                else if ($type != 'id_groupe') {
+                    if (!$parent) {
+                        if ($type == 'id_rubrique')
+                            $parent = $principal;
+                        if ($type == 'id_article') {
+                        $parent = quete_rubrique($principal,$connect);
+                        }
+                    }
+                    do { $exposer[$m]['id_rubrique'][$parent] = true; }
+                    while ($parent = quete_parent($parent, $connect));
+                }
+            }
+        }
+    }
+    // And the winner is...
+    return isset($exposer[$m][$prim]) ? isset($exposer[$m][$prim][$id]) : '';
 }
 
 /**
@@ -467,20 +467,20 @@ 
  * @return int
  */
 function quete_debut_pagination($primary,$valeur,$pas,$iter){
-	// on ne devrait pas arriver ici si la cle primaire est inexistante
-	// ou composee, mais verifions
-	if (!$primary OR preg_match('/[,\s]/',$primary))
-		return 0;
-
-	$pos = 0;
-	while ($row = $iter->fetch() AND $row[$primary]!=$valeur){
-		$pos++;
-	}
-	// si on a pas trouve
-	if ($row[$primary]!=$valeur)
-		return 0;
-
-	// sinon, calculer le bon numero de page
-	return floor($pos/$pas)*$pas;
+    // on ne devrait pas arriver ici si la cle primaire est inexistante
+    // ou composee, mais verifions
+    if (!$primary OR preg_match('/[,\s]/',$primary))
+        return 0;
+
+    $pos = 0;
+    while ($row = $iter->fetch() AND $row[$primary]!=$valeur){
+        $pos++;
+    }
+    // si on a pas trouve
+    if ($row[$primary]!=$valeur)
+        return 0;
+
+    // sinon, calculer le bon numero de page
+    return floor($pos/$pas)*$pas;
 }
 ?>

ecrire/public/styliser.php

Indentation +101 added lines, -101 removed lines

@@ -32,74 +32,74 @@ 
  * http://doc.spip.org/@public_styliser_dist
  */
 function public_styliser_dist($fond, $contexte, $lang='', $connect='') {
-	static $styliser_par_z;
+    static $styliser_par_z;
 
-	// s'assurer que le fond est licite
-	// car il peut etre construit a partir d'une variable d'environnement
-	if (strpos($fond,"../")!==false OR strncmp($fond,'/',1)==0)
-		$fond = "404";
+    // s'assurer que le fond est licite
+    // car il peut etre construit a partir d'une variable d'environnement
+    if (strpos($fond,"../")!==false OR strncmp($fond,'/',1)==0)
+        $fond = "404";
   
-	// Choisir entre $fond-dist.html, $fond=7.html, etc?
-	$id_rubrique = 0;
-	// Chercher le fond qui va servir de squelette
-	if ($r = quete_rubrique_fond($contexte))
-		list($id_rubrique, $lang) = $r;
-
-	// trouver un squelette du nom demande
-	// ne rien dire si on ne trouve pas, 
-	// c'est l'appelant qui sait comment gerer la situation
-	// ou les plugins qui feront mieux dans le pipeline
-	$squelette = trouver_fond($fond,"",true);
-	$ext = $squelette['extension'];
-
-	$flux = array(
-		'args' => array(
-			'id_rubrique' => $id_rubrique,
-			'ext' => $ext,
-			'fond' => $fond,
-			'lang' => $lang,
-			'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
-			'connect' => $connect
-		),
-		'data' => $squelette['fond'],
-	);
-
-	if (test_espace_prive() OR defined('_ZPIP')) {
-		if (!$styliser_par_z)
-			$styliser_par_z = charger_fonction('styliser_par_z','public');
-		$flux = $styliser_par_z($flux);
-	}
-
-	$flux = styliser_par_objets($flux);
-
-	// pipeline styliser
-	$squelette = pipeline('styliser', $flux);
-
-	return array($squelette, $ext, $ext, "$squelette.$ext");
+    // Choisir entre $fond-dist.html, $fond=7.html, etc?
+    $id_rubrique = 0;
+    // Chercher le fond qui va servir de squelette
+    if ($r = quete_rubrique_fond($contexte))
+        list($id_rubrique, $lang) = $r;
+
+    // trouver un squelette du nom demande
+    // ne rien dire si on ne trouve pas, 
+    // c'est l'appelant qui sait comment gerer la situation
+    // ou les plugins qui feront mieux dans le pipeline
+    $squelette = trouver_fond($fond,"",true);
+    $ext = $squelette['extension'];
+
+    $flux = array(
+        'args' => array(
+            'id_rubrique' => $id_rubrique,
+            'ext' => $ext,
+            'fond' => $fond,
+            'lang' => $lang,
+            'contexte' => $contexte, // le style d'un objet peut dependre de lui meme
+            'connect' => $connect
+        ),
+        'data' => $squelette['fond'],
+    );
+
+    if (test_espace_prive() OR defined('_ZPIP')) {
+        if (!$styliser_par_z)
+            $styliser_par_z = charger_fonction('styliser_par_z','public');
+        $flux = $styliser_par_z($flux);
+    }
+
+    $flux = styliser_par_objets($flux);
+
+    // pipeline styliser
+    $squelette = pipeline('styliser', $flux);
+
+    return array($squelette, $ext, $ext, "$squelette.$ext");
 }
 
 function styliser_par_objets($flux){
-	if (test_espace_prive()
-		AND !$squelette = $flux['data']
-	  AND strncmp($flux['args']['fond'],'prive/objets/',13)==0
-	  AND $echafauder = charger_fonction('echafauder','prive',true)) {
-		if (strncmp($flux['args']['fond'],'prive/objets/liste/',19)==0){
-			$table = table_objet(substr($flux['args']['fond'],19));
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql]))
-				$flux['data'] = $echafauder($table,$table,$table_sql,"prive/objets/liste/objets",$flux['args']['ext']);
-		}
-		if (strncmp($flux['args']['fond'],'prive/objets/contenu/',21)==0){
-			$type = substr($flux['args']['fond'],21);
-			$table = table_objet($type);
-			$table_sql = table_objet_sql($table);
-			$objets = lister_tables_objets_sql();
-			if (isset($objets[$table_sql]))
-				$flux['data'] = $echafauder($type,$table,$table_sql,"prive/objets/contenu/objet",$flux['args']['ext']);
-		}
-	}
-	return $flux;
+    if (test_espace_prive()
+        AND !$squelette = $flux['data']
+      AND strncmp($flux['args']['fond'],'prive/objets/',13)==0
+      AND $echafauder = charger_fonction('echafauder','prive',true)) {
+        if (strncmp($flux['args']['fond'],'prive/objets/liste/',19)==0){
+            $table = table_objet(substr($flux['args']['fond'],19));
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql]))
+                $flux['data'] = $echafauder($table,$table,$table_sql,"prive/objets/liste/objets",$flux['args']['ext']);
+        }
+        if (strncmp($flux['args']['fond'],'prive/objets/contenu/',21)==0){
+            $type = substr($flux['args']['fond'],21);
+            $table = table_objet($type);
+            $table_sql = table_objet_sql($table);
+            $objets = lister_tables_objets_sql();
+            if (isset($objets[$table_sql]))
+                $flux['data'] = $echafauder($type,$table,$table_sql,"prive/objets/contenu/objet",$flux['args']['ext']);
+        }
+    }
+    return $flux;
 }
 
 /**
@@ -117,43 +117,43 @@ 
  * @return array
  */
 function quete_rubrique_fond($contexte) {
-	static $liste_objets = null;
-	static $quete = array();
-	if (is_null($liste_objets)) {
-		$liste_objets = array();
-		include_spip('inc/urls');
-		include_spip('public/quete');
-		$l = urls_liste_objets(false);
-		// placer la rubrique en tete des objets
-		$l = array_diff($l,array('rubrique'));
-		array_unshift($l, 'rubrique');
-		foreach($l as $objet){
-			$id = id_table_objet($objet);
-			if (!isset($liste_objets[$id]))
-				$liste_objets[$id] = objet_type($objet,false);
-		}
-	}
-	$c = array_intersect_key($contexte,$liste_objets);
-	if (!count($c)) return false;
-
-	$c = array_map('intval',$c);
-	$s = serialize($c);
-	if (isset($quete[$s]))
-		return $quete[$s];
-
-	if (isset($c['id_rubrique']) AND $r = $c['id_rubrique']){
-		unset($c['id_rubrique']);
-		$c = array('id_rubrique'=>$r) + $c;
-	}
-
-	foreach($c as $_id=>$id) {
-		if ($id
-		  AND $row = quete_parent_lang(table_objet_sql($liste_objets[$_id]),$id)) {
-			$lang = isset($row['lang']) ? $row['lang'] : '';
-			if ($_id=='id_rubrique' OR (isset($row['id_rubrique']) AND $id=$row['id_rubrique']))
-				return $quete[$s] = array ($id, $lang);
-		}
-	}
-	return $quete[$s] = false;
+    static $liste_objets = null;
+    static $quete = array();
+    if (is_null($liste_objets)) {
+        $liste_objets = array();
+        include_spip('inc/urls');
+        include_spip('public/quete');
+        $l = urls_liste_objets(false);
+        // placer la rubrique en tete des objets
+        $l = array_diff($l,array('rubrique'));
+        array_unshift($l, 'rubrique');
+        foreach($l as $objet){
+            $id = id_table_objet($objet);
+            if (!isset($liste_objets[$id]))
+                $liste_objets[$id] = objet_type($objet,false);
+        }
+    }
+    $c = array_intersect_key($contexte,$liste_objets);
+    if (!count($c)) return false;
+
+    $c = array_map('intval',$c);
+    $s = serialize($c);
+    if (isset($quete[$s]))
+        return $quete[$s];
+
+    if (isset($c['id_rubrique']) AND $r = $c['id_rubrique']){
+        unset($c['id_rubrique']);
+        $c = array('id_rubrique'=>$r) + $c;
+    }
+
+    foreach($c as $_id=>$id) {
+        if ($id
+          AND $row = quete_parent_lang(table_objet_sql($liste_objets[$_id]),$id)) {
+            $lang = isset($row['lang']) ? $row['lang'] : '';
+            if ($_id=='id_rubrique' OR (isset($row['id_rubrique']) AND $id=$row['id_rubrique']))
+                return $quete[$s] = array ($id, $lang);
+        }
+    }
+    return $quete[$s] = false;
 }
 ?>

ecrire/public/jointures.php

Indentation +299 added lines, -299 removed lines

@@ -30,10 +30,10 @@ 
  * @return array
  */
 function decompose_champ_id_objet($champ){
-	if (($champ!=='id_objet') AND preg_match(',^id_([a-z_]+)$,', $champ, $regs)){
-		return array('id_objet', 'objet', objet_type($regs[1]));
-	}
-	return $champ;
+    if (($champ!=='id_objet') AND preg_match(',^id_([a-z_]+)$,', $champ, $regs)){
+        return array('id_objet', 'objet', objet_type($regs[1]));
+    }
+    return $champ;
 }
 
 /**
@@ -46,16 +46,16 @@ 
  * @return array
  */
 function trouver_champs_decomposes($champ, $desc){
-	if (!is_array($desc) // on ne se risque pas en conjectures si on ne connait pas la table
-	    OR array_key_exists($champ, $desc['field'])
-	)
-		return array($champ);
-	if (is_array($decompose = decompose_champ_id_objet($champ))){
-		array_pop($decompose);
-		if (count(array_intersect($decompose, array_keys($desc['field'])))==count($decompose))
-			return $decompose;
-	}
-	return array($champ);
+    if (!is_array($desc) // on ne se risque pas en conjectures si on ne connait pas la table
+        OR array_key_exists($champ, $desc['field'])
+    )
+        return array($champ);
+    if (is_array($decompose = decompose_champ_id_objet($champ))){
+        array_pop($decompose);
+        if (count(array_intersect($decompose, array_keys($desc['field'])))==count($decompose))
+            return $decompose;
+    }
+    return array($champ);
 }
 
 
@@ -79,21 +79,21 @@ 
  * @return string
  */
 function calculer_jointure(&$boucle, $depart, $arrivee, $col = '', $cond = false, $max_liens=5){
-	// les jointures minimales sont optimales :
-	// on contraint le nombre d'etapes en l'augmentant
-	// jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi 
-	$max = 1;
-	$res = false;
-	$milieu_exclus = ($col?$col:array());
-	while ($max<=$max_liens AND !$res){
-		$res = calculer_chaine_jointures($boucle, $depart, $arrivee, array(), $milieu_exclus, $max);
-		$max++;
-	}
-	if (!$res) return "";
-
-	list($nom, $desc) = $depart;
-
-	return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col);
+    // les jointures minimales sont optimales :
+    // on contraint le nombre d'etapes en l'augmentant
+    // jusqu'a ce qu'on trouve une jointure ou qu'on atteigne la limite maxi 
+    $max = 1;
+    $res = false;
+    $milieu_exclus = ($col?$col:array());
+    while ($max<=$max_liens AND !$res){
+        $res = calculer_chaine_jointures($boucle, $depart, $arrivee, array(), $milieu_exclus, $max);
+        $max++;
+    }
+    if (!$res) return "";
+
+    list($nom, $desc) = $depart;
+
+    return fabrique_jointures($boucle, $res, $cond, $desc, $nom, $col);
 }
 
 /**
@@ -125,66 +125,66 @@ 
  * @return string
  */
 function fabrique_jointures(&$boucle, $res, $cond = false, $desc = array(), $nom = '', $col = '', $echap = true){
-	static $num = array();
-	$id_table = "";
-	$cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle];
-	foreach ($res as $cle => $r){
-		list($d, $a, $j) = $r;
-		if (!$id_table) $id_table = $d;
-		$n = ++$cpt;
-		if (is_array($j)){ // c'est un lien sur un champ du type id_objet,objet,'article'
-			list($j1, $j2, $obj, $type) = $j;
-			// trouver de quel cote est (id_objet,objet)
-			if ($j1=="id_$obj")
-				$obj = "$id_table.$obj";
-			else
-				$obj = "L$n.$obj";
-			// le where complementaire est envoye dans la jointure pour pouvoir etre elimine avec la jointure
-			// en cas d'optimisation
-			//$boucle->where[] = array("'='","'$obj'","sql_quote('$type')");
-			$boucle->join["L$n"] =
-				$echap ?
-					array("'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')")
-					:
-					array($id_table, $j2, $j1, "$obj=".sql_quote($type));
-		}
-		else
-			$boucle->join["L$n"] = $echap ? array("'$id_table'", "'$j'") : array($id_table, $j);
-		$boucle->from[$id_table = "L$n"] = $a[0];
-	}
-
-
-	// pas besoin de group by
-	// (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555)
-	// si une seule jointure et sur une table avec primary key formee
-	// de l'index principal et de l'index de jointure (non conditionnel! [6031])
-	// et operateur d'egalite (http://trac.rezo.net/trac/spip/ticket/477)
-
-	if ($pk = (isset($a[1]) && (count($boucle->from)==2) && !$cond)){
-		$pk = nogroupby_if($desc, $a[1], $col);
-	}
-
-	// pas de group by 
-	// si une seule jointure
-	// et si l'index de jointure est une primary key a l'arrivee !
-	if (!$pk
-	    AND (count($boucle->from)==2)
-	        AND isset($a[1]['key']['PRIMARY KEY'])
-	            AND ($j==$a[1]['key']['PRIMARY KEY'])
-	)
-		$pk = true;
-
-	// la clause Group by est en conflit avec ORDER BY, a completer
-	$groups = liste_champs_jointures($nom, $desc, true);
-	if (!$pk) foreach ($groups as $id_prim){
-		$id_field = $nom.'.'.$id_prim;
-		if (!in_array($id_field, $boucle->group)){
-			$boucle->group[] = $id_field;
-		}
-	}
-
-	$boucle->modificateur['lien'] = true;
-	return "L$n";
+    static $num = array();
+    $id_table = "";
+    $cpt = &$num[$boucle->descr['nom']][$boucle->descr['gram']][$boucle->id_boucle];
+    foreach ($res as $cle => $r){
+        list($d, $a, $j) = $r;
+        if (!$id_table) $id_table = $d;
+        $n = ++$cpt;
+        if (is_array($j)){ // c'est un lien sur un champ du type id_objet,objet,'article'
+            list($j1, $j2, $obj, $type) = $j;
+            // trouver de quel cote est (id_objet,objet)
+            if ($j1=="id_$obj")
+                $obj = "$id_table.$obj";
+            else
+                $obj = "L$n.$obj";
+            // le where complementaire est envoye dans la jointure pour pouvoir etre elimine avec la jointure
+            // en cas d'optimisation
+            //$boucle->where[] = array("'='","'$obj'","sql_quote('$type')");
+            $boucle->join["L$n"] =
+                $echap ?
+                    array("'$id_table'", "'$j2'", "'$j1'", "'$obj='.sql_quote('$type')")
+                    :
+                    array($id_table, $j2, $j1, "$obj=".sql_quote($type));
+        }
+        else
+            $boucle->join["L$n"] = $echap ? array("'$id_table'", "'$j'") : array($id_table, $j);
+        $boucle->from[$id_table = "L$n"] = $a[0];
+    }
+
+
+    // pas besoin de group by
+    // (cf http://article.gmane.org/gmane.comp.web.spip.devel/30555)
+    // si une seule jointure et sur une table avec primary key formee
+    // de l'index principal et de l'index de jointure (non conditionnel! [6031])
+    // et operateur d'egalite (http://trac.rezo.net/trac/spip/ticket/477)
+
+    if ($pk = (isset($a[1]) && (count($boucle->from)==2) && !$cond)){
+        $pk = nogroupby_if($desc, $a[1], $col);
+    }
+
+    // pas de group by 
+    // si une seule jointure
+    // et si l'index de jointure est une primary key a l'arrivee !
+    if (!$pk
+        AND (count($boucle->from)==2)
+            AND isset($a[1]['key']['PRIMARY KEY'])
+                AND ($j==$a[1]['key']['PRIMARY KEY'])
+    )
+        $pk = true;
+
+    // la clause Group by est en conflit avec ORDER BY, a completer
+    $groups = liste_champs_jointures($nom, $desc, true);
+    if (!$pk) foreach ($groups as $id_prim){
+        $id_field = $nom.'.'.$id_prim;
+        if (!in_array($id_field, $boucle->group)){
+            $boucle->group[] = $id_field;
+        }
+    }
+
+    $boucle->modificateur['lien'] = true;
+    return "L$n";
 }
 
 /**
@@ -200,12 +200,12 @@ 
  * @return bool
  */
 function nogroupby_if($depart, $arrivee, $col){
-	$pk = $arrivee['key']['PRIMARY KEY'];
-	if (!$pk) return false;
-	$id_primary = $depart['key']['PRIMARY KEY'];
-	if (is_array($col)) $col = implode(', *', $col); // cas id_objet, objet
-	return (preg_match("/^$id_primary, *$col$/", $pk) OR
-	        preg_match("/^$col, *$id_primary$/", $pk));
+    $pk = $arrivee['key']['PRIMARY KEY'];
+    if (!$pk) return false;
+    $id_primary = $depart['key']['PRIMARY KEY'];
+    if (is_array($col)) $col = implode(', *', $col); // cas id_objet, objet
+    return (preg_match("/^$id_primary, *$col$/", $pk) OR
+            preg_match("/^$col, *$id_primary$/", $pk));
 }
 
 /**
@@ -224,33 +224,33 @@ 
  */
 function liste_champs_jointures($nom, $desc, $primary = false){
 
-	static $nojoin = array('idx', 'maj', 'date', 'statut');
+    static $nojoin = array('idx', 'maj', 'date', 'statut');
 
-	// si cle primaire demandee, la privilegier
-	if ($primary && isset($desc['key']['PRIMARY KEY']))
-		return split_key($desc['key']['PRIMARY KEY']);
+    // si cle primaire demandee, la privilegier
+    if ($primary && isset($desc['key']['PRIMARY KEY']))
+        return split_key($desc['key']['PRIMARY KEY']);
 
-	// les champs declares explicitement pour les jointures
-	if (isset($desc['join'])) return $desc['join'];
-	/*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join'];
+    // les champs declares explicitement pour les jointures
+    if (isset($desc['join'])) return $desc['join'];
+    /*elseif (isset($GLOBALS['tables_principales'][$nom]['join'])) return $GLOBALS['tables_principales'][$nom]['join'];
 	elseif (isset($GLOBALS['tables_auxiliaires'][$nom]['join'])) return $GLOBALS['tables_auxiliaires'][$nom]['join'];*/
 
-	// si pas de cle, c'est fichu
-	if (!isset($desc['key'])) return array();
+    // si pas de cle, c'est fichu
+    if (!isset($desc['key'])) return array();
 
-	// si cle primaire
-	if (isset($desc['key']['PRIMARY KEY']))
-		return split_key($desc['key']['PRIMARY KEY']);
+    // si cle primaire
+    if (isset($desc['key']['PRIMARY KEY']))
+        return split_key($desc['key']['PRIMARY KEY']);
 
-	// ici on se rabat sur les cles secondaires, 
-	// en eliminant celles qui sont pas pertinentes (idx, maj)
-	// si jamais le resultat n'est pas pertinent pour une table donnee,
-	// il faut declarer explicitement le champ 'join' de sa description
+    // ici on se rabat sur les cles secondaires, 
+    // en eliminant celles qui sont pas pertinentes (idx, maj)
+    // si jamais le resultat n'est pas pertinent pour une table donnee,
+    // il faut declarer explicitement le champ 'join' de sa description
 
-	$join = array();
-	foreach ($desc['key'] as $v) $join = split_key($v, $join);
-	foreach ($join as $k) if (in_array($k, $nojoin)) unset($join[$k]);
-	return $join;
+    $join = array();
+    foreach ($desc['key'] as $v) $join = split_key($v, $join);
+    foreach ($join as $k) if (in_array($k, $nojoin)) unset($join[$k]);
+    return $join;
 }
 
 /**
@@ -263,8 +263,8 @@ 
  * @return array
  */
 function split_key($v, $join = array()){
-	foreach (preg_split('/,\s*/', $v) as $k) $join[$k] = $k;
-	return $join;
+    foreach (preg_split('/,\s*/', $v) as $k) $join[$k] = $k;
+    return $join;
 }
 
 /**
@@ -286,112 +286,112 @@ 
  * @return array
  */
 function calculer_chaine_jointures(&$boucle, $depart, $arrivee, $vu = array(), $milieu_exclus = array(), $max_liens = 5){
-	static $trouver_table;
-	if (!$trouver_table)
-		$trouver_table = charger_fonction('trouver_table', 'base');
-
-	if (is_string($milieu_exclus))
-		$milieu_exclus = array($milieu_exclus);
-	// quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet
-	// faire une jointure sur objet tout seul n'a pas de sens
-	if (in_array('id_objet',$milieu_exclus) AND !in_array('objet',$milieu_exclus))
-		$milieu_exclus[] = 'objet';
-
-	list($dnom, $ddesc) = $depart;
-	list($anom, $adesc) = $arrivee;
-	if (!count($vu)){
-		$vu[] = $dnom; // ne pas oublier la table de depart
-		$vu[] = $anom; // ne pas oublier la table d'arrivee
-	}
-
-	$akeys = array();
-	foreach ($adesc['key'] as $k) {
-		// respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres...
-		$akeys = array_merge($akeys, preg_split('/,\s*/', $k));
-	}
-
-	// enlever les cles d'arrivee exclues par l'appel
-	$akeys = array_diff($akeys, $milieu_exclus);
-
-	// cles candidates au depart
-	$keys = liste_champs_jointures($dnom, $ddesc);
-	// enlever les cles dde depart exclues par l'appel
-	$keys = array_diff($keys, $milieu_exclus);
-
-	$v = !$keys ? false : array_intersect(array_values($keys), $akeys);
-
-	if ($v)
-		return array(array($dnom, array($adesc['table'], $adesc), array_shift($v)));
-
-	// regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx
-	if (count(array_intersect(array('id_objet', 'objet'), $keys))==2){
-		// regarder si l'une des cles d'arrivee peut se decomposer en 
-		// id_objet,objet
-		// si oui on la prend
-		foreach ($akeys as $key){
-			$v = decompose_champ_id_objet($key);
-			if (is_array($v)){
-				$objet = array_shift($v); // objet,'article'
-				array_unshift($v, $key); // id_article,objet,'article'
-				array_unshift($v, $objet); // id_objet,id_article,objet,'article'
-				return array(array($dnom, array($adesc['table'], $adesc), $v));
-			}
-		}
-	}
-	else {
-		// regarder si l'une des cles de depart peut se decomposer en 
-		// id_objet,objet a l'arrivee
-		// si oui on la prend
-		foreach ($keys as $key){
-			if (count($v = trouver_champs_decomposes($key, $adesc))>1){
-				if (count($v)==count(array_intersect($v, $akeys))){
-					$v = decompose_champ_id_objet($key); // id_objet,objet,'article'
-					array_unshift($v, $key); // id_article,id_objet,objet,'article'
-					return array(array($dnom, array($adesc['table'], $adesc), $v));
-				}
-			}
-		}
-	}
-	// si l'on voulait une jointure direct, c'est rate !
-	if ($max_liens<=1) return array();
-
-	// sinon essayer de passer par une autre table
-	$new = $vu;
-	foreach ($boucle->jointures as $v){
-		if ($v
-		    AND !in_array($v, $vu)
-		    AND $def = $trouver_table($v, $boucle->sql_serveur)
-			  AND !in_array($def['table_sql'], $vu)
-		){
-			// ne pas tester les cles qui sont exclues a l'appel
-			// ie la cle de la jointure precedente
-			$test_cles = $milieu_exclus;
-			$new[] = $v;
-			$max_iter = 50; // securite
-			while (count($jointure_directe_possible = calculer_chaine_jointures($boucle, $depart, array($v, $def), $vu, $test_cles, 1))
-			       AND $max_iter--){
-				$jointure_directe_possible = reset($jointure_directe_possible);
-				$milieu = end($jointure_directe_possible);
-				$exclure_fin = $milieu_exclus;
-				if (is_string($milieu)){
-					$exclure_fin[] = $milieu;
-					$test_cles[] = $milieu;
-				}
-				else{
-					$exclure_fin = array_merge($exclure_fin, $milieu);
-					$test_cles = array_merge($test_cles, $milieu);
-				}
-				// essayer de rejoindre l'arrivee a partir de cette etape intermediaire
-				// sans repasser par la meme cle milieu, ni une cle deja vue !
-				$r = calculer_chaine_jointures($boucle, array($v, $def), $arrivee, $new, $exclure_fin, $max_liens-1);
-				if ($r){
-					array_unshift($r, $jointure_directe_possible);
-					return $r;
-				}
-			}
-		}
-	}
-	return array();
+    static $trouver_table;
+    if (!$trouver_table)
+        $trouver_table = charger_fonction('trouver_table', 'base');
+
+    if (is_string($milieu_exclus))
+        $milieu_exclus = array($milieu_exclus);
+    // quand on a exclus id_objet comme cle de jointure, il faut aussi exclure objet
+    // faire une jointure sur objet tout seul n'a pas de sens
+    if (in_array('id_objet',$milieu_exclus) AND !in_array('objet',$milieu_exclus))
+        $milieu_exclus[] = 'objet';
+
+    list($dnom, $ddesc) = $depart;
+    list($anom, $adesc) = $arrivee;
+    if (!count($vu)){
+        $vu[] = $dnom; // ne pas oublier la table de depart
+        $vu[] = $anom; // ne pas oublier la table d'arrivee
+    }
+
+    $akeys = array();
+    foreach ($adesc['key'] as $k) {
+        // respecter l'ordre de $adesc['key'] pour ne pas avoir id_trad en premier entre autres...
+        $akeys = array_merge($akeys, preg_split('/,\s*/', $k));
+    }
+
+    // enlever les cles d'arrivee exclues par l'appel
+    $akeys = array_diff($akeys, $milieu_exclus);
+
+    // cles candidates au depart
+    $keys = liste_champs_jointures($dnom, $ddesc);
+    // enlever les cles dde depart exclues par l'appel
+    $keys = array_diff($keys, $milieu_exclus);
+
+    $v = !$keys ? false : array_intersect(array_values($keys), $akeys);
+
+    if ($v)
+        return array(array($dnom, array($adesc['table'], $adesc), array_shift($v)));
+
+    // regarder si l'on a (id_objet,objet) au depart et si on peut le mapper sur un id_xx
+    if (count(array_intersect(array('id_objet', 'objet'), $keys))==2){
+        // regarder si l'une des cles d'arrivee peut se decomposer en 
+        // id_objet,objet
+        // si oui on la prend
+        foreach ($akeys as $key){
+            $v = decompose_champ_id_objet($key);
+            if (is_array($v)){
+                $objet = array_shift($v); // objet,'article'
+                array_unshift($v, $key); // id_article,objet,'article'
+                array_unshift($v, $objet); // id_objet,id_article,objet,'article'
+                return array(array($dnom, array($adesc['table'], $adesc), $v));
+            }
+        }
+    }
+    else {
+        // regarder si l'une des cles de depart peut se decomposer en 
+        // id_objet,objet a l'arrivee
+        // si oui on la prend
+        foreach ($keys as $key){
+            if (count($v = trouver_champs_decomposes($key, $adesc))>1){
+                if (count($v)==count(array_intersect($v, $akeys))){
+                    $v = decompose_champ_id_objet($key); // id_objet,objet,'article'
+                    array_unshift($v, $key); // id_article,id_objet,objet,'article'
+                    return array(array($dnom, array($adesc['table'], $adesc), $v));
+                }
+            }
+        }
+    }
+    // si l'on voulait une jointure direct, c'est rate !
+    if ($max_liens<=1) return array();
+
+    // sinon essayer de passer par une autre table
+    $new = $vu;
+    foreach ($boucle->jointures as $v){
+        if ($v
+            AND !in_array($v, $vu)
+            AND $def = $trouver_table($v, $boucle->sql_serveur)
+              AND !in_array($def['table_sql'], $vu)
+        ){
+            // ne pas tester les cles qui sont exclues a l'appel
+            // ie la cle de la jointure precedente
+            $test_cles = $milieu_exclus;
+            $new[] = $v;
+            $max_iter = 50; // securite
+            while (count($jointure_directe_possible = calculer_chaine_jointures($boucle, $depart, array($v, $def), $vu, $test_cles, 1))
+                   AND $max_iter--){
+                $jointure_directe_possible = reset($jointure_directe_possible);
+                $milieu = end($jointure_directe_possible);
+                $exclure_fin = $milieu_exclus;
+                if (is_string($milieu)){
+                    $exclure_fin[] = $milieu;
+                    $test_cles[] = $milieu;
+                }
+                else{
+                    $exclure_fin = array_merge($exclure_fin, $milieu);
+                    $test_cles = array_merge($test_cles, $milieu);
+                }
+                // essayer de rejoindre l'arrivee a partir de cette etape intermediaire
+                // sans repasser par la meme cle milieu, ni une cle deja vue !
+                $r = calculer_chaine_jointures($boucle, array($v, $def), $arrivee, $new, $exclure_fin, $max_liens-1);
+                if ($r){
+                    array_unshift($r, $jointure_directe_possible);
+                    return $r;
+                }
+            }
+        }
+    }
+    return array();
 }
 
 /**
@@ -404,17 +404,17 @@ 
  * @return array
  */
 function trouver_cles_table($keys){
-	$res = array();
-	foreach ($keys as $v){
-		if (!strpos($v, ","))
-			$res[$v] = 1;
-		else {
-			foreach (preg_split("/\s*,\s*/", $v) as $k){
-				$res[$k] = 1;
-			}
-		}
-	}
-	return array_keys($res);
+    $res = array();
+    foreach ($keys as $v){
+        if (!strpos($v, ","))
+            $res[$v] = 1;
+        else {
+            foreach (preg_split("/\s*,\s*/", $v) as $k){
+                $res[$k] = 1;
+            }
+        }
+    }
+    return array_keys($res);
 }
 
 /**
@@ -427,60 +427,60 @@ 
  * @return array|string
  */
 function trouver_champ_exterieur($cle, $joints, &$boucle, $checkarrivee = false){
-	static $trouver_table = '';
-	if (!$trouver_table)
-		$trouver_table = charger_fonction('trouver_table', 'base');
-
-	// support de la recherche multi champ :
-	// si en seconde etape on a decompose le champ id_xx en id_objet,objet
-	// on reentre ici soit en cherchant une table les 2 champs id_objet,objet
-	// soit une table avec les 3 champs id_xx, id_objet, objet
-	if (!is_array($cle))
-		$cle = array($cle);
-
-	foreach ($joints as $k => $join){
-		if ($join && $table = $trouver_table($join, $boucle->sql_serveur)){
-			if (isset($table['field'])
-			    // verifier que toutes les cles cherchees sont la
-			    AND (count(array_intersect($cle, array_keys($table['field'])))==count($cle))
-			        // si on sait ou on veut arriver, il faut que ca colle
-			        AND ($checkarrivee==false || $checkarrivee==$table['table'])
-			)
-				return array($table['table'], $table);
-		}
-	}
-
-	// au premier coup, on essaye de decomposer, si possible
-	if (count($cle)==1
-	    AND $c = reset($cle)
-	        AND is_array($decompose = decompose_champ_id_objet($c))
-	){
-
-		$desc = $boucle->show;
-		// cas 1 : la cle id_xx est dans la table de depart
-		// -> on cherche uniquement id_objet,objet a l'arrivee
-		if (isset($desc['field'][$c])){
-			$cle = array();
-			$cle[] = array_shift($decompose); // id_objet
-			$cle[] = array_shift($decompose); // objet
-			return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee);
-		}
-			// cas 2 : la cle id_xx n'est pas dans la table de depart
-			// -> il faut trouver une cle de depart zzz telle que
-			// id_objet,objet,zzz soit a l'arrivee
-		else {
-			$depart = liste_champs_jointures($desc['table'], $desc);
-			foreach ($depart as $d){
-				$cle = array();
-				$cle[] = array_shift($decompose); // id_objet
-				$cle[] = array_shift($decompose); // objet
-				$cle[] = $d;
-				if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee))
-					return $ext;
-			}
-		}
-	}
-	return "";
+    static $trouver_table = '';
+    if (!$trouver_table)
+        $trouver_table = charger_fonction('trouver_table', 'base');
+
+    // support de la recherche multi champ :
+    // si en seconde etape on a decompose le champ id_xx en id_objet,objet
+    // on reentre ici soit en cherchant une table les 2 champs id_objet,objet
+    // soit une table avec les 3 champs id_xx, id_objet, objet
+    if (!is_array($cle))
+        $cle = array($cle);
+
+    foreach ($joints as $k => $join){
+        if ($join && $table = $trouver_table($join, $boucle->sql_serveur)){
+            if (isset($table['field'])
+                // verifier que toutes les cles cherchees sont la
+                AND (count(array_intersect($cle, array_keys($table['field'])))==count($cle))
+                    // si on sait ou on veut arriver, il faut que ca colle
+                    AND ($checkarrivee==false || $checkarrivee==$table['table'])
+            )
+                return array($table['table'], $table);
+        }
+    }
+
+    // au premier coup, on essaye de decomposer, si possible
+    if (count($cle)==1
+        AND $c = reset($cle)
+            AND is_array($decompose = decompose_champ_id_objet($c))
+    ){
+
+        $desc = $boucle->show;
+        // cas 1 : la cle id_xx est dans la table de depart
+        // -> on cherche uniquement id_objet,objet a l'arrivee
+        if (isset($desc['field'][$c])){
+            $cle = array();
+            $cle[] = array_shift($decompose); // id_objet
+            $cle[] = array_shift($decompose); // objet
+            return trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee);
+        }
+            // cas 2 : la cle id_xx n'est pas dans la table de depart
+            // -> il faut trouver une cle de depart zzz telle que
+            // id_objet,objet,zzz soit a l'arrivee
+        else {
+            $depart = liste_champs_jointures($desc['table'], $desc);
+            foreach ($depart as $d){
+                $cle = array();
+                $cle[] = array_shift($decompose); // id_objet
+                $cle[] = array_shift($decompose); // objet
+                $cle[] = $d;
+                if ($ext = trouver_champ_exterieur($cle, $joints, $boucle, $checkarrivee))
+                    return $ext;
+            }
+        }
+    }
+    return "";
 }
 
 /**
@@ -506,17 +506,17 @@ 
  * @return string
  */
 function trouver_jointure_champ($champ, &$boucle, $jointures = false, $cond = false) {
-	if ($jointures === false) {
-		$jointures = $boucle->jointures;
-	}
-	$cle = trouver_champ_exterieur($champ, $jointures, $boucle);
-	if ($cle){
-		$desc = $boucle->show;
-		$cle = calculer_jointure($boucle, array($desc['id_table'], $desc), $cle, '', $cond);
-	}
-	if ($cle) return $cle;
-	spip_log("trouver_jointure_champ: $champ inconnu");
-	return '';
+    if ($jointures === false) {
+        $jointures = $boucle->jointures;
+    }
+    $cle = trouver_champ_exterieur($champ, $jointures, $boucle);
+    if ($cle){
+        $desc = $boucle->show;
+        $cle = calculer_jointure($boucle, array($desc['id_table'], $desc), $cle, '', $cond);
+    }
+    if ($cle) return $cle;
+    spip_log("trouver_jointure_champ: $champ inconnu");
+    return '';
 }
 
 ?>

ecrire/public/iterateur.php

Indentation +502 added lines, -502 removed lines

@@ -20,537 +20,537 @@
  * 
  */
 class IterFactory{
-	public static function create($iterateur, $command, $info=null){
-
-		// cas des SI {si expression} analises tres tot
-		// pour eviter le chargement de tout iterateur
-		if (isset($command['si'])) {
-			foreach ($command['si'] as $si) {
-				if (!$si) {
-					// $command pour boucle SQL peut generer des erreurs de compilation
-					// s'il est transmis alors qu'on est dans un iterateur vide
-					return new IterDecorator(new EmptyIterator(), array(), $info);
-				}
-			}
-		}
-
-		// chercher un iterateur PHP existant (par exemple dans SPL)
-		// (il faudrait passer l'argument ->sql_serveur
-		// pour etre certain qu'on est sur un "php:")
-		if (class_exists($iterateur)) {
-			$a = isset($command['args']) ? $command['args'] : array() ;
-
-			// permettre de passer un Iterateur directement {args #ITERATEUR} :
-			// si on recoit deja un iterateur en argument, on l'utilise
-			if (count($a)==1 and is_object($a[0]) and is_subclass_of($a[0], 'Iterator')) {
-				$iter = $a[0];
-
-			// sinon, on cree un iterateur du type donne
-			} else {							
-				// arguments de creation de l'iterateur...
-				// (pas glop)
-				try {
-					switch (count($a)) {
-						case 0:    $iter = new $iterateur();  break;
-						case 1:    $iter = new $iterateur($a[0]);  break;
-						case 2:    $iter = new $iterateur($a[0], $a[1]);  break;
-						case 3:    $iter = new $iterateur($a[0], $a[1], $a[2]);  break;
-						case 4:    $iter = new $iterateur($a[0], $a[1], $a[2], $a[3]);  break;
-					}
-				} catch (Exception $e) {
-					spip_log("Erreur de chargement de l'iterateur $iterateur");
-					spip_log($e->getMessage());
-					$iter = new EmptyIterator();
-				}
-			}
-		} else {
-			// chercher la classe d'iterateur
-			// IterateurXXX
-			// definie dans le fichier iterateurs/xxx.php
-			$class = "Iterateur".$iterateur;
-			if (!class_exists($class)){
-				if (!include_spip("iterateur/" . strtolower($iterateur))
-					OR !class_exists($class)) {
-					die("Iterateur $iterateur non trouvé");
-					// si l'iterateur n'existe pas, on se rabat sur le generique
-					# $iter = new EmptyIterator();
-				}
-			}
-			$iter = new $class($command, $info);
-		}
-		return new IterDecorator($iter, $command, $info);
-	}
+    public static function create($iterateur, $command, $info=null){
+
+        // cas des SI {si expression} analises tres tot
+        // pour eviter le chargement de tout iterateur
+        if (isset($command['si'])) {
+            foreach ($command['si'] as $si) {
+                if (!$si) {
+                    // $command pour boucle SQL peut generer des erreurs de compilation
+                    // s'il est transmis alors qu'on est dans un iterateur vide
+                    return new IterDecorator(new EmptyIterator(), array(), $info);
+                }
+            }
+        }
+
+        // chercher un iterateur PHP existant (par exemple dans SPL)
+        // (il faudrait passer l'argument ->sql_serveur
+        // pour etre certain qu'on est sur un "php:")
+        if (class_exists($iterateur)) {
+            $a = isset($command['args']) ? $command['args'] : array() ;
+
+            // permettre de passer un Iterateur directement {args #ITERATEUR} :
+            // si on recoit deja un iterateur en argument, on l'utilise
+            if (count($a)==1 and is_object($a[0]) and is_subclass_of($a[0], 'Iterator')) {
+                $iter = $a[0];
+
+            // sinon, on cree un iterateur du type donne
+            } else {							
+                // arguments de creation de l'iterateur...
+                // (pas glop)
+                try {
+                    switch (count($a)) {
+                        case 0:    $iter = new $iterateur();  break;
+                        case 1:    $iter = new $iterateur($a[0]);  break;
+                        case 2:    $iter = new $iterateur($a[0], $a[1]);  break;
+                        case 3:    $iter = new $iterateur($a[0], $a[1], $a[2]);  break;
+                        case 4:    $iter = new $iterateur($a[0], $a[1], $a[2], $a[3]);  break;
+                    }
+                } catch (Exception $e) {
+                    spip_log("Erreur de chargement de l'iterateur $iterateur");
+                    spip_log($e->getMessage());
+                    $iter = new EmptyIterator();
+                }
+            }
+        } else {
+            // chercher la classe d'iterateur
+            // IterateurXXX
+            // definie dans le fichier iterateurs/xxx.php
+            $class = "Iterateur".$iterateur;
+            if (!class_exists($class)){
+                if (!include_spip("iterateur/" . strtolower($iterateur))
+                    OR !class_exists($class)) {
+                    die("Iterateur $iterateur non trouvé");
+                    // si l'iterateur n'existe pas, on se rabat sur le generique
+                    # $iter = new EmptyIterator();
+                }
+            }
+            $iter = new $class($command, $info);
+        }
+        return new IterDecorator($iter, $command, $info);
+    }
 }
 
 
 
 
 class IterDecorator extends FilterIterator {
-	private $iter;
-
-	/**
-	 * Conditions de filtrage
-	 * ie criteres de selection
-	 * @var array
-	 */
-	protected $filtre = array();
-
-	/**
-	 * Fonction de filtrage compilee a partir des criteres de filtre
-	 * @var string
-	 */
-	protected $func_filtre = null;
-
-	/**
-	 * Critere {offset, limit}
-	 * @var int
-	 * @var int
-	 */
-	protected $offset = null;
-	protected $limit = null;
-
-	/**
-	 * nombre d'elements recuperes depuis la position 0,
-	 * en tenant compte des filtres
-	 * @var int
-	 */
-	protected $fetched=0;
-
-	/**
-	 * Y a t'il une erreur ?
-	 * 
-	 * @var bool
-	**/
-	protected $err = false;
-
-	/**
-	 * Drapeau a activer en cas d'echec
-	 * (select SQL errone, non chargement des DATA, etc)
-	 */
-	public function err() {
-		if (method_exists($this->iter, 'err'))
-			return $this->iter->err();
-		if (property_exists($this->iter, 'err'))
-			return $this->iter->err;
-		return false;
-	}
-
-	public function __construct(Iterator $iter, $command, $info){
-		parent::__construct($iter);
-		parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator)
+    private $iter;
+
+    /**
+     * Conditions de filtrage
+     * ie criteres de selection
+     * @var array
+     */
+    protected $filtre = array();
+
+    /**
+     * Fonction de filtrage compilee a partir des criteres de filtre
+     * @var string
+     */
+    protected $func_filtre = null;
+
+    /**
+     * Critere {offset, limit}
+     * @var int
+     * @var int
+     */
+    protected $offset = null;
+    protected $limit = null;
+
+    /**
+     * nombre d'elements recuperes depuis la position 0,
+     * en tenant compte des filtres
+     * @var int
+     */
+    protected $fetched=0;
+
+    /**
+     * Y a t'il une erreur ?
+     * 
+     * @var bool
+     **/
+    protected $err = false;
+
+    /**
+     * Drapeau a activer en cas d'echec
+     * (select SQL errone, non chargement des DATA, etc)
+     */
+    public function err() {
+        if (method_exists($this->iter, 'err'))
+            return $this->iter->err();
+        if (property_exists($this->iter, 'err'))
+            return $this->iter->err;
+        return false;
+    }
+
+    public function __construct(Iterator $iter, $command, $info){
+        parent::__construct($iter);
+        parent::rewind(); // remettre a la premiere position (bug? connu de FilterIterator)
 		
-		// recuperer l'iterateur transmis
-		$this->iter = $this->getInnerIterator();
-		$this->command = $command;
-		$this->info = $info;
-		$this->pos = 0;
-		$this->fetched = 0;
-
-		// chercher la liste des champs a retourner par
-		// fetch si l'objet ne les calcule pas tout seul
-		if (!method_exists($this->iter, 'fetch')) {
-			$this->calculer_select();
-			$this->calculer_filtres();
-		}
-
-		// emptyIterator critere {si} faux n'a pas d'erreur !
-		if (isset($this->iter->err)) {
-			$this->err = $this->iter->err;
-		}
-
-		// pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
-		//$this->total = $this->count();
-	}
-
-
-	// calcule les elements a retournes par fetch()
-	// enleve les elements inutiles du select()
-	// 
-	private function calculer_select() {
-		if ($select = &$this->command['select']) {
-			foreach($select as $s) {
-				// /!\ $s = '.nom'
-				if ($s[0] == '.') {
-					$s = substr($s, 1);
-				}
-				$this->select[] = $s;
-			}
-		}
-	}
-
-	// recuperer la valeur d'une balise #X
-	// en fonction des methodes 
-	// et proprietes disponibles
-	public function get_select($nom) {
-		if (is_object($this->iter)
-		AND method_exists($this->iter, $nom)) {
-			try {
-				return $this->iter->$nom();
-			} catch(Exception $e) {
-				// #GETCHILDREN sur un fichier de DirectoryIterator ...
-				spip_log("Methode $nom en echec sur " . get_class($this->iter));
-				spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode");
-				return '';
-			}
-		}
-		/*
+        // recuperer l'iterateur transmis
+        $this->iter = $this->getInnerIterator();
+        $this->command = $command;
+        $this->info = $info;
+        $this->pos = 0;
+        $this->fetched = 0;
+
+        // chercher la liste des champs a retourner par
+        // fetch si l'objet ne les calcule pas tout seul
+        if (!method_exists($this->iter, 'fetch')) {
+            $this->calculer_select();
+            $this->calculer_filtres();
+        }
+
+        // emptyIterator critere {si} faux n'a pas d'erreur !
+        if (isset($this->iter->err)) {
+            $this->err = $this->iter->err;
+        }
+
+        // pas d'init a priori, le calcul ne sera fait qu'en cas de besoin (provoque une double requete souvent inutile en sqlite)
+        //$this->total = $this->count();
+    }
+
+
+    // calcule les elements a retournes par fetch()
+    // enleve les elements inutiles du select()
+    // 
+    private function calculer_select() {
+        if ($select = &$this->command['select']) {
+            foreach($select as $s) {
+                // /!\ $s = '.nom'
+                if ($s[0] == '.') {
+                    $s = substr($s, 1);
+                }
+                $this->select[] = $s;
+            }
+        }
+    }
+
+    // recuperer la valeur d'une balise #X
+    // en fonction des methodes 
+    // et proprietes disponibles
+    public function get_select($nom) {
+        if (is_object($this->iter)
+        AND method_exists($this->iter, $nom)) {
+            try {
+                return $this->iter->$nom();
+            } catch(Exception $e) {
+                // #GETCHILDREN sur un fichier de DirectoryIterator ...
+                spip_log("Methode $nom en echec sur " . get_class($this->iter));
+                spip_log("Cela peut être normal : retour d'une ligne de resultat ne pouvant pas calculer cette methode");
+                return '';
+            }
+        }
+        /*
 		if (property_exists($this->iter, $nom)) {
 			return $this->iter->$nom;
 		}*/
-		// cle et valeur par defaut
-		// ICI PLANTAGE SI ON NE CONTROLE PAS $nom
-		if (in_array($nom, array('cle', 'valeur'))
-		AND method_exists($this, $nom)) {
-			return $this->$nom();
-		}
+        // cle et valeur par defaut
+        // ICI PLANTAGE SI ON NE CONTROLE PAS $nom
+        if (in_array($nom, array('cle', 'valeur'))
+        AND method_exists($this, $nom)) {
+            return $this->$nom();
+        }
 
-		// Par defaut chercher en xpath dans la valeur()
-		return table_valeur($this->valeur(), $nom, null);
-	}
+        // Par defaut chercher en xpath dans la valeur()
+        return table_valeur($this->valeur(), $nom, null);
+    }
 
 	
-	private function calculer_filtres() {
+    private function calculer_filtres() {
 		
-		// Issu de calculer_select() de public/composer L.519
-		// TODO: externaliser...
-		//
-		// retirer les criteres vides:
-		// {X ?} avec X absent de l'URL
-		// {par #ENV{X}} avec X absent de l'URL
-		// IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil)
-		if ($where = &$this->command['where']) {
-			$menage = false;
-			foreach($where as $k => $v) { 
-				if (is_array($v)){
-					if ((count($v)>=2) && ($v[0]=='REGEXP') && ($v[2]=="'.*'")) $op= false;
-					elseif ((count($v)>=2) && ($v[0]=='LIKE') && ($v[2]=="'%'")) $op= false;
-					else $op = $v[0] ? $v[0] : $v;
-				} else $op = $v;
-				if ((!$op) OR ($op==1) OR ($op=='0=0')) {
-					unset($where[$k]);
-					$menage = true;
-				}
-				// traiter {cle IN a,b} ou {valeur !IN a,b}
-				// prendre en compte le cas particulier de sous-requetes
-				// produites par sql_in quand plus de 255 valeurs passees a IN
-				if (preg_match_all(',\s+IN\s+(\(.*\)),', $op, $s_req)) {
-					$req = '';
-					foreach($s_req[1] as $key => $val) {
-						$req .= trim($val, '(,)') . ',';
-					}
-					$req = '(' . rtrim($req, ',') . ')';
-				}
-				if (preg_match(',^\(\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)(?:\s+(AND|OR)\s+\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\))*\)$,', $op, $regs)) {
-					$this->ajouter_filtre($regs[1], 'IN', strlen($req) ? $req : $regs[3], $regs[2]);
-					unset($op);
-				}
-			}
-			foreach($where as $k => $v) {
-				// 3 possibilites : count($v) =
-				// * 1 : {x y} ; on recoit $v[0] = y
-				// * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y}
-				// * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y
-
-				// 1 : forcement traite par un critere, on passe
-				if (count($v) == 1) {
-					continue;
-				}
-				if (count($v) == 2 and is_array($v[1])) {
-					$this->ajouter_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT');
-				}
-				if (count($v) == 3) {
-					$this->ajouter_filtre($v[1], $v[0], $v[2]);
-				}
-			}
-		}
-
-		// critere {2,7}
-		if (isset($this->command['limit']) AND $this->command['limit']) {
-			$limit = explode(',',$this->command['limit']);
-			$this->offset = $limit[0];
-			$this->limit = $limit[1];
-		}
-
-		// Creer la fonction de filtrage sur $this
-		if ($this->filtre) {
-			$this->func_filtre = create_function('$me', $b = 'return ('.join(') AND (', $this->filtre).');');
-		}
-	}
-
-
-
-	protected function ajouter_filtre($cle, $op, $valeur, $not=false) {
-		if (method_exists($this->iter, 'exception_des_criteres')) {
-			if (in_array($cle, $this->iter->exception_des_criteres())) {
-				return;
-			}
-		}
-		// TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ?
-		# mais c'est normalement deja opere par calculer_critere_infixe()
-		# qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1}
-		# ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present.
-		# il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir...
+        // Issu de calculer_select() de public/composer L.519
+        // TODO: externaliser...
+        //
+        // retirer les criteres vides:
+        // {X ?} avec X absent de l'URL
+        // {par #ENV{X}} avec X absent de l'URL
+        // IN sur collection vide (ce dernier devrait pouvoir etre fait a la compil)
+        if ($where = &$this->command['where']) {
+            $menage = false;
+            foreach($where as $k => $v) { 
+                if (is_array($v)){
+                    if ((count($v)>=2) && ($v[0]=='REGEXP') && ($v[2]=="'.*'")) $op= false;
+                    elseif ((count($v)>=2) && ($v[0]=='LIKE') && ($v[2]=="'%'")) $op= false;
+                    else $op = $v[0] ? $v[0] : $v;
+                } else $op = $v;
+                if ((!$op) OR ($op==1) OR ($op=='0=0')) {
+                    unset($where[$k]);
+                    $menage = true;
+                }
+                // traiter {cle IN a,b} ou {valeur !IN a,b}
+                // prendre en compte le cas particulier de sous-requetes
+                // produites par sql_in quand plus de 255 valeurs passees a IN
+                if (preg_match_all(',\s+IN\s+(\(.*\)),', $op, $s_req)) {
+                    $req = '';
+                    foreach($s_req[1] as $key => $val) {
+                        $req .= trim($val, '(,)') . ',';
+                    }
+                    $req = '(' . rtrim($req, ',') . ')';
+                }
+                if (preg_match(',^\(\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\)(?:\s+(AND|OR)\s+\(([\w/]+)(\s+NOT)?\s+IN\s+(\(.*\))\))*\)$,', $op, $regs)) {
+                    $this->ajouter_filtre($regs[1], 'IN', strlen($req) ? $req : $regs[3], $regs[2]);
+                    unset($op);
+                }
+            }
+            foreach($where as $k => $v) {
+                // 3 possibilites : count($v) =
+                // * 1 : {x y} ; on recoit $v[0] = y
+                // * 2 : {x !op y} ; on recoit $v[0] = 'NOT', $v[1] = array() // array du type {x op y}
+                // * 3 : {x op y} ; on recoit $v[0] = 'op', $v[1] = x, $v[2] = y
+
+                // 1 : forcement traite par un critere, on passe
+                if (count($v) == 1) {
+                    continue;
+                }
+                if (count($v) == 2 and is_array($v[1])) {
+                    $this->ajouter_filtre($v[1][1], $v[1][0], $v[1][2], 'NOT');
+                }
+                if (count($v) == 3) {
+                    $this->ajouter_filtre($v[1], $v[0], $v[2]);
+                }
+            }
+        }
+
+        // critere {2,7}
+        if (isset($this->command['limit']) AND $this->command['limit']) {
+            $limit = explode(',',$this->command['limit']);
+            $this->offset = $limit[0];
+            $this->limit = $limit[1];
+        }
+
+        // Creer la fonction de filtrage sur $this
+        if ($this->filtre) {
+            $this->func_filtre = create_function('$me', $b = 'return ('.join(') AND (', $this->filtre).');');
+        }
+    }
+
+
+
+    protected function ajouter_filtre($cle, $op, $valeur, $not=false) {
+        if (method_exists($this->iter, 'exception_des_criteres')) {
+            if (in_array($cle, $this->iter->exception_des_criteres())) {
+                return;
+            }
+        }
+        // TODO: analyser le filtre pour refuser ce qu'on ne sait pas traiter ?
+        # mais c'est normalement deja opere par calculer_critere_infixe()
+        # qui regarde la description 'desc' (en casse reelle d'ailleurs : {isDir=1}
+        # ne sera pas vu si l'on a defini desc['field']['isdir'] pour que #ISDIR soit present.
+        # il faudrait peut etre definir les 2 champs isDir et isdir... a reflechir...
 		
-		# if (!in_array($cle, array('cle', 'valeur')))
-		#	return;
+        # if (!in_array($cle, array('cle', 'valeur')))
+        #	return;
 
-		$a = '$me->get_select(\''.$cle.'\')';
+        $a = '$me->get_select(\''.$cle.'\')';
 
-		$filtre = '';
+        $filtre = '';
 		
-		if ($op == 'REGEXP') {
-			$filtre = 'match('.$a.', '.str_replace('\"', '"', $valeur).')';
-			$op = '';
-		} else if ($op == 'LIKE') {
-			$valeur = str_replace(array('\"', '_', '%'), array('"', '.', '.*'), preg_quote($valeur));
-			$filtre = 'match('.$a.', '.$valeur.')';
-			$op = '';
-		} else if ($op == '=') {
-			$op = '==';
-		} else if ($op == 'IN') {
-			$filtre = 'in_array('.$a.', array'.$valeur.')';
-			$op = '';
-		} else if (!in_array($op, array('<','<=', '>', '>='))) {
-			spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette
-			$op = '';
-		}
+        if ($op == 'REGEXP') {
+            $filtre = 'match('.$a.', '.str_replace('\"', '"', $valeur).')';
+            $op = '';
+        } else if ($op == 'LIKE') {
+            $valeur = str_replace(array('\"', '_', '%'), array('"', '.', '.*'), preg_quote($valeur));
+            $filtre = 'match('.$a.', '.$valeur.')';
+            $op = '';
+        } else if ($op == '=') {
+            $op = '==';
+        } else if ($op == 'IN') {
+            $filtre = 'in_array('.$a.', array'.$valeur.')';
+            $op = '';
+        } else if (!in_array($op, array('<','<=', '>', '>='))) {
+            spip_log('operateur non reconnu ' . $op); // [todo] mettre une erreur de squelette
+            $op = '';
+        }
 	
-		if ($op)
-			$filtre = $a.$op.str_replace('\"', '"', $valeur);
+        if ($op)
+            $filtre = $a.$op.str_replace('\"', '"', $valeur);
 
-		if ($not)
-			$filtre = "!($filtre)";
+        if ($not)
+            $filtre = "!($filtre)";
 			
-		if ($filtre) {
-			$this->filtre[] = $filtre;
-		}
-	}
+        if ($filtre) {
+            $this->filtre[] = $filtre;
+        }
+    }
 
 	
-	public function next(){
-		$this->pos++;
-		parent::next();
-	}
-
-	/**
-	 * revient au depart
-	 * @return void
-	 */
-	public function rewind() {
-		$this->pos = 0;
-		$this->fetched = 0;
-		parent::rewind();
-	}
-
-
-	# Extension SPIP des iterateurs PHP
-	/**
-	 * type de l'iterateur
-	 * @var string
-	 */
-	protected $type;
-
-	/**
-	 * parametres de l'iterateur
-	 * @var array
-	 */
-	protected $command;
-
-	/**
-	 * infos de compilateur
-	 * @var array
-	 */
-	protected $info;
-
-	/**
-	 * position courante de l'iterateur
-	 * @var int
-	 */
-	protected $pos=null;
-
-	/**
-	 * nombre total resultats dans l'iterateur
-	 * @var int
-	 */
-	protected $total=null;
-
-	/**
-	 * nombre maximal de recherche pour $total
-	 * si l'iterateur n'implemente pas de fonction specifique
-	 */
-	 protected $max=100000;
-
-
-	/**
-	 * Liste des champs a inserer dans les $row
-	 * retournes par ->fetch()
-	 */
-	 protected $select=array();
+    public function next(){
+        $this->pos++;
+        parent::next();
+    }
+
+    /**
+     * revient au depart
+     * @return void
+     */
+    public function rewind() {
+        $this->pos = 0;
+        $this->fetched = 0;
+        parent::rewind();
+    }
+
+
+    # Extension SPIP des iterateurs PHP
+    /**
+     * type de l'iterateur
+     * @var string
+     */
+    protected $type;
+
+    /**
+     * parametres de l'iterateur
+     * @var array
+     */
+    protected $command;
+
+    /**
+     * infos de compilateur
+     * @var array
+     */
+    protected $info;
+
+    /**
+     * position courante de l'iterateur
+     * @var int
+     */
+    protected $pos=null;
+
+    /**
+     * nombre total resultats dans l'iterateur
+     * @var int
+     */
+    protected $total=null;
+
+    /**
+     * nombre maximal de recherche pour $total
+     * si l'iterateur n'implemente pas de fonction specifique
+     */
+        protected $max=100000;
+
+
+    /**
+     * Liste des champs a inserer dans les $row
+     * retournes par ->fetch()
+     */
+        protected $select=array();
 
 	 
-	/**
-	 * aller a la position absolue n,
-	 * comptee depuis le debut
-	 *
-	 * @param int $n
-	 *   absolute pos
-	 * @param string $continue
-	 *   param for sql_ api
-	 * @return bool
-	 *   success or fail if not implemented
-	 */
-	public function seek($n=0, $continue=null) {
-		if ($this->func_filtre OR !method_exists($this->iter, 'seek') OR !$this->iter->seek($n)) {
-			$this->seek_loop($n);
-		}
-		$this->pos = $n;
-		$this->fetched = $n;
-		return true;
-	}
-
-	/*
+    /**
+     * aller a la position absolue n,
+     * comptee depuis le debut
+     *
+     * @param int $n
+     *   absolute pos
+     * @param string $continue
+     *   param for sql_ api
+     * @return bool
+     *   success or fail if not implemented
+     */
+    public function seek($n=0, $continue=null) {
+        if ($this->func_filtre OR !method_exists($this->iter, 'seek') OR !$this->iter->seek($n)) {
+            $this->seek_loop($n);
+        }
+        $this->pos = $n;
+        $this->fetched = $n;
+        return true;
+    }
+
+    /*
 	 * aller a la position $n en parcourant
 	 * un par un tous les elements
 	 */
-	private function seek_loop($n) {
-		if ($this->pos > $n)
-			$this->rewind();
-
-		while ($this->pos < $n AND $this->valid()) {
-			$this->next();
-		}
-
-		return true;
-	}
-
-	/**
-	 * Avancer de $saut pas
-	 * @param  $saut
-	 * @param  $max
-	 * @return int
-	 */
-	public function skip($saut, $max=null){
-		// pas de saut en arriere autorise pour cette fonction
-		if (($saut=intval($saut))<=0) return $this->pos;
-		$seek = $this->pos + $saut;
-		// si le saut fait depasser le maxi, on libere la resource
-		// et on sort
-		if (is_null($max))
-			$max = $this->count();
-
-		if ($seek>=$max OR $seek>=$this->count()) {
-			// sortie plus rapide que de faire next() jusqu'a la fin !
-			$this->free();
-		  return $max;
-		}
-
-	  $this->seek($seek);
-	  return $this->pos;
-	}
-
-	/**
-	 * Renvoyer un tableau des donnees correspondantes
-	 * a la position courante de l'iterateur
-	 * en controlant si on respecte le filtre
-	 * Appliquer aussi le critere {offset,limit}
-	 *
-	 * @return array|bool
-	 */
-	public function fetch() {
-		if (method_exists($this->iter, 'fetch')) {
-			return $this->iter->fetch();
-		} else {
-
-			while ($this->valid()
-			AND (
-				!$this->accept()
-				OR (isset($this->offset) AND $this->fetched++ < $this->offset)
-			))
-				$this->next();
-
-			if (!$this->valid())
-				return false;
-
-			if (isset($this->limit)
-			AND $this->fetched > $this->offset + $this->limit)
-				return false;
-
-			$r = array();
-			foreach ($this->select as $nom) {
-				$r[$nom] = $this->get_select($nom);
-			}
-			$this->next();
-			return $r;
-		}
-	}
-
-	// retourner la cle pour #CLE
-	public function cle() {
-		return $this->key();
-	}
+    private function seek_loop($n) {
+        if ($this->pos > $n)
+            $this->rewind();
+
+        while ($this->pos < $n AND $this->valid()) {
+            $this->next();
+        }
+
+        return true;
+    }
+
+    /**
+     * Avancer de $saut pas
+     * @param  $saut
+     * @param  $max
+     * @return int
+     */
+    public function skip($saut, $max=null){
+        // pas de saut en arriere autorise pour cette fonction
+        if (($saut=intval($saut))<=0) return $this->pos;
+        $seek = $this->pos + $saut;
+        // si le saut fait depasser le maxi, on libere la resource
+        // et on sort
+        if (is_null($max))
+            $max = $this->count();
+
+        if ($seek>=$max OR $seek>=$this->count()) {
+            // sortie plus rapide que de faire next() jusqu'a la fin !
+            $this->free();
+            return $max;
+        }
+
+        $this->seek($seek);
+        return $this->pos;
+    }
+
+    /**
+     * Renvoyer un tableau des donnees correspondantes
+     * a la position courante de l'iterateur
+     * en controlant si on respecte le filtre
+     * Appliquer aussi le critere {offset,limit}
+     *
+     * @return array|bool
+     */
+    public function fetch() {
+        if (method_exists($this->iter, 'fetch')) {
+            return $this->iter->fetch();
+        } else {
+
+            while ($this->valid()
+            AND (
+                !$this->accept()
+                OR (isset($this->offset) AND $this->fetched++ < $this->offset)
+            ))
+                $this->next();
+
+            if (!$this->valid())
+                return false;
+
+            if (isset($this->limit)
+            AND $this->fetched > $this->offset + $this->limit)
+                return false;
+
+            $r = array();
+            foreach ($this->select as $nom) {
+                $r[$nom] = $this->get_select($nom);
+            }
+            $this->next();
+            return $r;
+        }
+    }
+
+    // retourner la cle pour #CLE
+    public function cle() {
+        return $this->key();
+    }
 	
-	// retourner la valeur pour #VALEUR
-	public function valeur() {
-		# attention PHP est mechant avec les objets, parfois il ne les
-		# clone pas proprement (directoryiterator sous php 5.2.2)
-		# on se rabat sur la version __toString()
-		if (is_object($v = $this->current())) {
-			if (method_exists($v, '__toString'))
-				$v = $v->__toString();
-			else
-				$v = (array) $v;
-		}
-		return $v;
-	}
-
-	/**
-	 * Accepte-t-on l'entree courante lue ?
-	 * On execute les filtres pour le savoir. 
-	**/
-	public function accept() {
-		if ($f = $this->func_filtre) {
-			return $f($this);
-		}
-		return true;
-	}
-
-	/**
-	 * liberer la ressource
-	 * @return bool
-	 */
-	public function free() {
-		if (method_exists($this->iter, 'free')) {
-			$this->iter->free();
-		}
-		$this->pos = $this->total = 0;
-		return true;
-	}
-
-	/**
-	 * Compter le nombre total de resultats
-	 * pour #TOTAL_BOUCLE
-	 * @return int
-	 */
-	public function count() {
-		if (is_null($this->total)) {
-			if (method_exists($this->iter, 'count')
-			AND !$this->func_filtre) {
-				return $this->total = $this->iter->count();
-			} else {
-				// compter les lignes et rembobiner
-				$total = 0;
-				$pos = $this->pos; // sauver la position
-				$this->rewind();
-				while ($this->fetch() and $total < $this->max) {
-					$total++;
-				}
-				$this->seek($pos);
-				$this->total = $total;
-			}
-		}
-
-		return $this->total;
-	}
+    // retourner la valeur pour #VALEUR
+    public function valeur() {
+        # attention PHP est mechant avec les objets, parfois il ne les
+        # clone pas proprement (directoryiterator sous php 5.2.2)
+        # on se rabat sur la version __toString()
+        if (is_object($v = $this->current())) {
+            if (method_exists($v, '__toString'))
+                $v = $v->__toString();
+            else
+                $v = (array) $v;
+        }
+        return $v;
+    }
+
+    /**
+     * Accepte-t-on l'entree courante lue ?
+     * On execute les filtres pour le savoir. 
+     **/
+    public function accept() {
+        if ($f = $this->func_filtre) {
+            return $f($this);
+        }
+        return true;
+    }
+
+    /**
+     * liberer la ressource
+     * @return bool
+     */
+    public function free() {
+        if (method_exists($this->iter, 'free')) {
+            $this->iter->free();
+        }
+        $this->pos = $this->total = 0;
+        return true;
+    }
+
+    /**
+     * Compter le nombre total de resultats
+     * pour #TOTAL_BOUCLE
+     * @return int
+     */
+    public function count() {
+        if (is_null($this->total)) {
+            if (method_exists($this->iter, 'count')
+            AND !$this->func_filtre) {
+                return $this->total = $this->iter->count();
+            } else {
+                // compter les lignes et rembobiner
+                $total = 0;
+                $pos = $this->pos; // sauver la position
+                $this->rewind();
+                while ($this->fetch() and $total < $this->max) {
+                    $total++;
+                }
+                $this->seek($pos);
+                $this->total = $total;
+            }
+        }
+
+        return $this->total;
+    }
 	
 }
 

ecrire/action/editer_objet.php

Indentation +350 added lines, -350 removed lines

@@ -24,28 +24,28 @@ 
  */
 function action_editer_objet_dist($id=null, $objet=null, $set=null) {
 
-	// appel direct depuis une url interdit
-	if (is_null($id) OR is_null($objet)){
-		include_spip('inc/minipres');
-		echo minipres(_T('info_acces_interdit'));
-		die();
-	}
-
-	// si id n'est pas un nombre, c'est une creation
-	// mais on verifie qu'on a toutes les donnees qu'il faut.
-	if (!$id = intval($id)) {
-		// on ne sait pas si un parent existe mais on essaye
-		$id_parent = _request('id_parent');
-		$id = objet_inserer($objet, $id_parent);
-	}
-
-	if (!($id = intval($id))>0)
-		return array($id,_L('echec enregistrement en base'));
-
-	// Enregistre l'envoi dans la BD
-	$err = objet_modifier($objet, $id, $set);
-
-	return array($id,$err);
+    // appel direct depuis une url interdit
+    if (is_null($id) OR is_null($objet)){
+        include_spip('inc/minipres');
+        echo minipres(_T('info_acces_interdit'));
+        die();
+    }
+
+    // si id n'est pas un nombre, c'est une creation
+    // mais on verifie qu'on a toutes les donnees qu'il faut.
+    if (!$id = intval($id)) {
+        // on ne sait pas si un parent existe mais on essaye
+        $id_parent = _request('id_parent');
+        $id = objet_inserer($objet, $id_parent);
+    }
+
+    if (!($id = intval($id))>0)
+        return array($id,_L('echec enregistrement en base'));
+
+    // Enregistre l'envoi dans la BD
+    $err = objet_modifier($objet, $id, $set);
+
+    return array($id,$err);
 }
 
 /**
@@ -58,71 +58,71 @@ 
  * @return mixed|string
  */
 function objet_modifier($objet, $id, $set=null) {
-	if (include_spip('action/editer_'.$objet)
-	  AND function_exists($modifier = $objet."_modifier"))
-		return $modifier($id,$set);
-
-	$table_sql = table_objet_sql($objet);
-	$trouver_table = charger_fonction('trouver_table','base');
-	$desc = $trouver_table($table_sql);
-	if (!$desc OR !isset($desc['field'])) {
-		spip_log("Objet $objet inconnu dans objet_modifier",_LOG_ERREUR);
-		return _L("Erreur objet $objet inconnu");
-	}
-	include_spip('inc/modifier');
-
-	$champ_date = '';
-	if (isset($desc['date']) AND $desc['date'])
-		$champ_date = $desc['date'];
-	elseif (isset($desc['field']['date']))
-		$champ_date = 'date';
-
-	$white = array_keys($desc['field']);
-	// on ne traite pas la cle primaire par defaut, notamment car
-	// sur une creation, id_x vaut 'oui', et serait enregistre en id_x=0 dans la base
-	$white = array_diff($white, array($desc['key']['PRIMARY KEY']));
-
-	if (isset($desc['champs_editables']) AND is_array($desc['champs_editables'])) {
-		$white = $desc['champs_editables'];
-	}
-	$c = collecter_requests(
-		// white list
-		$white,
-		// black list
-		array($champ_date,'statut','id_parent','id_secteur'),
-		// donnees eventuellement fournies
-		$set
-	);
-
-	// Si l'objet est publie, invalider les caches et demander sa reindexation
-	if (objet_test_si_publie($objet,$id)){
-		$invalideur = "id='$objet/$id'";
-		$indexation = true;
-	}
-	else {
-		$invalideur = "";
-		$indexation = false;
-	}
-
-	if ($err = objet_modifier_champs($objet, $id,
-		array(
-			'data' => $set,
-			'nonvide' => '',
-			'invalideur' => $invalideur,
-			'indexation' => $indexation,
-			 // champ a mettre a date('Y-m-d H:i:s') s'il y a modif
-			'date_modif' => (isset($desc['field']['date_modif'])?'date_modif':'')
-		),
-		$c))
-		return $err;
-
-	// Modification de statut, changement de rubrique ?
-	// FIXME: Ici lorsqu'un $set est passé, la fonction collecter_requests() retourne tout
-	//         le tableau $set hors black liste, mais du coup on a possiblement des champs en trop. 
-	$c = collecter_requests(array($champ_date, 'statut', 'id_parent'),array(),$set);
-	$err = objet_instituer($objet, $id, $c);
-
-	return $err;
+    if (include_spip('action/editer_'.$objet)
+      AND function_exists($modifier = $objet."_modifier"))
+        return $modifier($id,$set);
+
+    $table_sql = table_objet_sql($objet);
+    $trouver_table = charger_fonction('trouver_table','base');
+    $desc = $trouver_table($table_sql);
+    if (!$desc OR !isset($desc['field'])) {
+        spip_log("Objet $objet inconnu dans objet_modifier",_LOG_ERREUR);
+        return _L("Erreur objet $objet inconnu");
+    }
+    include_spip('inc/modifier');
+
+    $champ_date = '';
+    if (isset($desc['date']) AND $desc['date'])
+        $champ_date = $desc['date'];
+    elseif (isset($desc['field']['date']))
+        $champ_date = 'date';
+
+    $white = array_keys($desc['field']);
+    // on ne traite pas la cle primaire par defaut, notamment car
+    // sur une creation, id_x vaut 'oui', et serait enregistre en id_x=0 dans la base
+    $white = array_diff($white, array($desc['key']['PRIMARY KEY']));
+
+    if (isset($desc['champs_editables']) AND is_array($desc['champs_editables'])) {
+        $white = $desc['champs_editables'];
+    }
+    $c = collecter_requests(
+        // white list
+        $white,
+        // black list
+        array($champ_date,'statut','id_parent','id_secteur'),
+        // donnees eventuellement fournies
+        $set
+    );
+
+    // Si l'objet est publie, invalider les caches et demander sa reindexation
+    if (objet_test_si_publie($objet,$id)){
+        $invalideur = "id='$objet/$id'";
+        $indexation = true;
+    }
+    else {
+        $invalideur = "";
+        $indexation = false;
+    }
+
+    if ($err = objet_modifier_champs($objet, $id,
+        array(
+            'data' => $set,
+            'nonvide' => '',
+            'invalideur' => $invalideur,
+            'indexation' => $indexation,
+                // champ a mettre a date('Y-m-d H:i:s') s'il y a modif
+            'date_modif' => (isset($desc['field']['date_modif'])?'date_modif':'')
+        ),
+        $c))
+        return $err;
+
+    // Modification de statut, changement de rubrique ?
+    // FIXME: Ici lorsqu'un $set est passé, la fonction collecter_requests() retourne tout
+    //         le tableau $set hors black liste, mais du coup on a possiblement des champs en trop. 
+    $c = collecter_requests(array($champ_date, 'statut', 'id_parent'),array(),$set);
+    $err = objet_instituer($objet, $id, $c);
+
+    return $err;
 }
 
 /**
@@ -133,108 +133,108 @@ 
  * @return bool|int
  */
 function objet_inserer($objet, $id_parent=null, $set=null) {
-	if (include_spip('action/editer_'.$objet)
-	  AND function_exists($inserer = $objet."_inserer"))
-		return $inserer($id_parent);
-
-	$table_sql = table_objet_sql($objet);
-	$trouver_table = charger_fonction('trouver_table','base');
-	$desc = $trouver_table($table_sql);
-	if (!$desc OR !isset($desc['field']))
-		return 0;
-
-	$lang_rub = "";
-	$champs = array();
-	if (isset($desc['field']['id_rubrique'])){
-		// Si id_rubrique vaut 0 ou n'est pas definie, creer l'objet
-		// dans la premiere rubrique racine
-		if (!$id_rubrique = intval($id_parent)) {
-			$row = sql_fetsel("id_rubrique, id_secteur, lang", "spip_rubriques", "id_parent=0",'', '0+titre,titre', "1");
-			$id_rubrique = $row['id_rubrique'];
-		}
-		else
-			$row = sql_fetsel("lang, id_secteur", "spip_rubriques", "id_rubrique=".intval($id_rubrique));
-
-		$champs['id_rubrique'] = $id_rubrique;
-		if (isset($desc['field']['id_secteur']))
-			$champs['id_secteur'] = $row['id_secteur'];
-		$lang_rub = $row['lang'];
-	}
-
-	// La langue a la creation : si les liens de traduction sont autorises
-	// dans les rubriques, on essaie avec la langue de l'auteur,
-	// ou a defaut celle de la rubrique
-	// Sinon c'est la langue de la rubrique qui est choisie + heritee
-	if (isset($desc['field']['lang']) AND $GLOBALS['meta']['multi_objets'] AND in_array($table_sql, explode(',', $GLOBALS['meta']['multi_objets']))) {
-		lang_select($GLOBALS['visiteur_session']['lang']);
-		if (in_array($GLOBALS['spip_lang'],
-		explode(',', $GLOBALS['meta']['langues_multilingue']))) {
-			$champs['lang'] = $GLOBALS['spip_lang'];
-			if (isset($desc['field']['langue_choisie']))
-				$champs['langue_choisie'] = 'oui';
-		}
-	}
-	elseif (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie'])) {
-		$champs['lang'] = ($lang_rub ? $lang_rub : $GLOBALS['meta']['langue_site']);
-		$champs['langue_choisie'] = 'non';
-	}
-
-	if (isset($desc['field']['statut'])){
-		if (isset($desc['statut_textes_instituer'])){
-			$cles_statut = array_keys($desc['statut_textes_instituer']); 
-			$champs['statut'] = reset($cles_statut);
-		}
-		else
-			$champs['statut'] = 'prepa';
-	}
-
-
-	if ((isset($desc['date']) AND $d=$desc['date']) OR isset($desc['field'][$d='date']))
-		$champs[$d] = date('Y-m-d H:i:s');
-
-	if ($set)
-		$champs = array_merge($champs, $set);
-
-	// Envoyer aux plugins
-	$champs = pipeline('pre_insertion',
-		array(
-			'args' => array(
-				'table' => $table_sql,
-			),
-			'data' => $champs
-		)
-	);
-
-	$id = sql_insertq($table_sql, $champs);
-
-	if ($id){
-		pipeline('post_insertion',
-			array(
-				'args' => array(
-					'table' => $table_sql,
-					'id_objet' => $id,
-				),
-				'data' => $champs
-			)
-		);
-
-		// controler si le serveur n'a pas renvoye une erreur
-		// et associer l'auteur sinon
-		// si la table n'a pas deja un champ id_auteur
-		// et si le form n'a pas poste un id_auteur (meme vide, ce qui sert a annuler cette auto association)
-		if ($id > 0
-		  AND !isset($desc['field']['id_auteur'])){
-			$id_auteur = ((is_null(_request('id_auteur')) AND isset($GLOBALS['visiteur_session']['id_auteur']))?
-				$GLOBALS['visiteur_session']['id_auteur']
-				:_request('id_auteur'));
-		  if ($id_auteur) {
-				include_spip('action/editer_auteur');
-				auteur_associer($id_auteur, array($objet=>$id));
-		  }
-		}
-	}
-
-	return $id;
+    if (include_spip('action/editer_'.$objet)
+      AND function_exists($inserer = $objet."_inserer"))
+        return $inserer($id_parent);
+
+    $table_sql = table_objet_sql($objet);
+    $trouver_table = charger_fonction('trouver_table','base');
+    $desc = $trouver_table($table_sql);
+    if (!$desc OR !isset($desc['field']))
+        return 0;
+
+    $lang_rub = "";
+    $champs = array();
+    if (isset($desc['field']['id_rubrique'])){
+        // Si id_rubrique vaut 0 ou n'est pas definie, creer l'objet
+        // dans la premiere rubrique racine
+        if (!$id_rubrique = intval($id_parent)) {
+            $row = sql_fetsel("id_rubrique, id_secteur, lang", "spip_rubriques", "id_parent=0",'', '0+titre,titre', "1");
+            $id_rubrique = $row['id_rubrique'];
+        }
+        else
+            $row = sql_fetsel("lang, id_secteur", "spip_rubriques", "id_rubrique=".intval($id_rubrique));
+
+        $champs['id_rubrique'] = $id_rubrique;
+        if (isset($desc['field']['id_secteur']))
+            $champs['id_secteur'] = $row['id_secteur'];
+        $lang_rub = $row['lang'];
+    }
+
+    // La langue a la creation : si les liens de traduction sont autorises
+    // dans les rubriques, on essaie avec la langue de l'auteur,
+    // ou a defaut celle de la rubrique
+    // Sinon c'est la langue de la rubrique qui est choisie + heritee
+    if (isset($desc['field']['lang']) AND $GLOBALS['meta']['multi_objets'] AND in_array($table_sql, explode(',', $GLOBALS['meta']['multi_objets']))) {
+        lang_select($GLOBALS['visiteur_session']['lang']);
+        if (in_array($GLOBALS['spip_lang'],
+        explode(',', $GLOBALS['meta']['langues_multilingue']))) {
+            $champs['lang'] = $GLOBALS['spip_lang'];
+            if (isset($desc['field']['langue_choisie']))
+                $champs['langue_choisie'] = 'oui';
+        }
+    }
+    elseif (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie'])) {
+        $champs['lang'] = ($lang_rub ? $lang_rub : $GLOBALS['meta']['langue_site']);
+        $champs['langue_choisie'] = 'non';
+    }
+
+    if (isset($desc['field']['statut'])){
+        if (isset($desc['statut_textes_instituer'])){
+            $cles_statut = array_keys($desc['statut_textes_instituer']); 
+            $champs['statut'] = reset($cles_statut);
+        }
+        else
+            $champs['statut'] = 'prepa';
+    }
+
+
+    if ((isset($desc['date']) AND $d=$desc['date']) OR isset($desc['field'][$d='date']))
+        $champs[$d] = date('Y-m-d H:i:s');
+
+    if ($set)
+        $champs = array_merge($champs, $set);
+
+    // Envoyer aux plugins
+    $champs = pipeline('pre_insertion',
+        array(
+            'args' => array(
+                'table' => $table_sql,
+            ),
+            'data' => $champs
+        )
+    );
+
+    $id = sql_insertq($table_sql, $champs);
+
+    if ($id){
+        pipeline('post_insertion',
+            array(
+                'args' => array(
+                    'table' => $table_sql,
+                    'id_objet' => $id,
+                ),
+                'data' => $champs
+            )
+        );
+
+        // controler si le serveur n'a pas renvoye une erreur
+        // et associer l'auteur sinon
+        // si la table n'a pas deja un champ id_auteur
+        // et si le form n'a pas poste un id_auteur (meme vide, ce qui sert a annuler cette auto association)
+        if ($id > 0
+          AND !isset($desc['field']['id_auteur'])){
+            $id_auteur = ((is_null(_request('id_auteur')) AND isset($GLOBALS['visiteur_session']['id_auteur']))?
+                $GLOBALS['visiteur_session']['id_auteur']
+                :_request('id_auteur'));
+            if ($id_auteur) {
+                include_spip('action/editer_auteur');
+                auteur_associer($id_auteur, array($objet=>$id));
+            }
+        }
+    }
+
+    return $id;
 }
 
 
@@ -250,114 +250,114 @@ 
  * @return mixed|string
  */
 function objet_instituer($objet, $id, $c, $calcul_rub=true) {
-	if (include_spip('action/editer_'.$objet)
-	  AND function_exists($instituer = $objet."_instituer"))
-		return $instituer($id,$c,$calcul_rub);
-
-	$table_sql = table_objet_sql($objet);
-	$trouver_table = charger_fonction('trouver_table','base');
-	$desc = $trouver_table($table_sql);
-	if (!$desc OR !isset($desc['field']))
-		return _L("Impossible d'instituer $objet : non connu en base");
-
-	include_spip('inc/autoriser');
-	include_spip('inc/rubriques');
-	include_spip('inc/modifier');
-
-	$sel = array();
-	$sel[] = (isset($desc['field']['statut'])?"statut":"'' as statut");
-
-	$champ_date = '';
-	if (isset($desc['date']) AND $desc['date'])
-		$champ_date = $desc['date'];
-	elseif (isset($desc['field']['date']))
-		$champ_date = 'date';
-
-	$sel[] = ($champ_date ? "$champ_date as date" : "'' as date");
-	$sel[] = (isset($desc['field']['id_rubrique'])?'id_rubrique':"0 as id_rubrique");
-
-	$row = sql_fetsel($sel, $table_sql, id_table_objet($objet).'='.intval($id));
-
-	$id_rubrique = $row['id_rubrique'];
-	$statut_ancien = $statut = $row['statut'];
-	$date_ancienne = $date = $row['date'];
-	$champs = array();
-
-	$d = ($date AND isset($c[$champ_date]))?$c[$champ_date]:null;
-	$s = (isset($desc['field']['statut']) AND isset($c['statut']))?$c['statut']:$statut;
-
-	// cf autorisations dans inc/instituer_objet
-	if ($s != $statut OR ($d AND $d != $date)) {
-		if ($id_rubrique ?
-				autoriser('publierdans', 'rubrique', $id_rubrique)
-			:
-				autoriser('instituer', $objet, $id, null, array('statut'=>$s))
-			)
-			$statut = $champs['statut'] = $s;
-		else if ($s!='publie' AND autoriser('modifier', $objet, $id))
-			$statut = $champs['statut'] = $s;
-		else
-			spip_log("editer_objet $id refus " . join(' ', $c));
-
-		// En cas de publication, fixer la date a "maintenant"
-		// sauf si $c commande autre chose
-		// ou si l'objet est deja date dans le futur
-		// En cas de proposition d'un objet (mais pas depublication), idem
-		if ($champ_date) {
-			if ($champs['statut'] == 'publie'
-			 OR ($champs['statut'] == 'prop' AND !in_array($statut_ancien, array('publie', 'prop')))
-			 OR $d
-			) {
-				if ($d OR strtotime($d=$date)>time())
-					$champs[$champ_date] = $date = $d;
-				else
-					$champs[$champ_date] = $date = date('Y-m-d H:i:s');
-			}
-		}
-	}
-
-	// Verifier que la rubrique demandee existe et est differente
-	// de la rubrique actuelle
-	if ($id_rubrique
-	  AND $id_parent = $c['id_parent']
-	  AND $id_parent != $id_rubrique
-	  AND (sql_fetsel('1', "spip_rubriques", "id_rubrique=".intval($id_parent)))) {
-		$champs['id_rubrique'] = $id_parent;
-
-		// si l'objet etait publie
-		// et que le demandeur n'est pas admin de la rubrique
-		// repasser l'objet en statut 'propose'.
-		if ($statut == 'publie'
-		AND !autoriser('publierdans', 'rubrique', $id_rubrique))
-			$champs['statut'] = 'prop';
-	}
-
-
-	// Envoyer aux plugins
-	$champs = pipeline('pre_edition',
-		array(
-			'args' => array(
-				'table' => $table_sql,
-				'id_objet' => $id,
-				'action'=>'instituer',
-				'statut_ancien' => $statut_ancien,
-				'date_ancienne' => $date_ancienne,
-				'id_parent_ancien' => $id_rubrique,
-			),
-			'data' => $champs
-		)
-	);
-
-	if (!count($champs)) return '';
-
-	// Envoyer les modifs.
-	objet_editer_heritage($objet, $id, $id_rubrique, $statut_ancien, $champs, $calcul_rub);
-
-	// Invalider les caches
-	include_spip('inc/invalideur');
-	suivre_invalideur("id='$objet/$id'");
-
-	/*
+    if (include_spip('action/editer_'.$objet)
+      AND function_exists($instituer = $objet."_instituer"))
+        return $instituer($id,$c,$calcul_rub);
+
+    $table_sql = table_objet_sql($objet);
+    $trouver_table = charger_fonction('trouver_table','base');
+    $desc = $trouver_table($table_sql);
+    if (!$desc OR !isset($desc['field']))
+        return _L("Impossible d'instituer $objet : non connu en base");
+
+    include_spip('inc/autoriser');
+    include_spip('inc/rubriques');
+    include_spip('inc/modifier');
+
+    $sel = array();
+    $sel[] = (isset($desc['field']['statut'])?"statut":"'' as statut");
+
+    $champ_date = '';
+    if (isset($desc['date']) AND $desc['date'])
+        $champ_date = $desc['date'];
+    elseif (isset($desc['field']['date']))
+        $champ_date = 'date';
+
+    $sel[] = ($champ_date ? "$champ_date as date" : "'' as date");
+    $sel[] = (isset($desc['field']['id_rubrique'])?'id_rubrique':"0 as id_rubrique");
+
+    $row = sql_fetsel($sel, $table_sql, id_table_objet($objet).'='.intval($id));
+
+    $id_rubrique = $row['id_rubrique'];
+    $statut_ancien = $statut = $row['statut'];
+    $date_ancienne = $date = $row['date'];
+    $champs = array();
+
+    $d = ($date AND isset($c[$champ_date]))?$c[$champ_date]:null;
+    $s = (isset($desc['field']['statut']) AND isset($c['statut']))?$c['statut']:$statut;
+
+    // cf autorisations dans inc/instituer_objet
+    if ($s != $statut OR ($d AND $d != $date)) {
+        if ($id_rubrique ?
+                autoriser('publierdans', 'rubrique', $id_rubrique)
+            :
+                autoriser('instituer', $objet, $id, null, array('statut'=>$s))
+            )
+            $statut = $champs['statut'] = $s;
+        else if ($s!='publie' AND autoriser('modifier', $objet, $id))
+            $statut = $champs['statut'] = $s;
+        else
+            spip_log("editer_objet $id refus " . join(' ', $c));
+
+        // En cas de publication, fixer la date a "maintenant"
+        // sauf si $c commande autre chose
+        // ou si l'objet est deja date dans le futur
+        // En cas de proposition d'un objet (mais pas depublication), idem
+        if ($champ_date) {
+            if ($champs['statut'] == 'publie'
+             OR ($champs['statut'] == 'prop' AND !in_array($statut_ancien, array('publie', 'prop')))
+             OR $d
+            ) {
+                if ($d OR strtotime($d=$date)>time())
+                    $champs[$champ_date] = $date = $d;
+                else
+                    $champs[$champ_date] = $date = date('Y-m-d H:i:s');
+            }
+        }
+    }
+
+    // Verifier que la rubrique demandee existe et est differente
+    // de la rubrique actuelle
+    if ($id_rubrique
+      AND $id_parent = $c['id_parent']
+      AND $id_parent != $id_rubrique
+      AND (sql_fetsel('1', "spip_rubriques", "id_rubrique=".intval($id_parent)))) {
+        $champs['id_rubrique'] = $id_parent;
+
+        // si l'objet etait publie
+        // et que le demandeur n'est pas admin de la rubrique
+        // repasser l'objet en statut 'propose'.
+        if ($statut == 'publie'
+        AND !autoriser('publierdans', 'rubrique', $id_rubrique))
+            $champs['statut'] = 'prop';
+    }
+
+
+    // Envoyer aux plugins
+    $champs = pipeline('pre_edition',
+        array(
+            'args' => array(
+                'table' => $table_sql,
+                'id_objet' => $id,
+                'action'=>'instituer',
+                'statut_ancien' => $statut_ancien,
+                'date_ancienne' => $date_ancienne,
+                'id_parent_ancien' => $id_rubrique,
+            ),
+            'data' => $champs
+        )
+    );
+
+    if (!count($champs)) return '';
+
+    // Envoyer les modifs.
+    objet_editer_heritage($objet, $id, $id_rubrique, $statut_ancien, $champs, $calcul_rub);
+
+    // Invalider les caches
+    include_spip('inc/invalideur');
+    suivre_invalideur("id='$objet/$id'");
+
+    /*
 	if ($date) {
 		$t = strtotime($date);
 		$p = @$GLOBALS['meta']['date_prochain_postdate'];
@@ -366,29 +366,29 @@ 
 		}
 	}*/
 
-	// Pipeline
-	pipeline('post_edition',
-		array(
-			'args' => array(
-				'table' => $table_sql,
-				'id_objet' => $id,
-				'action'=>'instituer',
-				'statut_ancien' => $statut_ancien,
-				'date_ancienne' => $date_ancienne,
-				'id_parent_ancien' => $id_rubrique,
-			),
-			'data' => $champs
-		)
-	);
-
-	// Notifications
-	if ($notifications = charger_fonction('notifications', 'inc')) {
-		$notifications("instituer$objet", $id,
-			array('statut' => $statut, 'statut_ancien' => $statut_ancien, 'date'=>$date, 'date_ancienne' => $date_ancienne)
-		);
-	}
-
-	return ''; // pas d'erreur
+    // Pipeline
+    pipeline('post_edition',
+        array(
+            'args' => array(
+                'table' => $table_sql,
+                'id_objet' => $id,
+                'action'=>'instituer',
+                'statut_ancien' => $statut_ancien,
+                'date_ancienne' => $date_ancienne,
+                'id_parent_ancien' => $id_rubrique,
+            ),
+            'data' => $champs
+        )
+    );
+
+    // Notifications
+    if ($notifications = charger_fonction('notifications', 'inc')) {
+        $notifications("instituer$objet", $id,
+            array('statut' => $statut, 'statut_ancien' => $statut_ancien, 'date'=>$date, 'date_ancienne' => $date_ancienne)
+        );
+    }
+
+    return ''; // pas d'erreur
 }
 
 /**
@@ -403,36 +403,36 @@ 
  * @return 
  */
 function objet_editer_heritage($objet, $id, $id_rubrique, $statut, $champs, $cond=true) {
-	$table_sql = table_objet_sql($objet);
-	$trouver_table = charger_fonction('trouver_table','base');
-	$desc = $trouver_table($table_sql);
-
-	// Si on deplace l'objet
-	// changer aussi son secteur et sa langue (si heritee)
-	if (isset($champs['id_rubrique'])) {
-
-		$row_rub = sql_fetsel("id_secteur, lang", "spip_rubriques", "id_rubrique=".sql_quote($champs['id_rubrique']));
-		$langue = $row_rub['lang'];
-
-		if (isset($desc['field']['id_secteur']))
-			$champs['id_secteur'] = $row_rub['id_secteur'];
-
-		if (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie']))
-			if (sql_fetsel('1', $table_sql, id_table_objet($objet)."=".intval($id)." AND langue_choisie<>'oui' AND lang<>" . sql_quote($langue))) {
-				$champs['lang'] = $langue;
-			}
-	}
-
-	if (!$champs) return;
-	sql_updateq($table_sql, $champs, id_table_objet($objet).'='.intval($id));
-
-	// Changer le statut des rubriques concernees
-	if ($cond) {
-		include_spip('inc/rubriques');
-		//$postdate = ($GLOBALS['meta']["post_dates"] == "non" AND isset($champs['date']) AND (strtotime($champs['date']) < time()))?$champs['date']:false;
-		$postdate = false;
-		calculer_rubriques_if($id_rubrique, $champs, $statut, $postdate);
-	}
+    $table_sql = table_objet_sql($objet);
+    $trouver_table = charger_fonction('trouver_table','base');
+    $desc = $trouver_table($table_sql);
+
+    // Si on deplace l'objet
+    // changer aussi son secteur et sa langue (si heritee)
+    if (isset($champs['id_rubrique'])) {
+
+        $row_rub = sql_fetsel("id_secteur, lang", "spip_rubriques", "id_rubrique=".sql_quote($champs['id_rubrique']));
+        $langue = $row_rub['lang'];
+
+        if (isset($desc['field']['id_secteur']))
+            $champs['id_secteur'] = $row_rub['id_secteur'];
+
+        if (isset($desc['field']['lang']) AND isset($desc['field']['langue_choisie']))
+            if (sql_fetsel('1', $table_sql, id_table_objet($objet)."=".intval($id)." AND langue_choisie<>'oui' AND lang<>" . sql_quote($langue))) {
+                $champs['lang'] = $langue;
+            }
+    }
+
+    if (!$champs) return;
+    sql_updateq($table_sql, $champs, id_table_objet($objet).'='.intval($id));
+
+    // Changer le statut des rubriques concernees
+    if ($cond) {
+        include_spip('inc/rubriques');
+        //$postdate = ($GLOBALS['meta']["post_dates"] == "non" AND isset($champs['date']) AND (strtotime($champs['date']) < time()))?$champs['date']:false;
+        $postdate = false;
+        calculer_rubriques_if($id_rubrique, $champs, $statut, $postdate);
+    }
 }
 
 ?>

ecrire/action/inscrire_auteur.php

Indentation +168 added lines, -168 removed lines

@@ -30,62 +30,62 @@ 
  * @return array|string
  */
 function action_inscrire_auteur_dist($statut, $mail_complet, $nom, $options = array()){
-	if (!is_array($options))
-		$options = array('id'=>$options);
-
-	if (function_exists('test_inscription'))
-		$f = 'test_inscription';
-	else 	$f = 'test_inscription_dist';
-	$desc = $f($statut, $mail_complet, $nom, $options);
-
-	// erreur ?
-	if (!is_array($desc))
-		return _T($desc);
-
-	include_spip('base/abstract_sql');
-	$res = sql_select("statut, id_auteur, login, email", "spip_auteurs", "email=" . sql_quote($desc['email']));
-	// erreur ?
-	if (!$res)
-		return _T('titre_probleme_technique');
-
-	$row = sql_fetch($res);
-	sql_free($res);
-	if ($row){
-		if (isset($options['force_nouveau']) AND $options['force_nouveau']==true){
-			$desc['id_auteur'] = $row['id_auteur'];
-			$desc = inscription_nouveau($desc);
-		}
-		else
-			$desc = $row;
-	}
-	else
-		// s'il n'existe pas deja, creer les identifiants
-		$desc = inscription_nouveau($desc);
-
-	// erreur ?
-	if (!is_array($desc))
-		return $desc;
-
-
-	// generer le mot de passe (ou le refaire si compte inutilise)
-	$desc['pass'] = creer_pass_pour_auteur($desc['id_auteur']);
-
-	// attribuer un jeton pour confirmation par clic sur un lien
-	$desc['jeton'] = auteur_attribuer_jeton($desc['id_auteur']);
-
-	// charger de suite cette fonction, pour ses utilitaires
-	$envoyer_inscription = charger_fonction("envoyer_inscription","");
-	list($sujet,$msg,$from,$head) = $envoyer_inscription($desc, $nom, $statut, $options);
-
-	$notifications = charger_fonction('notifications', 'inc');
-	notifications_envoyer_mails($mail_complet, $msg, $sujet, $from, $head);
-
-	// Notifications
-	$notifications('inscription', $desc['id_auteur'],
-		array('nom' => $desc['nom'], 'email' => $desc['email'])
-	);
-
-	return $desc;
+    if (!is_array($options))
+        $options = array('id'=>$options);
+
+    if (function_exists('test_inscription'))
+        $f = 'test_inscription';
+    else 	$f = 'test_inscription_dist';
+    $desc = $f($statut, $mail_complet, $nom, $options);
+
+    // erreur ?
+    if (!is_array($desc))
+        return _T($desc);
+
+    include_spip('base/abstract_sql');
+    $res = sql_select("statut, id_auteur, login, email", "spip_auteurs", "email=" . sql_quote($desc['email']));
+    // erreur ?
+    if (!$res)
+        return _T('titre_probleme_technique');
+
+    $row = sql_fetch($res);
+    sql_free($res);
+    if ($row){
+        if (isset($options['force_nouveau']) AND $options['force_nouveau']==true){
+            $desc['id_auteur'] = $row['id_auteur'];
+            $desc = inscription_nouveau($desc);
+        }
+        else
+            $desc = $row;
+    }
+    else
+        // s'il n'existe pas deja, creer les identifiants
+        $desc = inscription_nouveau($desc);
+
+    // erreur ?
+    if (!is_array($desc))
+        return $desc;
+
+
+    // generer le mot de passe (ou le refaire si compte inutilise)
+    $desc['pass'] = creer_pass_pour_auteur($desc['id_auteur']);
+
+    // attribuer un jeton pour confirmation par clic sur un lien
+    $desc['jeton'] = auteur_attribuer_jeton($desc['id_auteur']);
+
+    // charger de suite cette fonction, pour ses utilitaires
+    $envoyer_inscription = charger_fonction("envoyer_inscription","");
+    list($sujet,$msg,$from,$head) = $envoyer_inscription($desc, $nom, $statut, $options);
+
+    $notifications = charger_fonction('notifications', 'inc');
+    notifications_envoyer_mails($mail_complet, $msg, $sujet, $from, $head);
+
+    // Notifications
+    $notifications('inscription', $desc['id_auteur'],
+        array('nom' => $desc['nom'], 'email' => $desc['email'])
+    );
+
+    return $desc;
 }
 
 
@@ -107,18 +107,18 @@ 
  * @return array|string
  */
 function test_inscription_dist($statut, $mail, $nom, $options) {
-	include_spip('inc/filtres');
-	if (!$r = email_valide($mail)) return 'info_email_invalide';
-	$nom = trim(corriger_caracteres($nom));
-	$res = array('email' => $r, 'nom' => $nom, 'prefs' => $statut);
-	if (isset($options['login'])) {
-		$login = trim(corriger_caracteres($options['login']));
-		if((strlen ($login) >= _LOGIN_TROP_COURT) AND (strlen($nom) <= 64))
-			$res['login'] = $login;
-	}
-	if(!isset($res['login']) AND ((strlen ($nom) < _LOGIN_TROP_COURT) OR (strlen($nom) > 64)))
-		return 'ecrire:info_login_trop_court';
-	return $res;
+    include_spip('inc/filtres');
+    if (!$r = email_valide($mail)) return 'info_email_invalide';
+    $nom = trim(corriger_caracteres($nom));
+    $res = array('email' => $r, 'nom' => $nom, 'prefs' => $statut);
+    if (isset($options['login'])) {
+        $login = trim(corriger_caracteres($options['login']));
+        if((strlen ($login) >= _LOGIN_TROP_COURT) AND (strlen($nom) <= 64))
+            $res['login'] = $login;
+    }
+    if(!isset($res['login']) AND ((strlen ($nom) < _LOGIN_TROP_COURT) OR (strlen($nom) > 64)))
+        return 'ecrire:info_login_trop_court';
+    return $res;
 }
 
 
@@ -134,27 +134,27 @@ 
  */
 function inscription_nouveau($desc)
 {
-	if (!isset($desc['login']) OR !strlen($desc['login']))
-		$desc['login'] = test_login($desc['nom'], $desc['email']);
+    if (!isset($desc['login']) OR !strlen($desc['login']))
+        $desc['login'] = test_login($desc['nom'], $desc['email']);
 
-	$desc['statut'] = 'nouveau';
-	include_spip('action/editer_auteur');
-	if (isset($desc['id_auteur']))
-		$id_auteur = $desc['id_auteur'];
-	else
-		$id_auteur = auteur_inserer();
+    $desc['statut'] = 'nouveau';
+    include_spip('action/editer_auteur');
+    if (isset($desc['id_auteur']))
+        $id_auteur = $desc['id_auteur'];
+    else
+        $id_auteur = auteur_inserer();
 
-	if (!$id_auteur) return _T('titre_probleme_technique');
+    if (!$id_auteur) return _T('titre_probleme_technique');
 
-	include_spip('inc/autoriser');
-	// lever l'autorisation pour pouvoir modifier le statut
-	autoriser_exception('modifier','auteur',$id_auteur);
-	auteur_modifier($id_auteur, $desc);
-	autoriser_exception('modifier','auteur',$id_auteur,false);
+    include_spip('inc/autoriser');
+    // lever l'autorisation pour pouvoir modifier le statut
+    autoriser_exception('modifier','auteur',$id_auteur);
+    auteur_modifier($id_auteur, $desc);
+    autoriser_exception('modifier','auteur',$id_auteur,false);
 
-	$desc['id_auteur'] = $id_auteur;
+    $desc['id_auteur'] = $id_auteur;
 
-	return $desc;
+    return $desc;
 }
 
 
@@ -166,26 +166,26 @@ 
  * @return string
  */
 function test_login($nom, $mail) {
-	include_spip('inc/charsets');
-	$nom = strtolower(translitteration($nom));
-	$login_base = preg_replace("/[^\w\d_]/", "_", $nom);
-
-	// il faut eviter que le login soit vraiment trop court
-	if (strlen($login_base) < 3) {
-		$mail = strtolower(translitteration(preg_replace('/@.*/', '', $mail)));
-		$login_base = preg_replace("/[^\w\d]/", "_", $mail);
-	}
-	if (strlen($login_base) < 3)
-		$login_base = 'user';
-
-	$login = $login_base;
-
-	for ($i = 1; ; $i++) {
-		if (!sql_countsel('spip_auteurs', "login='$login'"))
-			return $login;
-		$login = $login_base.$i;
-	}
-	return $login;
+    include_spip('inc/charsets');
+    $nom = strtolower(translitteration($nom));
+    $login_base = preg_replace("/[^\w\d_]/", "_", $nom);
+
+    // il faut eviter que le login soit vraiment trop court
+    if (strlen($login_base) < 3) {
+        $mail = strtolower(translitteration(preg_replace('/@.*/', '', $mail)));
+        $login_base = preg_replace("/[^\w\d]/", "_", $mail);
+    }
+    if (strlen($login_base) < 3)
+        $login_base = 'user';
+
+    $login = $login_base;
+
+    for ($i = 1; ; $i++) {
+        if (!sql_countsel('spip_auteurs', "login='$login'"))
+            return $login;
+        $login = $login_base.$i;
+    }
+    return $login;
 }
 
 
@@ -204,21 +204,21 @@ 
  */
 function envoyer_inscription_dist($desc, $nom, $mode, $options=array()) {
 
-	$contexte = array_merge($desc,$options);
-	$contexte['nom'] = $nom;
-	$contexte['mode'] = $mode;
-	$contexte['url_confirm'] = generer_url_action('confirmer_inscription','',true,true);
-	$contexte['url_confirm'] = parametre_url($contexte['url_confirm'],'email',$desc['email']);
-	$contexte['url_confirm'] = parametre_url($contexte['url_confirm'],'jeton',$desc['jeton']);
-
-	$modele_mail = 'modeles/mail_inscription';
-	if (isset($options['modele_mail']) and $options['modele_mail']){
-		$modele_mail = $options['modele_mail'];
-	}
-	$message = recuperer_fond($modele_mail, $contexte);
-	$from = (isset($options['from']) ? $options['from'] : null);
-	$head = null;
-	return array("", $message,$from,$head);
+    $contexte = array_merge($desc,$options);
+    $contexte['nom'] = $nom;
+    $contexte['mode'] = $mode;
+    $contexte['url_confirm'] = generer_url_action('confirmer_inscription','',true,true);
+    $contexte['url_confirm'] = parametre_url($contexte['url_confirm'],'email',$desc['email']);
+    $contexte['url_confirm'] = parametre_url($contexte['url_confirm'],'jeton',$desc['jeton']);
+
+    $modele_mail = 'modeles/mail_inscription';
+    if (isset($options['modele_mail']) and $options['modele_mail']){
+        $modele_mail = $options['modele_mail'];
+    }
+    $message = recuperer_fond($modele_mail, $contexte);
+    $from = (isset($options['from']) ? $options['from'] : null);
+    $head = null;
+    return array("", $message,$from,$head);
 }
 
 
@@ -231,11 +231,11 @@ 
  * @return string
  */
 function creer_pass_pour_auteur($id_auteur) {
-	include_spip('inc/acces');
-	$pass = creer_pass_aleatoire(8, $id_auteur);
-	include_spip('action/editer_auteur');
-	auteur_instituer($id_auteur, array('pass'=>$pass));
-	return $pass;
+    include_spip('inc/acces');
+    $pass = creer_pass_aleatoire(8, $id_auteur);
+    include_spip('action/editer_auteur');
+    auteur_instituer($id_auteur, array('pass'=>$pass));
+    return $pass;
 }
 
 /**
@@ -248,15 +248,15 @@ 
  * @return string
  */
 function tester_statut_inscription($statut_tmp, $id){
-	include_spip('inc/autoriser');
-	if ($statut_tmp)
-		return autoriser('inscrireauteur', $statut_tmp, $id) ? $statut_tmp : '';
-	elseif (
-		   autoriser('inscrireauteur', $statut_tmp = "1comite", $id)
-	  OR autoriser('inscrireauteur', $statut_tmp = "6forum", $id))
-		return $statut_tmp;
-
-	return '';
+    include_spip('inc/autoriser');
+    if ($statut_tmp)
+        return autoriser('inscrireauteur', $statut_tmp, $id) ? $statut_tmp : '';
+    elseif (
+            autoriser('inscrireauteur', $statut_tmp = "1comite", $id)
+      OR autoriser('inscrireauteur', $statut_tmp = "6forum", $id))
+        return $statut_tmp;
+
+    return '';
 }
 
 
@@ -272,27 +272,27 @@ 
  * @return array
  */
 function confirmer_statut_inscription($auteur){
-	// securite
-	if ($auteur['statut'] != 'nouveau') return $auteur;
-
-	include_spip('inc/autoriser');
-	if (!autoriser('inscrireauteur', $auteur['prefs']))
-		return $auteur;
-	$s = $auteur['prefs'];
-
-	include_spip('inc/autoriser');
-	// accorder l'autorisation de modif du statut auteur
-	autoriser_exception('modifier','auteur',$auteur['id_auteur']);
-	include_spip('action/editer_auteur');
-	// changer le statut
-	auteur_modifier($auteur['id_auteur'],array('statut'=> $s));
-	unset($_COOKIE['spip_session']); // forcer la maj de la session
-	// lever l'autorisation de modif du statut auteur
-	autoriser_exception('modifier','auteur',$auteur['id_auteur'],false);
-
-	// mettre a jour le statut
-	$auteur['statut'] = $s;
-	return $auteur;
+    // securite
+    if ($auteur['statut'] != 'nouveau') return $auteur;
+
+    include_spip('inc/autoriser');
+    if (!autoriser('inscrireauteur', $auteur['prefs']))
+        return $auteur;
+    $s = $auteur['prefs'];
+
+    include_spip('inc/autoriser');
+    // accorder l'autorisation de modif du statut auteur
+    autoriser_exception('modifier','auteur',$auteur['id_auteur']);
+    include_spip('action/editer_auteur');
+    // changer le statut
+    auteur_modifier($auteur['id_auteur'],array('statut'=> $s));
+    unset($_COOKIE['spip_session']); // forcer la maj de la session
+    // lever l'autorisation de modif du statut auteur
+    autoriser_exception('modifier','auteur',$auteur['id_auteur'],false);
+
+    // mettre a jour le statut
+    $auteur['statut'] = $s;
+    return $auteur;
 }
 
 
@@ -303,14 +303,14 @@ 
  * @return string
  */
 function auteur_attribuer_jeton($id_auteur){
-	include_spip('inc/acces');
-	// s'assurer de l'unicite du jeton pour le couple (email,cookie)
-	do {
-		$jeton = creer_uniqid();
-		sql_updateq("spip_auteurs", array("cookie_oubli" => $jeton), "id_auteur=" . intval($id_auteur));
-	}
-	while (sql_countsel("spip_auteurs","cookie_oubli=".sql_quote($jeton))>1);
-	return $jeton;
+    include_spip('inc/acces');
+    // s'assurer de l'unicite du jeton pour le couple (email,cookie)
+    do {
+        $jeton = creer_uniqid();
+        sql_updateq("spip_auteurs", array("cookie_oubli" => $jeton), "id_auteur=" . intval($id_auteur));
+    }
+    while (sql_countsel("spip_auteurs","cookie_oubli=".sql_quote($jeton))>1);
+    return $jeton;
 }
 
 /**
@@ -319,12 +319,12 @@ 
  * @return array|bool
  */
 function auteur_verifier_jeton($jeton){
-	// refuser un jeton corrompu
-	if (preg_match(',[^0-9a-f.],i',$jeton))
-		return false;
+    // refuser un jeton corrompu
+    if (preg_match(',[^0-9a-f.],i',$jeton))
+        return false;
 
-	$desc = sql_fetsel('*','spip_auteurs',"cookie_oubli=".sql_quote($jeton, $serveur, 'string'));
-	return $desc;
+    $desc = sql_fetsel('*','spip_auteurs',"cookie_oubli=".sql_quote($jeton, $serveur, 'string'));
+    return $desc;
 }
 
 /**
@@ -334,5 +334,5 @@ 
  * @return bool
  */
 function auteur_effacer_jeton($id_auteur){
-	return sql_updateq("spip_auteurs", array("cookie_oubli" => ''), "id_auteur=" . intval($id_auteur));
+    return sql_updateq("spip_auteurs", array("cookie_oubli" => ''), "id_auteur=" . intval($id_auteur));
 }

ecrire/action/redirect.php

Indentation +15 added lines, -15 removed lines

@@ -16,22 +16,22 @@
 
 function action_redirect_dist()
 {
-	$type = _request('type');
-	if (!preg_match('/^\w+$/', $type)) return;
-	if ($m = _request('var_mode')) {
-		// forcer la mise a jour de l'url de cet objet !
-		if (!defined('_VAR_URLS')) define('_VAR_URLS',true);
-		$m = 'var_mode='.urlencode($m);
-	}
-	$h = generer_url_entite_absolue(intval(_request('id')), $type, $m, '', true);
-	$status = '302';
-	if (_request('status') AND _request('status')=='301')
-		$status = '301';
+    $type = _request('type');
+    if (!preg_match('/^\w+$/', $type)) return;
+    if ($m = _request('var_mode')) {
+        // forcer la mise a jour de l'url de cet objet !
+        if (!defined('_VAR_URLS')) define('_VAR_URLS',true);
+        $m = 'var_mode='.urlencode($m);
+    }
+    $h = generer_url_entite_absolue(intval(_request('id')), $type, $m, '', true);
+    $status = '302';
+    if (_request('status') AND _request('status')=='301')
+        $status = '301';
 
-	if ($h)
-		redirige_par_entete(str_replace('&', '&', $h),'',$status);
-	else
-		redirige_par_entete('/','',$status);
+    if ($h)
+        redirige_par_entete(str_replace('&', '&', $h),'',$status);
+    else
+        redirige_par_entete('/','',$status);
 }
 
 ?>

ecrire/action/debloquer_edition.php

Indentation +13 added lines, -13 removed lines

@@ -15,19 +15,19 @@
 // http://doc.spip.org/@action_instituer_collaboration_dist
 function action_debloquer_edition_dist() {
 
-	$securiser_action = charger_fonction('securiser_action', 'inc');
-	$arg = $securiser_action();
+    $securiser_action = charger_fonction('securiser_action', 'inc');
+    $arg = $securiser_action();
 
-	if ($arg) {
-		include_spip('inc/drapeau_edition');
-		if ($arg == 'tous') {
-			debloquer_tous($GLOBALS['visiteur_session']['id_auteur']);
-		}
-		else {
-			$arg = explode("-",$arg);
-			list($objet,$id_objet) = $arg;
-			debloquer_edition($GLOBALS['visiteur_session']['id_auteur'], $id_objet, $objet);
-		}
-	}
+    if ($arg) {
+        include_spip('inc/drapeau_edition');
+        if ($arg == 'tous') {
+            debloquer_tous($GLOBALS['visiteur_session']['id_auteur']);
+        }
+        else {
+            $arg = explode("-",$arg);
+            list($objet,$id_objet) = $arg;
+            debloquer_edition($GLOBALS['visiteur_session']['id_auteur'], $id_objet, $objet);
+        }
+    }
 }
 ?>

ecrire/action/supprimer_lien.php

Indentation +8 added lines, -8 removed lines

@@ -13,16 +13,16 @@
 if (!defined('_ECRIRE_INC_VERSION')) return;
 
 function action_supprimer_lien_dist($arg=null){
-	if (is_null($arg)){
-		$securiser_action = charger_fonction('securiser_action','inc');
-		$arg = $securiser_action();
-	}
+    if (is_null($arg)){
+        $securiser_action = charger_fonction('securiser_action','inc');
+        $arg = $securiser_action();
+    }
 
-	$arg = explode("-",$arg);
-	list($objet_source,$ids,$objet_lie,$idl) = $arg;
+    $arg = explode("-",$arg);
+    list($objet_source,$ids,$objet_lie,$idl) = $arg;
 
-	include_spip('action/editer_liens');
-	objet_dissocier(array($objet_source=>$ids), array($objet_lie=>$idl));
+    include_spip('action/editer_liens');
+    objet_dissocier(array($objet_source=>$ids), array($objet_lie=>$idl));
 }