spip / SPIP

ecrire/balise/url_.php

Indentation +151 added lines, -151 removed lines

@@ -18,7 +18,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,14 +36,14 @@ 
  *     Code compilé
  **/
 function generer_generer_url($type, $p) {
-	$_id = interprete_argument_balise(1, $p);
+    $_id = interprete_argument_balise(1, $p);
 
-	if (!$_id) {
-		$primary = id_table_objet($type);
-		$_id = champ_sql($primary, $p);
-	}
+    if (!$_id) {
+        $primary = id_table_objet($type);
+        $_id = champ_sql($primary, $p);
+    }
 
-	return generer_generer_url_arg($type, $p, $_id);
+    return generer_generer_url_arg($type, $p, $_id);
 }
 
 /**
@@ -72,28 +72,28 @@ 
  *     Code compilé
  **/
 function generer_generer_url_arg($type, $p, $_id) {
-	if ($s = trouver_nom_serveur_distant($p)) {
-		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
-			return $f($type, $_id, $s);
-		}
-		if (!$GLOBALS['connexions'][strtolower((string) $s)]['spip_connect_version']) {
-			return null;
-		}
-		$s = _q($s);
-		# exception des urls de documents sur un serveur distant...
-		if ($type == 'document') {
-			return
-				"quete_meta('adresse_site', $s) . '/' .\n\t" .
-				"quete_meta('dir_img', $s) . \n\t" .
-				"quete_fichier($_id,$s)";
-		}
-		$s = ", '', '', $s, quete_meta('type_urls', $s)";
-	} else {
-		$s = ", '', '', true";
-	}
-
-	return "urlencode_1738(generer_objet_url($_id, '$type'$s))";
+    if ($s = trouver_nom_serveur_distant($p)) {
+        // si une fonction de generation des url a ete definie pour ce connect l'utiliser
+        if (function_exists($f = 'generer_generer_url_' . $s)) {
+            return $f($type, $_id, $s);
+        }
+        if (!$GLOBALS['connexions'][strtolower((string) $s)]['spip_connect_version']) {
+            return null;
+        }
+        $s = _q($s);
+        # exception des urls de documents sur un serveur distant...
+        if ($type == 'document') {
+            return
+                "quete_meta('adresse_site', $s) . '/' .\n\t" .
+                "quete_meta('dir_img', $s) . \n\t" .
+                "quete_fichier($_id,$s)";
+        }
+        $s = ", '', '', $s, quete_meta('type_urls', $s)";
+    } else {
+        $s = ", '', '', true";
+    }
+
+    return "urlencode_1738(generer_objet_url($_id, '$type'$s))";
 }
 
 
@@ -118,27 +118,27 @@ 
  */
 function balise_URL__dist($p) {
 
-	$nom = $p->nom_champ;
-	if ($nom === 'URL_') {
-		$msg = ['zbug_balise_sans_argument', ['balise' => ' URL_']];
-		erreur_squelette($msg, $p);
-		$p->interdire_scripts = false;
-
-		return $p;
-	} elseif ($f = charger_fonction($nom, 'balise', true)) {
-		return $f($p);
-	} else {
-		$nom = strtolower((string) $nom);
-		$code = generer_generer_url(substr($nom, 4), $p);
-		$code = champ_sql($nom, $p, $code);
-		$p->code = $code;
-		if (!$p->etoile) {
-			$p->code = "vider_url($code)";
-		}
-		$p->interdire_scripts = false;
-
-		return $p;
-	}
+    $nom = $p->nom_champ;
+    if ($nom === 'URL_') {
+        $msg = ['zbug_balise_sans_argument', ['balise' => ' URL_']];
+        erreur_squelette($msg, $p);
+        $p->interdire_scripts = false;
+
+        return $p;
+    } elseif ($f = charger_fonction($nom, 'balise', true)) {
+        return $f($p);
+    } else {
+        $nom = strtolower((string) $nom);
+        $code = generer_generer_url(substr($nom, 4), $p);
+        $code = champ_sql($nom, $p, $code);
+        $p->code = $code;
+        if (!$p->etoile) {
+            $p->code = "vider_url($code)";
+        }
+        $p->interdire_scripts = false;
+
+        return $p;
+    }
 }
 
 /**
@@ -162,16 +162,16 @@ 
  */
 function balise_URL_ARTICLE_dist($p) {
 
-	// Cas particulier des boucles (SYNDIC_ARTICLES)
-	$code = $p->type_requete == 'syndic_articles' ? champ_sql('url', $p) : generer_generer_url('article', $p);
+    // Cas particulier des boucles (SYNDIC_ARTICLES)
+    $code = $p->type_requete == 'syndic_articles' ? champ_sql('url', $p) : generer_generer_url('article', $p);
 
-	$p->code = $code;
-	if (!$p->etoile) {
-		$p->code = "vider_url($code)";
-	}
-	$p->interdire_scripts = false;
+    $p->code = $code;
+    if (!$p->etoile) {
+        $p->code = "vider_url($code)";
+    }
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 /**
@@ -191,21 +191,21 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_SITE_dist($p) {
-	$code = champ_sql('url_site', $p, '');
-	if (!$code) {
-		$code = generer_generer_url('site', $p);
-		if ($code === null) {
-			return null;
-		}
-	} else {
-		if (!$p->etoile) {
-			$code = "calculer_url($code,'','url', \$connect)";
-		}
-	}
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    $code = champ_sql('url_site', $p, '');
+    if (!$code) {
+        $code = generer_generer_url('site', $p);
+        if ($code === null) {
+            return null;
+        }
+    } else {
+        if (!$p->etoile) {
+            $code = "calculer_url($code,'','url', \$connect)";
+        }
+    }
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 // Autres balises URL_*, qui ne concernent pas une table
@@ -224,11 +224,11 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_SITE_SPIP_dist($p) {
-	$p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
-	$p->code = 'spip_htmlspecialchars(' . $p->code . ')';
-	$p->interdire_scripts = false;
+    $p->code = "sinon(\$GLOBALS['meta']['adresse_site'],'.')";
+    $p->code = 'spip_htmlspecialchars(' . $p->code . ')';
+    $p->interdire_scripts = false;
 
-	return $p;
+    return $p;
 }
 
 
@@ -257,42 +257,42 @@ 
  */
 function balise_URL_PAGE_dist($p) {
 
-	$code = interprete_argument_balise(1, $p);
-	$args = interprete_argument_balise(2, $p);
-	if ($args == null) {
-		$args = "''";
-	}
-
-	if ($s = trouver_nom_serveur_distant($p)) {
-		// si une fonction de generation des url a ete definie pour ce connect l'utiliser
-		// elle devra aussi traiter le cas derogatoire type=page
-		if (function_exists($f = 'generer_generer_url_' . $s)) {
-			if ($args && $args !== "''") {
-				$code .= ", $args";
-			}
-			$code = $f('page', $code, $s);
-			$p->code = $code;
-			return $p;
-		}
-		$s = 'connect=' . addslashes((string) $s);
-		$args = (($args && $args !== "''") ? "$args . '&$s'" : "'$s'");
-	}
-
-	if (!$code) {
-		$noentities = $p->etoile ? "'&'" : '';
-		$code = "url_de_base() . preg_replace(',^./,', '', self($noentities))";
-	} else {
-		if (!$args) {
-			$args = "''";
-		}
-		$noentities = $p->etoile ? ', true' : '';
-		$code = "generer_url_public($code, $args$noentities)";
-	}
-	$p->code = $code;
-	spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO);
-
-	#$p->interdire_scripts = true;
-	return $p;
+    $code = interprete_argument_balise(1, $p);
+    $args = interprete_argument_balise(2, $p);
+    if ($args == null) {
+        $args = "''";
+    }
+
+    if ($s = trouver_nom_serveur_distant($p)) {
+        // si une fonction de generation des url a ete definie pour ce connect l'utiliser
+        // elle devra aussi traiter le cas derogatoire type=page
+        if (function_exists($f = 'generer_generer_url_' . $s)) {
+            if ($args && $args !== "''") {
+                $code .= ", $args";
+            }
+            $code = $f('page', $code, $s);
+            $p->code = $code;
+            return $p;
+        }
+        $s = 'connect=' . addslashes((string) $s);
+        $args = (($args && $args !== "''") ? "$args . '&$s'" : "'$s'");
+    }
+
+    if (!$code) {
+        $noentities = $p->etoile ? "'&'" : '';
+        $code = "url_de_base() . preg_replace(',^./,', '', self($noentities))";
+    } else {
+        if (!$args) {
+            $args = "''";
+        }
+        $noentities = $p->etoile ? ', true' : '';
+        $code = "generer_url_public($code, $args$noentities)";
+    }
+    $p->code = $code;
+    spip_log("Calcul url page : connect vaut $s ca donne :" . $p->code . " args $args", _LOG_INFO);
+
+    #$p->interdire_scripts = true;
+    return $p;
 }
 
 
@@ -319,24 +319,24 @@ 
  */
 function balise_URL_ECRIRE_dist($p) {
 
-	$code = interprete_argument_balise(1, $p);
-	if (!$code) {
-		$fonc = "''";
-	} else {
-		$fonc = $code;
-		$args = interprete_argument_balise(2, $p);
-		if ($args === null) {
-			$args = "''";
-		}
-		$noentities = $p->etoile ? ', true' : '';
-		if ($args != "''" || $noentities) {
-			$fonc .= ",$args$noentities";
-		}
-	}
-	$p->code = 'generer_url_ecrire(' . $fonc . ')';
-	$p->interdire_scripts = false;
-
-	return $p;
+    $code = interprete_argument_balise(1, $p);
+    if (!$code) {
+        $fonc = "''";
+    } else {
+        $fonc = $code;
+        $args = interprete_argument_balise(2, $p);
+        if ($args === null) {
+            $args = "''";
+        }
+        $noentities = $p->etoile ? ', true' : '';
+        if ($args != "''" || $noentities) {
+            $fonc .= ",$args$noentities";
+        }
+    }
+    $p->code = 'generer_url_ecrire(' . $fonc . ')';
+    $p->interdire_scripts = false;
+
+    return $p;
 }
 
 
@@ -362,24 +362,24 @@ 
  *     Pile complétée par le code à générer
  */
 function balise_URL_ACTION_AUTEUR_dist($p) {
-	$p->descr['session'] = true;
-
-	$p->code = interprete_argument_balise(1, $p);
-
-	$args = interprete_argument_balise(2, $p);
-	if ($args != "''" && $args !== null) {
-		$p->code .= ',' . $args;
-	}
-	$redirect = interprete_argument_balise(3, $p);
-	if ($redirect != "''" && $redirect !== null) {
-		if ($args == "''" || $args === null) {
-			$p->code .= ",''";
-		}
-		$p->code .= ',' . $redirect;
-	}
-
-	$p->code = 'generer_action_auteur(' . $p->code . ')';
-	$p->interdire_scripts = false;
-
-	return $p;
+    $p->descr['session'] = true;
+
+    $p->code = interprete_argument_balise(1, $p);
+
+    $args = interprete_argument_balise(2, $p);
+    if ($args != "''" && $args !== null) {
+        $p->code .= ',' . $args;
+    }
+    $redirect = interprete_argument_balise(3, $p);
+    if ($redirect != "''" && $redirect !== null) {
+        if ($args == "''" || $args === null) {
+            $p->code .= ",''";
+        }
+        $p->code .= ',' . $redirect;
+    }
+
+    $p->code = 'generer_action_auteur(' . $p->code . ')';
+    $p->interdire_scripts = false;
+
+    return $p;
 }

ecrire/balise/logo_.php

Indentation +85 added lines, -85 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -55,88 +55,88 @@ 
  */
 function balise_LOGO__dist($p) {
 
-	preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
-	$type = strtolower($regs[1]);
-	$suite_logo = $regs[2];
-
-	// cas de #LOGO_SITE_SPIP
-	if ($type == 'site_spip') {
-		$type = 'site';
-		$_id_objet = "\"'0'\"";
-	}
-
-	$id_objet = id_table_objet($type);
-	if (!isset($_id_objet)) {
-		$_id_objet = champ_sql($id_objet, $p);
-	}
-
-	$fichier = ($p->etoile === '**') ? -1 : 0;
-	$coord = [];
-	$align = $lien = '';
-	$mode_logo = '';
-
-	if ($p->param && !$p->param[0][0]) {
-		$params = $p->param[0];
-		array_shift($params);
-		foreach ($params as $a) {
-			if ($a[0]->type === 'texte') {
-				$n = $a[0]->texte;
-				if (is_numeric($n)) {
-					$coord[] = $n;
-				} elseif (in_array($n, ['top', 'left', 'right', 'center', 'bottom'])) {
-					$align = $n;
-				} elseif (in_array($n, ['auto', 'icone', 'apercu', 'vignette'])) {
-					$mode_logo = $n;
-				}
-			} else {
-				$lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
-			}
-		}
-	}
-
-	$coord_x = $coord ? (int) array_shift($coord) : 0;
-	$coord_y = $coord ? (int) array_shift($coord) : 0;
-
-	if ($p->etoile === '*') {
-		include_spip('balise/url_');
-		$lien = generer_generer_url_arg($type, $p, $_id_objet);
-	}
-
-	$connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
-	if ($type == 'document') {
-		$qconnect = _q($connect);
-		$doc = "quete_document($_id_objet, $qconnect)";
-		if ($fichier) {
-			$code = "quete_logo_file($doc, $qconnect)";
-		} else {
-			$code = "quete_logo_document($doc, " . ($lien ?: "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
-		}
-		// (x=non-faux ? y : '') pour affecter x en retournant y
-		if ($p->descr['documents']) {
-			$code = '(($doublons["documents"] .= ",". '
-				. $_id_objet
-				. ") ? $code : '')";
-		}
-	} elseif ($connect) {
-		$code = "''";
-		spip_log('Les logos distants ne sont pas prevus');
-	} else {
-		// pour generer_code_logo
-		include_spip('balise/id_logo_');
-		$champ_logo = '';
-		if ($fichier) {
-			$champ_logo = 'fichier';
-		}
-		$code = generer_code_logo($id_objet, $_id_objet, $type, $align, $lien, $p, $suite_logo, $champ_logo);
-	}
-
-	// demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
-	if ($coord_x || $coord_y) {
-		$code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
-	}
-
-	$p->code = $code;
-	$p->interdire_scripts = false;
-
-	return $p;
+    preg_match(',^LOGO_([A-Z_]+?)(|_NORMAL|_SURVOL|_RUBRIQUE)$,i', $p->nom_champ, $regs);
+    $type = strtolower($regs[1]);
+    $suite_logo = $regs[2];
+
+    // cas de #LOGO_SITE_SPIP
+    if ($type == 'site_spip') {
+        $type = 'site';
+        $_id_objet = "\"'0'\"";
+    }
+
+    $id_objet = id_table_objet($type);
+    if (!isset($_id_objet)) {
+        $_id_objet = champ_sql($id_objet, $p);
+    }
+
+    $fichier = ($p->etoile === '**') ? -1 : 0;
+    $coord = [];
+    $align = $lien = '';
+    $mode_logo = '';
+
+    if ($p->param && !$p->param[0][0]) {
+        $params = $p->param[0];
+        array_shift($params);
+        foreach ($params as $a) {
+            if ($a[0]->type === 'texte') {
+                $n = $a[0]->texte;
+                if (is_numeric($n)) {
+                    $coord[] = $n;
+                } elseif (in_array($n, ['top', 'left', 'right', 'center', 'bottom'])) {
+                    $align = $n;
+                } elseif (in_array($n, ['auto', 'icone', 'apercu', 'vignette'])) {
+                    $mode_logo = $n;
+                }
+            } else {
+                $lien = calculer_liste($a, $p->descr, $p->boucles, $p->id_boucle);
+            }
+        }
+    }
+
+    $coord_x = $coord ? (int) array_shift($coord) : 0;
+    $coord_y = $coord ? (int) array_shift($coord) : 0;
+
+    if ($p->etoile === '*') {
+        include_spip('balise/url_');
+        $lien = generer_generer_url_arg($type, $p, $_id_objet);
+    }
+
+    $connect = $p->id_boucle ? $p->boucles[$p->id_boucle]->sql_serveur : '';
+    if ($type == 'document') {
+        $qconnect = _q($connect);
+        $doc = "quete_document($_id_objet, $qconnect)";
+        if ($fichier) {
+            $code = "quete_logo_file($doc, $qconnect)";
+        } else {
+            $code = "quete_logo_document($doc, " . ($lien ?: "''") . ", '$align', '$mode_logo', $coord_x, $coord_y, $qconnect)";
+        }
+        // (x=non-faux ? y : '') pour affecter x en retournant y
+        if ($p->descr['documents']) {
+            $code = '(($doublons["documents"] .= ",". '
+                . $_id_objet
+                . ") ? $code : '')";
+        }
+    } elseif ($connect) {
+        $code = "''";
+        spip_log('Les logos distants ne sont pas prevus');
+    } else {
+        // pour generer_code_logo
+        include_spip('balise/id_logo_');
+        $champ_logo = '';
+        if ($fichier) {
+            $champ_logo = 'fichier';
+        }
+        $code = generer_code_logo($id_objet, $_id_objet, $type, $align, $lien, $p, $suite_logo, $champ_logo);
+    }
+
+    // demande de reduction sur logo avec ecriture spip 2.1 : #LOGO_xxx{200, 0}
+    if ($coord_x || $coord_y) {
+        $code = "filtrer('image_graver',filtrer('image_reduire'," . $code . ", '$coord_x', '$coord_y'))";
+    }
+
+    $p->code = $code;
+    $p->interdire_scripts = false;
+
+    return $p;
 }

ecrire/balise/menu_lang_ecrire.php

Indentation +31 added lines, -31 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -36,7 +36,7 @@ 
  *     Pile complétée du code compilé
  **/
 function balise_MENU_LANG_ECRIRE($p) {
-	return calculer_balise_dynamique($p, 'MENU_LANG_ECRIRE', ['lang']);
+    return calculer_balise_dynamique($p, 'MENU_LANG_ECRIRE', ['lang']);
 }
 
 /**
@@ -55,12 +55,12 @@ 
  *   - string: Si pas de multilinguisme
  */
 function balise_MENU_LANG_ECRIRE_stat($args, $context_compil) {
-	include_spip('inc/lang');
-	if (!str_contains((string) $GLOBALS['meta']['langues_proposees'], ',')) {
-		return '';
-	}
+    include_spip('inc/lang');
+    if (!str_contains((string) $GLOBALS['meta']['langues_proposees'], ',')) {
+        return '';
+    }
 
-	return $args;
+    return $args;
 }
 
 /**
@@ -76,7 +76,7 @@ 
  *     Liste : Chemin du squelette, durée du cache, contexte
  **/
 function balise_MENU_LANG_ECRIRE_dyn($opt) {
-	return menu_lang_pour_tous('var_lang_ecrire', $opt);
+    return menu_lang_pour_tous('var_lang_ecrire', $opt);
 }
 
 /**
@@ -96,30 +96,30 @@ 
  *     Liste : Chemin du squelette, durée du cache, contexte
  **/
 function menu_lang_pour_tous($nom, $default) {
-	include_spip('inc/lang');
+    include_spip('inc/lang');
 
-	if ($GLOBALS['spip_lang'] != $default) {
-		$opt = lang_select($default);  # et remplace
-		if ($GLOBALS['spip_lang'] != $default) {
-			$default = '';  # annule tout choix par defaut
-			if ($opt) {
-				lang_select();
-			}
-		}
-	}
+    if ($GLOBALS['spip_lang'] != $default) {
+        $opt = lang_select($default);  # et remplace
+        if ($GLOBALS['spip_lang'] != $default) {
+            $default = '';  # annule tout choix par defaut
+            if ($opt) {
+                lang_select();
+            }
+        }
+    }
 
-	# lien a partir de /
-	$cible = parametre_url(self(), 'lang', '', '&');
-	$post = generer_url_action('converser', 'redirect=' . rawurlencode((string) $cible), true);
+    # lien a partir de /
+    $cible = parametre_url(self(), 'lang', '', '&');
+    $post = generer_url_action('converser', 'redirect=' . rawurlencode((string) $cible), true);
 
-	return [
-		'formulaires/menu_lang',
-		3600,
-		[
-			'nom' => $nom,
-			'url' => $post,
-			'name' => $nom,
-			'default' => $default,
-		]
-	];
+    return [
+        'formulaires/menu_lang',
+        3600,
+        [
+            'nom' => $nom,
+            'url' => $post,
+            'name' => $nom,
+            'default' => $default,
+        ]
+    ];
 }

ecrire/balise/formulaire_admin.php

Indentation +141 added lines, -141 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -41,7 +41,7 @@ 
  *     Pile complétée du code compilé
  **/
 function balise_FORMULAIRE_ADMIN($p) {
-	return calculer_balise_dynamique($p, 'FORMULAIRE_ADMIN', []);
+    return calculer_balise_dynamique($p, 'FORMULAIRE_ADMIN', []);
 }
 
 /**
@@ -58,7 +58,7 @@ 
  *   - chaîne vide sinon.
  */
 function balise_FORMULAIRE_ADMIN_stat($args, $context_compil) {
-	return $args;
+    return $args;
 }
 
 
@@ -83,64 +83,64 @@ 
  **/
 function balise_FORMULAIRE_ADMIN_dyn($float = '', $debug = '') {
 
-	static $dejafait = false;
+    static $dejafait = false;
 
-	if (empty($_COOKIE['spip_admin'])) {
-		return '';
-	}
+    if (empty($_COOKIE['spip_admin'])) {
+        return '';
+    }
 
-	if (!is_array($debug)) {
-		if ($dejafait) {
-			return '';
-		}
-	} else {
-		if ($dejafait) {
-			if (empty($debug['sourcefile'])) {
-				return '';
-			}
-			foreach ($debug['sourcefile'] as $k => $v) {
-				if (str_contains((string) $v, 'administration.') && isset($debug['resultat'][$k . 'tout'])) {
-					return $debug['resultat'][$k . 'tout'];
-				}
-			}
+    if (!is_array($debug)) {
+        if ($dejafait) {
+            return '';
+        }
+    } else {
+        if ($dejafait) {
+            if (empty($debug['sourcefile'])) {
+                return '';
+            }
+            foreach ($debug['sourcefile'] as $k => $v) {
+                if (str_contains((string) $v, 'administration.') && isset($debug['resultat'][$k . 'tout'])) {
+                    return $debug['resultat'][$k . 'tout'];
+                }
+            }
 
-			return '';
-		}
-	}
+            return '';
+        }
+    }
 
-	include_spip('inc/autoriser');
-	include_spip('base/abstract_sql');
+    include_spip('inc/autoriser');
+    include_spip('base/abstract_sql');
 
 
-	$dejafait = true;
+    $dejafait = true;
 
-	// Preparer le #ENV des boutons
+    // Preparer le #ENV des boutons
 
-	$env = admin_objet();
+    $env = admin_objet();
 
-	// Pas de "modifier ce..." ? -> donner "acces a l'espace prive"
-	if (!$env) {
-		$env['ecrire'] = _DIR_RESTREINT_ABS;
-	}
+    // Pas de "modifier ce..." ? -> donner "acces a l'espace prive"
+    if (!$env) {
+        $env['ecrire'] = _DIR_RESTREINT_ABS;
+    }
 
-	$env['divclass'] = $float;
-	$env['lang'] = admin_lang();
-	$env['calcul'] = (_request('var_mode') ? 'recalcul' : 'calcul');
-	$env['debug'] = ((defined('_VAR_PREVIEW') && _VAR_PREVIEW) ? '' : admin_debug());
-	$env['analyser'] = (!$env['debug'] && !$GLOBALS['xhtml']) ? '' : admin_valider();
-	$env['inclure'] = ((defined('_VAR_INCLURE') && _VAR_INCLURE) ? 'inclure' : '');
+    $env['divclass'] = $float;
+    $env['lang'] = admin_lang();
+    $env['calcul'] = (_request('var_mode') ? 'recalcul' : 'calcul');
+    $env['debug'] = ((defined('_VAR_PREVIEW') && _VAR_PREVIEW) ? '' : admin_debug());
+    $env['analyser'] = (!$env['debug'] && !$GLOBALS['xhtml']) ? '' : admin_valider();
+    $env['inclure'] = ((defined('_VAR_INCLURE') && _VAR_INCLURE) ? 'inclure' : '');
 
-	if (empty($GLOBALS['use_cache'])) {
-		$env['use_cache'] = ' *';
-	}
+    if (empty($GLOBALS['use_cache'])) {
+        $env['use_cache'] = ' *';
+    }
 
-	if (isset($debug['validation'])) {
-		$env['xhtml_error'] = $debug['validation'];
-	}
+    if (isset($debug['validation'])) {
+        $env['xhtml_error'] = $debug['validation'];
+    }
 
-	$env['_pipelines']['formulaire_admin'] = [];
+    $env['_pipelines']['formulaire_admin'] = [];
 
-	return ['formulaires/administration', 0, $env];
+    return ['formulaires/administration', 0, $env];
 }
 
 
@@ -158,46 +158,46 @@ 
  *     Tableau de l'environnement calculé
  **/
 function admin_objet() {
-	include_spip('inc/urls');
-	$env = [];
-
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$objets = urls_liste_objets(false);
-	$objets = array_diff($objets, ['rubrique']);
-	$objets = array_reverse($objets);
-	array_unshift($objets, 'rubrique');
-	foreach ($objets as $obj) {
-		$type = $obj;
-		if (
-			$type == objet_type($type, false)
-			&& ($_id_type = id_table_objet($type))
-			&& isset($GLOBALS['contexte'][$_id_type])
-			&& ($id = $GLOBALS['contexte'][$_id_type])
-			&& !is_array($id)
-			&& ($id = (int) $id)
-			&& ($desc = $trouver_table(table_objet_sql($type)))
-		) {
-			$id = sql_getfetsel($_id_type, table_objet_sql($type), "$_id_type=" . (int) $id);
-			if ($id) {
-				$env[$_id_type] = $id;
-				$env['objet'] = $type;
-				$env['id_objet'] = $id;
-				$env['voir_' . $obj] = str_replace('&', '&', (string) generer_objet_url($id, $obj, '', '', false));
-				if (
-					isset($desc['field']['id_rubrique'])
-					&& $type != 'rubrique'
-				) {
-					unset($env['id_rubrique']);
-					unset($env['voir_rubrique']);
-					if (admin_preview($type, $id, $desc)) {
-						$env['preview'] = parametre_url(self(), 'var_mode', 'preview', '&');
-					}
-				}
-			}
-		}
-	}
-
-	return $env;
+    include_spip('inc/urls');
+    $env = [];
+
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $objets = urls_liste_objets(false);
+    $objets = array_diff($objets, ['rubrique']);
+    $objets = array_reverse($objets);
+    array_unshift($objets, 'rubrique');
+    foreach ($objets as $obj) {
+        $type = $obj;
+        if (
+            $type == objet_type($type, false)
+            && ($_id_type = id_table_objet($type))
+            && isset($GLOBALS['contexte'][$_id_type])
+            && ($id = $GLOBALS['contexte'][$_id_type])
+            && !is_array($id)
+            && ($id = (int) $id)
+            && ($desc = $trouver_table(table_objet_sql($type)))
+        ) {
+            $id = sql_getfetsel($_id_type, table_objet_sql($type), "$_id_type=" . (int) $id);
+            if ($id) {
+                $env[$_id_type] = $id;
+                $env['objet'] = $type;
+                $env['id_objet'] = $id;
+                $env['voir_' . $obj] = str_replace('&', '&', (string) generer_objet_url($id, $obj, '', '', false));
+                if (
+                    isset($desc['field']['id_rubrique'])
+                    && $type != 'rubrique'
+                ) {
+                    unset($env['id_rubrique']);
+                    unset($env['voir_rubrique']);
+                    if (admin_preview($type, $id, $desc)) {
+                        $env['preview'] = parametre_url(self(), 'var_mode', 'preview', '&');
+                    }
+                }
+            }
+        }
+    }
+
+    return $env;
 }
 
 
@@ -215,30 +215,30 @@ 
  *     - Tableau d'un élément sinon.
  **/
 function admin_preview($type, $id, $desc = null) {
-	if (defined('_VAR_PREVIEW') && _VAR_PREVIEW) {
-		return '';
-	}
-
-	if (!$desc) {
-		$trouver_table = charger_fonction('trouver_table', 'base');
-		$desc = $trouver_table(table_objet_sql($type));
-	}
-	if (!$desc || !isset($desc['field']['statut'])) {
-		return '';
-	}
-
-	include_spip('inc/autoriser');
-	if (!autoriser('previsualiser')) {
-		return '';
-	}
-
-	$notpub = sql_in('statut', ['prop', 'prive']);
-
-	if ($type == 'article' && $GLOBALS['meta']['post_dates'] != 'oui') {
-		$notpub .= " OR (statut='publie' AND date>" . sql_quote(date('Y-m-d H:i:s')) . ')';
-	}
-
-	return sql_fetsel('1', table_objet_sql($type), id_table_objet($type) . '=' . $id . " AND ($notpub)");
+    if (defined('_VAR_PREVIEW') && _VAR_PREVIEW) {
+        return '';
+    }
+
+    if (!$desc) {
+        $trouver_table = charger_fonction('trouver_table', 'base');
+        $desc = $trouver_table(table_objet_sql($type));
+    }
+    if (!$desc || !isset($desc['field']['statut'])) {
+        return '';
+    }
+
+    include_spip('inc/autoriser');
+    if (!autoriser('previsualiser')) {
+        return '';
+    }
+
+    $notpub = sql_in('statut', ['prop', 'prive']);
+
+    if ($type == 'article' && $GLOBALS['meta']['post_dates'] != 'oui') {
+        $notpub .= " OR (statut='publie' AND date>" . sql_quote(date('Y-m-d H:i:s')) . ')';
+    }
+
+    return sql_fetsel('1', table_objet_sql($type), id_table_objet($type) . '=' . $id . " AND ($notpub)");
 }
 
 
@@ -249,25 +249,25 @@ 
  *     Code de langue
  **/
 function admin_lang() {
-	$alang = '';
-	if (!empty($_COOKIE['spip_admin'])) {
-		$email_or_login = preg_replace(',^@,', '', (string) $_COOKIE['spip_admin']);
-		$alang = sql_getfetsel('lang', 'spip_auteurs', 'email=' . sql_quote($email_or_login));
-		if (!$alang) {
-			$alang = sql_getfetsel('lang', 'spip_auteurs', 'login=' . sql_quote($email_or_login));
-		}
-	}
-	if (!$alang) {
-		return '';
-	}
-
-	$l = lang_select($alang);
-	$alang = $GLOBALS['spip_lang'];
-	if ($l) {
-		lang_select();
-	}
-
-	return $alang;
+    $alang = '';
+    if (!empty($_COOKIE['spip_admin'])) {
+        $email_or_login = preg_replace(',^@,', '', (string) $_COOKIE['spip_admin']);
+        $alang = sql_getfetsel('lang', 'spip_auteurs', 'email=' . sql_quote($email_or_login));
+        if (!$alang) {
+            $alang = sql_getfetsel('lang', 'spip_auteurs', 'login=' . sql_quote($email_or_login));
+        }
+    }
+    if (!$alang) {
+        return '';
+    }
+
+    $l = lang_select($alang);
+    $alang = $GLOBALS['spip_lang'];
+    if ($l) {
+        lang_select();
+    }
+
+    return $alang;
 }
 
 /**
@@ -277,11 +277,11 @@ 
  **/
 function admin_valider() {
 
-	return ((!isset($GLOBALS['xhtml']) || $GLOBALS['xhtml'] !== 'true') ?
-		(parametre_url(self(), 'var_mode', 'debug', '&')
-			. '&var_mode_affiche=validation') :
-		('http://validator.w3.org/check?uri='
-			. rawurlencode('http://' . $_SERVER['HTTP_HOST'] . nettoyer_uri())));
+    return ((!isset($GLOBALS['xhtml']) || $GLOBALS['xhtml'] !== 'true') ?
+        (parametre_url(self(), 'var_mode', 'debug', '&')
+            . '&var_mode_affiche=validation') :
+        ('http://validator.w3.org/check?uri='
+            . rawurlencode('http://' . $_SERVER['HTTP_HOST'] . nettoyer_uri())));
 }
 
 /**
@@ -290,10 +290,10 @@ 
  * @return string
  **/
 function admin_debug() {
-	return (
-		(isset($GLOBALS['forcer_debug']) && $GLOBALS['forcer_debug']
-		|| isset($GLOBALS['bouton_admin_debug']) && $GLOBALS['bouton_admin_debug']
-		|| defined('_VAR_MODE') && _VAR_MODE == 'debug' && isset($_COOKIE['spip_debug']) && $_COOKIE['spip_debug']) && autoriser('debug')
-	)
-		? parametre_url(self(), 'var_mode', 'debug', '&') : '';
+    return (
+        (isset($GLOBALS['forcer_debug']) && $GLOBALS['forcer_debug']
+        || isset($GLOBALS['bouton_admin_debug']) && $GLOBALS['bouton_admin_debug']
+        || defined('_VAR_MODE') && _VAR_MODE == 'debug' && isset($_COOKIE['spip_debug']) && $_COOKIE['spip_debug']) && autoriser('debug')
+    )
+        ? parametre_url(self(), 'var_mode', 'debug', '&') : '';
 }

ecrire/maj/legacy/v40.php

Indentation +42 added lines, -42 removed lines

@@ -19,7 +19,7 @@ 
  * @package SPIP\Core\SQL\Upgrade
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -34,49 +34,49 @@ 
  **/
 function maj_timestamp_mysql($tables = null) {
 
-	include_spip('base/dump');
-	if (is_null($tables)) {
-		$tables = base_lister_toutes_tables();
-	} elseif (is_string($tables)) {
-		$tables = [$tables];
-	} elseif (!is_array($tables)) {
-		return;
-	}
+    include_spip('base/dump');
+    if (is_null($tables)) {
+        $tables = base_lister_toutes_tables();
+    } elseif (is_string($tables)) {
+        $tables = [$tables];
+    } elseif (!is_array($tables)) {
+        return;
+    }
 
-	// rien a faire si base non mysql
-	if (!str_starts_with((string) $GLOBALS['connexions'][0]['type'], 'mysql')) {
-		return;
-	}
+    // rien a faire si base non mysql
+    if (!str_starts_with((string) $GLOBALS['connexions'][0]['type'], 'mysql')) {
+        return;
+    }
 
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	// forcer le vidage de cache
-	$trouver_table('');
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    // forcer le vidage de cache
+    $trouver_table('');
 
-	foreach ($tables as $table) {
-		if (time() >= _TIME_OUT) {
-			return;
-		}
-		if ($desc = $trouver_table($table)) {
-			$fields_corrected = _mysql_remplacements_definitions_table($desc['field']);
-			$d = array_diff($desc['field'], $fields_corrected);
-			if ($d) {
-				spip_log("Table $table TIMESTAMP incorrect", 'maj');
-				foreach ($desc['field'] as $field => $type) {
-					if ($desc['field'][$field] !== $fields_corrected[$field]) {
-						spip_log("Adaptation TIMESTAMP table $table", 'maj.' . _LOG_INFO_IMPORTANTE);
-						sql_alter("table $table change $field $field " . $fields_corrected[$field]);
-						$trouver_table('');
-						$new_desc = $trouver_table($table);
-						spip_log(
-							"Apres conversion $table : " . var_export($new_desc['field'], true),
-							'maj.' . _LOG_INFO_IMPORTANTE
-						);
-					}
-				}
-			}
-		}
-	}
+    foreach ($tables as $table) {
+        if (time() >= _TIME_OUT) {
+            return;
+        }
+        if ($desc = $trouver_table($table)) {
+            $fields_corrected = _mysql_remplacements_definitions_table($desc['field']);
+            $d = array_diff($desc['field'], $fields_corrected);
+            if ($d) {
+                spip_log("Table $table TIMESTAMP incorrect", 'maj');
+                foreach ($desc['field'] as $field => $type) {
+                    if ($desc['field'][$field] !== $fields_corrected[$field]) {
+                        spip_log("Adaptation TIMESTAMP table $table", 'maj.' . _LOG_INFO_IMPORTANTE);
+                        sql_alter("table $table change $field $field " . $fields_corrected[$field]);
+                        $trouver_table('');
+                        $new_desc = $trouver_table($table);
+                        spip_log(
+                            "Apres conversion $table : " . var_export($new_desc['field'], true),
+                            'maj.' . _LOG_INFO_IMPORTANTE
+                        );
+                    }
+                }
+            }
+        }
+    }
 
-	// forcer le vidage de cache
-	$trouver_table('');
+    // forcer le vidage de cache
+    $trouver_table('');
 }

ecrire/auth/ldap.php

Indentation +174 added lines, -174 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 // Authentifie via LDAP et retourne la ligne SQL decrivant l'utilisateur si ok
@@ -24,12 +24,12 @@ 
 // Attributs LDAP correspondants a ceux de SPIP, notamment pour le login
 // ne pas ecraser une definition perso dans mes_options
 if (!isset($GLOBALS['ldap_attributes']) || !is_array($GLOBALS['ldap_attributes'])) {
-	$GLOBALS['ldap_attributes'] = [
-		'login' => ['sAMAccountName', 'uid', 'login', 'userid', 'cn', 'sn'],
-		'nom' => 'cn',
-		'email' => 'mail',
-		'bio' => 'description'
-	];
+    $GLOBALS['ldap_attributes'] = [
+        'login' => ['sAMAccountName', 'uid', 'login', 'userid', 'cn', 'sn'],
+        'nom' => 'cn',
+        'email' => 'mail',
+        'bio' => 'description'
+    ];
 }
 
 /**
@@ -55,49 +55,49 @@ 
  */
 function auth_ldap_dist($login, #[\SensitiveParameter] $pass, $serveur = '', $phpauth = false) {
 
-	#spip_log("ldap $login " . ($pass ? "mdp fourni" : "mdp absent"));
-
-	// Utilisateur connu ?
-	// si http auth, inutile de reauthentifier: cela
-	// ne marchera pas avec auth http autre que basic.
-	$checkpass = !isset($_SERVER['REMOTE_USER']);
-	if (!($dn = auth_ldap_search($login, $pass, $checkpass, $serveur))) {
-		return [];
-	}
-	$credentials_ldap = ['ldap_dn' => $dn, 'ldap_password' => $pass];
-
-	// Si l'utilisateur figure deja dans la base, y recuperer les infos
-	$r = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login) . " AND source='ldap'", '', '', '', '', $serveur);
-
-	if ($r) {
-		return array_merge($r, $credentials_ldap);
-	}
-
-	// sinon importer les infos depuis LDAP,
-
-	if (
-		$GLOBALS['meta']['ldap_statut_import'] && ($desc = auth_ldap_retrouver($dn, [], $serveur))
-	) {
-		// rajouter le statut indique  a l'install
-		$desc['statut'] = $GLOBALS['meta']['ldap_statut_import'];
-		$desc['login'] = $login;
-		$desc['source'] = 'ldap';
-		$desc['pass'] = '';
-
-		$r = sql_insertq('spip_auteurs', $desc, [], $serveur);
-	}
-
-	if ($r) {
-		return array_merge(
-			$credentials_ldap,
-			sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . (int) $r, '', '', '', '', $serveur)
-		);
-	}
-
-	// sinon echec
-	spip_log("Creation de l'auteur '$login' impossible");
-
-	return [];
+    #spip_log("ldap $login " . ($pass ? "mdp fourni" : "mdp absent"));
+
+    // Utilisateur connu ?
+    // si http auth, inutile de reauthentifier: cela
+    // ne marchera pas avec auth http autre que basic.
+    $checkpass = !isset($_SERVER['REMOTE_USER']);
+    if (!($dn = auth_ldap_search($login, $pass, $checkpass, $serveur))) {
+        return [];
+    }
+    $credentials_ldap = ['ldap_dn' => $dn, 'ldap_password' => $pass];
+
+    // Si l'utilisateur figure deja dans la base, y recuperer les infos
+    $r = sql_fetsel('*', 'spip_auteurs', 'login=' . sql_quote($login) . " AND source='ldap'", '', '', '', '', $serveur);
+
+    if ($r) {
+        return array_merge($r, $credentials_ldap);
+    }
+
+    // sinon importer les infos depuis LDAP,
+
+    if (
+        $GLOBALS['meta']['ldap_statut_import'] && ($desc = auth_ldap_retrouver($dn, [], $serveur))
+    ) {
+        // rajouter le statut indique  a l'install
+        $desc['statut'] = $GLOBALS['meta']['ldap_statut_import'];
+        $desc['login'] = $login;
+        $desc['source'] = 'ldap';
+        $desc['pass'] = '';
+
+        $r = sql_insertq('spip_auteurs', $desc, [], $serveur);
+    }
+
+    if ($r) {
+        return array_merge(
+            $credentials_ldap,
+            sql_fetsel('*', 'spip_auteurs', 'id_auteur=' . (int) $r, '', '', '', '', $serveur)
+        );
+    }
+
+    // sinon echec
+    spip_log("Creation de l'auteur '$login' impossible");
+
+    return [];
 }
 
 /**
@@ -111,36 +111,36 @@ 
  * @return array
  */
 function auth_ldap_connect($serveur = '') {
-	include_spip('base/connect_sql');
-	static $connexions_ldap = [];
-	if (isset($connexions_ldap[$serveur])) {
-		return $connexions_ldap[$serveur];
-	}
-	$connexion = spip_connect($serveur);
-	if (!is_array($connexion['ldap'])) {
-		if ($connexion['authentification']['ldap']) {
-			$f = _DIR_CONNECT . $connexion['authentification']['ldap'];
-			unset($GLOBALS['ldap_link']);
-			if (is_readable($f)) {
-				include_once($f);
-			};
-			if (isset($GLOBALS['ldap_link'])) {
-				$connexion['ldap'] = [
-					'link' => $GLOBALS['ldap_link'],
-					'base' => $GLOBALS['ldap_base']
-				];
-			} else {
-				spip_log("connection LDAP $serveur mal definie dans $f");
-			}
-			if (isset($GLOBALS['ldap_champs'])) {
-				$connexion['ldap']['attributes'] = $GLOBALS['ldap_champs'];
-			}
-		} else {
-			spip_log("connection LDAP $serveur inconnue");
-		}
-	}
-
-	return $connexions_ldap[$serveur] = $connexion['ldap'];
+    include_spip('base/connect_sql');
+    static $connexions_ldap = [];
+    if (isset($connexions_ldap[$serveur])) {
+        return $connexions_ldap[$serveur];
+    }
+    $connexion = spip_connect($serveur);
+    if (!is_array($connexion['ldap'])) {
+        if ($connexion['authentification']['ldap']) {
+            $f = _DIR_CONNECT . $connexion['authentification']['ldap'];
+            unset($GLOBALS['ldap_link']);
+            if (is_readable($f)) {
+                include_once($f);
+            };
+            if (isset($GLOBALS['ldap_link'])) {
+                $connexion['ldap'] = [
+                    'link' => $GLOBALS['ldap_link'],
+                    'base' => $GLOBALS['ldap_base']
+                ];
+            } else {
+                spip_log("connection LDAP $serveur mal definie dans $f");
+            }
+            if (isset($GLOBALS['ldap_champs'])) {
+                $connexion['ldap']['attributes'] = $GLOBALS['ldap_champs'];
+            }
+        } else {
+            spip_log("connection LDAP $serveur inconnue");
+        }
+    }
+
+    return $connexions_ldap[$serveur] = $connexion['ldap'];
 }
 
 /**
@@ -154,52 +154,52 @@ 
  *    Le login trouvé ou chaine vide si non trouvé
  */
 function auth_ldap_search($login, #[\SensitiveParameter] $pass, $checkpass = true, $serveur = '') {
-	// Securite anti-injection et contre un serveur LDAP laxiste
-	$login_search = preg_replace('/[^-@._\s\d\w]/', '', $login);
-	if (!strlen($login_search) || $checkpass && !strlen($pass)) {
-		return '';
-	}
-
-	// verifier la connexion
-	if (!$ldap = auth_ldap_connect($serveur)) {
-		return '';
-	}
-
-	$ldap_link = $ldap['link'] ?? null;
-	$ldap_base = $ldap['base'] ?? null;
-	$desc = empty($ldap['attributes']) ? $GLOBALS['ldap_attributes'] : $ldap['attributes'];
-
-	$logins = is_array($desc['login']) ? $desc['login'] : [$desc['login']];
-
-	// Tenter une recherche pour essayer de retrouver le DN
-	foreach ($logins as $att) {
-		$result = @ldap_search($ldap_link, $ldap_base, "$att=$login_search", ['dn']);
-		$info = @ldap_get_entries($ldap_link, $result);
-		// Ne pas accepter les resultats si plus d'une entree
-		// (on veut un attribut unique)
-
-		if (is_array($info) && $info['count'] == 1) {
-			$dn = $info[0]['dn'];
-			if (!$checkpass) {
-				return $dn;
-			}
-			if (@ldap_bind($ldap_link, $dn, $pass)) {
-				return $dn;
-			}
-		}
-	}
-
-	if ($checkpass && !isset($dn)) {
-		// Si echec, essayer de deviner le DN
-		foreach ($logins as $att) {
-			$dn = "$att=$login_search, $ldap_base";
-			if (@ldap_bind($ldap_link, $dn, $pass)) {
-				return "$att=$login_search, $ldap_base";
-			}
-		}
-	}
-
-	return '';
+    // Securite anti-injection et contre un serveur LDAP laxiste
+    $login_search = preg_replace('/[^-@._\s\d\w]/', '', $login);
+    if (!strlen($login_search) || $checkpass && !strlen($pass)) {
+        return '';
+    }
+
+    // verifier la connexion
+    if (!$ldap = auth_ldap_connect($serveur)) {
+        return '';
+    }
+
+    $ldap_link = $ldap['link'] ?? null;
+    $ldap_base = $ldap['base'] ?? null;
+    $desc = empty($ldap['attributes']) ? $GLOBALS['ldap_attributes'] : $ldap['attributes'];
+
+    $logins = is_array($desc['login']) ? $desc['login'] : [$desc['login']];
+
+    // Tenter une recherche pour essayer de retrouver le DN
+    foreach ($logins as $att) {
+        $result = @ldap_search($ldap_link, $ldap_base, "$att=$login_search", ['dn']);
+        $info = @ldap_get_entries($ldap_link, $result);
+        // Ne pas accepter les resultats si plus d'une entree
+        // (on veut un attribut unique)
+
+        if (is_array($info) && $info['count'] == 1) {
+            $dn = $info[0]['dn'];
+            if (!$checkpass) {
+                return $dn;
+            }
+            if (@ldap_bind($ldap_link, $dn, $pass)) {
+                return $dn;
+            }
+        }
+    }
+
+    if ($checkpass && !isset($dn)) {
+        // Si echec, essayer de deviner le DN
+        foreach ($logins as $att) {
+            $dn = "$att=$login_search, $ldap_base";
+            if (@ldap_bind($ldap_link, $dn, $pass)) {
+                return "$att=$login_search, $ldap_base";
+            }
+        }
+    }
+
+    return '';
 }
 
 /**
@@ -211,40 +211,40 @@ 
  * @return array
  */
 function auth_ldap_retrouver($dn, $desc = [], $serveur = '') {
-	// Lire les infos sur l'utilisateur a partir de son DN depuis LDAP
+    // Lire les infos sur l'utilisateur a partir de son DN depuis LDAP
 
-	if (!$ldap = auth_ldap_connect($serveur)) {
-		spip_log("ldap $serveur injoignable");
+    if (!$ldap = auth_ldap_connect($serveur)) {
+        spip_log("ldap $serveur injoignable");
 
-		return [];
-	}
+        return [];
+    }
 
-	$ldap_link = $ldap['link'];
-	if (!$desc) {
-		$desc = $ldap['attributes'] ?: $GLOBALS['ldap_attributes'];
-		unset($desc['login']);
-	}
-	$result = @ldap_read($ldap_link, $dn, 'objectClass=*', array_values($desc));
+    $ldap_link = $ldap['link'];
+    if (!$desc) {
+        $desc = $ldap['attributes'] ?: $GLOBALS['ldap_attributes'];
+        unset($desc['login']);
+    }
+    $result = @ldap_read($ldap_link, $dn, 'objectClass=*', array_values($desc));
 
-	if (!$result) {
-		return [];
-	}
+    if (!$result) {
+        return [];
+    }
 
-	// Recuperer les donnees du premier (unique?) compte de l'auteur
-	$val = @ldap_get_entries($ldap_link, $result);
-	if (!is_array($val) || !is_array($val[0])) {
-		return [];
-	}
-	$val = $val[0];
+    // Recuperer les donnees du premier (unique?) compte de l'auteur
+    $val = @ldap_get_entries($ldap_link, $result);
+    if (!is_array($val) || !is_array($val[0])) {
+        return [];
+    }
+    $val = $val[0];
 
-	// Convertir depuis UTF-8 (jeu de caracteres par defaut)
-	include_spip('inc/charsets');
+    // Convertir depuis UTF-8 (jeu de caracteres par defaut)
+    include_spip('inc/charsets');
 
-	foreach ($desc as $k => $v) {
-		$desc[$k] = importer_charset($val[strtolower((string) $v)][0], 'utf-8');
-	}
+    foreach ($desc as $k => $v) {
+        $desc[$k] = importer_charset($val[strtolower((string) $v)][0], 'utf-8');
+    }
 
-	return $desc;
+    return $desc;
 }
 
 
@@ -256,7 +256,7 @@ 
  * @return string
  */
 function auth_ldap_retrouver_login($login, $serveur = '') {
-	return auth_ldap_search($login, '', false, $serveur) ? $login : '';
+    return auth_ldap_search($login, '', false, $serveur) ? $login : '';
 }
 
 /**
@@ -276,9 +276,9 @@ 
  *   Message d'erreur si login non valide, chaîne vide sinon
  */
 function auth_ldap_verifier_pass($login, #[\SensitiveParameter] $new_pass, $id_auteur = 0, $serveur = '') {
-	include_spip('auth/spip');
+    include_spip('auth/spip');
 
-	return auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur);
+    return auth_spip_verifier_pass($login, $new_pass, $id_auteur, $serveur);
 }
 
 /**
@@ -299,7 +299,7 @@ 
  *   ```
  */
 function auth_ldap_autoriser_modifier_pass($serveur = '') {
-	return true;
+    return true;
 }
 
 /**
@@ -317,22 +317,22 @@ 
  *    Informe du succès ou de l'echec du changement du mot de passe
  */
 function auth_ldap_modifier_pass($login, #[\SensitiveParameter] $new_pass, $id_auteur, $serveur = '') {
-	if (is_null($new_pass) || auth_ldap_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
-		return false;
-	}
-	if (!$ldap = auth_ldap_connect($serveur)) {
-		return false;
-	}
-	$link = $ldap['link'];
-	include_spip('inc/session');
-	$dn = session_get('ldap_dn');
-	if ('' == $dn) {
-		return false;
-	}
-	if (!ldap_bind($link, $dn, session_get('ldap_password'))) {
-		return false;
-	}
-	$encoded_pass = '{MD5}' . base64_encode(pack('H*', md5((string) $new_pass)));
-
-	return ldap_mod_replace($link, $dn, ['userPassword' => $encoded_pass]);
+    if (is_null($new_pass) || auth_ldap_verifier_pass($login, $new_pass, $id_auteur, $serveur) != '') {
+        return false;
+    }
+    if (!$ldap = auth_ldap_connect($serveur)) {
+        return false;
+    }
+    $link = $ldap['link'];
+    include_spip('inc/session');
+    $dn = session_get('ldap_dn');
+    if ('' == $dn) {
+        return false;
+    }
+    if (!ldap_bind($link, $dn, session_get('ldap_password'))) {
+        return false;
+    }
+    $encoded_pass = '{MD5}' . base64_encode(pack('H*', md5((string) $new_pass)));
+
+    return ldap_mod_replace($link, $dn, ['userPassword' => $encoded_pass]);
 }

ecrire/iterateur/data.php

Indentation +124 added lines, -124 removed lines

@@ -18,11 +18,11 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 if (!defined('_DATA_SOURCE_MAX_SIZE')) {
-	define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
+    define('_DATA_SOURCE_MAX_SIZE', 2 * 1_048_576);
 }
 
 
@@ -43,17 +43,17 @@ 
  *     Description de la boucle complétée des champs
  */
 function iterateur_DATA_dist($b) {
-	$b->iterateur = 'DATA'; # designe la classe d'iterateur
-	$b->show = [
-		'field' => [
-			'cle' => 'STRING',
-			'valeur' => 'STRING',
-			'*' => 'ALL' // Champ joker *
-		]
-	];
-	$b->select[] = '.valeur';
-
-	return $b;
+    $b->iterateur = 'DATA'; # designe la classe d'iterateur
+    $b->show = [
+        'field' => [
+            'cle' => 'STRING',
+            'valeur' => 'STRING',
+            '*' => 'ALL' // Champ joker *
+        ]
+    ];
+    $b->select[] = '.valeur';
+
+    return $b;
 }
 
 
@@ -68,7 +68,7 @@ 
  * @return array
  */
 function inc_file_to_array_dist($data) {
-	return preg_split('/\r?\n/', $data);
+    return preg_split('/\r?\n/', $data);
 }
 
 /**
@@ -77,9 +77,9 @@ 
  * @return array
  */
 function inc_plugins_to_array_dist() {
-	include_spip('inc/plugin');
+    include_spip('inc/plugin');
 
-	return liste_chemin_plugin_actifs();
+    return liste_chemin_plugin_actifs();
 }
 
 /**
@@ -89,7 +89,7 @@ 
  * @return array
  */
 function inc_xml_to_array_dist($data) {
-	return @XMLObjectToArray(new SimpleXmlIterator($data));
+    return @XMLObjectToArray(new SimpleXmlIterator($data));
 }
 
 /**
@@ -101,14 +101,14 @@ 
  *
  */
 function inc_object_to_array($object) {
-	if (!is_object($object) && !is_array($object)) {
-		return $object;
-	}
-	if (is_object($object)) {
-		$object = get_object_vars($object);
-	}
-
-	return array_map('inc_object_to_array', $object);
+    if (!is_object($object) && !is_array($object)) {
+        return $object;
+    }
+    if (is_object($object)) {
+        $object = get_object_vars($object);
+    }
+
+    return array_map('inc_object_to_array', $object);
 }
 
 /**
@@ -118,20 +118,20 @@ 
  * @return array|bool
  */
 function inc_sql_to_array_dist($data) {
-	# sortir le connecteur de $data
-	preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
-	$serveur = (string)$v[1];
-	$req = trim($v[2]);
-	if ($s = sql_query($req, $serveur)) {
-		$r = [];
-		while ($t = sql_fetch($s)) {
-			$r[] = $t;
-		}
-
-		return $r;
-	}
-
-	return false;
+    # sortir le connecteur de $data
+    preg_match(',^(?:(\w+):)?(.*)$,Sm', $data, $v);
+    $serveur = (string)$v[1];
+    $req = trim($v[2]);
+    if ($s = sql_query($req, $serveur)) {
+        $r = [];
+        while ($t = sql_fetch($s)) {
+            $r[] = $t;
+        }
+
+        return $r;
+    }
+
+    return false;
 }
 
 /**
@@ -141,13 +141,13 @@ 
  * @return array|bool
  */
 function inc_json_to_array_dist($data) {
-	try {
-		$json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
-	} catch (JsonException $e) {
-		$json = null;
-		spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
-	}
-	return is_array($json) ? (array) $json : [];
+    try {
+        $json = json_decode($data, true, 512, JSON_THROW_ON_ERROR);
+    } catch (JsonException $e) {
+        $json = null;
+        spip_log('Failed to parse Json data : ' . $e->getMessage(), _LOG_INFO);
+    }
+    return is_array($json) ? (array) $json : [];
 }
 
 /**
@@ -157,30 +157,30 @@ 
  * @return array|bool
  */
 function inc_csv_to_array_dist($data) {
-	include_spip('inc/csv');
-	[$entete, $csv] = analyse_csv($data);
-	array_unshift($csv, $entete);
-
-	include_spip('inc/charsets');
-	$i = 1;
-	foreach ($entete as $k => $v) {
-		if (trim((string) $v) == '') {
-			$v = 'col' . $i;
-		} // reperer des eventuelles cases vides
-		if (is_numeric($v) && $v < 0) {
-			$v = '__' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		if (is_numeric($v)) {
-			$v = '_' . $v;
-		} // ne pas risquer d'ecraser une cle numerique
-		$v = strtolower(preg_replace(',\W+,', '_', (string) translitteration($v)));
-		foreach ($csv as &$item) {
-			$item[$v] = &$item[$k];
-		}
-		$i++;
-	}
-
-	return $csv;
+    include_spip('inc/csv');
+    [$entete, $csv] = analyse_csv($data);
+    array_unshift($csv, $entete);
+
+    include_spip('inc/charsets');
+    $i = 1;
+    foreach ($entete as $k => $v) {
+        if (trim((string) $v) == '') {
+            $v = 'col' . $i;
+        } // reperer des eventuelles cases vides
+        if (is_numeric($v) && $v < 0) {
+            $v = '__' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        if (is_numeric($v)) {
+            $v = '_' . $v;
+        } // ne pas risquer d'ecraser une cle numerique
+        $v = strtolower(preg_replace(',\W+,', '_', (string) translitteration($v)));
+        foreach ($csv as &$item) {
+            $item[$v] = &$item[$k];
+        }
+        $i++;
+    }
+
+    return $csv;
 }
 
 /**
@@ -190,13 +190,13 @@ 
  * @return array|bool
  */
 function inc_rss_to_array_dist($data) {
-	$tableau = null;
-	include_spip('inc/syndic');
-	if (is_array($rss = analyser_backend($data))) {
-		$tableau = $rss;
-	}
+    $tableau = null;
+    include_spip('inc/syndic');
+    if (is_array($rss = analyser_backend($data))) {
+        $tableau = $rss;
+    }
 
-	return $tableau;
+    return $tableau;
 }
 
 /**
@@ -206,9 +206,9 @@ 
  * @return array|bool
  */
 function inc_atom_to_array_dist($data) {
-	$rss_to_array = charger_fonction('rss_to_array', 'inc');
+    $rss_to_array = charger_fonction('rss_to_array', 'inc');
 
-	return $rss_to_array($data);
+    return $rss_to_array($data);
 }
 
 /**
@@ -219,12 +219,12 @@ 
  * @return array|bool
  */
 function inc_glob_to_array_dist($data) {
-	$a = glob(
-		$data,
-		GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
-	);
+    $a = glob(
+        $data,
+        GLOB_MARK | GLOB_NOSORT | GLOB_BRACE
+    );
 
-	return $a ?: [];
+    return $a ?: [];
 }
 
 /**
@@ -235,14 +235,14 @@ 
  * @throws Exception
  */
 function inc_yaml_to_array_dist($data) {
-	include_spip('inc/yaml-mini');
-	if (!function_exists('yaml_decode')) {
-		throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
+    include_spip('inc/yaml-mini');
+    if (!function_exists('yaml_decode')) {
+        throw new Exception('YAML: impossible de trouver la fonction yaml_decode');
 
-		return false;
-	}
+        return false;
+    }
 
-	return yaml_decode($data);
+    return yaml_decode($data);
 }
 
 
@@ -257,7 +257,7 @@ 
  * @return array|bool
  */
 function inc_pregfiles_to_array_dist($dir, $regexp = -1, $limit = 10000) {
-	return (array)preg_files($dir, $regexp, $limit);
+    return (array)preg_files($dir, $regexp, $limit);
 }
 
 /**
@@ -269,23 +269,23 @@ 
  * @return array|bool
  */
 function inc_ls_to_array_dist($data) {
-	$glob_to_array = charger_fonction('glob_to_array', 'inc');
-	$a = $glob_to_array($data);
-	foreach ($a as &$v) {
-		$b = (array)@stat($v);
-		foreach (array_keys($b) as $k) {
-			if (is_numeric($k)) {
-				unset($b[$k]);
-			}
-		}
-		$b['file'] = preg_replace('`/$`', '', (string) $v) ;
-		$v = array_merge(
-			pathinfo((string) $v),
-			$b
-		);
-	}
-
-	return $a;
+    $glob_to_array = charger_fonction('glob_to_array', 'inc');
+    $a = $glob_to_array($data);
+    foreach ($a as &$v) {
+        $b = (array)@stat($v);
+        foreach (array_keys($b) as $k) {
+            if (is_numeric($k)) {
+                unset($b[$k]);
+            }
+        }
+        $b['file'] = preg_replace('`/$`', '', (string) $v) ;
+        $v = array_merge(
+            pathinfo((string) $v),
+            $b
+        );
+    }
+
+    return $a;
 }
 
 /**
@@ -295,21 +295,21 @@ 
  * @return array|bool
  */
 function XMLObjectToArray($object) {
-	$xml_array = [];
-	for ($object->rewind(); $object->valid(); $object->next()) {
-		if (array_key_exists($key = $object->key(), $xml_array)) {
-			$key .= '-' . uniqid();
-		}
-		$vars = get_object_vars($object->current());
-		if (isset($vars['@attributes'])) {
-			foreach ($vars['@attributes'] as $k => $v) {
-				$xml_array[$key][$k] = $v;
-			}
-		}
-		$xml_array[$key][] = $object->hasChildren()
-			? XMLObjectToArray($object->current())
-			: (string) $object->current();
-	}
-
-	return $xml_array;
+    $xml_array = [];
+    for ($object->rewind(); $object->valid(); $object->next()) {
+        if (array_key_exists($key = $object->key(), $xml_array)) {
+            $key .= '-' . uniqid();
+        }
+        $vars = get_object_vars($object->current());
+        if (isset($vars['@attributes'])) {
+            foreach ($vars['@attributes'] as $k => $v) {
+                $xml_array[$key][$k] = $v;
+            }
+        }
+        $xml_array[$key][] = $object->hasChildren()
+            ? XMLObjectToArray($object->current())
+            : (string) $object->current();
+    }
+
+    return $xml_array;
 }

ecrire/inc/csv.php

Indentation +107 added lines, -107 removed lines

@@ -16,7 +16,7 @@ 
  */
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -32,117 +32,117 @@ 
  **/
 function analyse_csv($t) {
 
-	// Quel est le séparateur ?
-	$virg = substr_count($t, ',');
-	$pvirg = substr_count($t, ';');
-	$tab = substr_count($t, "\t");
-	if ($virg > $pvirg) {
-		$sep = ',';
-		$hs = ',';
-	} else {
-		$sep = ';';
-		$hs = '&#59;';
-		$virg = $pvirg;
-	}
-	// un certain nombre de tab => le séparateur est tab
-	if ($tab > $virg / 10) {
-		$sep = "\t";
-		$hs = "\t";
-	}
+    // Quel est le séparateur ?
+    $virg = substr_count($t, ',');
+    $pvirg = substr_count($t, ';');
+    $tab = substr_count($t, "\t");
+    if ($virg > $pvirg) {
+        $sep = ',';
+        $hs = ',';
+    } else {
+        $sep = ';';
+        $hs = '&#59;';
+        $virg = $pvirg;
+    }
+    // un certain nombre de tab => le séparateur est tab
+    if ($tab > $virg / 10) {
+        $sep = "\t";
+        $hs = "\t";
+    }
 
-	// un separateur suivi de 3 guillemets attention !
-	// attention au ; ou , suceptible d'etre confondu avec un separateur
-	// on substitue un # et on remplacera a la fin
-	$t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
-	$t = str_replace('""', '&#34#', $t);
-	preg_match_all('/"[^"]*"/', $t, $r);
-	foreach ($r[0] as $cell) {
-		$t = str_replace(
-			$cell,
-			str_replace(
-				$sep,
-				$hs,
-				str_replace(
-					"\n",
-					'``**``', // échapper les saut de lignes, on les remettra après.
-					substr((string) $cell, 1, -1)
-				)
-			),
-			$t
-		);
-	}
+    // un separateur suivi de 3 guillemets attention !
+    // attention au ; ou , suceptible d'etre confondu avec un separateur
+    // on substitue un # et on remplacera a la fin
+    $t = preg_replace("/([\n$sep])\"\"\"/", '\\1"&#34#', $t);
+    $t = str_replace('""', '&#34#', $t);
+    preg_match_all('/"[^"]*"/', $t, $r);
+    foreach ($r[0] as $cell) {
+        $t = str_replace(
+            $cell,
+            str_replace(
+                $sep,
+                $hs,
+                str_replace(
+                    "\n",
+                    '``**``', // échapper les saut de lignes, on les remettra après.
+                    substr((string) $cell, 1, -1)
+                )
+            ),
+            $t
+        );
+    }
 
-	$t = preg_replace(
-		'/\r?\n/',
-		"\n",
-		preg_replace('/[\r\n]+/', "\n", $t)
-	);
+    $t = preg_replace(
+        '/\r?\n/',
+        "\n",
+        preg_replace('/[\r\n]+/', "\n", $t)
+    );
 
-	[$entete, $corps] = explode("\n", $t, 2);
-	$caption = '';
-	// sauter la ligne de tete formee seulement de separateurs
-	if (substr_count($entete, $sep) === strlen($entete)) {
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si une seule colonne, en faire le titre
-	if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
-		$caption = "\n||" . $l[1] . '|';
-		[$entete, $corps] = explode("\n", $corps, 2);
-	}
-	// si premiere colonne vide, le raccourci doit quand meme produire <th...
-	if ($entete[0] == $sep) {
-		$entete = ' ' . $entete;
-	}
+    [$entete, $corps] = explode("\n", $t, 2);
+    $caption = '';
+    // sauter la ligne de tete formee seulement de separateurs
+    if (substr_count($entete, $sep) === strlen($entete)) {
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si une seule colonne, en faire le titre
+    if (preg_match("/^([^$sep]+)$sep+\$/", $entete, $l)) {
+        $caption = "\n||" . $l[1] . '|';
+        [$entete, $corps] = explode("\n", $corps, 2);
+    }
+    // si premiere colonne vide, le raccourci doit quand meme produire <th...
+    if ($entete[0] == $sep) {
+        $entete = ' ' . $entete;
+    }
 
-	$lignes = explode("\n", $corps);
+    $lignes = explode("\n", $corps);
 
-	// retrait des lignes vides finales
-	while (
-		$lignes !== [] && preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
-	) {
-		unset($lignes[count($lignes) - 1]);
-	}
-	//  calcul du  nombre de colonne a chaque ligne
-	$nbcols = [];
-	$max = $mil = substr_count($entete, $sep);
-	foreach ($lignes as $k => $v) {
-		if ($max !== ($nbcols[$k] = substr_count($v, $sep))) {
-			if ($max > $nbcols[$k]) {
-				$mil = $nbcols[$k];
-			} else {
-				$mil = $max;
-				$max = $nbcols[$k];
-			}
-		}
-	}
-	// Si pas le meme nombre, cadrer au nombre max
-	if ($mil !== $max) {
-		foreach ($nbcols as $k => $v) {
-			if ($v < $max) {
-				$lignes[$k] .= str_repeat($sep, $max - $v);
-			}
-		}
-	}
-	// et retirer les colonnes integralement vides
-	while (true) {
-		$nbcols = ($entete[strlen($entete) - 1] === $sep);
-		foreach ($lignes as $v) {
-			$nbcols &= ($v[strlen($v) - 1] === $sep);
-		}
-		if (!$nbcols) {
-			break;
-		}
-		$entete = substr($entete, 0, -1);
-		foreach ($lignes as $k => $v) {
-			$lignes[$k] = substr($v, 0, -1);
-		}
-	}
+    // retrait des lignes vides finales
+    while (
+        $lignes !== [] && preg_match("/^$sep*$/", $lignes[count($lignes) - 1])
+    ) {
+        unset($lignes[count($lignes) - 1]);
+    }
+    //  calcul du  nombre de colonne a chaque ligne
+    $nbcols = [];
+    $max = $mil = substr_count($entete, $sep);
+    foreach ($lignes as $k => $v) {
+        if ($max !== ($nbcols[$k] = substr_count($v, $sep))) {
+            if ($max > $nbcols[$k]) {
+                $mil = $nbcols[$k];
+            } else {
+                $mil = $max;
+                $max = $nbcols[$k];
+            }
+        }
+    }
+    // Si pas le meme nombre, cadrer au nombre max
+    if ($mil !== $max) {
+        foreach ($nbcols as $k => $v) {
+            if ($v < $max) {
+                $lignes[$k] .= str_repeat($sep, $max - $v);
+            }
+        }
+    }
+    // et retirer les colonnes integralement vides
+    while (true) {
+        $nbcols = ($entete[strlen($entete) - 1] === $sep);
+        foreach ($lignes as $v) {
+            $nbcols &= ($v[strlen($v) - 1] === $sep);
+        }
+        if (!$nbcols) {
+            break;
+        }
+        $entete = substr($entete, 0, -1);
+        foreach ($lignes as $k => $v) {
+            $lignes[$k] = substr($v, 0, -1);
+        }
+    }
 
-	foreach ($lignes as &$l) {
-		$l = str_replace('&#34#', '"', $l);
-		$l = str_replace('``**``', "\n", $l);
-		$l = explode($sep, $l);
-	}
+    foreach ($lignes as &$l) {
+        $l = str_replace('&#34#', '"', $l);
+        $l = str_replace('``**``', "\n", $l);
+        $l = explode($sep, $l);
+    }
 
-	return [explode($sep, $entete), $lignes, $caption];
+    return [explode($sep, $entete), $lignes, $caption];
 }

ecrire/inc/modifier.php

Indentation +278 added lines, -278 removed lines

@@ -16,7 +16,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -38,28 +38,28 @@ 
  *     Tableau des champs et valeurs collectées
  */
 function collecter_requests($include_list, $exclude_list = [], $set = null, $tous = false) {
-	$c = $set;
-	if (!$c) {
-		$c = [];
-		foreach ($include_list as $champ) {
-			// on ne collecte que les champs reellement envoyes par defaut.
-			// le cas d'un envoi de valeur NULL peut du coup poser probleme.
-			$val = _request($champ);
-			if ($tous || $val !== null) {
-				$c[$champ] = $val;
-			}
-		}
-		// on ajoute toujours la lang en saisie possible
-		// meme si pas prevu au depart pour l'objet concerne
-		if ($l = _request('changer_lang')) {
-			$c['lang'] = $l;
-		}
-	}
-	foreach ($exclude_list as $champ) {
-		unset($c[$champ]);
-	}
-
-	return $c;
+    $c = $set;
+    if (!$c) {
+        $c = [];
+        foreach ($include_list as $champ) {
+            // on ne collecte que les champs reellement envoyes par defaut.
+            // le cas d'un envoi de valeur NULL peut du coup poser probleme.
+            $val = _request($champ);
+            if ($tous || $val !== null) {
+                $c[$champ] = $val;
+            }
+        }
+        // on ajoute toujours la lang en saisie possible
+        // meme si pas prevu au depart pour l'objet concerne
+        if ($l = _request('changer_lang')) {
+            $c['lang'] = $l;
+        }
+    }
+    foreach ($exclude_list as $champ) {
+        unset($c[$champ]);
+    }
+
+    return $c;
 }
 
 /**
@@ -96,259 +96,259 @@ 
  *     - chaîne : texte d'un message d'erreur
  */
 function objet_modifier_champs($objet, $id_objet, $options, $c = null, $serveur = '') {
-	if (!$id_objet = (int) $id_objet) {
-		spip_log('Erreur $id_objet non defini', 'warn');
-
-		return _T('erreur_technique_enregistrement_impossible');
-	}
-
-	include_spip('inc/filtres');
-
-	$table_objet = table_objet($objet, $serveur);
-	$spip_table_objet = table_objet_sql($objet, $serveur);
-	$id_table_objet = id_table_objet($objet, $serveur);
-	$trouver_table = charger_fonction('trouver_table', 'base');
-	$desc = $trouver_table($spip_table_objet, $serveur);
-
-	// Appels incomplets (sans $c)
-	if (!is_array($c)) {
-		spip_log('erreur appel objet_modifier_champs(' . $objet . '), manque $c');
-
-		return _T('erreur_technique_enregistrement_impossible');
-	}
-
-	// Securite : certaines variables ne sont jamais acceptees ici
-	// car elles ne relevent pas de autoriser(xxx, modifier) ;
-	// il faut passer par instituer_XX()
-	// TODO: faut-il passer ces variables interdites
-	// dans un fichier de description separe ?
-	unset($c['statut']);
-	unset($c['id_parent']);
-	unset($c['id_rubrique']);
-	unset($c['id_secteur']);
-
-	// Gerer les champs non vides
-	if (isset($options['nonvide']) && is_array($options['nonvide'])) {
-		foreach ($options['nonvide'] as $champ => $sinon) {
-			if (isset($c[$champ]) && $c[$champ] === '') {
-				$c[$champ] = $sinon;
-			}
-		}
-	}
-
-	// N'accepter que les champs qui existent dans la table
-	$champs = array_intersect_key($c, $desc['field']);
-	// et dont la valeur n'est pas null
-	$champs = array_filter($champs, static fn($var) => $var !== null);
-	// TODO: ici aussi on peut valider les contenus
-	// en fonction du type
-
-	// Nettoyer les valeurs
-	$champs = array_map('corriger_caracteres', $champs);
-
-	// On récupère l'état avant toute modification
-	$row = sql_fetsel('*', $spip_table_objet, $id_table_objet . '=' . $id_objet);
-
-	// Envoyer aux plugins
-	$champs = pipeline(
-		'pre_edition',
-		[
-			'args' => [
-				'table' => $spip_table_objet, // compatibilite
-				'table_objet' => $table_objet,
-				'spip_table_objet' => $spip_table_objet,
-				'desc' => $desc,
-				'type' => $objet,
-				'id_objet' => $id_objet,
-				'data' => $options['data'] ?? null,
-				'champs' => $options['champs'] ?? [], // [doc] c'est quoi ?
-				'champs_anciens' => $row, // état du contenu avant modif
-				'serveur' => $serveur,
-				'action' => $options['action'] ?? 'modifier'
-			],
-			'data' => $champs
-		]
-	);
-
-	if (!$champs) {
-		return false;
-	}
-
-
-	// marquer le fait que l'objet est travaille par toto a telle date
-	include_spip('inc/config');
-	if (lire_config('articles_modif', 'non') !== 'non') {
-		include_spip('inc/drapeau_edition');
-		signale_edition($id_objet, $GLOBALS['visiteur_session'], $objet);
-	}
-
-	// Verifier si les mises a jour sont pertinentes, datees, en conflit etc
-	include_spip('inc/editer');
-	if (!isset($options['data']) || is_null($options['data'])) {
-		$options['data'] = &$_POST;
-	}
-	$conflits = controler_md5($champs, $options['data'], $objet, $id_objet, $serveur);
-	// cas hypothetique : normalement inc/editer verifie en amont le conflit edition
-	// et gere l'interface
-	// ici on ne renvoie donc qu'un messsage d'erreur, au cas ou on y arrive quand meme
-	if ($conflits) {
-		return _T('titre_conflit_edition');
-	}
-
-	if ($champs) {
-		// cas particulier de la langue : passer par instituer_langue_objet
-		if (isset($champs['lang'])) {
-			if ($changer_lang = $champs['lang']) {
-				$id_rubrique = 0;
-				if (isset($desc['field']['id_rubrique'])) {
-					$parent = ($objet == 'rubrique') ? 'id_parent' : 'id_rubrique';
-					$id_rubrique = sql_getfetsel($parent, $spip_table_objet, "$id_table_objet=" . (int) $id_objet);
-				}
-				$instituer_langue_objet = charger_fonction('instituer_langue_objet', 'action');
-				$champs['lang'] = $instituer_langue_objet($objet, $id_objet, $id_rubrique, $changer_lang, $serveur);
-			}
-			// on laisse 'lang' dans $champs,
-			// ca permet de passer dans le pipeline post_edition et de journaliser
-			// et ca ne gene pas qu'on refasse un sql_updateq dessus apres l'avoir
-			// deja pris en compte
-		}
-
-		// la modif peut avoir lieu
-
-		// faut-il ajouter date_modif ?
-		if (
-			!empty($options['date_modif']) && !isset($champs[$options['date_modif']])
-		) {
-			$champs[$options['date_modif']] = date('Y-m-d H:i:s');
-		}
-
-		// allez on commit la modif
-		sql_updateq($spip_table_objet, $champs, "$id_table_objet=" . (int) $id_objet, [], $serveur);
-
-		// on verifie si elle est bien passee
-		$moof = sql_fetsel(
-			array_keys($champs),
-			$spip_table_objet,
-			"$id_table_objet=" . (int) $id_objet,
-			[],
-			[],
-			'',
-			[],
-			$serveur
-		);
-		// si difference entre les champs, reperer les champs mal enregistres
-		if ($moof != $champs) {
-			$liste = [];
-			foreach ($moof as $k => $v) {
-				if (
-					$v !== $champs[$k]
-					// ne pas alerter si le champ est numerique est que les valeurs sont equivalentes
-					&& (!is_numeric($v) || (int) $v !== (int) $champs[$k])
-					// ne pas alerter si le champ est date, qu'on a envoye une valeur vide et qu'on recupere une date nulle
-					&& (strlen((string) $champs[$k]) || !in_array($v, ['0000-00-00 00:00:00', '0000-00-00']))
-				) {
-					$liste[] = $k;
-					$conflits[$k]['post'] = $champs[$k];
-					$conflits[$k]['save'] = $v;
-
-					// cas specifique MySQL+emoji : si l'un est la
-					// conversion utf8_noplanes de l'autre alors c'est OK
-					if (defined('_MYSQL_NOPLANES') && _MYSQL_NOPLANES) {
-						include_spip('inc/charsets');
-						if ($v == utf8_noplanes($champs[$k])) {
-							array_pop($liste);
-						}
-					}
-				}
-			}
-			// si un champ n'a pas ete correctement enregistre, loger et retourner une erreur
-			// c'est un cas exceptionnel
-			if ($liste !== []) {
-				spip_log(
-					"Erreur enregistrement en base $objet/$id_objet champs :" . var_export($conflits, true),
-					'modifier.' . _LOG_CRITIQUE
-				);
-
-				return _T(
-					'erreur_technique_enregistrement_champs',
-					['champs' => "<i>'" . implode("'</i>,<i>'", $liste) . "'</i>"]
-				);
-			}
-		}
-
-		// Invalider les caches
-		if (isset($options['invalideur']) && $options['invalideur']) {
-			include_spip('inc/invalideur');
-			if (is_array($options['invalideur'])) {
-				array_map('suivre_invalideur', $options['invalideur']);
-			} else {
-				suivre_invalideur($options['invalideur']);
-			}
-		}
-
-		// Notifications, gestion des revisions...
-		// en standard, appelle |nouvelle_revision ci-dessous
-		pipeline(
-			'post_edition',
-			[
-				'args' => [
-					'table' => $spip_table_objet,
-					'table_objet' => $table_objet,
-					'spip_table_objet' => $spip_table_objet,
-					'desc' => $desc,
-					'type' => $objet,
-					'id_objet' => $id_objet,
-					'champs' => $options['champs'] ?? [], // [doc] kesako ?
-					'champs_anciens' => $row, // état du contenu avant modif
-					'serveur' => $serveur,
-					'action' => $options['action'] ?? 'modifier'
-				],
-				'data' => $champs
-			]
-		);
-	}
-
-	// Appeler une notification
-	if ($notifications = charger_fonction('notifications', 'inc')) {
-		$notifications(
-			"{$objet}_modifier",
-			$id_objet,
-			[
-				'champs' => $champs,
-			]
-		);
-		$notifications(
-			'objet_modifier',
-			$id_objet,
-			[
-				'objet' => $objet,
-				'id_objet' => $id_objet,
-				'champs' => $champs,
-			]
-		);
-	}
-
-	// journaliser l'affaire
-	// message a affiner :-)
-	include_spip('inc/filtres_mini');
-	$qui = '';
-	if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
-		$qui .= ' #id_auteur:' . $GLOBALS['visiteur_session']['id_auteur'] . '#';
-	}
-	if (!empty($GLOBALS['visiteur_session']['nom'])) {
-		$qui .= ' #nom:' . $GLOBALS['visiteur_session']['nom'] . '#';
-	}
-	if ($qui == '') {
-		$qui = '#ip:' . $GLOBALS['ip'] . '#';
-	}
-	journal(_L($qui . ' a édité ' . $objet . ' ' . $id_objet . ' (' . implode(
-		'+',
-		array_diff(array_keys($champs), ['date_modif'])
-	) . ')'), [
-		'faire' => 'modifier',
-		'quoi' => $objet,
-		'id' => $id_objet
-	]);
-
-	return '';
+    if (!$id_objet = (int) $id_objet) {
+        spip_log('Erreur $id_objet non defini', 'warn');
+
+        return _T('erreur_technique_enregistrement_impossible');
+    }
+
+    include_spip('inc/filtres');
+
+    $table_objet = table_objet($objet, $serveur);
+    $spip_table_objet = table_objet_sql($objet, $serveur);
+    $id_table_objet = id_table_objet($objet, $serveur);
+    $trouver_table = charger_fonction('trouver_table', 'base');
+    $desc = $trouver_table($spip_table_objet, $serveur);
+
+    // Appels incomplets (sans $c)
+    if (!is_array($c)) {
+        spip_log('erreur appel objet_modifier_champs(' . $objet . '), manque $c');
+
+        return _T('erreur_technique_enregistrement_impossible');
+    }
+
+    // Securite : certaines variables ne sont jamais acceptees ici
+    // car elles ne relevent pas de autoriser(xxx, modifier) ;
+    // il faut passer par instituer_XX()
+    // TODO: faut-il passer ces variables interdites
+    // dans un fichier de description separe ?
+    unset($c['statut']);
+    unset($c['id_parent']);
+    unset($c['id_rubrique']);
+    unset($c['id_secteur']);
+
+    // Gerer les champs non vides
+    if (isset($options['nonvide']) && is_array($options['nonvide'])) {
+        foreach ($options['nonvide'] as $champ => $sinon) {
+            if (isset($c[$champ]) && $c[$champ] === '') {
+                $c[$champ] = $sinon;
+            }
+        }
+    }
+
+    // N'accepter que les champs qui existent dans la table
+    $champs = array_intersect_key($c, $desc['field']);
+    // et dont la valeur n'est pas null
+    $champs = array_filter($champs, static fn($var) => $var !== null);
+    // TODO: ici aussi on peut valider les contenus
+    // en fonction du type
+
+    // Nettoyer les valeurs
+    $champs = array_map('corriger_caracteres', $champs);
+
+    // On récupère l'état avant toute modification
+    $row = sql_fetsel('*', $spip_table_objet, $id_table_objet . '=' . $id_objet);
+
+    // Envoyer aux plugins
+    $champs = pipeline(
+        'pre_edition',
+        [
+            'args' => [
+                'table' => $spip_table_objet, // compatibilite
+                'table_objet' => $table_objet,
+                'spip_table_objet' => $spip_table_objet,
+                'desc' => $desc,
+                'type' => $objet,
+                'id_objet' => $id_objet,
+                'data' => $options['data'] ?? null,
+                'champs' => $options['champs'] ?? [], // [doc] c'est quoi ?
+                'champs_anciens' => $row, // état du contenu avant modif
+                'serveur' => $serveur,
+                'action' => $options['action'] ?? 'modifier'
+            ],
+            'data' => $champs
+        ]
+    );
+
+    if (!$champs) {
+        return false;
+    }
+
+
+    // marquer le fait que l'objet est travaille par toto a telle date
+    include_spip('inc/config');
+    if (lire_config('articles_modif', 'non') !== 'non') {
+        include_spip('inc/drapeau_edition');
+        signale_edition($id_objet, $GLOBALS['visiteur_session'], $objet);
+    }
+
+    // Verifier si les mises a jour sont pertinentes, datees, en conflit etc
+    include_spip('inc/editer');
+    if (!isset($options['data']) || is_null($options['data'])) {
+        $options['data'] = &$_POST;
+    }
+    $conflits = controler_md5($champs, $options['data'], $objet, $id_objet, $serveur);
+    // cas hypothetique : normalement inc/editer verifie en amont le conflit edition
+    // et gere l'interface
+    // ici on ne renvoie donc qu'un messsage d'erreur, au cas ou on y arrive quand meme
+    if ($conflits) {
+        return _T('titre_conflit_edition');
+    }
+
+    if ($champs) {
+        // cas particulier de la langue : passer par instituer_langue_objet
+        if (isset($champs['lang'])) {
+            if ($changer_lang = $champs['lang']) {
+                $id_rubrique = 0;
+                if (isset($desc['field']['id_rubrique'])) {
+                    $parent = ($objet == 'rubrique') ? 'id_parent' : 'id_rubrique';
+                    $id_rubrique = sql_getfetsel($parent, $spip_table_objet, "$id_table_objet=" . (int) $id_objet);
+                }
+                $instituer_langue_objet = charger_fonction('instituer_langue_objet', 'action');
+                $champs['lang'] = $instituer_langue_objet($objet, $id_objet, $id_rubrique, $changer_lang, $serveur);
+            }
+            // on laisse 'lang' dans $champs,
+            // ca permet de passer dans le pipeline post_edition et de journaliser
+            // et ca ne gene pas qu'on refasse un sql_updateq dessus apres l'avoir
+            // deja pris en compte
+        }
+
+        // la modif peut avoir lieu
+
+        // faut-il ajouter date_modif ?
+        if (
+            !empty($options['date_modif']) && !isset($champs[$options['date_modif']])
+        ) {
+            $champs[$options['date_modif']] = date('Y-m-d H:i:s');
+        }
+
+        // allez on commit la modif
+        sql_updateq($spip_table_objet, $champs, "$id_table_objet=" . (int) $id_objet, [], $serveur);
+
+        // on verifie si elle est bien passee
+        $moof = sql_fetsel(
+            array_keys($champs),
+            $spip_table_objet,
+            "$id_table_objet=" . (int) $id_objet,
+            [],
+            [],
+            '',
+            [],
+            $serveur
+        );
+        // si difference entre les champs, reperer les champs mal enregistres
+        if ($moof != $champs) {
+            $liste = [];
+            foreach ($moof as $k => $v) {
+                if (
+                    $v !== $champs[$k]
+                    // ne pas alerter si le champ est numerique est que les valeurs sont equivalentes
+                    && (!is_numeric($v) || (int) $v !== (int) $champs[$k])
+                    // ne pas alerter si le champ est date, qu'on a envoye une valeur vide et qu'on recupere une date nulle
+                    && (strlen((string) $champs[$k]) || !in_array($v, ['0000-00-00 00:00:00', '0000-00-00']))
+                ) {
+                    $liste[] = $k;
+                    $conflits[$k]['post'] = $champs[$k];
+                    $conflits[$k]['save'] = $v;
+
+                    // cas specifique MySQL+emoji : si l'un est la
+                    // conversion utf8_noplanes de l'autre alors c'est OK
+                    if (defined('_MYSQL_NOPLANES') && _MYSQL_NOPLANES) {
+                        include_spip('inc/charsets');
+                        if ($v == utf8_noplanes($champs[$k])) {
+                            array_pop($liste);
+                        }
+                    }
+                }
+            }
+            // si un champ n'a pas ete correctement enregistre, loger et retourner une erreur
+            // c'est un cas exceptionnel
+            if ($liste !== []) {
+                spip_log(
+                    "Erreur enregistrement en base $objet/$id_objet champs :" . var_export($conflits, true),
+                    'modifier.' . _LOG_CRITIQUE
+                );
+
+                return _T(
+                    'erreur_technique_enregistrement_champs',
+                    ['champs' => "<i>'" . implode("'</i>,<i>'", $liste) . "'</i>"]
+                );
+            }
+        }
+
+        // Invalider les caches
+        if (isset($options['invalideur']) && $options['invalideur']) {
+            include_spip('inc/invalideur');
+            if (is_array($options['invalideur'])) {
+                array_map('suivre_invalideur', $options['invalideur']);
+            } else {
+                suivre_invalideur($options['invalideur']);
+            }
+        }
+
+        // Notifications, gestion des revisions...
+        // en standard, appelle |nouvelle_revision ci-dessous
+        pipeline(
+            'post_edition',
+            [
+                'args' => [
+                    'table' => $spip_table_objet,
+                    'table_objet' => $table_objet,
+                    'spip_table_objet' => $spip_table_objet,
+                    'desc' => $desc,
+                    'type' => $objet,
+                    'id_objet' => $id_objet,
+                    'champs' => $options['champs'] ?? [], // [doc] kesako ?
+                    'champs_anciens' => $row, // état du contenu avant modif
+                    'serveur' => $serveur,
+                    'action' => $options['action'] ?? 'modifier'
+                ],
+                'data' => $champs
+            ]
+        );
+    }
+
+    // Appeler une notification
+    if ($notifications = charger_fonction('notifications', 'inc')) {
+        $notifications(
+            "{$objet}_modifier",
+            $id_objet,
+            [
+                'champs' => $champs,
+            ]
+        );
+        $notifications(
+            'objet_modifier',
+            $id_objet,
+            [
+                'objet' => $objet,
+                'id_objet' => $id_objet,
+                'champs' => $champs,
+            ]
+        );
+    }
+
+    // journaliser l'affaire
+    // message a affiner :-)
+    include_spip('inc/filtres_mini');
+    $qui = '';
+    if (!empty($GLOBALS['visiteur_session']['id_auteur'])) {
+        $qui .= ' #id_auteur:' . $GLOBALS['visiteur_session']['id_auteur'] . '#';
+    }
+    if (!empty($GLOBALS['visiteur_session']['nom'])) {
+        $qui .= ' #nom:' . $GLOBALS['visiteur_session']['nom'] . '#';
+    }
+    if ($qui == '') {
+        $qui = '#ip:' . $GLOBALS['ip'] . '#';
+    }
+    journal(_L($qui . ' a édité ' . $objet . ' ' . $id_objet . ' (' . implode(
+        '+',
+        array_diff(array_keys($champs), ['date_modif'])
+    ) . ')'), [
+        'faire' => 'modifier',
+        'quoi' => $objet,
+        'id' => $id_objet
+    ]);
+
+    return '';
 }