spip / SPIP

ecrire/plugins/afficher_plugin.php

Indentation +312 added lines, -312 removed lines

@@ -17,221 +17,221 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/charsets');
 include_spip('inc/texte');
 include_spip('inc/plugin'); // pour plugin_est_installe
 
 function plugins_afficher_plugin_dist(
-	$url_page,
-	$plug_file,
-	$checked,
-	$actif,
-	$expose = false,
-	$class_li = 'item',
-	$dir_plugins = _DIR_PLUGINS
+    $url_page,
+    $plug_file,
+    $checked,
+    $actif,
+    $expose = false,
+    $class_li = 'item',
+    $dir_plugins = _DIR_PLUGINS
 ) {
 
-	static $id_input = 0;
-	static $versions = [];
-
-	$force_reload = (_request('var_mode') == 'recalcul');
-	$get_infos = charger_fonction('get_infos', 'plugins');
-	$info = $get_infos($plug_file, $force_reload, $dir_plugins);
-	$prefix = $info['prefix'];
-	$cfg = '';
-	$checkable = ($dir_plugins !== _DIR_PLUGINS_DIST);
-	$nom = plugin_nom($info, $dir_plugins, $plug_file);
-	$erreur = '';
-
-	if (!plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
-		$info['slogan'] = _T('plugin_info_non_compatible_spip');
-		$erreur = http_img_pack(
-			'plugin-dis-32.png',
-			_T('plugin_info_non_compatible_spip'),
-			" class='picto_err'",
-			_T('plugin_info_non_compatible_spip')
-		);
-		$class_li .= ' disabled';
-		$checkable = false;
-	} elseif (isset($info['erreur'])) {
-		$class_li .= ' error';
-		$erreur = http_img_pack(
-			'plugin-err-32.png',
-			_T('plugin_info_erreur_xml'),
-			" class='picto_err'",
-			_T('plugin_info_erreur_xml')
-		)
-			. "<div class='erreur'>" . join('<br >', $info['erreur']) . '</div>';
-		$checkable = false;
-	} elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file])) {
-		$class_li .= ' error';
-		$erreur = http_img_pack(
-			'plugin-err-32.png',
-			_T('plugin_impossible_activer', ['plugin' => $nom]),
-			" class='picto_err'",
-			_T('plugin_impossible_activer', ['plugin' => $nom])
-		)
-			. "<div class='erreur'>" . implode(
-				'<br />',
-				$GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file]
-			) . '</div>';
-	} else {
-		$cfg = $actif ? plugin_bouton_config($plug_file, $info, $dir_plugins) : '';
-		if (defined('_DEV_VERSION_SPIP_COMPAT') and !plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'])) {
-			//$info['slogan'] = _T('plugin_info_non_compatible_spip');
-			$erreur = http_img_pack(
-				'plugin-dis-32.png',
-				_T('plugin_info_non_compatible_spip'),
-				" class='picto_err picto_compat_forcee'",
-				_L('Version incompatible : compatibilité forcée')
-			);
-		}
-	}
-
-	// numerotons les occurrences d'un meme prefix
-	$versions[$prefix] = $id = isset($versions[$prefix]) ? intval($versions[$prefix]) + 1 : '';
-
-	$class_li .= ($actif ? ' actif' : '') . ($expose ? ' on' : '');
-
-	return "<li id='$prefix$id' class='$class_li'>"
-	. ((!$checkable and !$checked)
-		? '' : plugin_checkbox(++$id_input, $dir_plugins . $plug_file, $checked))
-	. plugin_resume($info, $dir_plugins, $plug_file, $url_page)
-	. $cfg
-	. $erreur
-	. (($dir_plugins !== _DIR_PLUGINS_DIST and plugin_est_installe($plug_file))
-		? plugin_desintalle($plug_file, $nom, $dir_plugins) : '')
-	. "<div class='details'>" // pour l'ajax de exec/info_plugin
-	. (!$expose ? '' : affiche_bloc_plugin($plug_file, $info, $dir_plugins))
-	. '</div>'
-	. '</li>';
+    static $id_input = 0;
+    static $versions = [];
+
+    $force_reload = (_request('var_mode') == 'recalcul');
+    $get_infos = charger_fonction('get_infos', 'plugins');
+    $info = $get_infos($plug_file, $force_reload, $dir_plugins);
+    $prefix = $info['prefix'];
+    $cfg = '';
+    $checkable = ($dir_plugins !== _DIR_PLUGINS_DIST);
+    $nom = plugin_nom($info, $dir_plugins, $plug_file);
+    $erreur = '';
+
+    if (!plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'], 'spip')) {
+        $info['slogan'] = _T('plugin_info_non_compatible_spip');
+        $erreur = http_img_pack(
+            'plugin-dis-32.png',
+            _T('plugin_info_non_compatible_spip'),
+            " class='picto_err'",
+            _T('plugin_info_non_compatible_spip')
+        );
+        $class_li .= ' disabled';
+        $checkable = false;
+    } elseif (isset($info['erreur'])) {
+        $class_li .= ' error';
+        $erreur = http_img_pack(
+            'plugin-err-32.png',
+            _T('plugin_info_erreur_xml'),
+            " class='picto_err'",
+            _T('plugin_info_erreur_xml')
+        )
+            . "<div class='erreur'>" . join('<br >', $info['erreur']) . '</div>';
+        $checkable = false;
+    } elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file])) {
+        $class_li .= ' error';
+        $erreur = http_img_pack(
+            'plugin-err-32.png',
+            _T('plugin_impossible_activer', ['plugin' => $nom]),
+            " class='picto_err'",
+            _T('plugin_impossible_activer', ['plugin' => $nom])
+        )
+            . "<div class='erreur'>" . implode(
+                '<br />',
+                $GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file]
+            ) . '</div>';
+    } else {
+        $cfg = $actif ? plugin_bouton_config($plug_file, $info, $dir_plugins) : '';
+        if (defined('_DEV_VERSION_SPIP_COMPAT') and !plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'])) {
+            //$info['slogan'] = _T('plugin_info_non_compatible_spip');
+            $erreur = http_img_pack(
+                'plugin-dis-32.png',
+                _T('plugin_info_non_compatible_spip'),
+                " class='picto_err picto_compat_forcee'",
+                _L('Version incompatible : compatibilité forcée')
+            );
+        }
+    }
+
+    // numerotons les occurrences d'un meme prefix
+    $versions[$prefix] = $id = isset($versions[$prefix]) ? intval($versions[$prefix]) + 1 : '';
+
+    $class_li .= ($actif ? ' actif' : '') . ($expose ? ' on' : '');
+
+    return "<li id='$prefix$id' class='$class_li'>"
+    . ((!$checkable and !$checked)
+        ? '' : plugin_checkbox(++$id_input, $dir_plugins . $plug_file, $checked))
+    . plugin_resume($info, $dir_plugins, $plug_file, $url_page)
+    . $cfg
+    . $erreur
+    . (($dir_plugins !== _DIR_PLUGINS_DIST and plugin_est_installe($plug_file))
+        ? plugin_desintalle($plug_file, $nom, $dir_plugins) : '')
+    . "<div class='details'>" // pour l'ajax de exec/info_plugin
+    . (!$expose ? '' : affiche_bloc_plugin($plug_file, $info, $dir_plugins))
+    . '</div>'
+    . '</li>';
 }
 
 function plugin_bouton_config($nom, $infos, $dir) {
-	// la verification se base sur le filesystem
-	// il faut donc n'utiliser que des minuscules, par convention
-	$prefix = strtolower($infos['prefix']);
-	// si paquet.xml fournit un squelette, le prendre
-	if (isset($infos['config']) and $infos['config']) {
-		return recuperer_fond(
-			"$dir$nom/" . $infos['config'],
-			[
-				'script' => 'configurer_' . $prefix,
-				'nom' => $nom
-			]
-		);
-	}
-
-	// si le plugin CFG est la, l'essayer
-	if (defined('_DIR_PLUGIN_CFG')) {
-		if (include_spip('inc/cfg')) { // test CFG version >= 1.0.5
-		if ($cfg = icone_lien_cfg("$dir$nom", 'cfg')) {
-				return "<div class='cfg_link'>$cfg</div>";
-		}
-		}
-	}
-
-	// sinon prendre le squelette std sur le nom std
-	return recuperer_fond(
-		'prive/squelettes/inclure/cfg',
-		[
-			'script' => 'configurer_' . $prefix,
-			'nom' => $nom
-		]
-	);
+    // la verification se base sur le filesystem
+    // il faut donc n'utiliser que des minuscules, par convention
+    $prefix = strtolower($infos['prefix']);
+    // si paquet.xml fournit un squelette, le prendre
+    if (isset($infos['config']) and $infos['config']) {
+        return recuperer_fond(
+            "$dir$nom/" . $infos['config'],
+            [
+                'script' => 'configurer_' . $prefix,
+                'nom' => $nom
+            ]
+        );
+    }
+
+    // si le plugin CFG est la, l'essayer
+    if (defined('_DIR_PLUGIN_CFG')) {
+        if (include_spip('inc/cfg')) { // test CFG version >= 1.0.5
+        if ($cfg = icone_lien_cfg("$dir$nom", 'cfg')) {
+                return "<div class='cfg_link'>$cfg</div>";
+        }
+        }
+    }
+
+    // sinon prendre le squelette std sur le nom std
+    return recuperer_fond(
+        'prive/squelettes/inclure/cfg',
+        [
+            'script' => 'configurer_' . $prefix,
+            'nom' => $nom
+        ]
+    );
 }
 
 // checkbox pour activer ou desactiver
 // si ce n'est pas une extension
 
 function plugin_checkbox($id_input, $file, $actif) {
-	$name = substr(md5($file), 0, 16);
-
-	return "<div class='check'>\n"
-	. "<input type='checkbox' name='s$name' id='label_$id_input'"
-	. ($actif ? " checked='checked'" : '')
-	. " class='checkbox'  value='O' />"
-	. "\n<label for='label_$id_input'>" . _T('activer_plugin') . '</label>'
-	. '</div>';
+    $name = substr(md5($file), 0, 16);
+
+    return "<div class='check'>\n"
+    . "<input type='checkbox' name='s$name' id='label_$id_input'"
+    . ($actif ? " checked='checked'" : '')
+    . " class='checkbox'  value='O' />"
+    . "\n<label for='label_$id_input'>" . _T('activer_plugin') . '</label>'
+    . '</div>';
 }
 
 function plugin_nom($info, $dir_plugins, $plug_file) {
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file";
-	// Si dtd paquet, on traite le nom soit par son item de langue soit par sa valeur immediate a l'index "nom"
-	if ($info['dtd'] == 'paquet') {
-		$nom = plugin_typo("{$prefix}_nom", "$dir/lang/paquet-$prefix");
-		if (!$nom) {
-			$nom = typo($info['nom']);
-		}
-	} else {
-		$nom = typo(attribut_html($info['nom']));
-	}
-
-	return trim($nom);
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file";
+    // Si dtd paquet, on traite le nom soit par son item de langue soit par sa valeur immediate a l'index "nom"
+    if ($info['dtd'] == 'paquet') {
+        $nom = plugin_typo("{$prefix}_nom", "$dir/lang/paquet-$prefix");
+        if (!$nom) {
+            $nom = typo($info['nom']);
+        }
+    } else {
+        $nom = typo(attribut_html($info['nom']));
+    }
+
+    return trim($nom);
 }
 
 // Cartouche Resume
 function plugin_resume($info, $dir_plugins, $plug_file, $url_page) {
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file";
-	$slogan = PtoBR(plugin_propre($info['slogan'], "$dir/lang/paquet-$prefix"));
-	// une seule ligne dans le slogan : couper si besoin
-	if (($p = strpos($slogan, '<br />')) !== false) {
-		$slogan = substr($slogan, 0, $p);
-	}
-	// couper par securite
-	$slogan = couper($slogan, 80);
-
-	$nom = plugin_nom($info, $dir_plugins, $plug_file);
-
-	$url = parametre_url($url_page, 'plugin', substr($dir, strlen(_DIR_RACINE)));
-
-	$icon_class = 'icon';
-	$img = '';
-	if (isset($info['logo']) and $i = trim($info['logo'])) {
-		$img = http_img_pack("$dir/$i", '', " width='32' height='32'", '', ['variante_svg_si_possible' => true, 'chemin_image' => false]);
-		if (!extraire_attribut($img, 'src')) {
-			$img = '';
-		}
-	}
-	if (!$img) {
-		$img = http_img_pack('plugin-xx.svg', '', " width='32' height='32'");
-		$icon_class .= ' no-logo';
-	}
-
-	$i = "<div class='$icon_class'><a href='$url' rel='info'>$img</a></div>";
-
-	return "<div class='resume'>"
-	. "<h3><a href='$url' rel='info'>"
-	. $nom
-	. '</a></h3>'
-	. " <span class='version'>" . $info['version'] . '</span>'
-	. " <span class='etat'> - "
-	. plugin_etat_en_clair($info['etat'])
-	. '</span>'
-	. "<div class='short'>" . $slogan . '</div>'
-	. $i
-	. '</div>';
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file";
+    $slogan = PtoBR(plugin_propre($info['slogan'], "$dir/lang/paquet-$prefix"));
+    // une seule ligne dans le slogan : couper si besoin
+    if (($p = strpos($slogan, '<br />')) !== false) {
+        $slogan = substr($slogan, 0, $p);
+    }
+    // couper par securite
+    $slogan = couper($slogan, 80);
+
+    $nom = plugin_nom($info, $dir_plugins, $plug_file);
+
+    $url = parametre_url($url_page, 'plugin', substr($dir, strlen(_DIR_RACINE)));
+
+    $icon_class = 'icon';
+    $img = '';
+    if (isset($info['logo']) and $i = trim($info['logo'])) {
+        $img = http_img_pack("$dir/$i", '', " width='32' height='32'", '', ['variante_svg_si_possible' => true, 'chemin_image' => false]);
+        if (!extraire_attribut($img, 'src')) {
+            $img = '';
+        }
+    }
+    if (!$img) {
+        $img = http_img_pack('plugin-xx.svg', '', " width='32' height='32'");
+        $icon_class .= ' no-logo';
+    }
+
+    $i = "<div class='$icon_class'><a href='$url' rel='info'>$img</a></div>";
+
+    return "<div class='resume'>"
+    . "<h3><a href='$url' rel='info'>"
+    . $nom
+    . '</a></h3>'
+    . " <span class='version'>" . $info['version'] . '</span>'
+    . " <span class='etat'> - "
+    . plugin_etat_en_clair($info['etat'])
+    . '</span>'
+    . "<div class='short'>" . $slogan . '</div>'
+    . $i
+    . '</div>';
 }
 
 function plugin_desintalle($plug_file, $nom, $dir_plugins = null) {
-	if (!$dir_plugins) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
+    if (!$dir_plugins) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
 
-	$action = redirige_action_auteur('desinstaller_plugin', "$dir_plugins::$plug_file", 'admin_plugin');
-	$text = _T('bouton_desinstaller');
-	$text2 = _T('info_desinstaller_plugin');
-	$file = basename($plug_file);
+    $action = redirige_action_auteur('desinstaller_plugin', "$dir_plugins::$plug_file", 'admin_plugin');
+    $text = _T('bouton_desinstaller');
+    $text2 = _T('info_desinstaller_plugin');
+    $file = basename($plug_file);
 
-	return "<div class='actions'>[" .
-	"<a href='$action'
+    return "<div class='actions'>[" .
+    "<a href='$action'
 		onclick='return confirm(\"$text $nom ?\\n$text2\")'>"
-	. $text
-	. '</a>]</div>';
+    . $text
+    . '</a>]</div>';
 }
 
 /**
@@ -245,145 +245,145 @@ 
  *     Traduction de l'état dans la langue en cours
  **/
 function plugin_etat_en_clair($etat) {
-	if (!in_array($etat, ['stable', 'test', 'experimental'])) {
-		$etat = 'developpement';
-	}
+    if (!in_array($etat, ['stable', 'test', 'experimental'])) {
+        $etat = 'developpement';
+    }
 
-	return _T('plugin_etat_' . $etat);
+    return _T('plugin_etat_' . $etat);
 }
 
 function plugin_propre($texte, $module = '', $propre = 'propre') {
-	// retirer le retour a la racine du module, car le find_in_path se fait depuis la racine
-	if (_DIR_RACINE and strncmp($module, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
-		$module = substr($module, strlen(_DIR_RACINE));
-	}
-	if (preg_match('|^\w+_[\w_]+$|', $texte)) {
-		$texte = _T(($module ? "$module:" : '') . $texte, [], ['force' => false]);
-	}
-
-	return $propre($texte);
+    // retirer le retour a la racine du module, car le find_in_path se fait depuis la racine
+    if (_DIR_RACINE and strncmp($module, _DIR_RACINE, strlen(_DIR_RACINE)) == 0) {
+        $module = substr($module, strlen(_DIR_RACINE));
+    }
+    if (preg_match('|^\w+_[\w_]+$|', $texte)) {
+        $texte = _T(($module ? "$module:" : '') . $texte, [], ['force' => false]);
+    }
+
+    return $propre($texte);
 }
 
 function plugin_typo($texte, $module = '') {
-	return plugin_propre($texte, $module, 'typo');
+    return plugin_propre($texte, $module, 'typo');
 }
 
 
 function affiche_bloc_plugin($plug_file, $info, $dir_plugins = null) {
-	$log = null;
-	if (!$dir_plugins) {
-		$dir_plugins = _DIR_PLUGINS;
-	}
-
-	$prefix = $info['prefix'];
-	$dir = "$dir_plugins$plug_file/lang/paquet-$prefix";
-
-	$s = '';
-	// TODO: le traiter_multi ici n'est pas beau
-	// cf. description du plugin/_stable_/ortho/plugin.xml
-	// concerne les anciens plugin.xml donc on devrait plus en avoir besoin
-	$description = '';
-	if (isset($info['description'])) {
-		$description = plugin_propre($info['description'], $dir);
-	}
-
-	if (
-		isset($info['documentation'])
-		and $lien = $info['documentation']
-	) {
-		$description .= "<p><em class='site'><a href='$lien' class='spip_out'>" . _T('en_savoir_plus') . '</a></em></p>';
-	}
-	$s .= "<dd class='desc'>" . $description . "</dd>\n";
-
-	if (isset($info['auteur'])) {
-		if (is_array($info['auteur'])) {
-			$a = formater_credits($info['auteur'], ', ');
-		} // pour compat mais ne doit plus arriver
-		else {
-			$a = trim($info['auteur']);
-		}
-		if ($a) {
-			$s .= "<dt class='auteurs'>" . _T('public:par_auteur') . "</dt><dd class='auteurs'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	if (isset($info['credit'])) {
-		if ($a = formater_credits($info['credit'], ', ')) {
-			$s .= "<dt class='credits'>" . _T('plugin_info_credit') . "</dt><dd class='credits'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	if (isset($info['licence'])) {
-		if (is_array($info['licence'])) {
-			$a = formater_credits($info['licence'], ', ');
-		} // pour compat mais ne doit plus arriver
-		else {
-			$a = trim($info['licence']);
-		}
-		if ($a) {
-			$s .= "<dt class='licence'>" . _T('intitule_licence') . "</dt><dd class='licence'>" . PtoBR(propre(
-				$a,
-				$dir
-			)) . "</dd>\n";
-		}
-	}
-
-	$s = "<dl class='description'>$s</dl>";
-
-	//
-	// Ajouter les infos techniques
-	//
-	$infotech = [];
-
-	$version = '<dt>' . _T('version') . '</dt><dd>' . $info['version'];
-	// Version VCS
-	if ($vcs = version_vcs_courante($dir_plugins . $plug_file)) {
-		$version .= ' ' . $vcs;
-	}
-	$version .= '</dd>';
-	$infotech[] = $version;
-	$infotech[] = '<dt>' . _T('repertoire_plugins') . '</dt><dd>' . joli_repertoire("$dir_plugins$plug_file") . '</dd>';
-	// source zip le cas echeant
-	$infotech[] = (lire_fichier($dir_plugins . $plug_file . '/install.log', $log)
-		and preg_match(',^source:(.*)$,m', $log, $r))
-		? '<dt>' . _T('plugin_source') . '</dt><dd>' . trim($r[1]) . '</dd>'
-		: '';
-
-	$infotech[] = !$info['necessite'] ? '' :
-		('<dt>' . _T('plugin_info_necessite') . '</dt><dd>' . join(
-			' ',
-			array_map('array_shift', $info['necessite'])
-		) . '</dd>');
-
-	$s .= "<dl class='tech'>"
-		. join('', $infotech)
-		. '</dl>';
-
-
-	return $s;
+    $log = null;
+    if (!$dir_plugins) {
+        $dir_plugins = _DIR_PLUGINS;
+    }
+
+    $prefix = $info['prefix'];
+    $dir = "$dir_plugins$plug_file/lang/paquet-$prefix";
+
+    $s = '';
+    // TODO: le traiter_multi ici n'est pas beau
+    // cf. description du plugin/_stable_/ortho/plugin.xml
+    // concerne les anciens plugin.xml donc on devrait plus en avoir besoin
+    $description = '';
+    if (isset($info['description'])) {
+        $description = plugin_propre($info['description'], $dir);
+    }
+
+    if (
+        isset($info['documentation'])
+        and $lien = $info['documentation']
+    ) {
+        $description .= "<p><em class='site'><a href='$lien' class='spip_out'>" . _T('en_savoir_plus') . '</a></em></p>';
+    }
+    $s .= "<dd class='desc'>" . $description . "</dd>\n";
+
+    if (isset($info['auteur'])) {
+        if (is_array($info['auteur'])) {
+            $a = formater_credits($info['auteur'], ', ');
+        } // pour compat mais ne doit plus arriver
+        else {
+            $a = trim($info['auteur']);
+        }
+        if ($a) {
+            $s .= "<dt class='auteurs'>" . _T('public:par_auteur') . "</dt><dd class='auteurs'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    if (isset($info['credit'])) {
+        if ($a = formater_credits($info['credit'], ', ')) {
+            $s .= "<dt class='credits'>" . _T('plugin_info_credit') . "</dt><dd class='credits'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    if (isset($info['licence'])) {
+        if (is_array($info['licence'])) {
+            $a = formater_credits($info['licence'], ', ');
+        } // pour compat mais ne doit plus arriver
+        else {
+            $a = trim($info['licence']);
+        }
+        if ($a) {
+            $s .= "<dt class='licence'>" . _T('intitule_licence') . "</dt><dd class='licence'>" . PtoBR(propre(
+                $a,
+                $dir
+            )) . "</dd>\n";
+        }
+    }
+
+    $s = "<dl class='description'>$s</dl>";
+
+    //
+    // Ajouter les infos techniques
+    //
+    $infotech = [];
+
+    $version = '<dt>' . _T('version') . '</dt><dd>' . $info['version'];
+    // Version VCS
+    if ($vcs = version_vcs_courante($dir_plugins . $plug_file)) {
+        $version .= ' ' . $vcs;
+    }
+    $version .= '</dd>';
+    $infotech[] = $version;
+    $infotech[] = '<dt>' . _T('repertoire_plugins') . '</dt><dd>' . joli_repertoire("$dir_plugins$plug_file") . '</dd>';
+    // source zip le cas echeant
+    $infotech[] = (lire_fichier($dir_plugins . $plug_file . '/install.log', $log)
+        and preg_match(',^source:(.*)$,m', $log, $r))
+        ? '<dt>' . _T('plugin_source') . '</dt><dd>' . trim($r[1]) . '</dd>'
+        : '';
+
+    $infotech[] = !$info['necessite'] ? '' :
+        ('<dt>' . _T('plugin_info_necessite') . '</dt><dd>' . join(
+            ' ',
+            array_map('array_shift', $info['necessite'])
+        ) . '</dd>');
+
+    $s .= "<dl class='tech'>"
+        . join('', $infotech)
+        . '</dl>';
+
+
+    return $s;
 }
 
 function formater_credits($infos, $sep = ', ') {
-	$texte = '';
-
-	foreach ($infos as $_credit) {
-		if ($texte) {
-			$texte .= $sep;
-		}
-		// Si le credit en cours n'est pas un array c'est donc un copyright
-		$texte .=
-			(!is_array($_credit))
-				? PtoBR(propre($_credit))
-				: ($_credit['url'] ? '<a href="' . $_credit['url'] . '">' : '') .
-				$_credit['nom'] .
-				($_credit['url'] ? '</a>' : '');
-	}
-
-	return $texte;
+    $texte = '';
+
+    foreach ($infos as $_credit) {
+        if ($texte) {
+            $texte .= $sep;
+        }
+        // Si le credit en cours n'est pas un array c'est donc un copyright
+        $texte .=
+            (!is_array($_credit))
+                ? PtoBR(propre($_credit))
+                : ($_credit['url'] ? '<a href="' . $_credit['url'] . '">' : '') .
+                $_credit['nom'] .
+                ($_credit['url'] ? '</a>' : '');
+    }
+
+    return $texte;
 }

Spacing +34 added lines, -35 removed lines

@@ -63,9 +63,9 @@ 
 			" class='picto_err'",
 			_T('plugin_info_erreur_xml')
 		)
-			. "<div class='erreur'>" . join('<br >', $info['erreur']) . '</div>';
+			. "<div class='erreur'>".join('<br >', $info['erreur']).'</div>';
 		$checkable = false;
-	} elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file])) {
+	} elseif (isset($GLOBALS['erreurs_activation_raw'][$dir_plugins.$plug_file])) {
 		$class_li .= ' error';
 		$erreur = http_img_pack(
 			'plugin-err-32.png',
@@ -73,10 +73,10 @@ 
 			" class='picto_err'",
 			_T('plugin_impossible_activer', ['plugin' => $nom])
 		)
-			. "<div class='erreur'>" . implode(
+			. "<div class='erreur'>".implode(
 				'<br />',
-				$GLOBALS['erreurs_activation_raw'][$dir_plugins . $plug_file]
-			) . '</div>';
+				$GLOBALS['erreurs_activation_raw'][$dir_plugins.$plug_file]
+			).'</div>';
 	} else {
 		$cfg = $actif ? plugin_bouton_config($plug_file, $info, $dir_plugins) : '';
 		if (defined('_DEV_VERSION_SPIP_COMPAT') and !plugin_version_compatible($info['compatibilite'], $GLOBALS['spip_version_branche'])) {
@@ -93,11 +93,11 @@ 
 	// numerotons les occurrences d'un meme prefix
 	$versions[$prefix] = $id = isset($versions[$prefix]) ? intval($versions[$prefix]) + 1 : '';
 
-	$class_li .= ($actif ? ' actif' : '') . ($expose ? ' on' : '');
+	$class_li .= ($actif ? ' actif' : '').($expose ? ' on' : '');
 
 	return "<li id='$prefix$id' class='$class_li'>"
 	. ((!$checkable and !$checked)
-		? '' : plugin_checkbox(++$id_input, $dir_plugins . $plug_file, $checked))
+		? '' : plugin_checkbox(++$id_input, $dir_plugins.$plug_file, $checked))
 	. plugin_resume($info, $dir_plugins, $plug_file, $url_page)
 	. $cfg
 	. $erreur
@@ -116,9 +116,9 @@ 
 	// si paquet.xml fournit un squelette, le prendre
 	if (isset($infos['config']) and $infos['config']) {
 		return recuperer_fond(
-			"$dir$nom/" . $infos['config'],
+			"$dir$nom/".$infos['config'],
 			[
-				'script' => 'configurer_' . $prefix,
+				'script' => 'configurer_'.$prefix,
 				'nom' => $nom
 			]
 		);
@@ -137,7 +137,7 @@ 
 	return recuperer_fond(
 		'prive/squelettes/inclure/cfg',
 		[
-			'script' => 'configurer_' . $prefix,
+			'script' => 'configurer_'.$prefix,
 			'nom' => $nom
 		]
 	);
@@ -153,7 +153,7 @@ 
 	. "<input type='checkbox' name='s$name' id='label_$id_input'"
 	. ($actif ? " checked='checked'" : '')
 	. " class='checkbox'  value='O' />"
-	. "\n<label for='label_$id_input'>" . _T('activer_plugin') . '</label>'
+	. "\n<label for='label_$id_input'>"._T('activer_plugin').'</label>'
 	. '</div>';
 }
 
@@ -208,11 +208,11 @@ 
 	. "<h3><a href='$url' rel='info'>"
 	. $nom
 	. '</a></h3>'
-	. " <span class='version'>" . $info['version'] . '</span>'
+	. " <span class='version'>".$info['version'].'</span>'
 	. " <span class='etat'> - "
 	. plugin_etat_en_clair($info['etat'])
 	. '</span>'
-	. "<div class='short'>" . $slogan . '</div>'
+	. "<div class='short'>".$slogan.'</div>'
 	. $i
 	. '</div>';
 }
@@ -227,7 +227,7 @@ 
 	$text2 = _T('info_desinstaller_plugin');
 	$file = basename($plug_file);
 
-	return "<div class='actions'>[" .
+	return "<div class='actions'>[".
 	"<a href='$action'
 		onclick='return confirm(\"$text $nom ?\\n$text2\")'>"
 	. $text
@@ -249,7 +249,7 @@ 
 		$etat = 'developpement';
 	}
 
-	return _T('plugin_etat_' . $etat);
+	return _T('plugin_etat_'.$etat);
 }
 
 function plugin_propre($texte, $module = '', $propre = 'propre') {
@@ -258,7 +258,7 @@ 
 		$module = substr($module, strlen(_DIR_RACINE));
 	}
 	if (preg_match('|^\w+_[\w_]+$|', $texte)) {
-		$texte = _T(($module ? "$module:" : '') . $texte, [], ['force' => false]);
+		$texte = _T(($module ? "$module:" : '').$texte, [], ['force' => false]);
 	}
 
 	return $propre($texte);
@@ -291,9 +291,9 @@ 
 		isset($info['documentation'])
 		and $lien = $info['documentation']
 	) {
-		$description .= "<p><em class='site'><a href='$lien' class='spip_out'>" . _T('en_savoir_plus') . '</a></em></p>';
+		$description .= "<p><em class='site'><a href='$lien' class='spip_out'>"._T('en_savoir_plus').'</a></em></p>';
 	}
-	$s .= "<dd class='desc'>" . $description . "</dd>\n";
+	$s .= "<dd class='desc'>".$description."</dd>\n";
 
 	if (isset($info['auteur'])) {
 		if (is_array($info['auteur'])) {
@@ -303,19 +303,19 @@ 
 			$a = trim($info['auteur']);
 		}
 		if ($a) {
-			$s .= "<dt class='auteurs'>" . _T('public:par_auteur') . "</dt><dd class='auteurs'>" . PtoBR(propre(
+			$s .= "<dt class='auteurs'>"._T('public:par_auteur')."</dt><dd class='auteurs'>".PtoBR(propre(
 				$a,
 				$dir
-			)) . "</dd>\n";
+			))."</dd>\n";
 		}
 	}
 
 	if (isset($info['credit'])) {
 		if ($a = formater_credits($info['credit'], ', ')) {
-			$s .= "<dt class='credits'>" . _T('plugin_info_credit') . "</dt><dd class='credits'>" . PtoBR(propre(
+			$s .= "<dt class='credits'>"._T('plugin_info_credit')."</dt><dd class='credits'>".PtoBR(propre(
 				$a,
 				$dir
-			)) . "</dd>\n";
+			))."</dd>\n";
 		}
 	}
 
@@ -327,10 +327,10 @@ 
 			$a = trim($info['licence']);
 		}
 		if ($a) {
-			$s .= "<dt class='licence'>" . _T('intitule_licence') . "</dt><dd class='licence'>" . PtoBR(propre(
+			$s .= "<dt class='licence'>"._T('intitule_licence')."</dt><dd class='licence'>".PtoBR(propre(
 				$a,
 				$dir
-			)) . "</dd>\n";
+			))."</dd>\n";
 		}
 	}
 
@@ -341,25 +341,24 @@ 
 	//
 	$infotech = [];
 
-	$version = '<dt>' . _T('version') . '</dt><dd>' . $info['version'];
+	$version = '<dt>'._T('version').'</dt><dd>'.$info['version'];
 	// Version VCS
-	if ($vcs = version_vcs_courante($dir_plugins . $plug_file)) {
-		$version .= ' ' . $vcs;
+	if ($vcs = version_vcs_courante($dir_plugins.$plug_file)) {
+		$version .= ' '.$vcs;
 	}
 	$version .= '</dd>';
 	$infotech[] = $version;
-	$infotech[] = '<dt>' . _T('repertoire_plugins') . '</dt><dd>' . joli_repertoire("$dir_plugins$plug_file") . '</dd>';
+	$infotech[] = '<dt>'._T('repertoire_plugins').'</dt><dd>'.joli_repertoire("$dir_plugins$plug_file").'</dd>';
 	// source zip le cas echeant
-	$infotech[] = (lire_fichier($dir_plugins . $plug_file . '/install.log', $log)
+	$infotech[] = (lire_fichier($dir_plugins.$plug_file.'/install.log', $log)
 		and preg_match(',^source:(.*)$,m', $log, $r))
-		? '<dt>' . _T('plugin_source') . '</dt><dd>' . trim($r[1]) . '</dd>'
+		? '<dt>'._T('plugin_source').'</dt><dd>'.trim($r[1]).'</dd>'
 		: '';
 
-	$infotech[] = !$info['necessite'] ? '' :
-		('<dt>' . _T('plugin_info_necessite') . '</dt><dd>' . join(
+	$infotech[] = !$info['necessite'] ? '' : ('<dt>'._T('plugin_info_necessite').'</dt><dd>'.join(
 			' ',
 			array_map('array_shift', $info['necessite'])
-		) . '</dd>');
+		).'</dd>');
 
 	$s .= "<dl class='tech'>"
 		. join('', $infotech)
@@ -380,8 +379,8 @@ 
 		$texte .=
 			(!is_array($_credit))
 				? PtoBR(propre($_credit))
-				: ($_credit['url'] ? '<a href="' . $_credit['url'] . '">' : '') .
-				$_credit['nom'] .
+				: ($_credit['url'] ? '<a href="'.$_credit['url'].'">' : '').
+				$_credit['nom'].
 				($_credit['url'] ? '</a>' : '');
 	}
 

ecrire/inc/presentation.php

Indentation +113 added lines, -113 removed lines

@@ -16,7 +16,7 @@ 
  * @package SPIP\Core\Presentation
  **/
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('inc/presentation_mini');
@@ -31,141 +31,141 @@ 
 include_spip('inc/filtres_alertes');
 
 function debut_cadre($style, $icone = '', $fonction = '', $titre = '', $id = '', $class = '', $padding = true) {
-	$fond = null;
-	$style_mapping = [
-		'r' => 'simple',
-		'e' => 'raccourcis',
-		'couleur' => 'basic highlight',
-		'couleur-foncee' => 'basic highlight',
-		'trait-couleur' => 'important',
-		'alerte' => 'notice',
-		'info' => 'info',
-		'sous_rub' => 'simple sous-rub'
-	];
-	$style_titre_mapping = ['couleur' => 'topper', 'trait-couleur' => 'section'];
-	$c = $style_mapping[$style] ?? 'simple';
-	$class = $c . ($class ? " $class" : '');
-	if (!$padding) {
-		$class .= ($class ? ' ' : '') . 'no-padding';
-	}
-
-	//($id?"id='$id' ":"")
-	if (strlen($icone) > 1) {
-		if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
-			[$fond, $fonction] = $icone_renommer($icone, $fonction);
-		}
-		$size = 24;
-		if (preg_match('/-([0-9]{1,3})[.](gif|png)$/i', $fond, $match)) {
-			$size = $match[1];
-		}
-		if ($fonction) {
-			// 2 images pour composer l'icone : le fond (article) en background,
-			// la fonction (new) en image
-			$icone = http_img_pack($fonction, '', "class='cadre-icone' width='$size' height='$size'\n" .
-				http_style_background($fond, 'no-repeat center center', $size));
-		} else {
-			$icone = http_img_pack($fond, '', "class='cadre-icone' width='$size' height='$size'");
-		}
-		$titre = $icone . $titre;
-	}
-
-	return boite_ouvrir($titre, $class, $style_titre_mapping[$style] ?? '', $id);
+    $fond = null;
+    $style_mapping = [
+        'r' => 'simple',
+        'e' => 'raccourcis',
+        'couleur' => 'basic highlight',
+        'couleur-foncee' => 'basic highlight',
+        'trait-couleur' => 'important',
+        'alerte' => 'notice',
+        'info' => 'info',
+        'sous_rub' => 'simple sous-rub'
+    ];
+    $style_titre_mapping = ['couleur' => 'topper', 'trait-couleur' => 'section'];
+    $c = $style_mapping[$style] ?? 'simple';
+    $class = $c . ($class ? " $class" : '');
+    if (!$padding) {
+        $class .= ($class ? ' ' : '') . 'no-padding';
+    }
+
+    //($id?"id='$id' ":"")
+    if (strlen($icone) > 1) {
+        if ($icone_renommer = charger_fonction('icone_renommer', 'inc', true)) {
+            [$fond, $fonction] = $icone_renommer($icone, $fonction);
+        }
+        $size = 24;
+        if (preg_match('/-([0-9]{1,3})[.](gif|png)$/i', $fond, $match)) {
+            $size = $match[1];
+        }
+        if ($fonction) {
+            // 2 images pour composer l'icone : le fond (article) en background,
+            // la fonction (new) en image
+            $icone = http_img_pack($fonction, '', "class='cadre-icone' width='$size' height='$size'\n" .
+                http_style_background($fond, 'no-repeat center center', $size));
+        } else {
+            $icone = http_img_pack($fond, '', "class='cadre-icone' width='$size' height='$size'");
+        }
+        $titre = $icone . $titre;
+    }
+
+    return boite_ouvrir($titre, $class, $style_titre_mapping[$style] ?? '', $id);
 }
 
 function fin_cadre() {
- return boite_fermer();
+    return boite_fermer();
 }
 
 
 function debut_cadre_relief(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = '',
-	$class = ''
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = '',
+    $class = ''
 ) {
-	return debut_cadre('r', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('r', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_relief() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_cadre_enfonce(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = '',
-	$class = ''
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = '',
+    $class = ''
 ) {
-	return debut_cadre('e', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('e', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_enfonce() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_cadre_sous_rub(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = '',
-	$class = ''
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = '',
+    $class = ''
 ) {
-	return debut_cadre('sous_rub', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('sous_rub', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_sous_rub() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_cadre_couleur(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = '',
-	$class = ''
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = '',
+    $class = ''
 ) {
-	return debut_cadre('couleur', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('couleur', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_couleur() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_cadre_trait_couleur(
-	$icone = '',
-	$dummy = '',
-	$fonction = '',
-	$titre = '',
-	$id = '',
-	$class = ''
+    $icone = '',
+    $dummy = '',
+    $fonction = '',
+    $titre = '',
+    $id = '',
+    $class = ''
 ) {
-	return debut_cadre('trait-couleur', $icone, $fonction, $titre, $id, $class);
+    return debut_cadre('trait-couleur', $icone, $fonction, $titre, $id, $class);
 }
 
 function fin_cadre_trait_couleur() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_boite_alerte() {
- return debut_cadre('alerte', '', '', '', '', '');
+    return debut_cadre('alerte', '', '', '', '', '');
 }
 
 function fin_boite_alerte() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 function debut_boite_info() {
- return debut_cadre('info', '', '', '', '', '');
+    return debut_cadre('info', '', '', '', '', '');
 }
 
 function fin_boite_info() {
- return fin_cadre();
+    return fin_cadre();
 }
 
 /**
@@ -176,17 +176,17 @@ 
  * @return string Code PHP.
  **/
 function gros_titre(
-	$titre,
-	$ze_logo = ''
+    $titre,
+    $ze_logo = ''
 ) {
-	return "<h1 class = 'grostitre'>" . $ze_logo . ' ' . typo($titre) . "</h1>\n";
+    return "<h1 class = 'grostitre'>" . $ze_logo . ' ' . typo($titre) . "</h1>\n";
 }
 
 // La boite des raccourcis
 // Se place a droite si l'ecran est en mode panoramique.
 function bloc_des_raccourcis($bloc) {
-	return creer_colonne_droite()
-	. boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis') . $bloc . boite_fermer();
+    return creer_colonne_droite()
+    . boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis') . $bloc . boite_fermer();
 }
 
 //
@@ -196,18 +196,18 @@ 
 // Fonctions onglets
 // @param string $sous_classe	prend la valeur second pour definir les onglet de deuxieme niveau
 function debut_onglet($classe = 'barre_onglet') {
- return "<div class = '$classe clearfix'><ul>\n";
+    return "<div class = '$classe clearfix'><ul>\n";
 }
 
 function fin_onglet() {
- return "</ul></div>\n";
+    return "</ul></div>\n";
 }
 
 function onglet($texte, $lien, $onglet_ref, $onglet, $icone = '') {
-	return '<li>'
-	. ($icone ? http_img_pack($icone, '', " class='cadre-icone'") : '')
-	. lien_ou_expose($lien, $texte, $onglet == $onglet_ref)
-	. '</li>';
+    return '<li>'
+    . ($icone ? http_img_pack($icone, '', " class='cadre-icone'") : '')
+    . lien_ou_expose($lien, $texte, $onglet == $onglet_ref)
+    . '</li>';
 }
 
 /**
@@ -239,14 +239,14 @@ 
  *     Code HTML du lien
  **/
 function icone_verticale($texte, $lien, $fond, $fonction = '', $align = '', $javascript = '') {
-	// cas d'ajax_action_auteur: faut defaire le boulot
-	// (il faudrait fusionner avec le cas $javascript)
-	if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
-		[$x, $lien, $atts, $texte] = $r;
-		$javascript .= $atts;
-	}
-
-	return icone_base($lien, $texte, $fond, $fonction, "verticale $align", $javascript);
+    // cas d'ajax_action_auteur: faut defaire le boulot
+    // (il faudrait fusionner avec le cas $javascript)
+    if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
+        [$x, $lien, $atts, $texte] = $r;
+        $javascript .= $atts;
+    }
+
+    return icone_base($lien, $texte, $fond, $fonction, "verticale $align", $javascript);
 }
 
 /**
@@ -271,15 +271,15 @@ 
  *     Code HTML du lien
  **/
 function icone_horizontale($texte, $lien, $fond, $fonction = '', $dummy = '', $javascript = '') {
-	$retour = '';
-	// cas d'ajax_action_auteur: faut defaire le boulot
-	// (il faudrait fusionner avec le cas $javascript)
-	if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
-		[$x, $lien, $atts, $texte] = $r;
-		$javascript .= $atts;
-	}
+    $retour = '';
+    // cas d'ajax_action_auteur: faut defaire le boulot
+    // (il faudrait fusionner avec le cas $javascript)
+    if (preg_match(",^<a\shref='([^']*)'([^>]*)>(.*)</a>$,i", $lien, $r)) {
+        [$x, $lien, $atts, $texte] = $r;
+        $javascript .= $atts;
+    }
 
-	$retour = icone_base($lien, $texte, $fond, $fonction, 'horizontale', $javascript);
+    $retour = icone_base($lien, $texte, $fond, $fonction, 'horizontale', $javascript);
 
-	return $retour;
+    return $retour;
 }

Spacing +6 added lines, -6 removed lines

@@ -44,9 +44,9 @@ 
 	];
 	$style_titre_mapping = ['couleur' => 'topper', 'trait-couleur' => 'section'];
 	$c = $style_mapping[$style] ?? 'simple';
-	$class = $c . ($class ? " $class" : '');
+	$class = $c.($class ? " $class" : '');
 	if (!$padding) {
-		$class .= ($class ? ' ' : '') . 'no-padding';
+		$class .= ($class ? ' ' : '').'no-padding';
 	}
 
 	//($id?"id='$id' ":"")
@@ -61,12 +61,12 @@ 
 		if ($fonction) {
 			// 2 images pour composer l'icone : le fond (article) en background,
 			// la fonction (new) en image
-			$icone = http_img_pack($fonction, '', "class='cadre-icone' width='$size' height='$size'\n" .
+			$icone = http_img_pack($fonction, '', "class='cadre-icone' width='$size' height='$size'\n".
 				http_style_background($fond, 'no-repeat center center', $size));
 		} else {
 			$icone = http_img_pack($fond, '', "class='cadre-icone' width='$size' height='$size'");
 		}
-		$titre = $icone . $titre;
+		$titre = $icone.$titre;
 	}
 
 	return boite_ouvrir($titre, $class, $style_titre_mapping[$style] ?? '', $id);
@@ -179,14 +179,14 @@ 
 	$titre,
 	$ze_logo = ''
 ) {
-	return "<h1 class = 'grostitre'>" . $ze_logo . ' ' . typo($titre) . "</h1>\n";
+	return "<h1 class = 'grostitre'>".$ze_logo.' '.typo($titre)."</h1>\n";
 }
 
 // La boite des raccourcis
 // Se place a droite si l'ecran est en mode panoramique.
 function bloc_des_raccourcis($bloc) {
 	return creer_colonne_droite()
-	. boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis') . $bloc . boite_fermer();
+	. boite_ouvrir(_T('titre_cadre_raccourcis'), 'raccourcis').$bloc.boite_fermer();
 }
 
 //

ecrire/inc/layer.php

Indentation +109 added lines, -109 removed lines

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

Spacing +3 added lines, -3 removed lines

@@ -53,7 +53,7 @@ 
 		$class = ' blocreplie';
 	}
 
-	return '<div ' . ($id ? "id='$id' " : '') . "class='bloc_depliable$class'>";
+	return '<div '.($id ? "id='$id' " : '')."class='bloc_depliable$class'>";
 }
 
 function fin_block() {
@@ -64,12 +64,12 @@ 
 // $deplie : true (deplie) ou false (plie) ou -1 (inactif) ou 'incertain' pour que le bouton s'auto init au chargement de la page
 // $ids : id des div lies au bouton (facultatif, par defaut c'est le div.bloc_depliable qui suit)
 function bouton_block_depliable($texte, $deplie, $ids = '') {
-	$bouton_id = 'b' . substr(md5($texte . microtime()), 0, 8);
+	$bouton_id = 'b'.substr(md5($texte.microtime()), 0, 8);
 
 	$class = ($deplie === true) ? ' deplie' : (($deplie == -1) ? ' impliable' : ' replie');
 	if (strlen($ids)) {
 		$cible = explode(',', $ids);
-		$cible = '#' . implode(',#', $cible);
+		$cible = '#'.implode(',#', $cible);
 	} else {
 		$cible = "#$bouton_id + div.bloc_depliable";
 	}

ecrire/inc/genie.php

Indentation +88 added lines, -88 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -75,28 +75,28 @@ 
  * @return
  **/
 function inc_genie_dist($taches = []) {
-	include_spip('inc/queue');
-
-	if (_request('exec') == 'job_queue') {
-		return false;
-	}
-
-	$force_jobs = [];
-	// l'ancienne facon de lancer une tache cron immediatement
-	// etait de la passer en parametre a ing_genie_dist
-	// on reroute en ajoutant simplement le job a la queue, ASAP
-	foreach ($taches as $function => $period) {
-		$force_jobs[] = queue_add_job(
-			$function,
-			_T('tache_cron_asap', ['function' => $function]),
-			[time() - abs($period)],
-			'genie/'
-		);
-	}
-
-	// et on passe la main a la gestion de la queue !
-	// en forcant eventuellement les jobs ajoute a l'instant
-	return queue_schedule(count($force_jobs) ? $force_jobs : null);
+    include_spip('inc/queue');
+
+    if (_request('exec') == 'job_queue') {
+        return false;
+    }
+
+    $force_jobs = [];
+    // l'ancienne facon de lancer une tache cron immediatement
+    // etait de la passer en parametre a ing_genie_dist
+    // on reroute en ajoutant simplement le job a la queue, ASAP
+    foreach ($taches as $function => $period) {
+        $force_jobs[] = queue_add_job(
+            $function,
+            _T('tache_cron_asap', ['function' => $function]),
+            [time() - abs($period)],
+            'genie/'
+        );
+    }
+
+    // et on passe la main a la gestion de la queue !
+    // en forcant eventuellement les jobs ajoute a l'instant
+    return queue_schedule(count($force_jobs) ? $force_jobs : null);
 }
 
 //
@@ -109,33 +109,33 @@ 
 //
 function taches_generales($taches_generales = []) {
 
-	// verifier que toutes les taches cron sont planifiees
-	// c'est une tache cron !
-	$taches_generales['queue_watch'] = 3600 * 24;
+    // verifier que toutes les taches cron sont planifiees
+    // c'est une tache cron !
+    $taches_generales['queue_watch'] = 3600 * 24;
 
-	// MAJ des rubriques publiques (cas de la publication post-datee)
-	// est fait au coup par coup a present
-	//	$taches_generales['rubriques'] = 3600;
+    // MAJ des rubriques publiques (cas de la publication post-datee)
+    // est fait au coup par coup a present
+    //	$taches_generales['rubriques'] = 3600;
 
-	// Optimisation de la base
-	$taches_generales['optimiser'] = 3600 * 48;
+    // Optimisation de la base
+    $taches_generales['optimiser'] = 3600 * 48;
 
-	// nouveautes
-	if (
-		isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
-		and $GLOBALS['meta']['jours_neuf']
-		and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
-	) {
-		$taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
-	}
+    // nouveautes
+    if (
+        isset($GLOBALS['meta']['adresse_neuf']) and $GLOBALS['meta']['adresse_neuf']
+        and $GLOBALS['meta']['jours_neuf']
+        and ($GLOBALS['meta']['quoi_de_neuf'] == 'oui')
+    ) {
+        $taches_generales['mail'] = 3600 * 24 * $GLOBALS['meta']['jours_neuf'];
+    }
 
-	// maintenance (ajax, verifications diverses)
-	$taches_generales['maintenance'] = 3600 * 2;
+    // maintenance (ajax, verifications diverses)
+    $taches_generales['maintenance'] = 3600 * 2;
 
-	// verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
-	$taches_generales['mise_a_jour'] = 3 * 24 * 3600;
+    // verifier si une mise a jour de spip est disponible (2 fois par semaine suffit largement)
+    $taches_generales['mise_a_jour'] = 3 * 24 * 3600;
 
-	return pipeline('taches_generales_cron', $taches_generales);
+    return pipeline('taches_generales_cron', $taches_generales);
 }
 
 /**
@@ -151,22 +151,22 @@ 
  * @return int
  */
 function genie_queue_watch_dist() {
-	static $deja_la = false;
-	if ($deja_la) {
-		return;
-	} // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
-	$deja_la = true;
-	$taches = taches_generales();
-	$programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
-	$programmees = array_column($programmees, 'fonction');
-	foreach ($taches as $tache => $periode) {
-		if (!in_array($tache, $programmees)) {
-			queue_genie_replan_job($tache, $periode, time() - round(random_int(1, $periode)), 0);
-		}
-	}
-	$deja_la = false;
-
-	return 1;
+    static $deja_la = false;
+    if ($deja_la) {
+        return;
+    } // re-entrance si l'insertion des jobs echoue (pas de table spip_jobs a l'upgrade par exemple)
+    $deja_la = true;
+    $taches = taches_generales();
+    $programmees = sql_allfetsel('fonction', 'spip_jobs', sql_in('fonction', array_keys($taches)));
+    $programmees = array_column($programmees, 'fonction');
+    foreach ($taches as $tache => $periode) {
+        if (!in_array($tache, $programmees)) {
+            queue_genie_replan_job($tache, $periode, time() - round(random_int(1, $periode)), 0);
+        }
+    }
+    $deja_la = false;
+
+    return 1;
 }
 
 /**
@@ -187,32 +187,32 @@ 
  * @return void
  */
 function queue_genie_replan_job($function, $period, $last = 0, $time = null, $priority = 0) {
-	static $done = [];
-	if (isset($done[$function])) {
-		return;
-	}
-	$done[$function] = true;
-	if (is_null($time)) {
-		$time = time();
-		if ($last) {
-			$time = max($last + $period, $time);
-		}
-	}
-	if (!$last) {
-		$last = $time - $period;
-	}
-	spip_log("replan_job $function $period $last $time $priority", 'queue');
-	include_spip('inc/queue');
-	// on replanifie un job cron
-	// uniquement si il n'y en a pas deja un avec le meme nom
-	// independament de l'argument
-	queue_add_job(
-		$function,
-		_T('tache_cron_secondes', ['function' => $function, 'nb' => $period]),
-		[$last],
-		'genie/',
-		'function_only',
-		$time,
-		$priority
-	);
+    static $done = [];
+    if (isset($done[$function])) {
+        return;
+    }
+    $done[$function] = true;
+    if (is_null($time)) {
+        $time = time();
+        if ($last) {
+            $time = max($last + $period, $time);
+        }
+    }
+    if (!$last) {
+        $last = $time - $period;
+    }
+    spip_log("replan_job $function $period $last $time $priority", 'queue');
+    include_spip('inc/queue');
+    // on replanifie un job cron
+    // uniquement si il n'y en a pas deja un avec le meme nom
+    // independament de l'argument
+    queue_add_job(
+        $function,
+        _T('tache_cron_secondes', ['function' => $function, 'nb' => $period]),
+        [$last],
+        'genie/',
+        'function_only',
+        $time,
+        $priority
+    );
 }

ecrire/inc/install.php

Indentation +360 added lines, -360 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 
@@ -43,12 +43,12 @@ 
  * @return void
  **/
 function install_fichier_connexion($nom, $texte) {
-	$texte = '<' . "?php\n"
-		. "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
-		. $texte
-		. '?' . '>';
+    $texte = '<' . "?php\n"
+        . "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
+        . $texte
+        . '?' . '>';
 
-	ecrire_fichier($nom, $texte);
+    ecrire_fichier($nom, $texte);
 }
 
 
@@ -77,20 +77,20 @@ 
  *
  **/
 function install_connexion($adr, $port, $login, $pass, $base, $type, $pref, $ldap = '', $charset = '') {
-	$adr = addcslashes($adr, "'\\");
-	$port = addcslashes($port, "'\\");
-	$login = addcslashes($login, "'\\");
-	$pass = addcslashes($pass, "'\\");
-	$base = addcslashes($base, "'\\");
-	$type = addcslashes($type, "'\\");
-	$pref = addcslashes($pref, "'\\");
-	$ldap = addcslashes($ldap, "'\\");
-	$charset = addcslashes($charset, "'\\");
-
-	return "\$GLOBALS['spip_connect_version'] = 0.8;\n"
-	. 'spip_connect_db('
-	. "'$adr','$port','$login','$pass','$base'"
-	. ",'$type', '$pref','$ldap','$charset');\n";
+    $adr = addcslashes($adr, "'\\");
+    $port = addcslashes($port, "'\\");
+    $login = addcslashes($login, "'\\");
+    $pass = addcslashes($pass, "'\\");
+    $base = addcslashes($base, "'\\");
+    $type = addcslashes($type, "'\\");
+    $pref = addcslashes($pref, "'\\");
+    $ldap = addcslashes($ldap, "'\\");
+    $charset = addcslashes($charset, "'\\");
+
+    return "\$GLOBALS['spip_connect_version'] = 0.8;\n"
+    . 'spip_connect_db('
+    . "'$adr','$port','$login','$pass','$base'"
+    . ",'$type', '$pref','$ldap','$charset');\n";
 }
 
 
@@ -106,26 +106,26 @@ 
  *     Tableau des informations sur la connexion
  **/
 function analyse_fichier_connection($file) {
-	$s = @join('', file($file));
-	if (preg_match("#mysql_connect\([\"'](.*)[\"'],[\"'](.*)[\"'],[\"'](.*)[\"']\)#", $s, $regs)) {
-		array_shift($regs);
-
-		return $regs;
-	} else {
-		$ar = '\s*\'([^\']*)\'';
-		$r = '\s*,' . $ar;
-		$r = "#spip_connect_db[(]$ar$r$r$r$r(?:$r(?:$r(?:$r(?:$r)?)?)?)?#";
-		if (preg_match($r, $s, $regs)) {
-			$regs[2] = $regs[1] . (!$regs[2] ? '' : ':' . $regs[2] . ';');
-			array_shift($regs);
-			array_shift($regs);
-
-			return $regs;
-		}
-	}
-	spip_log("$file n'est pas un fichier de connexion");
-
-	return [];
+    $s = @join('', file($file));
+    if (preg_match("#mysql_connect\([\"'](.*)[\"'],[\"'](.*)[\"'],[\"'](.*)[\"']\)#", $s, $regs)) {
+        array_shift($regs);
+
+        return $regs;
+    } else {
+        $ar = '\s*\'([^\']*)\'';
+        $r = '\s*,' . $ar;
+        $r = "#spip_connect_db[(]$ar$r$r$r$r(?:$r(?:$r(?:$r(?:$r)?)?)?)?#";
+        if (preg_match($r, $s, $regs)) {
+            $regs[2] = $regs[1] . (!$regs[2] ? '' : ':' . $regs[2] . ';');
+            array_shift($regs);
+            array_shift($regs);
+
+            return $regs;
+        }
+    }
+    spip_log("$file n'est pas un fichier de connexion");
+
+    return [];
 }
 
 /**
@@ -142,73 +142,73 @@ 
  *     Liste des noms de connecteurs
  **/
 function bases_referencees($exclu = '') {
-	$tables = [];
-	foreach (preg_files(_DIR_CONNECT, '.php$') as $f) {
-		if ($f != $exclu and analyse_fichier_connection($f)) {
-			$tables[] = basename($f, '.php');
-		}
-	}
-
-	return $tables;
+    $tables = [];
+    foreach (preg_files(_DIR_CONNECT, '.php$') as $f) {
+        if ($f != $exclu and analyse_fichier_connection($f)) {
+            $tables[] = basename($f, '.php');
+        }
+    }
+
+    return $tables;
 }
 
 
 function install_mode_appel($server_db, $tout = true) {
-	return ($server_db != 'mysql') ? ''
-		: (($tout ? test_rappel_nom_base_mysql($server_db) : '')
-			. test_sql_mode_mysql($server_db));
+    return ($server_db != 'mysql') ? ''
+        : (($tout ? test_rappel_nom_base_mysql($server_db) : '')
+            . test_sql_mode_mysql($server_db));
 }
 
 //
 // Verifier que l'hebergement est compatible SPIP ... ou l'inverse :-)
 // (sert a l'etape 1 de l'installation)
 function tester_compatibilite_hebergement() {
-	$err = [];
-
-	$p = phpversion();
-	if (version_compare($p, _PHP_MIN, '<')) {
-		$err[] = _T('install_php_version', ['version' => $p, 'minimum' => _PHP_MIN]);
-	}
-
-	// Si on n'a pas la bonne version de PHP, c'est la fin
-	if ($err) {
-		die("<div class='error'>"
-			. '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>"
-			. "<li><strong>{$err[0]}</strong></li>\n</ul></div>");
-	}
-
-	// Il faut une base de donnees tout de meme ...
-	$serveurs = install_select_serveur();
-	if (!$serveurs) {
-		$err[] = _T('install_extension_php_obligatoire')
-			. " <a href='http://www.php.net/mysql'>MYSQL</a>"
-			. "| <a href='http://www.php.net/pgsql'>PostgreSQL</a>"
-			. "| <a href='http://www.php.net/sqlite'>SQLite</a>";
-	}
-
-	// et il faut preg
-	if (!function_exists('preg_match_all')) {
-		$err[] = _T('install_extension_php_obligatoire')
-			. " <a href='http://se.php.net/pcre'>PCRE</a>";
-	}
-
-	// et surtout pas ce mbstring.overload
-	if ($a = @ini_get('mbstring.func_overload')) {
-		$err[] = _T('install_extension_mbstring')
-			. "mbstring.func_overload=$a - <a href='http://www.php.net/mb_string'>mb_string</a>.<br /><small>";
-	}
-
-	if ($err) {
-		echo "<div class='error'>"
-			. '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>";
-		foreach ($err as $e) {
-			echo "<li><strong>$e</strong></li>\n";
-		}
-
-		# a priori ici on pourrait die(), mais il faut laisser la possibilite
-		# de forcer malgre tout (pour tester, ou si bug de detection)
-		echo "</ul></div>\n";
-	}
+    $err = [];
+
+    $p = phpversion();
+    if (version_compare($p, _PHP_MIN, '<')) {
+        $err[] = _T('install_php_version', ['version' => $p, 'minimum' => _PHP_MIN]);
+    }
+
+    // Si on n'a pas la bonne version de PHP, c'est la fin
+    if ($err) {
+        die("<div class='error'>"
+            . '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>"
+            . "<li><strong>{$err[0]}</strong></li>\n</ul></div>");
+    }
+
+    // Il faut une base de donnees tout de meme ...
+    $serveurs = install_select_serveur();
+    if (!$serveurs) {
+        $err[] = _T('install_extension_php_obligatoire')
+            . " <a href='http://www.php.net/mysql'>MYSQL</a>"
+            . "| <a href='http://www.php.net/pgsql'>PostgreSQL</a>"
+            . "| <a href='http://www.php.net/sqlite'>SQLite</a>";
+    }
+
+    // et il faut preg
+    if (!function_exists('preg_match_all')) {
+        $err[] = _T('install_extension_php_obligatoire')
+            . " <a href='http://se.php.net/pcre'>PCRE</a>";
+    }
+
+    // et surtout pas ce mbstring.overload
+    if ($a = @ini_get('mbstring.func_overload')) {
+        $err[] = _T('install_extension_mbstring')
+            . "mbstring.func_overload=$a - <a href='http://www.php.net/mb_string'>mb_string</a>.<br /><small>";
+    }
+
+    if ($err) {
+        echo "<div class='error'>"
+            . '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>";
+        foreach ($err as $e) {
+            echo "<li><strong>$e</strong></li>\n";
+        }
+
+        # a priori ici on pourrait die(), mais il faut laisser la possibilite
+        # de forcer malgre tout (pour tester, ou si bug de detection)
+        echo "</ul></div>\n";
+    }
 }
 
 
@@ -218,23 +218,23 @@ 
  * @note superflu ??
  */
 function login_hebergeur() {
-	$base_hebergeur = 'localhost'; # par defaut
+    $base_hebergeur = 'localhost'; # par defaut
 
-	// Free
-	if (preg_match(',(.*)\.free\.fr$,', $_SERVER['SERVER_NAME'], $regs)) {
-		$base_hebergeur = 'sql.free.fr';
-		$login_hebergeur = $regs[1];
-	} else {
-		$login_hebergeur = '';
-	}
+    // Free
+    if (preg_match(',(.*)\.free\.fr$,', $_SERVER['SERVER_NAME'], $regs)) {
+        $base_hebergeur = 'sql.free.fr';
+        $login_hebergeur = $regs[1];
+    } else {
+        $login_hebergeur = '';
+    }
 
-	return [$base_hebergeur, $login_hebergeur];
+    return [$base_hebergeur, $login_hebergeur];
 }
 
 
 function info_etape($titre, $complement = '') {
-	return '<h2>' . $titre . "</h2>\n" .
-	($complement ? '' . $complement . "\n" : '');
+    return '<h2>' . $titre . "</h2>\n" .
+    ($complement ? '' . $complement . "\n" : '');
 }
 
 /**
@@ -244,154 +244,154 @@ 
  * @return string Code HTML du bouton
  **/
 function bouton_suivant($code = '') {
-	if ($code == '') {
-		$code = _T('bouton_suivant');
-	}
-	static $suivant = 0;
-	$id = 'suivant' . (($suivant > 0) ? strval($suivant) : '');
-	$suivant += 1;
-
-	return "\n<p class='boutons suivant'><input id='" . $id . "' type='submit'\nvalue=\"" .
-	$code .
-	" >>\" /></p>\n";
+    if ($code == '') {
+        $code = _T('bouton_suivant');
+    }
+    static $suivant = 0;
+    $id = 'suivant' . (($suivant > 0) ? strval($suivant) : '');
+    $suivant += 1;
+
+    return "\n<p class='boutons suivant'><input id='" . $id . "' type='submit'\nvalue=\"" .
+    $code .
+    " >>\" /></p>\n";
 }
 
 function info_progression_etape($en_cours, $phase, $dir, $erreur = false) {
-	$intitule_etat = [];
-	//$en_cours = _request('etape')?_request('etape'):"";
-	$liste = find_all_in_path($dir, $phase . '(([0-9])+|fin)[.]php$');
-	$debut = 1;
-	$etat = 'ok';
-	$last = count($liste);
+    $intitule_etat = [];
+    //$en_cours = _request('etape')?_request('etape'):"";
+    $liste = find_all_in_path($dir, $phase . '(([0-9])+|fin)[.]php$');
+    $debut = 1;
+    $etat = 'ok';
+    $last = count($liste);
 //	$texte_etat = array('ok'=>'OK','encours'=>_T('en_cours'),'todo'=>_T('todo'));
 
-	$intitule_etat['etape_'][1] = typo(_T('info_connexion_base_donnee'));
-	$intitule_etat['etape_'][2] = typo(_T('menu_aide_installation_choix_base'));
-	$intitule_etat['etape_'][3] = typo(_T('info_informations_personnelles'));
-	$intitule_etat['etape_'][4] = typo(_T('info_derniere_etape'));
+    $intitule_etat['etape_'][1] = typo(_T('info_connexion_base_donnee'));
+    $intitule_etat['etape_'][2] = typo(_T('menu_aide_installation_choix_base'));
+    $intitule_etat['etape_'][3] = typo(_T('info_informations_personnelles'));
+    $intitule_etat['etape_'][4] = typo(_T('info_derniere_etape'));
 
-	$intitule_etat['etape_ldap'][1] = typo(_T('titre_connexion_ldap'));
-	$intitule_etat['etape_ldap'][2] = typo(_T('titre_connexion_ldap'));
-	$intitule_etat['etape_ldap'][3] = typo(_T('info_chemin_acces_1'));
-	$intitule_etat['etape_ldap'][4] = typo(_T('info_reglage_ldap'));
-	$intitule_etat['etape_ldap'][5] = typo(_T('info_ldap_ok'));
+    $intitule_etat['etape_ldap'][1] = typo(_T('titre_connexion_ldap'));
+    $intitule_etat['etape_ldap'][2] = typo(_T('titre_connexion_ldap'));
+    $intitule_etat['etape_ldap'][3] = typo(_T('info_chemin_acces_1'));
+    $intitule_etat['etape_ldap'][4] = typo(_T('info_reglage_ldap'));
+    $intitule_etat['etape_ldap'][5] = typo(_T('info_ldap_ok'));
 
 //	$aff_etapes = "<span id='etapes'>";
 
-	$aff_etapes = "<ul id='infos_etapes' class='infos_$phase$en_cours'>";
-
-	foreach ($liste as $etape => $fichier) {
-		if ($debut < $last) {
-			if ($debut == $en_cours && $erreur) {
-				$class = 'on erreur';
-			} else {
-				if ($debut == $en_cours) {
-					$class = 'on';
-				} else {
-					if ($debut > $en_cours) {
-						$class = 'prochains';
-					} else {
-						$class = 'valides';
-					}
-				}
-			}
-
-			$aff_etapes .= "<li class='$class'><div class='fond'>";
-			$aff_etapes .= ($debut == $en_cours) ? '<strong>' : '';
-			$aff_etapes .= '<em>' . _T('etape') . " </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
-			$aff_etapes .= $intitule_etat["$phase"][$debut];
-			$aff_etapes .= ($debut == $en_cours) ? '</strong>' : '';
-			$aff_etapes .= '</div></li>';
-		}
-		$debut++;
-	}
-	$aff_etapes .= '</ul>';
-	$aff_etapes .= "<br class='nettoyeur' />\n";
-
-	return $aff_etapes;
+    $aff_etapes = "<ul id='infos_etapes' class='infos_$phase$en_cours'>";
+
+    foreach ($liste as $etape => $fichier) {
+        if ($debut < $last) {
+            if ($debut == $en_cours && $erreur) {
+                $class = 'on erreur';
+            } else {
+                if ($debut == $en_cours) {
+                    $class = 'on';
+                } else {
+                    if ($debut > $en_cours) {
+                        $class = 'prochains';
+                    } else {
+                        $class = 'valides';
+                    }
+                }
+            }
+
+            $aff_etapes .= "<li class='$class'><div class='fond'>";
+            $aff_etapes .= ($debut == $en_cours) ? '<strong>' : '';
+            $aff_etapes .= '<em>' . _T('etape') . " </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
+            $aff_etapes .= $intitule_etat["$phase"][$debut];
+            $aff_etapes .= ($debut == $en_cours) ? '</strong>' : '';
+            $aff_etapes .= '</div></li>';
+        }
+        $debut++;
+    }
+    $aff_etapes .= '</ul>';
+    $aff_etapes .= "<br class='nettoyeur' />\n";
+
+    return $aff_etapes;
 }
 
 
 function fieldset($legend, $champs = [], $apres = '', $avant = '') {
-	return "<fieldset>\n" .
-	$avant .
-	($legend ? '<legend>' . $legend . "</legend>\n" : '') .
-	fieldset_champs($champs) .
-	$apres .
-	"</fieldset>\n";
+    return "<fieldset>\n" .
+    $avant .
+    ($legend ? '<legend>' . $legend . "</legend>\n" : '') .
+    fieldset_champs($champs) .
+    $apres .
+    "</fieldset>\n";
 }
 
 function fieldset_champs($champs = []) {
-	$fieldset = '';
-	foreach ($champs as $nom => $contenu) {
-		$type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
-		$class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
-		if (isset($contenu['alternatives'])) {
-			$fieldset .= $contenu['label'] . "\n";
-			foreach ($contenu['alternatives'] as $valeur => $label) {
-				$fieldset .= "<input type='radio' name='" . $nom .
-					"' id='$nom-$valeur' value='$valeur'"
-					. (($valeur == $contenu['valeur']) ? "\nchecked='checked'" : '')
-					. "/>\n";
-				$fieldset .= "<label for='$nom-$valeur'>" . $label . "</label>\n";
-			}
-			$fieldset .= "<br />\n";
-		} else {
-			$fieldset .= "<label for='" . $nom . "'>" . $contenu['label'] . "</label>\n";
-			$fieldset .= '<input ' . $class . "type='" . $type . "' id='" . $nom . "' name='" . $nom . "'\nvalue='" . $contenu['valeur'] . "'"
-				. (preg_match(',^(pass|login),', $nom) ? " autocomplete='off'" : '')
-				. ((isset($contenu['required']) and $contenu['required']) ? " required='required'" : '')
-				. " />\n";
-		}
-	}
-
-	return $fieldset;
+    $fieldset = '';
+    foreach ($champs as $nom => $contenu) {
+        $type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
+        $class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
+        if (isset($contenu['alternatives'])) {
+            $fieldset .= $contenu['label'] . "\n";
+            foreach ($contenu['alternatives'] as $valeur => $label) {
+                $fieldset .= "<input type='radio' name='" . $nom .
+                    "' id='$nom-$valeur' value='$valeur'"
+                    . (($valeur == $contenu['valeur']) ? "\nchecked='checked'" : '')
+                    . "/>\n";
+                $fieldset .= "<label for='$nom-$valeur'>" . $label . "</label>\n";
+            }
+            $fieldset .= "<br />\n";
+        } else {
+            $fieldset .= "<label for='" . $nom . "'>" . $contenu['label'] . "</label>\n";
+            $fieldset .= '<input ' . $class . "type='" . $type . "' id='" . $nom . "' name='" . $nom . "'\nvalue='" . $contenu['valeur'] . "'"
+                . (preg_match(',^(pass|login),', $nom) ? " autocomplete='off'" : '')
+                . ((isset($contenu['required']) and $contenu['required']) ? " required='required'" : '')
+                . " />\n";
+        }
+    }
+
+    return $fieldset;
 }
 
 function install_select_serveur() {
-	$options = [];
-	$dir = _DIR_RESTREINT . 'req/';
-	$d = opendir($dir);
-	if (!$d) {
-		return [];
-	}
-	while (($f = readdir($d)) !== false) {
-		if (
-			(preg_match('/^(.*)[.]php$/', $f, $s))
-			and is_readable($f = $dir . $f)
-		) {
-			require_once($f);
-			$s = $s[1];
-			$v = 'spip_versions_' . $s;
-			if (function_exists($v) and $v()) {
-				$titre = _T("install_select_type_$s");
-				// proposer mysql par defaut si dispo
-				$checked = ($s == 'mysql' ? " checked='checked'" : '');
-				$options[$s] = "<li><input type='radio' id='$s' value='$s' name='server_db'$checked>"
-					. "<label for='$s'>" . ($titre ?: $s) . '</label></li>';
-			} else {
-				spip_log("$s: portage indisponible");
-			}
-		}
-	}
-	sort($options);
-
-	return $options;
+    $options = [];
+    $dir = _DIR_RESTREINT . 'req/';
+    $d = opendir($dir);
+    if (!$d) {
+        return [];
+    }
+    while (($f = readdir($d)) !== false) {
+        if (
+            (preg_match('/^(.*)[.]php$/', $f, $s))
+            and is_readable($f = $dir . $f)
+        ) {
+            require_once($f);
+            $s = $s[1];
+            $v = 'spip_versions_' . $s;
+            if (function_exists($v) and $v()) {
+                $titre = _T("install_select_type_$s");
+                // proposer mysql par defaut si dispo
+                $checked = ($s == 'mysql' ? " checked='checked'" : '');
+                $options[$s] = "<li><input type='radio' id='$s' value='$s' name='server_db'$checked>"
+                    . "<label for='$s'>" . ($titre ?: $s) . '</label></li>';
+            } else {
+                spip_log("$s: portage indisponible");
+            }
+        }
+    }
+    sort($options);
+
+    return $options;
 }
 
 function install_connexion_form($db, $login, $pass, $predef, $hidden, $etape, $jquery = true) {
-	$server_db = (is_string($predef[0])) ? $predef[0] : '';
-
-	return generer_form_ecrire('install', (
-		"\n<input type='hidden' name='etape' value='$etape' />"
-		. $hidden
-		. (_request('echec') ?
-			('<p><b>' . _T('avis_connexion_echec_1') .
-				'</b></p><p>' . _T('avis_connexion_echec_2') . "</p><p style='font-size: small;'>" . _T('avis_connexion_echec_3') . '</p>')
-			: '')
-
-		. ($jquery ? http_script('', 'jquery.js') : '')
-		. http_script('
+    $server_db = (is_string($predef[0])) ? $predef[0] : '';
+
+    return generer_form_ecrire('install', (
+        "\n<input type='hidden' name='etape' value='$etape' />"
+        . $hidden
+        . (_request('echec') ?
+            ('<p><b>' . _T('avis_connexion_echec_1') .
+                '</b></p><p>' . _T('avis_connexion_echec_2') . "</p><p style='font-size: small;'>" . _T('avis_connexion_echec_3') . '</p>')
+            : '')
+
+        . ($jquery ? http_script('', 'jquery.js') : '')
+        . http_script('
 		jQuery(function($) {
 			$details_db = $("#install_adresse_base_hebergeur,#install_login_base_hebergeur,#install_pass_base_hebergeur");
 			$("input[type=hidden][name=server_db]").each(function(){
@@ -424,145 +424,145 @@ 
 			});
 		});')
 
-		. ($server_db
-			? '<input type="hidden" name="server_db" value="' . $server_db . '" />'
-			. (($predef[0])
-				? ('<h3>' . _T('install_serveur_hebergeur') . '</h3>')
-				: '')
-			: ('<fieldset><legend>'
-				. _T('install_select_type_db')
-				. '</legend>'
-				. '<p class="explication">'
-				. _T('install_types_db_connus')
-				// Passer l'avertissement SQLIte en  commentaire, on pourra facilement le supprimer par la suite sans changer les traductions.
-				// . "<br /><small>(". _T('install_types_db_connus_avertissement') .')</small>'
-				. '</p>'
-				. "\n<div class='p'>\n<ul>\n"
-				. join("\n", install_select_serveur())
-				. "\n</ul>\n</div></fieldset>")
-		)
-		. '<div id="install_adresse_base_hebergeur">'
-		. '<p>' . _T('texte_connexion_mysql') . '</p>'
-		. ($predef[1]
-			? '<h3>' . _T('install_adresse_base_hebergeur') . '</h3>'
-			: fieldset(
-				_T('entree_base_donnee_1'),
-				[
-					'adresse_db' => [
-						'label' => $db[1],
-						'valeur' => $db[0]
-					],
-				]
-			)
-		)
-		. '</div>'
-
-		. '<div id="install_login_base_hebergeur">'
-		. ($predef[2]
-			? '<h3>' . _T('install_login_base_hebergeur') . '</h3>'
-			: fieldset(
-				_T('entree_login_connexion_1'),
-				[
-					'login_db' => [
-						'label' => $login[1],
-						'valeur' => $login[0]
-					],
-				]
-			)
-		)
-		. '</div>'
-
-		. '<div id="install_pass_base_hebergeur">'
-		. ($predef[3]
-			? '<h3>' . _T('install_pass_base_hebergeur') . '</h3>'
-			: fieldset(
-				_T('entree_mot_passe_1'),
-				[
-					'pass_db' => [
-						'label' => $pass[1],
-						'valeur' => $pass[0]
-					],
-				]
-			)
-		)
-		. '</div>'
-
-		. bouton_suivant()));
+        . ($server_db
+            ? '<input type="hidden" name="server_db" value="' . $server_db . '" />'
+            . (($predef[0])
+                ? ('<h3>' . _T('install_serveur_hebergeur') . '</h3>')
+                : '')
+            : ('<fieldset><legend>'
+                . _T('install_select_type_db')
+                . '</legend>'
+                . '<p class="explication">'
+                . _T('install_types_db_connus')
+                // Passer l'avertissement SQLIte en  commentaire, on pourra facilement le supprimer par la suite sans changer les traductions.
+                // . "<br /><small>(". _T('install_types_db_connus_avertissement') .')</small>'
+                . '</p>'
+                . "\n<div class='p'>\n<ul>\n"
+                . join("\n", install_select_serveur())
+                . "\n</ul>\n</div></fieldset>")
+        )
+        . '<div id="install_adresse_base_hebergeur">'
+        . '<p>' . _T('texte_connexion_mysql') . '</p>'
+        . ($predef[1]
+            ? '<h3>' . _T('install_adresse_base_hebergeur') . '</h3>'
+            : fieldset(
+                _T('entree_base_donnee_1'),
+                [
+                    'adresse_db' => [
+                        'label' => $db[1],
+                        'valeur' => $db[0]
+                    ],
+                ]
+            )
+        )
+        . '</div>'
+
+        . '<div id="install_login_base_hebergeur">'
+        . ($predef[2]
+            ? '<h3>' . _T('install_login_base_hebergeur') . '</h3>'
+            : fieldset(
+                _T('entree_login_connexion_1'),
+                [
+                    'login_db' => [
+                        'label' => $login[1],
+                        'valeur' => $login[0]
+                    ],
+                ]
+            )
+        )
+        . '</div>'
+
+        . '<div id="install_pass_base_hebergeur">'
+        . ($predef[3]
+            ? '<h3>' . _T('install_pass_base_hebergeur') . '</h3>'
+            : fieldset(
+                _T('entree_mot_passe_1'),
+                [
+                    'pass_db' => [
+                        'label' => $pass[1],
+                        'valeur' => $pass[0]
+                    ],
+                ]
+            )
+        )
+        . '</div>'
+
+        . bouton_suivant()));
 }
 
 // 4 valeurs qu'on reconduit d'un script a l'autre
 // sauf s'ils sont predefinis.
 
 function predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db) {
-	return ((defined('_INSTALL_HOST_DB'))
-		? ''
-		: "\n<input type='hidden' name='adresse_db'  value=\"" . spip_htmlspecialchars($adresse_db) . '" />'
-	)
-	. ((defined('_INSTALL_USER_DB'))
-		? ''
-		: "\n<input type='hidden' name='login_db' value=\"" . spip_htmlspecialchars($login_db) . '" />'
-	)
-	. ((defined('_INSTALL_PASS_DB'))
-		? ''
-		: "\n<input type='hidden' name='pass_db' value=\"" . spip_htmlspecialchars($pass_db) . '" />'
-	)
-
-	. ((defined('_INSTALL_SERVER_DB'))
-		? ''
-		: "\n<input type='hidden' name='server_db' value=\"" . spip_htmlspecialchars($server_db) . '" />'
-	);
+    return ((defined('_INSTALL_HOST_DB'))
+        ? ''
+        : "\n<input type='hidden' name='adresse_db'  value=\"" . spip_htmlspecialchars($adresse_db) . '" />'
+    )
+    . ((defined('_INSTALL_USER_DB'))
+        ? ''
+        : "\n<input type='hidden' name='login_db' value=\"" . spip_htmlspecialchars($login_db) . '" />'
+    )
+    . ((defined('_INSTALL_PASS_DB'))
+        ? ''
+        : "\n<input type='hidden' name='pass_db' value=\"" . spip_htmlspecialchars($pass_db) . '" />'
+    )
+
+    . ((defined('_INSTALL_SERVER_DB'))
+        ? ''
+        : "\n<input type='hidden' name='server_db' value=\"" . spip_htmlspecialchars($server_db) . '" />'
+    );
 }
 
 // presentation des bases existantes
 
 function install_etape_liste_bases($server_db, $login_db, $disabled = []) {
-	$bases = $checked = [];
-	$noms = sql_listdbs($server_db);
-	if (!$noms) {
-		return '';
-	}
-
-	foreach ($noms as $nom) {
-		$id = spip_htmlspecialchars($nom);
-		$dis = in_array($nom, $disabled) ? " disabled='disabled'" : '';
-		$base = ' name="choix_db" value="'
-			. $nom
-			. '"'
-			. $dis
-			. " type='radio' id='$id'";
-		$label = "<label for='$id'>"
-			. ($dis ? "<i>$nom</i>" : $nom)
-			. '</label>';
-
-		if (
-			!$checked and !$dis and
-			(($nom == $login_db) or
-				($GLOBALS['table_prefix'] == $nom))
-		) {
-			$checked = "<input$base checked='checked' />\n$label";
-		} else {
-			$bases[] = "<input$base />\n$label";
-		}
-	}
-
-	if (!$bases && !$checked) {
-		return false;
-	}
-
-	if ($checked) {
-		array_unshift($bases, $checked);
-		$checked = true;
-	}
-
-	return [$checked, $bases];
+    $bases = $checked = [];
+    $noms = sql_listdbs($server_db);
+    if (!$noms) {
+        return '';
+    }
+
+    foreach ($noms as $nom) {
+        $id = spip_htmlspecialchars($nom);
+        $dis = in_array($nom, $disabled) ? " disabled='disabled'" : '';
+        $base = ' name="choix_db" value="'
+            . $nom
+            . '"'
+            . $dis
+            . " type='radio' id='$id'";
+        $label = "<label for='$id'>"
+            . ($dis ? "<i>$nom</i>" : $nom)
+            . '</label>';
+
+        if (
+            !$checked and !$dis and
+            (($nom == $login_db) or
+                ($GLOBALS['table_prefix'] == $nom))
+        ) {
+            $checked = "<input$base checked='checked' />\n$label";
+        } else {
+            $bases[] = "<input$base />\n$label";
+        }
+    }
+
+    if (!$bases && !$checked) {
+        return false;
+    }
+
+    if ($checked) {
+        array_unshift($bases, $checked);
+        $checked = true;
+    }
+
+    return [$checked, $bases];
 }
 
 function install_propager($hidden) {
-	$res = '';
-	foreach ($hidden as $k) {
-		$v = spip_htmlentities(_request($k));
-		$res .= "<input type='hidden' name='$k' value='$v' />";
-	}
+    $res = '';
+    foreach ($hidden as $k) {
+        $v = spip_htmlentities(_request($k));
+        $res .= "<input type='hidden' name='$k' value='$v' />";
+    }
 
-	return $res;
+    return $res;
 }

Spacing +39 added lines, -39 removed lines

@@ -43,10 +43,10 @@ 
  * @return void
  **/
 function install_fichier_connexion($nom, $texte) {
-	$texte = '<' . "?php\n"
+	$texte = '<'."?php\n"
 		. "if (!defined(\"_ECRIRE_INC_VERSION\")) return;\n"
 		. $texte
-		. '?' . '>';
+		. '?'.'>';
 
 	ecrire_fichier($nom, $texte);
 }
@@ -113,10 +113,10 @@ 
 		return $regs;
 	} else {
 		$ar = '\s*\'([^\']*)\'';
-		$r = '\s*,' . $ar;
+		$r = '\s*,'.$ar;
 		$r = "#spip_connect_db[(]$ar$r$r$r$r(?:$r(?:$r(?:$r(?:$r)?)?)?)?#";
 		if (preg_match($r, $s, $regs)) {
-			$regs[2] = $regs[1] . (!$regs[2] ? '' : ':' . $regs[2] . ';');
+			$regs[2] = $regs[1].(!$regs[2] ? '' : ':'.$regs[2].';');
 			array_shift($regs);
 			array_shift($regs);
 
@@ -173,7 +173,7 @@ 
 	// Si on n'a pas la bonne version de PHP, c'est la fin
 	if ($err) {
 		die("<div class='error'>"
-			. '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>"
+			. '<h3>'._T('avis_attention').'</h3><p>'._T('install_echec_annonce')."</p><ul class='spip'>"
 			. "<li><strong>{$err[0]}</strong></li>\n</ul></div>");
 	}
 
@@ -200,7 +200,7 @@ 
 
 	if ($err) {
 		echo "<div class='error'>"
-			. '<h3>' . _T('avis_attention') . '</h3><p>' . _T('install_echec_annonce') . "</p><ul class='spip'>";
+			. '<h3>'._T('avis_attention').'</h3><p>'._T('install_echec_annonce')."</p><ul class='spip'>";
 		foreach ($err as $e) {
 			echo "<li><strong>$e</strong></li>\n";
 		}
@@ -233,8 +233,8 @@ 
 
 
 function info_etape($titre, $complement = '') {
-	return '<h2>' . $titre . "</h2>\n" .
-	($complement ? '' . $complement . "\n" : '');
+	return '<h2>'.$titre."</h2>\n".
+	($complement ? ''.$complement."\n" : '');
 }
 
 /**
@@ -248,18 +248,18 @@ 
 		$code = _T('bouton_suivant');
 	}
 	static $suivant = 0;
-	$id = 'suivant' . (($suivant > 0) ? strval($suivant) : '');
+	$id = 'suivant'.(($suivant > 0) ? strval($suivant) : '');
 	$suivant += 1;
 
-	return "\n<p class='boutons suivant'><input id='" . $id . "' type='submit'\nvalue=\"" .
-	$code .
+	return "\n<p class='boutons suivant'><input id='".$id."' type='submit'\nvalue=\"".
+	$code.
 	" >>\" /></p>\n";
 }
 
 function info_progression_etape($en_cours, $phase, $dir, $erreur = false) {
 	$intitule_etat = [];
 	//$en_cours = _request('etape')?_request('etape'):"";
-	$liste = find_all_in_path($dir, $phase . '(([0-9])+|fin)[.]php$');
+	$liste = find_all_in_path($dir, $phase.'(([0-9])+|fin)[.]php$');
 	$debut = 1;
 	$etat = 'ok';
 	$last = count($liste);
@@ -298,7 +298,7 @@ 
 
 			$aff_etapes .= "<li class='$class'><div class='fond'>";
 			$aff_etapes .= ($debut == $en_cours) ? '<strong>' : '';
-			$aff_etapes .= '<em>' . _T('etape') . " </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
+			$aff_etapes .= '<em>'._T('etape')." </em><span class='numero_etape'>$debut</span><em>&nbsp;: </em>";
 			$aff_etapes .= $intitule_etat["$phase"][$debut];
 			$aff_etapes .= ($debut == $en_cours) ? '</strong>' : '';
 			$aff_etapes .= '</div></li>';
@@ -313,11 +313,11 @@ 
 
 
 function fieldset($legend, $champs = [], $apres = '', $avant = '') {
-	return "<fieldset>\n" .
-	$avant .
-	($legend ? '<legend>' . $legend . "</legend>\n" : '') .
-	fieldset_champs($champs) .
-	$apres .
+	return "<fieldset>\n".
+	$avant.
+	($legend ? '<legend>'.$legend."</legend>\n" : '').
+	fieldset_champs($champs).
+	$apres.
 	"</fieldset>\n";
 }
 
@@ -327,18 +327,18 @@ 
 		$type = isset($contenu['hidden']) ? 'hidden' : (preg_match(',^pass,', $nom) ? 'password' : 'text');
 		$class = isset($contenu['hidden']) ? '' : "class='formo' size='40' ";
 		if (isset($contenu['alternatives'])) {
-			$fieldset .= $contenu['label'] . "\n";
+			$fieldset .= $contenu['label']."\n";
 			foreach ($contenu['alternatives'] as $valeur => $label) {
-				$fieldset .= "<input type='radio' name='" . $nom .
+				$fieldset .= "<input type='radio' name='".$nom.
 					"' id='$nom-$valeur' value='$valeur'"
 					. (($valeur == $contenu['valeur']) ? "\nchecked='checked'" : '')
 					. "/>\n";
-				$fieldset .= "<label for='$nom-$valeur'>" . $label . "</label>\n";
+				$fieldset .= "<label for='$nom-$valeur'>".$label."</label>\n";
 			}
 			$fieldset .= "<br />\n";
 		} else {
-			$fieldset .= "<label for='" . $nom . "'>" . $contenu['label'] . "</label>\n";
-			$fieldset .= '<input ' . $class . "type='" . $type . "' id='" . $nom . "' name='" . $nom . "'\nvalue='" . $contenu['valeur'] . "'"
+			$fieldset .= "<label for='".$nom."'>".$contenu['label']."</label>\n";
+			$fieldset .= '<input '.$class."type='".$type."' id='".$nom."' name='".$nom."'\nvalue='".$contenu['valeur']."'"
 				. (preg_match(',^(pass|login),', $nom) ? " autocomplete='off'" : '')
 				. ((isset($contenu['required']) and $contenu['required']) ? " required='required'" : '')
 				. " />\n";
@@ -350,7 +350,7 @@ 
 
 function install_select_serveur() {
 	$options = [];
-	$dir = _DIR_RESTREINT . 'req/';
+	$dir = _DIR_RESTREINT.'req/';
 	$d = opendir($dir);
 	if (!$d) {
 		return [];
@@ -358,17 +358,17 @@ 
 	while (($f = readdir($d)) !== false) {
 		if (
 			(preg_match('/^(.*)[.]php$/', $f, $s))
-			and is_readable($f = $dir . $f)
+			and is_readable($f = $dir.$f)
 		) {
 			require_once($f);
 			$s = $s[1];
-			$v = 'spip_versions_' . $s;
+			$v = 'spip_versions_'.$s;
 			if (function_exists($v) and $v()) {
 				$titre = _T("install_select_type_$s");
 				// proposer mysql par defaut si dispo
 				$checked = ($s == 'mysql' ? " checked='checked'" : '');
 				$options[$s] = "<li><input type='radio' id='$s' value='$s' name='server_db'$checked>"
-					. "<label for='$s'>" . ($titre ?: $s) . '</label></li>';
+					. "<label for='$s'>".($titre ?: $s).'</label></li>';
 			} else {
 				spip_log("$s: portage indisponible");
 			}
@@ -386,8 +386,8 @@ 
 		"\n<input type='hidden' name='etape' value='$etape' />"
 		. $hidden
 		. (_request('echec') ?
-			('<p><b>' . _T('avis_connexion_echec_1') .
-				'</b></p><p>' . _T('avis_connexion_echec_2') . "</p><p style='font-size: small;'>" . _T('avis_connexion_echec_3') . '</p>')
+			('<p><b>'._T('avis_connexion_echec_1').
+				'</b></p><p>'._T('avis_connexion_echec_2')."</p><p style='font-size: small;'>"._T('avis_connexion_echec_3').'</p>')
 			: '')
 
 		. ($jquery ? http_script('', 'jquery.js') : '')
@@ -425,9 +425,9 @@ 
 		});')
 
 		. ($server_db
-			? '<input type="hidden" name="server_db" value="' . $server_db . '" />'
+			? '<input type="hidden" name="server_db" value="'.$server_db.'" />'
 			. (($predef[0])
-				? ('<h3>' . _T('install_serveur_hebergeur') . '</h3>')
+				? ('<h3>'._T('install_serveur_hebergeur').'</h3>')
 				: '')
 			: ('<fieldset><legend>'
 				. _T('install_select_type_db')
@@ -442,9 +442,9 @@ 
 				. "\n</ul>\n</div></fieldset>")
 		)
 		. '<div id="install_adresse_base_hebergeur">'
-		. '<p>' . _T('texte_connexion_mysql') . '</p>'
+		. '<p>'._T('texte_connexion_mysql').'</p>'
 		. ($predef[1]
-			? '<h3>' . _T('install_adresse_base_hebergeur') . '</h3>'
+			? '<h3>'._T('install_adresse_base_hebergeur').'</h3>'
 			: fieldset(
 				_T('entree_base_donnee_1'),
 				[
@@ -459,7 +459,7 @@ 
 
 		. '<div id="install_login_base_hebergeur">'
 		. ($predef[2]
-			? '<h3>' . _T('install_login_base_hebergeur') . '</h3>'
+			? '<h3>'._T('install_login_base_hebergeur').'</h3>'
 			: fieldset(
 				_T('entree_login_connexion_1'),
 				[
@@ -474,7 +474,7 @@ 
 
 		. '<div id="install_pass_base_hebergeur">'
 		. ($predef[3]
-			? '<h3>' . _T('install_pass_base_hebergeur') . '</h3>'
+			? '<h3>'._T('install_pass_base_hebergeur').'</h3>'
 			: fieldset(
 				_T('entree_mot_passe_1'),
 				[
@@ -496,20 +496,20 @@ 
 function predef_ou_cache($adresse_db, $login_db, $pass_db, $server_db) {
 	return ((defined('_INSTALL_HOST_DB'))
 		? ''
-		: "\n<input type='hidden' name='adresse_db'  value=\"" . spip_htmlspecialchars($adresse_db) . '" />'
+		: "\n<input type='hidden' name='adresse_db'  value=\"".spip_htmlspecialchars($adresse_db).'" />'
 	)
 	. ((defined('_INSTALL_USER_DB'))
 		? ''
-		: "\n<input type='hidden' name='login_db' value=\"" . spip_htmlspecialchars($login_db) . '" />'
+		: "\n<input type='hidden' name='login_db' value=\"".spip_htmlspecialchars($login_db).'" />'
 	)
 	. ((defined('_INSTALL_PASS_DB'))
 		? ''
-		: "\n<input type='hidden' name='pass_db' value=\"" . spip_htmlspecialchars($pass_db) . '" />'
+		: "\n<input type='hidden' name='pass_db' value=\"".spip_htmlspecialchars($pass_db).'" />'
 	)
 
 	. ((defined('_INSTALL_SERVER_DB'))
 		? ''
-		: "\n<input type='hidden' name='server_db' value=\"" . spip_htmlspecialchars($server_db) . '" />'
+		: "\n<input type='hidden' name='server_db' value=\"".spip_htmlspecialchars($server_db).'" />'
 	);
 }
 

ecrire/inc/lien.php

Spacing +11 added lines, -11 removed lines

@@ -98,7 +98,7 @@ 
 	return $r ?: traiter_lien_explicite($ref, $texte, $pour, $connect, $echappe_typo);
 }
 
-define('_EXTRAIRE_LIEN', ',^\s*(?:' . _PROTOCOLES_STD . '):?/?/?\s*$,iS');
+define('_EXTRAIRE_LIEN', ',^\s*(?:'._PROTOCOLES_STD.'):?/?/?\s*$,iS');
 
 function traiter_lien_explicite($ref, $texte = '', $pour = 'url', string $connect = '', $echappe_typo = true) {
 	if (preg_match(_EXTRAIRE_LIEN, $ref)) {
@@ -114,19 +114,19 @@ 
 		$lien_court = charger_fonction('lien_court', 'inc');
 		$texte = $lien_court($texte);
 		if ($echappe_typo) {
-			$texte = '<html>' . quote_amp($texte) . '</html>';
+			$texte = '<html>'.quote_amp($texte).'</html>';
 		}
 	}
 
 	// petites corrections d'URL
 	if (preg_match('/^www\.[^@]+$/S', $lien)) {
-		$lien = 'http://' . $lien;
+		$lien = 'http://'.$lien;
 	} else {
 		if (strpos($lien, '@') && email_valide($lien)) {
 			if (!$texte) {
 				$texte = $lien;
 			}
-			$lien = 'mailto:' . $lien;
+			$lien = 'mailto:'.$lien;
 		}
 	}
 
@@ -142,7 +142,7 @@ 
 }
 
 function liens_implicite_glose_dist($texte, $id, $type, $args, $ancre, string $connect = '') {
-	if (function_exists($f = 'glossaire_' . $ancre)) {
+	if (function_exists($f = 'glossaire_'.$ancre)) {
 		$url = $f($texte, $id);
 	} else {
 		$url = glossaire_std($texte);
@@ -156,7 +156,7 @@ 
 	if (!($match = typer_raccourci($ref))) {
 		return false;
 	}
-	[$type, , $id, , $args, , $ancre] = array_pad($match, 7, null);
+	[$type,, $id,, $args,, $ancre] = array_pad($match, 7, null);
 	// attention dans le cas des sites le lien doit pointer non pas sur
 	// la page locale du site, mais directement sur le site lui-meme
 	if ($f = charger_fonction("implicite_$type", 'liens', true)) {
@@ -183,7 +183,7 @@ 
 		$r['titre'] = $texte;
 	}
 	if (!@$r['titre']) {
-		$r['titre'] = _T($type) . " $id";
+		$r['titre'] = _T($type)." $id";
 	}
 	if ($pour == 'titre') {
 		return $r['titre'];
@@ -196,7 +196,7 @@ 
 		and $mime = sql_getfetsel(
 			'mime_type',
 			'spip_types_documents',
-			'extension IN (' . sql_get_select('extension', 'spip_documents', 'id_document=' . sql_quote($id)) . ')',
+			'extension IN ('.sql_get_select('extension', 'spip_documents', 'id_document='.sql_quote($id)).')',
 			'',
 			'',
 			'',
@@ -297,11 +297,11 @@ 
 	'(<([a-z_-]{3,})' # <modele
 	. '\s*([0-9]*)\s*' # id
 	. '([|](?:<[^<>]*>|[^>])*?)?' # |arguments (y compris des tags <...>)
-	. '\s*/?' . '>)' # fin du modele >
+	. '\s*/?'.'>)' # fin du modele >
 	. '\s*(<\/a>)?' # eventuel </a>
 );
 
-define('_RACCOURCI_MODELE_DEBUT', '@^' . _RACCOURCI_MODELE . '@isS');
+define('_RACCOURCI_MODELE_DEBUT', '@^'._RACCOURCI_MODELE.'@isS');
 
 function traiter_modeles($texte, $doublons = false, $echap = '', string $connect = '', $liens = null, $env = []) {
 	// preserver la compatibilite : true = recherche des documents
@@ -380,7 +380,7 @@ 
 						if (test_espace_prive()) {
 							$modele = entites_html(substr($texte, $a, $cherche));
 							if (!is_null($liens)) {
-								$modele = '<pre>' . str_replace($liens[0], $liens[1], $modele) . '</pre>';
+								$modele = '<pre>'.str_replace($liens[0], $liens[1], $modele).'</pre>';
 							}
 						}
 					}

Indentation +291 added lines, -291 removed lines

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

ecrire/inc/texte_mini.php

Indentation +401 added lines, -401 removed lines

@@ -17,7 +17,7 @@ 
  **/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 include_spip('inc/filtres');
 include_spip('inc/lang');
@@ -39,21 +39,21 @@ 
  **/
 function definir_puce() {
 
-	// Attention au sens, qui n'est pas defini de la meme facon dans
-	// l'espace prive (spip_lang est la langue de l'interface, lang_dir
-	// celle du texte) et public (spip_lang est la langue du texte)
-	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
+    // Attention au sens, qui n'est pas defini de la meme facon dans
+    // l'espace prive (spip_lang est la langue de l'interface, lang_dir
+    // celle du texte) et public (spip_lang est la langue du texte)
+    $dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
-	if ($dir == 'rtl') {
-		$p .= '_rtl';
-	}
+    $p = 'puce' . (test_espace_prive() ? '_prive' : '');
+    if ($dir == 'rtl') {
+        $p .= '_rtl';
+    }
 
-	if (!isset($GLOBALS[$p])) {
-		$GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
-	}
+    if (!isset($GLOBALS[$p])) {
+        $GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
+    }
 
-	return $GLOBALS[$p];
+    return $GLOBALS[$p];
 }
 
 
@@ -61,14 +61,14 @@ 
 // dont on souhaite qu'ils provoquent un saut de paragraphe
 
 if (!defined('_BALISES_BLOCS')) {
-	define(
-		'_BALISES_BLOCS',
-		'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
-	);
+    define(
+        '_BALISES_BLOCS',
+        'address|applet|article|aside|blockquote|button|center|d[ltd]|div|fieldset|fig(ure|caption)|footer|form|h[1-6r]|hgroup|head|header|iframe|li|map|marquee|nav|noscript|object|ol|pre|section|t(able|[rdh]|body|foot|extarea)|ul|script|style'
+    );
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+    define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
 }
 
 //
@@ -79,106 +79,106 @@ 
 // une $source differente ; le script detecte automagiquement si ce qu'on
 // echappe est un div ou un span
 function code_echappement($rempl, $source = '', $no_transform = false, $mode = null) {
-	if (!strlen($rempl)) {
-		return '';
-	}
-
-	// Tester si on echappe en span ou en div
-	if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
-	}
-
-	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
-	$taille = 30000;
-	$return = '';
-	for ($i = 0; $i < strlen($rempl); $i += $taille) {
-		// Convertir en base64 et cacher dans un attribut
-		// utiliser les " pour eviter le re-encodage de ' et &#8217
-		$base64 = base64_encode(substr($rempl, $i, $taille));
-		$return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
-	}
-
-	return $return;
+    if (!strlen($rempl)) {
+        return '';
+    }
+
+    // Tester si on echappe en span ou en div
+    if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
+        $mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+    }
+
+    // Decouper en morceaux, base64 a des probleme selon la taille de la pile
+    $taille = 30000;
+    $return = '';
+    for ($i = 0; $i < strlen($rempl); $i += $taille) {
+        // Convertir en base64 et cacher dans un attribut
+        // utiliser les " pour eviter le re-encodage de ' et &#8217
+        $base64 = base64_encode(substr($rempl, $i, $taille));
+        $return .= "<$mode class=\"base64$source\" title=\"$base64\"></$mode>";
+    }
+
+    return $return;
 }
 
 
 // Echapper les <html>...</ html>
 function traiter_echap_html_dist($regs) {
-	return $regs[3];
+    return $regs[3];
 }
 
 // Echapper les <pre>...</ pre>
 function traiter_echap_pre_dist($regs) {
-	// echapper les <code> dans <pre>
-	$pre = $regs[3];
-
-	// echapper les < dans <code>
-	// on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
-	if (
-		strpos($pre, '<') !== false
-		and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $m) {
-			if ($m[1] === 'code') {
-				$code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
-				$pre = str_replace($m[0], $code, $pre);
-			}
-		}
-	}
-	return "<pre>$pre</pre>";
+    // echapper les <code> dans <pre>
+    $pre = $regs[3];
+
+    // echapper les < dans <code>
+    // on utilise _PROTEGE_BLOCS pour simplifier le code et la maintenance, mais on est interesse que par <code>
+    if (
+        strpos($pre, '<') !== false
+        and preg_match_all(_PROTEGE_BLOCS, $pre, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $m) {
+            if ($m[1] === 'code') {
+                $code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
+                $pre = str_replace($m[0], $code, $pre);
+            }
+        }
+    }
+    return "<pre>$pre</pre>";
 }
 
 // Echapper les <code>...</ code>
 function traiter_echap_code_dist($regs) {
-	[, , $att, $corps] = $regs;
-	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
-
-	// ne pas mettre le <div...> s'il n'y a qu'une ligne
-	if (is_int(strpos($echap, "\n"))) {
-		// supprimer les sauts de ligne debut/fin
-		// (mais pas les espaces => ascii art).
-		$echap = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $echap);
-		$echap = nl2br($echap);
-		$echap = "<div style='text-align: left;' "
-			. "class='spip_code' dir='ltr'><code$att>"
-			. $echap . '</code></div>';
-	} else {
-		$echap = "<code$att class='spip_code' dir='ltr'>" . $echap . '</code>';
-	}
-
-	$echap = str_replace("\t", '&nbsp; &nbsp; &nbsp; &nbsp; ', $echap);
-	$echap = str_replace('  ', ' &nbsp;', $echap);
-
-	return $echap;
+    [, , $att, $corps] = $regs;
+    $echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
+
+    // ne pas mettre le <div...> s'il n'y a qu'une ligne
+    if (is_int(strpos($echap, "\n"))) {
+        // supprimer les sauts de ligne debut/fin
+        // (mais pas les espaces => ascii art).
+        $echap = preg_replace("/^[\n\r]+|[\n\r]+$/s", '', $echap);
+        $echap = nl2br($echap);
+        $echap = "<div style='text-align: left;' "
+            . "class='spip_code' dir='ltr'><code$att>"
+            . $echap . '</code></div>';
+    } else {
+        $echap = "<code$att class='spip_code' dir='ltr'>" . $echap . '</code>';
+    }
+
+    $echap = str_replace("\t", '&nbsp; &nbsp; &nbsp; &nbsp; ', $echap);
+    $echap = str_replace('  ', ' &nbsp;', $echap);
+
+    return $echap;
 }
 
 // Echapper les <cadre>...</ cadre> aka <frame>...</ frame>
 function traiter_echap_cadre_dist($regs) {
-	$echap = trim(entites_html($regs[3]));
-	// compter les lignes un peu plus finement qu'avec les \n
-	$lignes = explode("\n", trim($echap));
-	$n = 0;
-	foreach ($lignes as $l) {
-		$n += floor(strlen($l) / 60) + 1;
-	}
-	$n = max($n, 2);
-	$echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre' dir='ltr'>$echap</textarea>";
-
-	return $echap;
+    $echap = trim(entites_html($regs[3]));
+    // compter les lignes un peu plus finement qu'avec les \n
+    $lignes = explode("\n", trim($echap));
+    $n = 0;
+    foreach ($lignes as $l) {
+        $n += floor(strlen($l) / 60) + 1;
+    }
+    $n = max($n, 2);
+    $echap = "\n<textarea readonly='readonly' cols='40' rows='$n' class='spip_cadre' dir='ltr'>$echap</textarea>";
+
+    return $echap;
 }
 
 function traiter_echap_frame_dist($regs) {
-	return traiter_echap_cadre_dist($regs);
+    return traiter_echap_cadre_dist($regs);
 }
 
 function traiter_echap_script_dist($regs) {
-	// rendre joli (et inactif) si c'est un script language=php
-	if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
-		return highlight_string($regs[0], true);
-	}
+    // rendre joli (et inactif) si c'est un script language=php
+    if (preg_match(',<script\b[^>]+php,ims', $regs[0])) {
+        return highlight_string($regs[0], true);
+    }
 
-	// Cas normal : le script passe tel quel
-	return $regs[0];
+    // Cas normal : le script passe tel quel
+    return $regs[0];
 }
 
 define('_PROTEGE_BLOCS', ',<(html|pre|code|cadre|frame|script|style)(\s[^>]*)?>(.*)</\1>,UimsS');
@@ -196,79 +196,79 @@ 
  * @return string|string[]
  */
 function echappe_html(
-	$letexte,
-	$source = '',
-	$no_transform = false,
-	$preg = '',
-	$callback_prefix = ''
+    $letexte,
+    $source = '',
+    $no_transform = false,
+    $preg = '',
+    $callback_prefix = ''
 ) {
-	if (!is_string($letexte) or !strlen($letexte)) {
-		return $letexte;
-	}
-
-	// si le texte recu est long PCRE risque d'exploser, on
-	// fait donc un mic-mac pour augmenter pcre.backtrack_limit
-	if (($len = strlen($letexte)) > 100000) {
-		if (!$old = @ini_get('pcre.backtrack_limit')) {
-			$old = 100000;
-		}
-		if ($len > $old) {
-			$a = @ini_set('pcre.backtrack_limit', $len);
-			spip_log("ini_set pcre.backtrack_limit=$len ($old)");
-		}
-	}
-
-	if (
-		($preg or strpos($letexte, '<') !== false)
-		and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
-	) {
-		foreach ($matches as $regs) {
-			// echappements tels quels ?
-			if ($no_transform) {
-				$echap = $regs[0];
-			} // sinon les traiter selon le cas
-			else {
-				if (
-					function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
-					or function_exists($f = $f . '_dist')
-				) {
-					$echap = $f($regs);
-				}
-			}
-
-			$p = strpos($letexte, (string) $regs[0]);
-			$letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
-		}
-	}
-
-	if ($no_transform) {
-		return $letexte;
-	}
-
-	// Echapper le php pour faire joli (ici, c'est pas pour la securite)
-	// seulement si on a echappe les <script>
-	// (derogatoire car on ne peut pas faire passer < ? ... ? >
-	// dans une callback autonommee
-	if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
-		if (
-			strpos($letexte, '<' . '?') !== false and preg_match_all(
-				',<[?].*($|[?]>),UisS',
-				$letexte,
-				$matches,
-				PREG_SET_ORDER
-			)
-		) {
-			foreach ($matches as $regs) {
-				$letexte = str_replace(
-					$regs[0],
-					code_echappement(highlight_string($regs[0], true), $source),
-					$letexte
-				);
-			}
-		}
-	}
-
-	return $letexte;
+    if (!is_string($letexte) or !strlen($letexte)) {
+        return $letexte;
+    }
+
+    // si le texte recu est long PCRE risque d'exploser, on
+    // fait donc un mic-mac pour augmenter pcre.backtrack_limit
+    if (($len = strlen($letexte)) > 100000) {
+        if (!$old = @ini_get('pcre.backtrack_limit')) {
+            $old = 100000;
+        }
+        if ($len > $old) {
+            $a = @ini_set('pcre.backtrack_limit', $len);
+            spip_log("ini_set pcre.backtrack_limit=$len ($old)");
+        }
+    }
+
+    if (
+        ($preg or strpos($letexte, '<') !== false)
+        and preg_match_all($preg ?: _PROTEGE_BLOCS, $letexte, $matches, PREG_SET_ORDER)
+    ) {
+        foreach ($matches as $regs) {
+            // echappements tels quels ?
+            if ($no_transform) {
+                $echap = $regs[0];
+            } // sinon les traiter selon le cas
+            else {
+                if (
+                    function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
+                    or function_exists($f = $f . '_dist')
+                ) {
+                    $echap = $f($regs);
+                }
+            }
+
+            $p = strpos($letexte, (string) $regs[0]);
+            $letexte = substr_replace($letexte, code_echappement($echap, $source, $no_transform), $p, strlen($regs[0]));
+        }
+    }
+
+    if ($no_transform) {
+        return $letexte;
+    }
+
+    // Echapper le php pour faire joli (ici, c'est pas pour la securite)
+    // seulement si on a echappe les <script>
+    // (derogatoire car on ne peut pas faire passer < ? ... ? >
+    // dans une callback autonommee
+    if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
+        if (
+            strpos($letexte, '<' . '?') !== false and preg_match_all(
+                ',<[?].*($|[?]>),UisS',
+                $letexte,
+                $matches,
+                PREG_SET_ORDER
+            )
+        ) {
+            foreach ($matches as $regs) {
+                $letexte = str_replace(
+                    $regs[0],
+                    code_echappement(highlight_string($regs[0], true), $source),
+                    $letexte
+                );
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 //
@@ -276,57 +276,57 @@ 
 // Rq: $source sert a faire des echappements "a soi" qui ne sont pas nettoyes
 // par propre() : exemple dans multi et dans typo()
 function echappe_retour($letexte, $source = '', $filtre = '') {
-	if (strpos($letexte, (string) "base64$source")) {
-		# spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
-		$max_prof = 5;
-		while (
-			strpos($letexte, '<') !== false
-			and
-			preg_match_all(
-				',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
-				$letexte,
-				$regs,
-				PREG_SET_ORDER
-			)
-			and $max_prof--
-		) {
-			foreach ($regs as $reg) {
-				$rempl = base64_decode(extraire_attribut($reg[0], 'title'));
-				// recherche d'attributs supplementaires
-				$at = [];
-				foreach (['lang', 'dir'] as $attr) {
-					if ($a = extraire_attribut($reg[0], $attr)) {
-						$at[$attr] = $a;
-					}
-				}
-				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
-					foreach ($at as $attr => $a) {
-						$rempl = inserer_attribut($rempl, $attr, $a);
-					}
-				}
-				if ($filtre) {
-					$rempl = $filtre($rempl);
-				}
-				$letexte = str_replace($reg[0], $rempl, $letexte);
-			}
-		}
-	}
-
-	return $letexte;
+    if (strpos($letexte, (string) "base64$source")) {
+        # spip_log(spip_htmlspecialchars($letexte));  ## pour les curieux
+        $max_prof = 5;
+        while (
+            strpos($letexte, '<') !== false
+            and
+            preg_match_all(
+                ',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+                $letexte,
+                $regs,
+                PREG_SET_ORDER
+            )
+            and $max_prof--
+        ) {
+            foreach ($regs as $reg) {
+                $rempl = base64_decode(extraire_attribut($reg[0], 'title'));
+                // recherche d'attributs supplementaires
+                $at = [];
+                foreach (['lang', 'dir'] as $attr) {
+                    if ($a = extraire_attribut($reg[0], $attr)) {
+                        $at[$attr] = $a;
+                    }
+                }
+                if ($at) {
+                    $rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+                    foreach ($at as $attr => $a) {
+                        $rempl = inserer_attribut($rempl, $attr, $a);
+                    }
+                }
+                if ($filtre) {
+                    $rempl = $filtre($rempl);
+                }
+                $letexte = str_replace($reg[0], $rempl, $letexte);
+            }
+        }
+    }
+
+    return $letexte;
 }
 
 // Reinserer le javascript de confiance (venant des modeles)
 
 function echappe_retour_modeles($letexte, $interdire_scripts = false) {
-	$letexte = echappe_retour($letexte);
+    $letexte = echappe_retour($letexte);
 
-	// Dans les appels directs hors squelette, securiser aussi ici
-	if ($interdire_scripts) {
-		$letexte = interdire_scripts($letexte);
-	}
+    // Dans les appels directs hors squelette, securiser aussi ici
+    if ($interdire_scripts) {
+        $letexte = interdire_scripts($letexte);
+    }
 
-	return trim($letexte);
+    return trim($letexte);
 }
 
 
@@ -354,131 +354,131 @@ 
  *     Texte coupé
  **/
 function couper($texte, $taille = 50, $suite = null) {
-	if (!($length = strlen($texte)) or $taille <= 0) {
-		return '';
-	}
-	$offset = 400 + 2 * $taille;
-	while (
-		$offset < $length
-		and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
-	) {
-		$offset = 2 * $offset;
-	}
-	if (
-		$offset < $length
-		&& ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
-	) {
-		$p_tag_fermant = strpos($texte, '>', $offset);
-		if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
-			$offset = $p_tag_fermant + 1;
-		} // prolonger la coupe jusqu'au tag fermant suivant eventuel
-	}
-	$texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
-
-	if (!function_exists('nettoyer_raccourcis_typo')) {
-		include_spip('inc/lien');
-	}
-	$texte = nettoyer_raccourcis_typo($texte);
-
-	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace('/<p( [^>]*)?' . '>/', "\r", $texte);
-	$texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
-
-	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
-	$texte = str_replace("\n\n", "\r", $texte);
-
-	// supprimer les tags
-	$texte = supprimer_tags($texte);
-	$texte = trim(str_replace("\n", ' ', $texte));
-	$texte .= "\n";  // marquer la fin
-
-	// corriger la longueur de coupe
-	// en fonction de la presence de caracteres utf
-	if ($GLOBALS['meta']['charset'] == 'utf-8') {
-		$long = charset2unicode($texte);
-		$long = spip_substr($long, 0, max($taille, 1));
-		$nbcharutf = preg_match_all('/(&#[0-9]{3,6};)/S', $long, $matches);
-		$taille += $nbcharutf;
-	}
-
-
-	// couper au mot precedent
-	$long = spip_substr($texte, 0, max($taille - 4, 1));
-	$u = $GLOBALS['meta']['pcre_u'];
-	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
-	if (is_null($suite)) {
-		$suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
-	}
-	$points = $suite;
-
-	// trop court ? ne pas faire de (...)
-	if (spip_strlen($court) < max(0.75 * $taille, 2)) {
-		$points = '';
-		$long = spip_substr($texte, 0, $taille);
-		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
-		// encore trop court ? couper au caractere
-		if (spip_strlen($texte) < 0.75 * $taille) {
-			$texte = $long;
-		}
-	} else {
-		$texte = $court;
-	}
-
-	if (strpos($texte, "\n")) {  // la fin est encore la : c'est qu'on n'a pas de texte de suite
-	$points = '';
-	}
-
-	// remettre les paragraphes
-	$texte = preg_replace("/\r+/", "\n\n", $texte);
-
-	// supprimer l'eventuelle entite finale mal coupee
-	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
-
-	return quote_amp(trim($texte)) . $points;
+    if (!($length = strlen($texte)) or $taille <= 0) {
+        return '';
+    }
+    $offset = 400 + 2 * $taille;
+    while (
+        $offset < $length
+        and strlen(preg_replace(',<(!--|\w|/)[^>]+>,Uims', '', substr($texte, 0, $offset))) < $taille
+    ) {
+        $offset = 2 * $offset;
+    }
+    if (
+        $offset < $length
+        && ($p_tag_ouvrant = strpos($texte, '<', $offset)) !== null
+    ) {
+        $p_tag_fermant = strpos($texte, '>', $offset);
+        if ($p_tag_fermant && ($p_tag_fermant < $p_tag_ouvrant)) {
+            $offset = $p_tag_fermant + 1;
+        } // prolonger la coupe jusqu'au tag fermant suivant eventuel
+    }
+    $texte = substr($texte, 0, $offset); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
+
+    if (!function_exists('nettoyer_raccourcis_typo')) {
+        include_spip('inc/lien');
+    }
+    $texte = nettoyer_raccourcis_typo($texte);
+
+    // balises de sauts de ligne et paragraphe
+    $texte = preg_replace('/<p( [^>]*)?' . '>/', "\r", $texte);
+    $texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
+
+    // on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
+    $texte = str_replace("\n\n", "\r", $texte);
+
+    // supprimer les tags
+    $texte = supprimer_tags($texte);
+    $texte = trim(str_replace("\n", ' ', $texte));
+    $texte .= "\n";  // marquer la fin
+
+    // corriger la longueur de coupe
+    // en fonction de la presence de caracteres utf
+    if ($GLOBALS['meta']['charset'] == 'utf-8') {
+        $long = charset2unicode($texte);
+        $long = spip_substr($long, 0, max($taille, 1));
+        $nbcharutf = preg_match_all('/(&#[0-9]{3,6};)/S', $long, $matches);
+        $taille += $nbcharutf;
+    }
+
+
+    // couper au mot precedent
+    $long = spip_substr($texte, 0, max($taille - 4, 1));
+    $u = $GLOBALS['meta']['pcre_u'];
+    $court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+    if (is_null($suite)) {
+        $suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
+    }
+    $points = $suite;
+
+    // trop court ? ne pas faire de (...)
+    if (spip_strlen($court) < max(0.75 * $taille, 2)) {
+        $points = '';
+        $long = spip_substr($texte, 0, $taille);
+        $texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+        // encore trop court ? couper au caractere
+        if (spip_strlen($texte) < 0.75 * $taille) {
+            $texte = $long;
+        }
+    } else {
+        $texte = $court;
+    }
+
+    if (strpos($texte, "\n")) {  // la fin est encore la : c'est qu'on n'a pas de texte de suite
+    $points = '';
+    }
+
+    // remettre les paragraphes
+    $texte = preg_replace("/\r+/", "\n\n", $texte);
+
+    // supprimer l'eventuelle entite finale mal coupee
+    $texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
+
+    return quote_amp(trim($texte)) . $points;
 }
 
 
 function protege_js_modeles($t) {
-	if (isset($GLOBALS['visiteur_session'])) {
-		if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_JS_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_JS_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
-			}
-		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
-			if (!defined('_PROTEGE_PHP_MODELES')) {
-				include_spip('inc/acces');
-				define('_PROTEGE_PHP_MODELES', creer_uniqid());
-			}
-			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
-			}
-		}
-	}
-
-	return $t;
+    if (isset($GLOBALS['visiteur_session'])) {
+        if (preg_match_all(',<script.*?($|</script.),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_JS_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_JS_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+            }
+        }
+        if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+            if (!defined('_PROTEGE_PHP_MODELES')) {
+                include_spip('inc/acces');
+                define('_PROTEGE_PHP_MODELES', creer_uniqid());
+            }
+            foreach ($r as $regs) {
+                $t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+            }
+        }
+    }
+
+    return $t;
 }
 
 
 function echapper_faux_tags($letexte) {
-	if (strpos($letexte, '<') === false) {
-		return $letexte;
-	}
-	$textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
-
-	$letexte = '';
-	while (is_countable($textMatches) ? count($textMatches) : 0) {
-		// un texte a echapper
-		$letexte .= str_replace('<', '&lt;', array_shift($textMatches));
-		// un tag html qui a servit a faite le split
-		$letexte .= array_shift($textMatches);
-	}
-
-	return $letexte;
+    if (strpos($letexte, '<') === false) {
+        return $letexte;
+    }
+    $textMatches = preg_split(',(</?[a-z!][^<>]*>),', $letexte, -1, PREG_SPLIT_DELIM_CAPTURE);
+
+    $letexte = '';
+    while (is_countable($textMatches) ? count($textMatches) : 0) {
+        // un texte a echapper
+        $letexte .= str_replace('<', '&lt;', array_shift($textMatches));
+        // un tag html qui a servit a faite le split
+        $letexte .= array_shift($textMatches);
+    }
+
+    return $letexte;
 }
 
 /**
@@ -491,47 +491,47 @@ 
  * @return string
  */
 function echapper_html_suspect($texte, $strict = true) {
-	static $echapper_html_suspect;
-	if (!$texte or !is_string($texte)) {
-		return $texte;
-	}
-
-	if (!isset($echapper_html_suspect)) {
-		$echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
-	}
-	// si fonction personalisee, on delegue
-	if ($echapper_html_suspect) {
-		return $echapper_html_suspect($texte, $strict);
-	}
-
-	if (
-		strpos($texte, '<') === false
-		or strpos($texte, '=') === false
-	) {
-		return $texte;
-	}
-
-	// quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
-	// car sinon on declenche sur les modeles ou ressources
-	if (
-		!$strict and
-		(strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
-	) {
-		return $texte;
-	}
-
-	// on teste sur strlen car safehtml supprime le contenu dangereux
-	// mais il peut aussi changer des ' en " sur les attributs html,
-	// donc un test d'egalite est trop strict
-	if (strlen(safehtml($texte)) !== strlen($texte)) {
-		$texte = str_replace('<', '&lt;', $texte);
-		if (!function_exists('attribut_html')) {
-			include_spip('inc/filtres');
-		}
-		$texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
-	}
-
-	return $texte;
+    static $echapper_html_suspect;
+    if (!$texte or !is_string($texte)) {
+        return $texte;
+    }
+
+    if (!isset($echapper_html_suspect)) {
+        $echapper_html_suspect = charger_fonction('echapper_html_suspect', 'inc', true);
+    }
+    // si fonction personalisee, on delegue
+    if ($echapper_html_suspect) {
+        return $echapper_html_suspect($texte, $strict);
+    }
+
+    if (
+        strpos($texte, '<') === false
+        or strpos($texte, '=') === false
+    ) {
+        return $texte;
+    }
+
+    // quand c'est du texte qui passe par propre on est plus coulant tant qu'il y a pas d'attribut du type onxxx=
+    // car sinon on declenche sur les modeles ou ressources
+    if (
+        !$strict and
+        (strpos($texte, 'on') === false or !preg_match(",<\w+.*\bon\w+\s*=,UimsS", $texte))
+    ) {
+        return $texte;
+    }
+
+    // on teste sur strlen car safehtml supprime le contenu dangereux
+    // mais il peut aussi changer des ' en " sur les attributs html,
+    // donc un test d'egalite est trop strict
+    if (strlen(safehtml($texte)) !== strlen($texte)) {
+        $texte = str_replace('<', '&lt;', $texte);
+        if (!function_exists('attribut_html')) {
+            include_spip('inc/filtres');
+        }
+        $texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
+    }
+
+    return $texte;
 }
 
 
@@ -552,30 +552,30 @@ 
  *      Texte sécurisé
  **/
 function safehtml($t) {
-	static $safehtml;
-
-	if (!$t or !is_string($t)) {
-		return $t;
-	}
-	# attention safehtml nettoie deux ou trois caracteres de plus. A voir
-	if (strpos($t, '<') === false) {
-		return str_replace("\x00", '', $t);
-	}
-
-	if (!function_exists('interdire_scripts')) {
-		include_spip('inc/texte');
-	}
-	$t = interdire_scripts($t); // jolifier le php
-	$t = echappe_js($t);
-
-	if (!isset($safehtml)) {
-		$safehtml = charger_fonction('safehtml', 'inc', true);
-	}
-	if ($safehtml) {
-		$t = $safehtml($t);
-	}
-
-	return interdire_scripts($t); // interdire le php (2 precautions)
+    static $safehtml;
+
+    if (!$t or !is_string($t)) {
+        return $t;
+    }
+    # attention safehtml nettoie deux ou trois caracteres de plus. A voir
+    if (strpos($t, '<') === false) {
+        return str_replace("\x00", '', $t);
+    }
+
+    if (!function_exists('interdire_scripts')) {
+        include_spip('inc/texte');
+    }
+    $t = interdire_scripts($t); // jolifier le php
+    $t = echappe_js($t);
+
+    if (!isset($safehtml)) {
+        $safehtml = charger_fonction('safehtml', 'inc', true);
+    }
+    if ($safehtml) {
+        $t = $safehtml($t);
+    }
+
+    return interdire_scripts($t); // interdire le php (2 precautions)
 }
 
 
@@ -597,13 +597,13 @@ 
  *     Texte sans les modèles d'image
  **/
 function supprime_img($letexte, $message = null) {
-	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
-	}
-
-	return preg_replace(
-		',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
-		$message,
-		$letexte
-	);
+    if ($message === null) {
+        $message = '(' . _T('img_indisponible') . ')';
+    }
+
+    return preg_replace(
+        ',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+        $message,
+        $letexte
+    );
 }

Spacing +25 added lines, -25 removed lines

@@ -44,13 +44,13 @@ 
 	// celle du texte) et public (spip_lang est la langue du texte)
 	$dir = _DIR_RESTREINT ? lang_dir() : lang_dir($GLOBALS['spip_lang']);
 
-	$p = 'puce' . (test_espace_prive() ? '_prive' : '');
+	$p = 'puce'.(test_espace_prive() ? '_prive' : '');
 	if ($dir == 'rtl') {
 		$p .= '_rtl';
 	}
 
 	if (!isset($GLOBALS[$p])) {
-		$GLOBALS[$p] = '<span class="spip-puce ' . $dir . '"><b>–</b></span>';
+		$GLOBALS[$p] = '<span class="spip-puce '.$dir.'"><b>–</b></span>';
 	}
 
 	return $GLOBALS[$p];
@@ -68,7 +68,7 @@ 
 }
 
 if (!defined('_BALISES_BLOCS_REGEXP')) {
-	define('_BALISES_BLOCS_REGEXP', ',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS');
+	define('_BALISES_BLOCS_REGEXP', ',</?('._BALISES_BLOCS.')[>[:space:]],iS');
 }
 
 //
@@ -85,7 +85,7 @@ 
 
 	// Tester si on echappe en span ou en div
 	if (is_null($mode) or !in_array($mode, ['div', 'span'])) {
-		$mode = preg_match(',</?(' . _BALISES_BLOCS . ')[>[:space:]],iS', $rempl) ? 'div' : 'span';
+		$mode = preg_match(',</?('._BALISES_BLOCS.')[>[:space:]],iS', $rempl) ? 'div' : 'span';
 	}
 
 	// Decouper en morceaux, base64 a des probleme selon la taille de la pile
@@ -120,7 +120,7 @@ 
 	) {
 		foreach ($matches as $m) {
 			if ($m[1] === 'code') {
-				$code = '<code' . $m[2] . '>' . spip_htmlspecialchars($m[3]) . '</code>';
+				$code = '<code'.$m[2].'>'.spip_htmlspecialchars($m[3]).'</code>';
 				$pre = str_replace($m[0], $code, $pre);
 			}
 		}
@@ -130,7 +130,7 @@ 
 
 // Echapper les <code>...</ code>
 function traiter_echap_code_dist($regs) {
-	[, , $att, $corps] = $regs;
+	[,, $att, $corps] = $regs;
 	$echap = spip_htmlspecialchars($corps); // il ne faut pas passer dans entites_html, ne pas transformer les &#xxx; du code !
 
 	// ne pas mettre le <div...> s'il n'y a qu'une ligne
@@ -141,9 +141,9 @@ 
 		$echap = nl2br($echap);
 		$echap = "<div style='text-align: left;' "
 			. "class='spip_code' dir='ltr'><code$att>"
-			. $echap . '</code></div>';
+			. $echap.'</code></div>';
 	} else {
-		$echap = "<code$att class='spip_code' dir='ltr'>" . $echap . '</code>';
+		$echap = "<code$att class='spip_code' dir='ltr'>".$echap.'</code>';
 	}
 
 	$echap = str_replace("\t", '&nbsp; &nbsp; &nbsp; &nbsp; ', $echap);
@@ -229,8 +229,8 @@ 
 			} // sinon les traiter selon le cas
 			else {
 				if (
-					function_exists($f = $callback_prefix . 'traiter_echap_' . strtolower($regs[1]))
-					or function_exists($f = $f . '_dist')
+					function_exists($f = $callback_prefix.'traiter_echap_'.strtolower($regs[1]))
+					or function_exists($f = $f.'_dist')
 				) {
 					$echap = $f($regs);
 				}
@@ -251,7 +251,7 @@ 
 	// dans une callback autonommee
 	if (strpos($preg ?: _PROTEGE_BLOCS, 'script') !== false) {
 		if (
-			strpos($letexte, '<' . '?') !== false and preg_match_all(
+			strpos($letexte, '<'.'?') !== false and preg_match_all(
 				',<[?].*($|[?]>),UisS',
 				$letexte,
 				$matches,
@@ -283,7 +283,7 @@ 
 			strpos($letexte, '<') !== false
 			and
 			preg_match_all(
-				',<(span|div)\sclass=[\'"]base64' . $source . '[\'"]\s(.*)>\s*</\1>,UmsS',
+				',<(span|div)\sclass=[\'"]base64'.$source.'[\'"]\s(.*)>\s*</\1>,UmsS',
 				$letexte,
 				$regs,
 				PREG_SET_ORDER
@@ -300,7 +300,7 @@ 
 					}
 				}
 				if ($at) {
-					$rempl = '<' . $reg[1] . '>' . $rempl . '</' . $reg[1] . '>';
+					$rempl = '<'.$reg[1].'>'.$rempl.'</'.$reg[1].'>';
 					foreach ($at as $attr => $a) {
 						$rempl = inserer_attribut($rempl, $attr, $a);
 					}
@@ -381,8 +381,8 @@ 
 	$texte = nettoyer_raccourcis_typo($texte);
 
 	// balises de sauts de ligne et paragraphe
-	$texte = preg_replace('/<p( [^>]*)?' . '>/', "\r", $texte);
-	$texte = preg_replace('/<br( [^>]*)?' . '>/', "\n", $texte);
+	$texte = preg_replace('/<p( [^>]*)?'.'>/', "\r", $texte);
+	$texte = preg_replace('/<br( [^>]*)?'.'>/', "\n", $texte);
 
 	// on repasse les doubles \n en \r que nettoyer_raccourcis_typo() a pu modifier
 	$texte = str_replace("\n\n", "\r", $texte);
@@ -390,7 +390,7 @@ 
 	// supprimer les tags
 	$texte = supprimer_tags($texte);
 	$texte = trim(str_replace("\n", ' ', $texte));
-	$texte .= "\n";  // marquer la fin
+	$texte .= "\n"; // marquer la fin
 
 	// corriger la longueur de coupe
 	// en fonction de la presence de caracteres utf
@@ -405,7 +405,7 @@ 
 	// couper au mot precedent
 	$long = spip_substr($texte, 0, max($taille - 4, 1));
 	$u = $GLOBALS['meta']['pcre_u'];
-	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+	$court = preg_replace("/([^\s][\s]+)[^\s]*\n?$/".$u, "\\1", $long);
 	if (is_null($suite)) {
 		$suite = (defined('_COUPER_SUITE') ? _COUPER_SUITE : '&nbsp;(...)');
 	}
@@ -415,7 +415,7 @@ 
 	if (spip_strlen($court) < max(0.75 * $taille, 2)) {
 		$points = '';
 		$long = spip_substr($texte, 0, $taille);
-		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/" . $u, "\\1", $long);
+		$texte = preg_replace("/([^\s][\s]+)[^\s]*\n?$/".$u, "\\1", $long);
 		// encore trop court ? couper au caractere
 		if (spip_strlen($texte) < 0.75 * $taille) {
 			$texte = $long;
@@ -434,7 +434,7 @@ 
 	// supprimer l'eventuelle entite finale mal coupee
 	$texte = preg_replace('/&#?[a-z0-9]*$/S', '', $texte);
 
-	return quote_amp(trim($texte)) . $points;
+	return quote_amp(trim($texte)).$points;
 }
 
 
@@ -446,16 +446,16 @@ 
 				define('_PROTEGE_JS_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript' . _PROTEGE_JS_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'javascript'._PROTEGE_JS_MODELES), $t);
 			}
 		}
-		if (preg_match_all(',<\?php.*?($|\?' . '>),isS', $t, $r, PREG_SET_ORDER)) {
+		if (preg_match_all(',<\?php.*?($|\?'.'>),isS', $t, $r, PREG_SET_ORDER)) {
 			if (!defined('_PROTEGE_PHP_MODELES')) {
 				include_spip('inc/acces');
 				define('_PROTEGE_PHP_MODELES', creer_uniqid());
 			}
 			foreach ($r as $regs) {
-				$t = str_replace($regs[0], code_echappement($regs[0], 'php' . _PROTEGE_PHP_MODELES), $t);
+				$t = str_replace($regs[0], code_echappement($regs[0], 'php'._PROTEGE_PHP_MODELES), $t);
 			}
 		}
 	}
@@ -528,7 +528,7 @@ 
 		if (!function_exists('attribut_html')) {
 			include_spip('inc/filtres');
 		}
-		$texte = "<mark class='danger-js' title='" . attribut_html(_T('erreur_contenu_suspect')) . "'>⚠️</mark> " . $texte;
+		$texte = "<mark class='danger-js' title='".attribut_html(_T('erreur_contenu_suspect'))."'>⚠️</mark> ".$texte;
 	}
 
 	return $texte;
@@ -598,11 +598,11 @@ 
  **/
 function supprime_img($letexte, $message = null) {
 	if ($message === null) {
-		$message = '(' . _T('img_indisponible') . ')';
+		$message = '('._T('img_indisponible').')';
 	}
 
 	return preg_replace(
-		',<(img|doc|emb)([0-9]+)(\|([^>]*))?' . '\s*/?' . '>,i',
+		',<(img|doc|emb)([0-9]+)(\|([^>]*))?'.'\s*/?'.'>,i',
 		$message,
 		$letexte
 	);

ecrire/xml/valider.php

Indentation +318 added lines, -318 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 /**
@@ -23,320 +23,320 @@ 
  **/
 class ValidateurXML {
 
-	public function validerElement($phraseur, $name, $attrs) {
-		if (!($p = isset($this->dtc->elements[$name]))) {
-			if ($p = strpos($name, ':')) {
-				$name = substr($name, $p + 1);
-				$p = isset($this->dtc->elements[$name]);
-			}
-			if (!$p) {
-				coordonnees_erreur($this, " <b>$name</b>&nbsp;: "
-					. _T('zxml_inconnu_balise'));
-
-				return;
-			}
-		}
-		// controler les filles illegitimes, ca suffit
-		$depth = $this->depth;
-		$ouvrant = $this->ouvrant;
-		#spip_log("trouve $name apres " . $ouvrant[$depth]);
-		if (isset($ouvrant[$depth])) {
-			if (preg_match('/^\s*(\w+)/', $ouvrant[$depth], $r)) {
-				$pere = $r[1];
-				#spip_log("pere $pere");
-				if (isset($this->dtc->elements[$pere])) {
-					$fils = $this->dtc->elements[$pere];
-					#spip_log("rejeton $name fils " . @join(',',$fils));
-					if (!($p = @in_array($name, $fils))) {
-						if ($p = strpos($name, ':')) {
-							$p = substr($name, $p + 1);
-							$p = @in_array($p, $fils);
-						}
-					}
-					if (!$p) {
-						$bons_peres = @join('</b>, <b>', $this->dtc->peres[$name]);
-						coordonnees_erreur($this, " <b>$name</b> "
-							. _T('zxml_non_fils')
-							. ' <b>'
-							. $pere
-							. '</b>'
-							. (!$bons_peres ? ''
-								: ('<p style="font-size: 80%"> ' . _T('zxml_mais_de') . ' <b>' . $bons_peres . '</b></p>')));
-					} elseif ($this->dtc->regles[$pere][0] == '/') {
-						$frat = substr($depth, 2);
-						if (!isset($this->fratrie[$frat])) {
-							$this->fratrie[$frat] = '';
-						}
-						$this->fratrie[$frat] .= "$name ";
-					}
-				}
-			}
-		}
-		// Init de la suite des balises a memoriser si regle difficile
-		if ($this->dtc->regles[$name] and $this->dtc->regles[$name][0] == '/') {
-			$this->fratrie[$depth] = '';
-		}
-		if (isset($this->dtc->attributs[$name])) {
-			foreach ($this->dtc->attributs[$name] as $n => $v) {
-				if (($v[1] == '#REQUIRED') and (!isset($attrs[$n]))) {
-					coordonnees_erreur($this, " <b>$n</b>"
-						. '&nbsp;:&nbsp;'
-						. _T('zxml_obligatoire_attribut')
-						. " <b>$name</b>");
-				}
-			}
-		}
-	}
-
-	public function validerAttribut($phraseur, $name, $val, $bal) {
-		// Si la balise est inconnue, eviter d'insister
-		if (!isset($this->dtc->attributs[$bal])) {
-			return;
-		}
-
-		$a = $this->dtc->attributs[$bal];
-		if (!isset($a[$name])) {
-			$bons = join(', ', array_keys($a));
-			if ($bons) {
-				$bons = " title=' " .
-					_T('zxml_connus_attributs') .
-					'&nbsp;: ' .
-					$bons .
-					"'";
-			}
-			$bons .= " style='font-weight: bold'";
-			coordonnees_erreur($this, " <b>$name</b> "
-				. _T('zxml_inconnu_attribut') . ' ' . _T('zxml_de')
-				. " <a$bons>$bal</a> ("
-				. _T('zxml_survoler')
-				. ')');
-		} else {
-			$type = $a[$name][0];
-			if (!preg_match('/^\w+$/', $type)) {
-				$this->valider_motif($phraseur, $name, $val, $bal, $type);
-			} else {
-				if (method_exists($this, $f = 'validerAttribut_' . $type)) {
-					$this->$f($phraseur, $name, $val, $bal);
-				}
-			}
-			#		else spip_log("$type type d'attribut inconnu");
-		}
-	}
-
-	public function validerAttribut_NMTOKEN($phraseur, $name, $val, $bal) {
-		$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKEN);
-	}
-
-	public function validerAttribut_NMTOKENS($phraseur, $name, $val, $bal) {
-		$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKENS);
-	}
-
-	public function validerAttribut_ID($phraseur, $name, $val, $bal) {
-		if (isset($this->ids[$val])) {
-			[$l, $c] = $this->ids[$val];
-			coordonnees_erreur($this, " <p><b>$val</b> "
-				. _T('zxml_valeur_attribut')
-				. " <b>$name</b> "
-				. _T('zxml_de')
-				. " <b>$bal</b> "
-				. _T('zxml_vu')
-				. " (L$l,C$c)");
-		} else {
-			$this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_ID);
-			$this->ids[$val] = [xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
-		}
-	}
-
-	public function validerAttribut_IDREF($phraseur, $name, $val, $bal) {
-		$this->idrefs[] = [$val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
-	}
-
-	public function validerAttribut_IDREFS($phraseur, $name, $val, $bal) {
-		$this->idrefss[] = [$val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
-	}
-
-	public function valider_motif($phraseur, $name, $val, $bal, $motif) {
-		if (!preg_match($motif, $val)) {
-			coordonnees_erreur($this, "<b>$val</b> "
-				. _T('zxml_valeur_attribut')
-				. " <b>$name</b> "
-				. _T('zxml_de')
-				. " <b>$bal</b> "
-				. _T('zxml_non_conforme')
-				. '</p><p>'
-				. '<b>' . $motif . '</b>');
-		}
-	}
-
-	public function valider_idref($nom, $ligne, $col) {
-		if (!isset($this->ids[$nom])) {
-			$this->err[] = [" <p><b>$nom</b> " . _T('zxml_inconnu_id'), $ligne, $col];
-		}
-	}
-
-	public function valider_passe2() {
-		if (!$this->err) {
-			foreach ($this->idrefs as $idref) {
-				[$nom, $ligne, $col] = $idref;
-				$this->valider_idref($nom, $ligne, $col);
-			}
-			foreach ($this->idrefss as $idref) {
-				[$noms, $ligne, $col] = $idref;
-				foreach (preg_split('/\s+/', $noms) as $nom) {
-					$this->valider_idref($nom, $ligne, $col);
-				}
-			}
-		}
-	}
-
-	public function debutElement($phraseur, $name, $attrs) {
-		if ($this->dtc->elements) {
-			$this->validerElement($phraseur, $name, $attrs);
-		}
-
-		if ($f = $this->process['debut']) {
-			$f($this, $name, $attrs);
-		}
-		$depth = $this->depth;
-		$this->debuts[$depth] = strlen($this->res);
-		foreach ($attrs as $k => $v) {
-			$this->validerAttribut($phraseur, $k, $v, $name);
-		}
-	}
-
-	public function finElement($phraseur, $name) {
-		$depth = $this->depth;
-		$contenu = $this->contenu;
-
-		$n = strlen($this->res);
-		$c = strlen(trim($contenu[$depth]));
-		$k = $this->debuts[$depth];
-
-		$regle = $this->dtc->regles[$name] ?? false;
-		$vide = ($regle == 'EMPTY');
-		// controler que les balises devant etre vides le sont
-		if ($vide) {
-			if ($n <> ($k + $c)) {
-				coordonnees_erreur($this, " <p><b>$name</b> " . _T('zxml_nonvide_balise'));
-			}
-			// pour les regles PCDATA ou iteration de disjonction, tout est fait
-		} elseif ($regle and ($regle != '*')) {
-			if ($regle == '+') {
-				// iteration de disjonction non vide: 1 balise au -
-				if ($n == $k) {
-					coordonnees_erreur($this, "<p>\n<b>$name</b> "
-						. _T('zxml_vide_balise'));
-				}
-			} else {
-				$f = $this->fratrie[substr($depth, 2)] ?? null;
-				if (is_null($f) or !preg_match($regle, $f)) {
-					coordonnees_erreur(
-						$this,
-						" <p>\n<b>$name</b> "
-						. _T('zxml_succession_fils_incorrecte')
-						. '&nbsp;: <b>'
-						. $f
-						. '</b>'
-					);
-				}
-			}
-		}
-		if ($f = $this->process['fin']) {
-			$f($this, $name, $vide);
-		}
-	}
-
-	public function textElement($phraseur, $data) {
-		if (trim($data)) {
-			$d = $this->depth;
-			$d = $this->ouvrant[$d];
-			preg_match('/^\s*(\S+)/', $d, $m);
-			if (isset($this->dtc->pcdata[$m[1]]) and ($this->dtc->pcdata[$m[1]])) {
-				coordonnees_erreur($this, ' <p><b>' . $m[1] . '</b> '
-					. _T('zxml_nonvide_balise')); // message a affiner
-			}
-		}
-		if ($f = $this->process['text']) {
-			$f($this, $data);
-		}
-	}
-
-	public function piElement($phraseur, $target, $data) {
-		if ($f = $this->process['pi']) {
-			$f($this, $target, $data);
-		}
-	}
-
-	// Denonciation des entitees XML inconnues
-	// Pour contourner le bug de conception de SAX qui ne signale pas si elles
-	// sont dans un attribut, les  entites les plus frequentes ont ete
-	// transcodees au prealable  (sauf & < > " que SAX traite correctement).
-	// On ne les verra donc pas passer a cette etape, contrairement a ce que
-	// le source de la page laisse legitimement supposer.
-
-	public function defaultElement($phraseur, $data) {
-		if (
-			!preg_match('/^<!--/', $data)
-			and (preg_match_all('/&([^;]*)?/', $data, $r, PREG_SET_ORDER))
-		) {
-			foreach ($r as $m) {
-				[$t, $e] = $m;
-				if (!isset($this->dtc->entites[$e])) {
-					coordonnees_erreur($this, " <b>$e</b> "
-						. _T('zxml_inconnu_entite')
-						. ' ');
-				}
-			}
-		}
-		if (isset($this->process['default']) and ($f = $this->process['default'])) {
-			$f($this, $data);
-		}
-	}
-
-	public function phraserTout($phraseur, $data) {
-		xml_parsestring($this, $data);
-
-		if (!$this->dtc or preg_match(',^' . _MESSAGE_DOCTYPE . ',', $data)) {
-			$this->err[] = ['DOCTYPE ?', 0, 0];
-		} else {
-			$this->valider_passe2();
-		}
-	}
-
-	/**
-	 * Constructeur
-	 *
-	 * @param array $process ?
-	 **/
-	public function __construct($process = []) {
-		if (is_array($process)) {
-			$this->process = $process;
-		}
-	}
-
-	public $ids = [];
-	public $idrefs = [];
-	public $idrefss = [];
-	public $debuts = [];
-	public $fratrie = [];
-
-	public $dtc = null;
-	public $sax = null;
-	public $depth = '';
-	public $entete = '';
-	public $page = '';
-	public $res = '';
-	public $err = [];
-	public $contenu = [];
-	public $ouvrant = [];
-	public $reperes = [];
-	public $process = [
-		'debut' => 'xml_debutElement',
-		'fin' => 'xml_finElement',
-		'text' => 'xml_textElement',
-		'pi' => 'xml_piElement',
-		'default' => 'xml_defaultElement'
-	];
+    public function validerElement($phraseur, $name, $attrs) {
+        if (!($p = isset($this->dtc->elements[$name]))) {
+            if ($p = strpos($name, ':')) {
+                $name = substr($name, $p + 1);
+                $p = isset($this->dtc->elements[$name]);
+            }
+            if (!$p) {
+                coordonnees_erreur($this, " <b>$name</b>&nbsp;: "
+                    . _T('zxml_inconnu_balise'));
+
+                return;
+            }
+        }
+        // controler les filles illegitimes, ca suffit
+        $depth = $this->depth;
+        $ouvrant = $this->ouvrant;
+        #spip_log("trouve $name apres " . $ouvrant[$depth]);
+        if (isset($ouvrant[$depth])) {
+            if (preg_match('/^\s*(\w+)/', $ouvrant[$depth], $r)) {
+                $pere = $r[1];
+                #spip_log("pere $pere");
+                if (isset($this->dtc->elements[$pere])) {
+                    $fils = $this->dtc->elements[$pere];
+                    #spip_log("rejeton $name fils " . @join(',',$fils));
+                    if (!($p = @in_array($name, $fils))) {
+                        if ($p = strpos($name, ':')) {
+                            $p = substr($name, $p + 1);
+                            $p = @in_array($p, $fils);
+                        }
+                    }
+                    if (!$p) {
+                        $bons_peres = @join('</b>, <b>', $this->dtc->peres[$name]);
+                        coordonnees_erreur($this, " <b>$name</b> "
+                            . _T('zxml_non_fils')
+                            . ' <b>'
+                            . $pere
+                            . '</b>'
+                            . (!$bons_peres ? ''
+                                : ('<p style="font-size: 80%"> ' . _T('zxml_mais_de') . ' <b>' . $bons_peres . '</b></p>')));
+                    } elseif ($this->dtc->regles[$pere][0] == '/') {
+                        $frat = substr($depth, 2);
+                        if (!isset($this->fratrie[$frat])) {
+                            $this->fratrie[$frat] = '';
+                        }
+                        $this->fratrie[$frat] .= "$name ";
+                    }
+                }
+            }
+        }
+        // Init de la suite des balises a memoriser si regle difficile
+        if ($this->dtc->regles[$name] and $this->dtc->regles[$name][0] == '/') {
+            $this->fratrie[$depth] = '';
+        }
+        if (isset($this->dtc->attributs[$name])) {
+            foreach ($this->dtc->attributs[$name] as $n => $v) {
+                if (($v[1] == '#REQUIRED') and (!isset($attrs[$n]))) {
+                    coordonnees_erreur($this, " <b>$n</b>"
+                        . '&nbsp;:&nbsp;'
+                        . _T('zxml_obligatoire_attribut')
+                        . " <b>$name</b>");
+                }
+            }
+        }
+    }
+
+    public function validerAttribut($phraseur, $name, $val, $bal) {
+        // Si la balise est inconnue, eviter d'insister
+        if (!isset($this->dtc->attributs[$bal])) {
+            return;
+        }
+
+        $a = $this->dtc->attributs[$bal];
+        if (!isset($a[$name])) {
+            $bons = join(', ', array_keys($a));
+            if ($bons) {
+                $bons = " title=' " .
+                    _T('zxml_connus_attributs') .
+                    '&nbsp;: ' .
+                    $bons .
+                    "'";
+            }
+            $bons .= " style='font-weight: bold'";
+            coordonnees_erreur($this, " <b>$name</b> "
+                . _T('zxml_inconnu_attribut') . ' ' . _T('zxml_de')
+                . " <a$bons>$bal</a> ("
+                . _T('zxml_survoler')
+                . ')');
+        } else {
+            $type = $a[$name][0];
+            if (!preg_match('/^\w+$/', $type)) {
+                $this->valider_motif($phraseur, $name, $val, $bal, $type);
+            } else {
+                if (method_exists($this, $f = 'validerAttribut_' . $type)) {
+                    $this->$f($phraseur, $name, $val, $bal);
+                }
+            }
+            #		else spip_log("$type type d'attribut inconnu");
+        }
+    }
+
+    public function validerAttribut_NMTOKEN($phraseur, $name, $val, $bal) {
+        $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKEN);
+    }
+
+    public function validerAttribut_NMTOKENS($phraseur, $name, $val, $bal) {
+        $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_NMTOKENS);
+    }
+
+    public function validerAttribut_ID($phraseur, $name, $val, $bal) {
+        if (isset($this->ids[$val])) {
+            [$l, $c] = $this->ids[$val];
+            coordonnees_erreur($this, " <p><b>$val</b> "
+                . _T('zxml_valeur_attribut')
+                . " <b>$name</b> "
+                . _T('zxml_de')
+                . " <b>$bal</b> "
+                . _T('zxml_vu')
+                . " (L$l,C$c)");
+        } else {
+            $this->valider_motif($phraseur, $name, $val, $bal, _REGEXP_ID);
+            $this->ids[$val] = [xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
+        }
+    }
+
+    public function validerAttribut_IDREF($phraseur, $name, $val, $bal) {
+        $this->idrefs[] = [$val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
+    }
+
+    public function validerAttribut_IDREFS($phraseur, $name, $val, $bal) {
+        $this->idrefss[] = [$val, xml_get_current_line_number($phraseur), xml_get_current_column_number($phraseur)];
+    }
+
+    public function valider_motif($phraseur, $name, $val, $bal, $motif) {
+        if (!preg_match($motif, $val)) {
+            coordonnees_erreur($this, "<b>$val</b> "
+                . _T('zxml_valeur_attribut')
+                . " <b>$name</b> "
+                . _T('zxml_de')
+                . " <b>$bal</b> "
+                . _T('zxml_non_conforme')
+                . '</p><p>'
+                . '<b>' . $motif . '</b>');
+        }
+    }
+
+    public function valider_idref($nom, $ligne, $col) {
+        if (!isset($this->ids[$nom])) {
+            $this->err[] = [" <p><b>$nom</b> " . _T('zxml_inconnu_id'), $ligne, $col];
+        }
+    }
+
+    public function valider_passe2() {
+        if (!$this->err) {
+            foreach ($this->idrefs as $idref) {
+                [$nom, $ligne, $col] = $idref;
+                $this->valider_idref($nom, $ligne, $col);
+            }
+            foreach ($this->idrefss as $idref) {
+                [$noms, $ligne, $col] = $idref;
+                foreach (preg_split('/\s+/', $noms) as $nom) {
+                    $this->valider_idref($nom, $ligne, $col);
+                }
+            }
+        }
+    }
+
+    public function debutElement($phraseur, $name, $attrs) {
+        if ($this->dtc->elements) {
+            $this->validerElement($phraseur, $name, $attrs);
+        }
+
+        if ($f = $this->process['debut']) {
+            $f($this, $name, $attrs);
+        }
+        $depth = $this->depth;
+        $this->debuts[$depth] = strlen($this->res);
+        foreach ($attrs as $k => $v) {
+            $this->validerAttribut($phraseur, $k, $v, $name);
+        }
+    }
+
+    public function finElement($phraseur, $name) {
+        $depth = $this->depth;
+        $contenu = $this->contenu;
+
+        $n = strlen($this->res);
+        $c = strlen(trim($contenu[$depth]));
+        $k = $this->debuts[$depth];
+
+        $regle = $this->dtc->regles[$name] ?? false;
+        $vide = ($regle == 'EMPTY');
+        // controler que les balises devant etre vides le sont
+        if ($vide) {
+            if ($n <> ($k + $c)) {
+                coordonnees_erreur($this, " <p><b>$name</b> " . _T('zxml_nonvide_balise'));
+            }
+            // pour les regles PCDATA ou iteration de disjonction, tout est fait
+        } elseif ($regle and ($regle != '*')) {
+            if ($regle == '+') {
+                // iteration de disjonction non vide: 1 balise au -
+                if ($n == $k) {
+                    coordonnees_erreur($this, "<p>\n<b>$name</b> "
+                        . _T('zxml_vide_balise'));
+                }
+            } else {
+                $f = $this->fratrie[substr($depth, 2)] ?? null;
+                if (is_null($f) or !preg_match($regle, $f)) {
+                    coordonnees_erreur(
+                        $this,
+                        " <p>\n<b>$name</b> "
+                        . _T('zxml_succession_fils_incorrecte')
+                        . '&nbsp;: <b>'
+                        . $f
+                        . '</b>'
+                    );
+                }
+            }
+        }
+        if ($f = $this->process['fin']) {
+            $f($this, $name, $vide);
+        }
+    }
+
+    public function textElement($phraseur, $data) {
+        if (trim($data)) {
+            $d = $this->depth;
+            $d = $this->ouvrant[$d];
+            preg_match('/^\s*(\S+)/', $d, $m);
+            if (isset($this->dtc->pcdata[$m[1]]) and ($this->dtc->pcdata[$m[1]])) {
+                coordonnees_erreur($this, ' <p><b>' . $m[1] . '</b> '
+                    . _T('zxml_nonvide_balise')); // message a affiner
+            }
+        }
+        if ($f = $this->process['text']) {
+            $f($this, $data);
+        }
+    }
+
+    public function piElement($phraseur, $target, $data) {
+        if ($f = $this->process['pi']) {
+            $f($this, $target, $data);
+        }
+    }
+
+    // Denonciation des entitees XML inconnues
+    // Pour contourner le bug de conception de SAX qui ne signale pas si elles
+    // sont dans un attribut, les  entites les plus frequentes ont ete
+    // transcodees au prealable  (sauf & < > " que SAX traite correctement).
+    // On ne les verra donc pas passer a cette etape, contrairement a ce que
+    // le source de la page laisse legitimement supposer.
+
+    public function defaultElement($phraseur, $data) {
+        if (
+            !preg_match('/^<!--/', $data)
+            and (preg_match_all('/&([^;]*)?/', $data, $r, PREG_SET_ORDER))
+        ) {
+            foreach ($r as $m) {
+                [$t, $e] = $m;
+                if (!isset($this->dtc->entites[$e])) {
+                    coordonnees_erreur($this, " <b>$e</b> "
+                        . _T('zxml_inconnu_entite')
+                        . ' ');
+                }
+            }
+        }
+        if (isset($this->process['default']) and ($f = $this->process['default'])) {
+            $f($this, $data);
+        }
+    }
+
+    public function phraserTout($phraseur, $data) {
+        xml_parsestring($this, $data);
+
+        if (!$this->dtc or preg_match(',^' . _MESSAGE_DOCTYPE . ',', $data)) {
+            $this->err[] = ['DOCTYPE ?', 0, 0];
+        } else {
+            $this->valider_passe2();
+        }
+    }
+
+    /**
+     * Constructeur
+     *
+     * @param array $process ?
+     **/
+    public function __construct($process = []) {
+        if (is_array($process)) {
+            $this->process = $process;
+        }
+    }
+
+    public $ids = [];
+    public $idrefs = [];
+    public $idrefss = [];
+    public $debuts = [];
+    public $fratrie = [];
+
+    public $dtc = null;
+    public $sax = null;
+    public $depth = '';
+    public $entete = '';
+    public $page = '';
+    public $res = '';
+    public $err = [];
+    public $contenu = [];
+    public $ouvrant = [];
+    public $reperes = [];
+    public $process = [
+        'debut' => 'xml_debutElement',
+        'fin' => 'xml_finElement',
+        'text' => 'xml_textElement',
+        'pi' => 'xml_piElement',
+        'default' => 'xml_defaultElement'
+    ];
 }
 
 
@@ -346,8 +346,8 @@ 
  *
  **/
 function xml_valider_dist($page, $apply = false, $process = false, $doctype = '', $charset = null) {
-	$f = new ValidateurXML($process);
-	$sax = charger_fonction('sax', 'xml');
+    $f = new ValidateurXML($process);
+    $sax = charger_fonction('sax', 'xml');
 
-	return $sax($page, $apply, $f, $doctype, $charset);
+    return $sax($page, $apply, $f, $doctype, $charset);
 }

Spacing +12 added lines, -12 removed lines

@@ -61,7 +61,7 @@ 
 							. $pere
 							. '</b>'
 							. (!$bons_peres ? ''
-								: ('<p style="font-size: 80%"> ' . _T('zxml_mais_de') . ' <b>' . $bons_peres . '</b></p>')));
+								: ('<p style="font-size: 80%"> '._T('zxml_mais_de').' <b>'.$bons_peres.'</b></p>')));
 					} elseif ($this->dtc->regles[$pere][0] == '/') {
 						$frat = substr($depth, 2);
 						if (!isset($this->fratrie[$frat])) {
@@ -98,15 +98,15 @@ 
 		if (!isset($a[$name])) {
 			$bons = join(', ', array_keys($a));
 			if ($bons) {
-				$bons = " title=' " .
-					_T('zxml_connus_attributs') .
-					'&nbsp;: ' .
-					$bons .
+				$bons = " title=' ".
+					_T('zxml_connus_attributs').
+					'&nbsp;: '.
+					$bons.
 					"'";
 			}
 			$bons .= " style='font-weight: bold'";
 			coordonnees_erreur($this, " <b>$name</b> "
-				. _T('zxml_inconnu_attribut') . ' ' . _T('zxml_de')
+				. _T('zxml_inconnu_attribut').' '._T('zxml_de')
 				. " <a$bons>$bal</a> ("
 				. _T('zxml_survoler')
 				. ')');
@@ -115,7 +115,7 @@ 
 			if (!preg_match('/^\w+$/', $type)) {
 				$this->valider_motif($phraseur, $name, $val, $bal, $type);
 			} else {
-				if (method_exists($this, $f = 'validerAttribut_' . $type)) {
+				if (method_exists($this, $f = 'validerAttribut_'.$type)) {
 					$this->$f($phraseur, $name, $val, $bal);
 				}
 			}
@@ -164,13 +164,13 @@ 
 				. " <b>$bal</b> "
 				. _T('zxml_non_conforme')
 				. '</p><p>'
-				. '<b>' . $motif . '</b>');
+				. '<b>'.$motif.'</b>');
 		}
 	}
 
 	public function valider_idref($nom, $ligne, $col) {
 		if (!isset($this->ids[$nom])) {
-			$this->err[] = [" <p><b>$nom</b> " . _T('zxml_inconnu_id'), $ligne, $col];
+			$this->err[] = [" <p><b>$nom</b> "._T('zxml_inconnu_id'), $ligne, $col];
 		}
 	}
 
@@ -217,7 +217,7 @@ 
 		// controler que les balises devant etre vides le sont
 		if ($vide) {
 			if ($n <> ($k + $c)) {
-				coordonnees_erreur($this, " <p><b>$name</b> " . _T('zxml_nonvide_balise'));
+				coordonnees_erreur($this, " <p><b>$name</b> "._T('zxml_nonvide_balise'));
 			}
 			// pour les regles PCDATA ou iteration de disjonction, tout est fait
 		} elseif ($regle and ($regle != '*')) {
@@ -252,7 +252,7 @@ 
 			$d = $this->ouvrant[$d];
 			preg_match('/^\s*(\S+)/', $d, $m);
 			if (isset($this->dtc->pcdata[$m[1]]) and ($this->dtc->pcdata[$m[1]])) {
-				coordonnees_erreur($this, ' <p><b>' . $m[1] . '</b> '
+				coordonnees_erreur($this, ' <p><b>'.$m[1].'</b> '
 					. _T('zxml_nonvide_balise')); // message a affiner
 			}
 		}
@@ -296,7 +296,7 @@ 
 	public function phraserTout($phraseur, $data) {
 		xml_parsestring($this, $data);
 
-		if (!$this->dtc or preg_match(',^' . _MESSAGE_DOCTYPE . ',', $data)) {
+		if (!$this->dtc or preg_match(',^'._MESSAGE_DOCTYPE.',', $data)) {
 			$this->err[] = ['DOCTYPE ?', 0, 0];
 		} else {
 			$this->valider_passe2();

ecrire/public/debusquer.php

Indentation +681 added lines, -681 removed lines

@@ -11,7 +11,7 @@ 
 \***************************************************************************/
 
 if (!defined('_ECRIRE_INC_VERSION')) {
-	return;
+    return;
 }
 
 include_spip('public/decompiler');
@@ -66,136 +66,136 @@ 
  *     - string si $message à false.
  **/
 function public_debusquer_dist($message = '', $lieu = '', $opt = []) {
-	static $tableau_des_erreurs = [];
-
-	// Pour des tests unitaires, pouvoir récupérer les erreurs générées
-	if (isset($opt['erreurs'])) {
-		if ($opt['erreurs'] == 'get') {
-			return $tableau_des_erreurs;
-		}
-		if ($opt['erreurs'] == 'reset') {
-			$tableau_des_erreurs = [];
-
-			return true;
-		}
-	}
-
-	// Erreur ou appel final ?
-	if ($message) {
-		$message = debusquer_compose_message($message);
-		$tableau_des_erreurs[] = [$message, $lieu];
-		set_request('var_mode', 'debug');
-		$GLOBALS['bouton_admin_debug'] = true;
-		// Permettre a la compil de continuer
-		if (is_object($lieu) and (!isset($lieu->code) or !$lieu->code)) {
-			$lieu->code = "''";
-		}
-		// forcer l'appel au debusqueur en cas de boucles infernales
-		$urgence = (_DEBUG_MAX_SQUELETTE_ERREURS and (is_countable($tableau_des_erreurs) ? count($tableau_des_erreurs) : 0) > _DEBUG_MAX_SQUELETTE_ERREURS);
-		if (!$urgence) {
-			return;
-		}
-	}
-	if (empty($GLOBALS['debug_objets']['principal'])) {
-		// espace public ?
-		if (isset($GLOBALS['fond'])) {
-			$GLOBALS['debug_objets']['principal'] = $GLOBALS['fond'];
-		}
-	}
-
-	include_spip('inc/autoriser');
-	if (!autoriser('debug')) {
-		return;
-	}
-	include_spip('inc/headers');
-	include_spip('inc/filtres');
-
-	// en cas de squelette inclus,  virer le code de l'incluant:
-	// - il contient souvent une Div restreignant la largeur a 3 fois rien
-	// - ca fait 2 headers !
-	// sauf si l'on se trouve deja dans un flux compresse (plugin compresseur
-	// actif par exemple)
-	if (
-		ob_get_length()
-		and
-		!in_array('ob_gzhandler', ob_get_status())
-	) {
-		ob_end_clean();
-	}
-
-	lang_select($GLOBALS['visiteur_session']['lang']);
-	$fonc = _request('var_mode_objet');
-	$mode = _request('var_mode_affiche');
-	$self = str_replace("\\'", ''', self());
-	$self = parametre_url($self, 'var_mode', 'debug');
-
-	$res = debusquer_bandeau($tableau_des_erreurs)
-		. '<br />'
-		. debusquer_squelette($fonc, $mode, $self);
-
-	if (!_DIR_RESTREINT or headers_sent()) {
-		return $res;
-	}
-	if ($tableau_des_erreurs) {
-		http_response_code(503);
-	}
-
-	http_no_cache();
-	if (isset($_GET['var_profile'])) {
-		$titre = parametre_url($GLOBALS['REQUEST_URI'], 'var_profile', '');
-		$titre = parametre_url($titre, 'var_mode', '');
-	} else {
-		if (!$fonc) {
-			$fonc = $GLOBALS['debug_objets']['principal'];
-		}
-		$titre = !$mode ? $fonc : ($mode . (isset($GLOBALS['debug_objets']['sourcefile'][$fonc]) ? ' ' . $GLOBALS['debug_objets']['sourcefile'][$fonc] : ''));
-	}
-	if ($message === false) {
-		lang_select();
-
-		return debusquer_entete($titre, $res);
-	} else {
-		echo debusquer_entete($titre, $res);
-	}
-	exit;
+    static $tableau_des_erreurs = [];
+
+    // Pour des tests unitaires, pouvoir récupérer les erreurs générées
+    if (isset($opt['erreurs'])) {
+        if ($opt['erreurs'] == 'get') {
+            return $tableau_des_erreurs;
+        }
+        if ($opt['erreurs'] == 'reset') {
+            $tableau_des_erreurs = [];
+
+            return true;
+        }
+    }
+
+    // Erreur ou appel final ?
+    if ($message) {
+        $message = debusquer_compose_message($message);
+        $tableau_des_erreurs[] = [$message, $lieu];
+        set_request('var_mode', 'debug');
+        $GLOBALS['bouton_admin_debug'] = true;
+        // Permettre a la compil de continuer
+        if (is_object($lieu) and (!isset($lieu->code) or !$lieu->code)) {
+            $lieu->code = "''";
+        }
+        // forcer l'appel au debusqueur en cas de boucles infernales
+        $urgence = (_DEBUG_MAX_SQUELETTE_ERREURS and (is_countable($tableau_des_erreurs) ? count($tableau_des_erreurs) : 0) > _DEBUG_MAX_SQUELETTE_ERREURS);
+        if (!$urgence) {
+            return;
+        }
+    }
+    if (empty($GLOBALS['debug_objets']['principal'])) {
+        // espace public ?
+        if (isset($GLOBALS['fond'])) {
+            $GLOBALS['debug_objets']['principal'] = $GLOBALS['fond'];
+        }
+    }
+
+    include_spip('inc/autoriser');
+    if (!autoriser('debug')) {
+        return;
+    }
+    include_spip('inc/headers');
+    include_spip('inc/filtres');
+
+    // en cas de squelette inclus,  virer le code de l'incluant:
+    // - il contient souvent une Div restreignant la largeur a 3 fois rien
+    // - ca fait 2 headers !
+    // sauf si l'on se trouve deja dans un flux compresse (plugin compresseur
+    // actif par exemple)
+    if (
+        ob_get_length()
+        and
+        !in_array('ob_gzhandler', ob_get_status())
+    ) {
+        ob_end_clean();
+    }
+
+    lang_select($GLOBALS['visiteur_session']['lang']);
+    $fonc = _request('var_mode_objet');
+    $mode = _request('var_mode_affiche');
+    $self = str_replace("\\'", '&#39;', self());
+    $self = parametre_url($self, 'var_mode', 'debug');
+
+    $res = debusquer_bandeau($tableau_des_erreurs)
+        . '<br />'
+        . debusquer_squelette($fonc, $mode, $self);
+
+    if (!_DIR_RESTREINT or headers_sent()) {
+        return $res;
+    }
+    if ($tableau_des_erreurs) {
+        http_response_code(503);
+    }
+
+    http_no_cache();
+    if (isset($_GET['var_profile'])) {
+        $titre = parametre_url($GLOBALS['REQUEST_URI'], 'var_profile', '');
+        $titre = parametre_url($titre, 'var_mode', '');
+    } else {
+        if (!$fonc) {
+            $fonc = $GLOBALS['debug_objets']['principal'];
+        }
+        $titre = !$mode ? $fonc : ($mode . (isset($GLOBALS['debug_objets']['sourcefile'][$fonc]) ? ' ' . $GLOBALS['debug_objets']['sourcefile'][$fonc] : ''));
+    }
+    if ($message === false) {
+        lang_select();
+
+        return debusquer_entete($titre, $res);
+    } else {
+        echo debusquer_entete($titre, $res);
+    }
+    exit;
 }
 
 function debusquer_compose_message($msg) {
-	if (is_array($msg)) {
-		// si c'est un texte, c'est une traduction a faire, mais
-		// sqlite renvoit aussi des erreurs alpha num (mais avec 3 arguments)
-		if (!is_numeric($msg[0]) and count($msg) == 2) {
-			// message avec argument: instancier
-			$msg = _T($msg[0], $msg[1], 'spip-debug-arg');
-		} else {
-			// message SQL: interpreter
-			$msg = debusquer_requete($msg);
-		}
-	}
-	// FIXME: le fond n'est pas la si on n'est pas dans un squelette
-	// cela dit, ca serait bien d'indiquer tout de meme d'ou vient l'erreur
-	$fond = $GLOBALS['fond'] ?? '';
-	// une erreur critique sort $message en array
-	$debug = is_array($msg) ? $msg[1] : $msg;
-	spip_log('Debug: ' . $debug . ' (' . $fond . ')');
-
-	return $msg;
+    if (is_array($msg)) {
+        // si c'est un texte, c'est une traduction a faire, mais
+        // sqlite renvoit aussi des erreurs alpha num (mais avec 3 arguments)
+        if (!is_numeric($msg[0]) and count($msg) == 2) {
+            // message avec argument: instancier
+            $msg = _T($msg[0], $msg[1], 'spip-debug-arg');
+        } else {
+            // message SQL: interpreter
+            $msg = debusquer_requete($msg);
+        }
+    }
+    // FIXME: le fond n'est pas la si on n'est pas dans un squelette
+    // cela dit, ca serait bien d'indiquer tout de meme d'ou vient l'erreur
+    $fond = $GLOBALS['fond'] ?? '';
+    // une erreur critique sort $message en array
+    $debug = is_array($msg) ? $msg[1] : $msg;
+    spip_log('Debug: ' . $debug . ' (' . $fond . ')');
+
+    return $msg;
 }
 
 function debusquer_bandeau($erreurs) {
 
-	if (!empty($erreurs)) {
-		$n = [(is_countable($erreurs) ? count($erreurs) : 0) . ' ' . _T('zbug_erreur_squelette')];
+    if (!empty($erreurs)) {
+        $n = [(is_countable($erreurs) ? count($erreurs) : 0) . ' ' . _T('zbug_erreur_squelette')];
 
-		return debusquer_navigation($erreurs, $n);
-	} elseif (!empty($GLOBALS['tableau_des_temps'])) {
-		include_spip('public/tracer');
-		[$temps, $nav] = chrono_requete($GLOBALS['tableau_des_temps']);
+        return debusquer_navigation($erreurs, $n);
+    } elseif (!empty($GLOBALS['tableau_des_temps'])) {
+        include_spip('public/tracer');
+        [$temps, $nav] = chrono_requete($GLOBALS['tableau_des_temps']);
 
-		return debusquer_navigation($temps, $nav, 'debug-profile');
-	} else {
-		return '';
-	}
+        return debusquer_navigation($temps, $nav, 'debug-profile');
+    } else {
+        return '';
+    }
 }
 
 /**
@@ -205,42 +205,42 @@ 
  * @return string Code HTML
  **/
 function debusquer_contexte($env) {
-	if (is_string($env) and is_array($env_tab = @unserialize($env))) {
-		$env = $env_tab;
-	}
-
-	if (!$env) {
-		return '';
-	}
-	$res = '';
-	foreach ($env as $nom => $valeur) {
-		if (is_array($valeur)) {
-			$valeur_simple = [];
-			foreach ($valeur as $v) {
-				if (is_array($v)) {
-					$valeur_simple[] = 'array:' . count($v);
-				} elseif (is_object($v)) {
-					$valeur_simple[] = get_class($v);
-				} elseif (is_string($v)) {
-					$valeur_simple[] = "'" . $v . "'";
-				} else {
-					$valeur_simple[] = $v;
-				}
-			}
-			$n = count($valeur);
-			$valeur = (($n > 3) ? 'array:' . $n . ' ' : '');
-			$valeur .= '[' . join(', ', $valeur_simple) . ']';
-		} elseif (is_object($valeur)) {
-			$valeur = get_class($valeur);
-		} elseif (is_string($valeur)) {
-			$valeur = "'" . $valeur . "'";
-		}
-		$res .= "\n<tr><td><strong>" . nl2br(entites_html($nom))
-			. '</strong></td><td>:&nbsp;' . nl2br(entites_html($valeur))
-			. "</td></tr>\n";
-	}
-
-	return "<div class='spip-env'><fieldset><legend onclick=\"this.parentElement.classList.toggle('expanded');\">#ENV</legend>\n<div><table>$res</table></div></fieldset></div>\n";
+    if (is_string($env) and is_array($env_tab = @unserialize($env))) {
+        $env = $env_tab;
+    }
+
+    if (!$env) {
+        return '';
+    }
+    $res = '';
+    foreach ($env as $nom => $valeur) {
+        if (is_array($valeur)) {
+            $valeur_simple = [];
+            foreach ($valeur as $v) {
+                if (is_array($v)) {
+                    $valeur_simple[] = 'array:' . count($v);
+                } elseif (is_object($v)) {
+                    $valeur_simple[] = get_class($v);
+                } elseif (is_string($v)) {
+                    $valeur_simple[] = "'" . $v . "'";
+                } else {
+                    $valeur_simple[] = $v;
+                }
+            }
+            $n = count($valeur);
+            $valeur = (($n > 3) ? 'array:' . $n . ' ' : '');
+            $valeur .= '[' . join(', ', $valeur_simple) . ']';
+        } elseif (is_object($valeur)) {
+            $valeur = get_class($valeur);
+        } elseif (is_string($valeur)) {
+            $valeur = "'" . $valeur . "'";
+        }
+        $res .= "\n<tr><td><strong>" . nl2br(entites_html($nom))
+            . '</strong></td><td>:&nbsp;' . nl2br(entites_html($valeur))
+            . "</td></tr>\n";
+    }
+
+    return "<div class='spip-env'><fieldset><legend onclick=\"this.parentElement.classList.toggle('expanded');\">#ENV</legend>\n<div><table>$res</table></div></fieldset></div>\n";
 }
 
 // Affichage du tableau des erreurs ou des temps de calcul
@@ -248,66 +248,66 @@ 
 
 function debusquer_navigation($tableau, $caption = [], $id = 'debug-nav') {
 
-	if (_request('exec') == 'valider_xml') {
-		return '';
-	}
-	$GLOBALS['bouton_admin_debug'] = true;
-	$res = '';
-	$href = quote_amp(parametre_url($GLOBALS['REQUEST_URI'], 'var_mode', 'debug'));
-	foreach ($tableau as $i => $err) {
-		$boucle = $ligne = $skel = '';
-		[$msg, $lieu] = $err;
-		if (is_object($lieu)) {
-			$ligne = $lieu->ligne;
-			$boucle = !empty($lieu->id_boucle) ? $lieu->id_boucle : '';
-			if (isset($lieu->descr['nom'])) {
-				$nom_code = $lieu->descr['nom'];
-				$skel = $lieu->descr['sourcefile'];
-				$h2 = parametre_url($href, 'var_mode_objet', $nom_code);
-				$h3 = parametre_url($h2, 'var_mode_affiche', 'squelette') . '#L' . $ligne;
-				$skel = "<a href='$h3'><b>$skel</b></a>";
-				if ($boucle) {
-					$h3 = parametre_url($h2 . $boucle, 'var_mode_affiche', 'boucle');
-					$boucle = "<a href='$h3'><b>$boucle</b></a>";
-				}
-			}
-		}
-
-		$j = ($i + 1);
-		$res .= "<tr id='req$j'><td style='text-align: right'>"
-			. $j
-			. "&nbsp;</td><td style='text-align: left'>"
-			. (is_array($msg) ? implode('', $msg) : $msg)
-			. "</td><td style='text-align: left'>"
-			. ($skel ?: '&nbsp;&nbsp;&nbsp;/&nbsp;&nbsp;')
-			. "</td><td class='spip-debug-arg' style='text-align: left'>"
-			. ($boucle ?: '&nbsp;&nbsp;&nbsp;/&nbsp;&nbsp;')
-			. "</td><td style='text-align: right'>"
-			. $ligne
-			. "</td></tr>\n";
-	}
-
-	return "\n<table id='$id'>"
-	. "<caption onclick=\"x = document.getElementById('$id'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\">"
-	. $caption[0]
+    if (_request('exec') == 'valider_xml') {
+        return '';
+    }
+    $GLOBALS['bouton_admin_debug'] = true;
+    $res = '';
+    $href = quote_amp(parametre_url($GLOBALS['REQUEST_URI'], 'var_mode', 'debug'));
+    foreach ($tableau as $i => $err) {
+        $boucle = $ligne = $skel = '';
+        [$msg, $lieu] = $err;
+        if (is_object($lieu)) {
+            $ligne = $lieu->ligne;
+            $boucle = !empty($lieu->id_boucle) ? $lieu->id_boucle : '';
+            if (isset($lieu->descr['nom'])) {
+                $nom_code = $lieu->descr['nom'];
+                $skel = $lieu->descr['sourcefile'];
+                $h2 = parametre_url($href, 'var_mode_objet', $nom_code);
+                $h3 = parametre_url($h2, 'var_mode_affiche', 'squelette') . '#L' . $ligne;
+                $skel = "<a href='$h3'><b>$skel</b></a>";
+                if ($boucle) {
+                    $h3 = parametre_url($h2 . $boucle, 'var_mode_affiche', 'boucle');
+                    $boucle = "<a href='$h3'><b>$boucle</b></a>";
+                }
+            }
+        }
+
+        $j = ($i + 1);
+        $res .= "<tr id='req$j'><td style='text-align: right'>"
+            . $j
+            . "&nbsp;</td><td style='text-align: left'>"
+            . (is_array($msg) ? implode('', $msg) : $msg)
+            . "</td><td style='text-align: left'>"
+            . ($skel ?: '&nbsp;&nbsp;&nbsp;/&nbsp;&nbsp;')
+            . "</td><td class='spip-debug-arg' style='text-align: left'>"
+            . ($boucle ?: '&nbsp;&nbsp;&nbsp;/&nbsp;&nbsp;')
+            . "</td><td style='text-align: right'>"
+            . $ligne
+            . "</td></tr>\n";
+    }
+
+    return "\n<table id='$id'>"
+    . "<caption onclick=\"x = document.getElementById('$id'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\">"
+    . $caption[0]
 ## aide locale courte a ecrire, avec lien vers une grosse page de documentation
 #		aider('erreur_compilation'),
-	. '</caption>'
-	//  fausse caption du chrono (mais vraie nav)
-	. (!empty($caption[1]) ? $caption[1] : '')
-	. '<tr><th>'
-	. _T('numero')
-	. '</th><th>'
-	. _T('public:message')
-	. '</th><th>'
-	. _T('squelette')
-	. '</th><th>'
-	. _T('zbug_boucle')
-	. '</th><th>'
-	. _T('ligne')
-	. '</th></tr>'
-	. $res
-	. '</table>';
+    . '</caption>'
+    //  fausse caption du chrono (mais vraie nav)
+    . (!empty($caption[1]) ? $caption[1] : '')
+    . '<tr><th>'
+    . _T('numero')
+    . '</th><th>'
+    . _T('public:message')
+    . '</th><th>'
+    . _T('squelette')
+    . '</th><th>'
+    . _T('zbug_boucle')
+    . '</th><th>'
+    . _T('ligne')
+    . '</th></tr>'
+    . $res
+    . '</table>';
 }
 
 
@@ -327,514 +327,514 @@ 
  *    ou un tableau si l'erreur est critique
  **/
 function debusquer_requete($message) {
-	[$errno, $msg, $query] = $message;
-
-	// FIXME: ces écritures mélangent divers syntaxe des moteurs SQL
-	// il serait plus prudent certainement d'avoir une fonction d'analyse par moteur
-	if (preg_match(',err(no|code):?[[:space:]]*([0-9]+),i', $msg, $regs)) {
-		$errno = $regs[2];
-	} elseif (
-		is_numeric($errno) and ($errno == 1030 or $errno <= 1026)
-		and preg_match(',[^[:alnum:]]([0-9]+)[^[:alnum:]],', $msg, $regs)
-	) {
-		$errno = $regs[1];
-	}
-
-	// Erreur systeme
-	if (is_numeric($errno) and $errno > 0 and $errno < 200) {
-		$retour = '<tt><br /><br /><blink>'
-			. _T('info_erreur_systeme', ['errsys' => $errno])
-			. "</blink><br />\n<b>"
-			. _T(
-				'info_erreur_systeme2',
-				['script' => generer_url_ecrire('base_repair')]
-			)
-			. '</b><br />';
-		spip_log("Erreur systeme $errno");
-
-		return [$retour, ''];
-	}
-
-	// Requete erronee
-	$err = '<b>' . _T('avis_erreur_mysql') . " $errno</b><br /><tt>\n"
-		. spip_htmlspecialchars($msg)
-		. "\n<br /><span style='color: red'><b>"
-		. spip_htmlspecialchars($query)
-		. '</b></span></tt><br />';
-
-	//. aider('erreur_mysql');
-
-	return $err;
+    [$errno, $msg, $query] = $message;
+
+    // FIXME: ces écritures mélangent divers syntaxe des moteurs SQL
+    // il serait plus prudent certainement d'avoir une fonction d'analyse par moteur
+    if (preg_match(',err(no|code):?[[:space:]]*([0-9]+),i', $msg, $regs)) {
+        $errno = $regs[2];
+    } elseif (
+        is_numeric($errno) and ($errno == 1030 or $errno <= 1026)
+        and preg_match(',[^[:alnum:]]([0-9]+)[^[:alnum:]],', $msg, $regs)
+    ) {
+        $errno = $regs[1];
+    }
+
+    // Erreur systeme
+    if (is_numeric($errno) and $errno > 0 and $errno < 200) {
+        $retour = '<tt><br /><br /><blink>'
+            . _T('info_erreur_systeme', ['errsys' => $errno])
+            . "</blink><br />\n<b>"
+            . _T(
+                'info_erreur_systeme2',
+                ['script' => generer_url_ecrire('base_repair')]
+            )
+            . '</b><br />';
+        spip_log("Erreur systeme $errno");
+
+        return [$retour, ''];
+    }
+
+    // Requete erronee
+    $err = '<b>' . _T('avis_erreur_mysql') . " $errno</b><br /><tt>\n"
+        . spip_htmlspecialchars($msg)
+        . "\n<br /><span style='color: red'><b>"
+        . spip_htmlspecialchars($query)
+        . '</b></span></tt><br />';
+
+    //. aider('erreur_mysql');
+
+    return $err;
 }
 
 
 function trouve_boucle_debug($n, $nom, $debut = 0, $boucle = '') {
 
-	$id = $nom . $boucle;
-	if (is_array($GLOBALS['debug_objets']['sequence'][$id])) {
-		foreach ($GLOBALS['debug_objets']['sequence'][$id] as $v) {
-			if (!preg_match('/^(.*)(<\?.*\?>)(.*)$/s', $v[0], $r)) {
-				$y = substr_count($v[0], "\n");
-			} else {
-				if ($v[1][0] == '#') { // balise dynamique
-				$incl = $GLOBALS['debug_objets']['resultat'][$v[2]];
-				} else // inclusion
-				{
-					$incl = $GLOBALS['debug_objets']['squelette'][trouve_squelette_inclus($v[0])];
-				}
-				$y = substr_count($incl, "\n")
-					+ substr_count($r[1], "\n")
-					+ substr_count($r[3], "\n");
-			}
-			if ($n <= ($y + $debut)) {
-				if ($v[1][0] == '?') {
-					return trouve_boucle_debug($n, $nom, $debut, substr($v[1], 1));
-				} elseif ($v[1][0] == '!') {
-					if ($incl = trouve_squelette_inclus($v[1])) {
-						return trouve_boucle_debug($n, $incl, $debut);
-					}
-				}
-
-				return [$nom, $boucle, $v[2] - 1 + $n - $debut];
-			}
-			$debut += $y;
-		}
-	}
-
-	return [$nom, $boucle, $n - $debut];
+    $id = $nom . $boucle;
+    if (is_array($GLOBALS['debug_objets']['sequence'][$id])) {
+        foreach ($GLOBALS['debug_objets']['sequence'][$id] as $v) {
+            if (!preg_match('/^(.*)(<\?.*\?>)(.*)$/s', $v[0], $r)) {
+                $y = substr_count($v[0], "\n");
+            } else {
+                if ($v[1][0] == '#') { // balise dynamique
+                $incl = $GLOBALS['debug_objets']['resultat'][$v[2]];
+                } else // inclusion
+                {
+                    $incl = $GLOBALS['debug_objets']['squelette'][trouve_squelette_inclus($v[0])];
+                }
+                $y = substr_count($incl, "\n")
+                    + substr_count($r[1], "\n")
+                    + substr_count($r[3], "\n");
+            }
+            if ($n <= ($y + $debut)) {
+                if ($v[1][0] == '?') {
+                    return trouve_boucle_debug($n, $nom, $debut, substr($v[1], 1));
+                } elseif ($v[1][0] == '!') {
+                    if ($incl = trouve_squelette_inclus($v[1])) {
+                        return trouve_boucle_debug($n, $incl, $debut);
+                    }
+                }
+
+                return [$nom, $boucle, $v[2] - 1 + $n - $debut];
+            }
+            $debut += $y;
+        }
+    }
+
+    return [$nom, $boucle, $n - $debut];
 }
 
 function trouve_squelette_inclus($script) {
 
-	preg_match('/include\(.(.*).php3?.\);/', $script, $reg);
-	// si le script X.php n'est pas ecrire/public.php
-	// on suppose qu'il prend le squelette X.html (pas sur, mais y a pas mieux)
-	if ($reg[1] == 'ecrire/public') { // si c'est bien ecrire/public on cherche le param 'fond'
-	if (!preg_match("/'fond' => '([^']*)'/", $script, $reg)) { // a defaut on cherche le param 'page'
-		if (!preg_match("/'param' => '([^']*)'/", $script, $reg)) {
-				$reg[1] = 'inconnu';
-		}
-	}
-	}
-	$incl = ',' . $reg[1] . '[.]\w$,';
-
-	foreach ($GLOBALS['debug_objets']['sourcefile'] as $k => $v) {
-		if (preg_match($incl, $v)) {
-			return $k;
-		}
-	}
-
-	return '';
+    preg_match('/include\(.(.*).php3?.\);/', $script, $reg);
+    // si le script X.php n'est pas ecrire/public.php
+    // on suppose qu'il prend le squelette X.html (pas sur, mais y a pas mieux)
+    if ($reg[1] == 'ecrire/public') { // si c'est bien ecrire/public on cherche le param 'fond'
+    if (!preg_match("/'fond' => '([^']*)'/", $script, $reg)) { // a defaut on cherche le param 'page'
+        if (!preg_match("/'param' => '([^']*)'/", $script, $reg)) {
+                $reg[1] = 'inconnu';
+        }
+    }
+    }
+    $incl = ',' . $reg[1] . '[.]\w$,';
+
+    foreach ($GLOBALS['debug_objets']['sourcefile'] as $k => $v) {
+        if (preg_match($incl, $v)) {
+            return $k;
+        }
+    }
+
+    return '';
 }
 
 function reference_boucle_debug($n, $nom, $self) {
-	[$skel, $boucle, $ligne] = trouve_boucle_debug($n, $nom);
-
-	if (!$boucle) {
-		return !$ligne ? '' :
-			(' (' .
-				(($nom != $skel) ? _T('squelette_inclus_ligne') :
-					_T('squelette_ligne')) .
-				" <a href='$self&amp;var_mode_objet=$skel&amp;var_mode_affiche=squelette&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)");
-	} else {
-		$self .= "&amp;var_mode_objet=$skel$boucle&amp;var_mode_affiche=boucle";
-
-		return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" :
-			" (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
-	}
+    [$skel, $boucle, $ligne] = trouve_boucle_debug($n, $nom);
+
+    if (!$boucle) {
+        return !$ligne ? '' :
+            (' (' .
+                (($nom != $skel) ? _T('squelette_inclus_ligne') :
+                    _T('squelette_ligne')) .
+                " <a href='$self&amp;var_mode_objet=$skel&amp;var_mode_affiche=squelette&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)");
+    } else {
+        $self .= "&amp;var_mode_objet=$skel$boucle&amp;var_mode_affiche=boucle";
+
+        return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" :
+            " (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
+    }
 }
 
 // affiche un texte avec numero de ligne et ancre.
 
 function ancre_texte($texte, $fautifs = [], $nocpt = false) {
 
-	$var_mode_ligne = _request('var_mode_ligne');
-	if ($var_mode_ligne) {
-		$fautifs[] = [$var_mode_ligne];
-	}
-	$res = '';
-
-	$s = highlight_string($texte, true);
-	if (substr($s, 0, 6) == '<code>') {
-		$s = substr($s, 6);
-		$res = '<code>';
-	}
-
-	$s = preg_replace(
-		',<(\w[^<>]*)>([^<]*)<br />([^<]*)</\1>,',
-		'<\1>\2</\1><br />' . "\n" . '<\1>\3</\1>',
-		$s
-	);
-
-
-	$tableau = explode('<br />', $s);
-
-	$format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: " . ($nocpt ? 'hidden' : 'visible') . ";%s' href='#T%s' title=\"%s\">%0" . strval(@strlen(count($tableau))) . "d</a></span> %s<br />\n";
-
-	$format10 = str_replace('white', 'lightgrey', $format);
-	$formaterr = 'color: red;';
-	$i = 1;
-	$flignes = [];
-	$loc = [0, 0];
-	foreach ($fautifs as $lc) {
-		if (is_array($lc)) {
-			$l = array_shift($lc);
-			$flignes[$l] = $lc;
-		} else {
-			$flignes[$lc] = $loc;
-		}
-	}
-
-	$ancre = md5($texte);
-	foreach ($tableau as $ligne) {
-		if (isset($flignes[$i])) {
-			$ligne = str_replace('&nbsp;', ' ', $ligne);
-			$indexmesg = $flignes[$i][1];
-			$err = textebrut($flignes[$i][2]);
-			// tentative de pointer sur la colonne fautive;
-			// marche pas car highlight_string rajoute des entites. A revoir.
-			// $m = $flignes[$i][0];
-			// $ligne = substr($ligne, 0, $m-1) .
-			// sprintf($formaterr, substr($ligne,$m));
-			$bg = $formaterr;
-		} else {
-			$indexmesg = $ancre;
-			$err = $bg = '';
-		}
-		$res .= sprintf((($i % 10) ? $format : $format10), $i, $bg, $indexmesg, $err, $i, $ligne);
-		$i++;
-	}
-
-	return "<div id='T$ancre'>"
-	. '<div onclick="'
-	. "jQuery(this).parent().find('a').toggle();"
-	. '" title="'
-	. _T('masquer_colonne')
-	. '" style="cursor: pointer;">'
-	. ($nocpt ? '' : _T('info_numero_abbreviation'))
-	. '</div>
+    $var_mode_ligne = _request('var_mode_ligne');
+    if ($var_mode_ligne) {
+        $fautifs[] = [$var_mode_ligne];
+    }
+    $res = '';
+
+    $s = highlight_string($texte, true);
+    if (substr($s, 0, 6) == '<code>') {
+        $s = substr($s, 6);
+        $res = '<code>';
+    }
+
+    $s = preg_replace(
+        ',<(\w[^<>]*)>([^<]*)<br />([^<]*)</\1>,',
+        '<\1>\2</\1><br />' . "\n" . '<\1>\3</\1>',
+        $s
+    );
+
+
+    $tableau = explode('<br />', $s);
+
+    $format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: " . ($nocpt ? 'hidden' : 'visible') . ";%s' href='#T%s' title=\"%s\">%0" . strval(@strlen(count($tableau))) . "d</a></span> %s<br />\n";
+
+    $format10 = str_replace('white', 'lightgrey', $format);
+    $formaterr = 'color: red;';
+    $i = 1;
+    $flignes = [];
+    $loc = [0, 0];
+    foreach ($fautifs as $lc) {
+        if (is_array($lc)) {
+            $l = array_shift($lc);
+            $flignes[$l] = $lc;
+        } else {
+            $flignes[$lc] = $loc;
+        }
+    }
+
+    $ancre = md5($texte);
+    foreach ($tableau as $ligne) {
+        if (isset($flignes[$i])) {
+            $ligne = str_replace('&nbsp;', ' ', $ligne);
+            $indexmesg = $flignes[$i][1];
+            $err = textebrut($flignes[$i][2]);
+            // tentative de pointer sur la colonne fautive;
+            // marche pas car highlight_string rajoute des entites. A revoir.
+            // $m = $flignes[$i][0];
+            // $ligne = substr($ligne, 0, $m-1) .
+            // sprintf($formaterr, substr($ligne,$m));
+            $bg = $formaterr;
+        } else {
+            $indexmesg = $ancre;
+            $err = $bg = '';
+        }
+        $res .= sprintf((($i % 10) ? $format : $format10), $i, $bg, $indexmesg, $err, $i, $ligne);
+        $i++;
+    }
+
+    return "<div id='T$ancre'>"
+    . '<div onclick="'
+    . "jQuery(this).parent().find('a').toggle();"
+    . '" title="'
+    . _T('masquer_colonne')
+    . '" style="cursor: pointer;">'
+    . ($nocpt ? '' : _T('info_numero_abbreviation'))
+    . '</div>
 	' . $res . "</div>\n";
 }
 
 // l'environnement graphique du debuggueur
 
 function debusquer_squelette($fonc, $mode, $self) {
-	$legend = null;
-	$texte = '';
-
-	if ($mode !== 'validation') {
-		if (isset($GLOBALS['debug_objets']['sourcefile']) and $GLOBALS['debug_objets']['sourcefile']) {
-			$res = "<div id='spip-boucles'>\n"
-				. debusquer_navigation_squelettes($self)
-				. '</div>';
-		} else {
-			$res = '';
-		}
-		if ($fonc) {
-			$id = " id='$fonc'";
-			if (!empty($GLOBALS['debug_objets'][$mode][$fonc])) {
-				[$legend, $texte, $res2] = debusquer_source($fonc, $mode);
-				$texte .= $res2;
-			} elseif (!empty($GLOBALS['debug_objets'][$mode][$fonc . 'tout'])) {
-				$legend = _T('zbug_' . $mode);
-				$texte = $GLOBALS['debug_objets'][$mode][$fonc . 'tout'];
-				$texte = ancre_texte($texte, ['', '']);
-			}
-		} else {
-			if (strlen(trim($res))) {
-				return "<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res</div>";
-			} else {
-				// cas de l'appel sur erreur: montre la page
-				return $GLOBALS['debug_objets']['resultat']['tout'] ?? '';
-			}
-		}
-	} else {
-		$valider = charger_fonction('valider', 'xml');
-		$val = $valider($GLOBALS['debug_objets']['validation'][$fonc . 'tout']);
-		// Si erreur, signaler leur nombre dans le formulaire admin
-		$GLOBALS['debug_objets']['validation'] = $val->err ? count($val->err) : '';
-		[$texte, $err] = emboite_texte($val, $fonc, $self);
-		if ($err === false) {
-			$err = _T('impossible');
-		} elseif ($err === true) {
-			$err = _T('correcte');
-		} else {
-			$err = ": $err";
-		}
-		$legend = _T('validation') . ' ' . $err;
-		$res = $id = '';
-	}
-
-	return !trim($texte) ? '' : (
-		"<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res"
-		. "<div id='debug_boucle'><fieldset$id><legend>"
-		. "<a href='" . $self . '#f_' . substr($fonc, 0, 37) . "'> &#8593; "
-		. ($legend ?: $mode)
-		. '</a></legend>'
-		. $texte
-		. '</fieldset></div>'
-		. '</div>');
+    $legend = null;
+    $texte = '';
+
+    if ($mode !== 'validation') {
+        if (isset($GLOBALS['debug_objets']['sourcefile']) and $GLOBALS['debug_objets']['sourcefile']) {
+            $res = "<div id='spip-boucles'>\n"
+                . debusquer_navigation_squelettes($self)
+                . '</div>';
+        } else {
+            $res = '';
+        }
+        if ($fonc) {
+            $id = " id='$fonc'";
+            if (!empty($GLOBALS['debug_objets'][$mode][$fonc])) {
+                [$legend, $texte, $res2] = debusquer_source($fonc, $mode);
+                $texte .= $res2;
+            } elseif (!empty($GLOBALS['debug_objets'][$mode][$fonc . 'tout'])) {
+                $legend = _T('zbug_' . $mode);
+                $texte = $GLOBALS['debug_objets'][$mode][$fonc . 'tout'];
+                $texte = ancre_texte($texte, ['', '']);
+            }
+        } else {
+            if (strlen(trim($res))) {
+                return "<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res</div>";
+            } else {
+                // cas de l'appel sur erreur: montre la page
+                return $GLOBALS['debug_objets']['resultat']['tout'] ?? '';
+            }
+        }
+    } else {
+        $valider = charger_fonction('valider', 'xml');
+        $val = $valider($GLOBALS['debug_objets']['validation'][$fonc . 'tout']);
+        // Si erreur, signaler leur nombre dans le formulaire admin
+        $GLOBALS['debug_objets']['validation'] = $val->err ? count($val->err) : '';
+        [$texte, $err] = emboite_texte($val, $fonc, $self);
+        if ($err === false) {
+            $err = _T('impossible');
+        } elseif ($err === true) {
+            $err = _T('correcte');
+        } else {
+            $err = ": $err";
+        }
+        $legend = _T('validation') . ' ' . $err;
+        $res = $id = '';
+    }
+
+    return !trim($texte) ? '' : (
+        "<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res"
+        . "<div id='debug_boucle'><fieldset$id><legend>"
+        . "<a href='" . $self . '#f_' . substr($fonc, 0, 37) . "'> &#8593; "
+        . ($legend ?: $mode)
+        . '</a></legend>'
+        . $texte
+        . '</fieldset></div>'
+        . '</div>');
 }
 
 
 function emboite_texte($res, $fonc = '', $self = '') {
-	$errs = $res->err;
-	$texte = $res->entete . ($errs ? '' : $res->page);
-
-	if (!$texte and !$errs) {
-		return [ancre_texte('', ['', '']), false];
-	}
-	if (!$errs) {
-		return [ancre_texte($texte, ['', '']), true];
-	}
-
-	if (!isset($GLOBALS['debug_objets'])) {
-		$colors = ['#e0e0f0', '#f8f8ff'];
-		$encore = count_occ($errs);
-		$encore2 = [];
-		$fautifs = [];
-
-		$err = '<tr><th>'
-			. _T('numero')
-			. '</th><th>'
-			. _T('occurence')
-			. '</th><th>'
-			. _T('ligne')
-			. '</th><th>'
-			. _T('colonne')
-			. '</th><th>'
-			. _T('erreur')
-			. '</th></tr>';
-
-		$i = 0;
-		$style = "style='text-align: right; padding-right: 5px'";
-		foreach ($errs as $r) {
-			$i++;
-			[$msg, $ligne, $col] = $r;
-			#spip_log("$r = list($msg, $ligne, $col");
-			if (isset($encore2[$msg])) {
-				$ref = ++$encore2[$msg];
-			} else {
-				$encore2[$msg] = $ref = 1;
-			}
-			$err .= "<tr  style='background-color: "
-				. $colors[$i % 2]
-				. "'><td $style><a href='#debut_err'>"
-				. $i
-				. "</a></td><td $style>"
-				. "$ref/$encore[$msg]</td>"
-				. "<td $style><a href='#L"
-				. $ligne
-				. "' id='T$i'>"
-				. $ligne
-				. "</a></td><td $style>"
-				. $col
-				. "</td><td>$msg</td></tr>\n";
-			$fautifs[] = [$ligne, $col, $i, $msg];
-		}
-		$err = "<h2 style='text-align: center'>"
-			. $i
-			. "<a href='#fin_err'>"
-			. ' ' . _T('erreur_texte')
-			. "</a></h2><table id='debut_err' style='width: 100%'>"
-			. $err
-			. " </table><a id='fin_err'></a>";
-
-		return [ancre_texte($texte, $fautifs), $err];
-	} else {
-		[$msg, $fermant, $ouvrant] = $errs[0];
-		$rf = reference_boucle_debug($fermant, $fonc, $self);
-		$ro = reference_boucle_debug($ouvrant, $fonc, $self);
-		$err = $msg .
-			"<a href='#L" . $fermant . "'>$fermant</a>$rf<br />" .
-			"<a href='#L" . $ouvrant . "'>$ouvrant</a>$ro";
-
-		return [ancre_texte($texte, [[$ouvrant], [$fermant]]), $err];
-	}
+    $errs = $res->err;
+    $texte = $res->entete . ($errs ? '' : $res->page);
+
+    if (!$texte and !$errs) {
+        return [ancre_texte('', ['', '']), false];
+    }
+    if (!$errs) {
+        return [ancre_texte($texte, ['', '']), true];
+    }
+
+    if (!isset($GLOBALS['debug_objets'])) {
+        $colors = ['#e0e0f0', '#f8f8ff'];
+        $encore = count_occ($errs);
+        $encore2 = [];
+        $fautifs = [];
+
+        $err = '<tr><th>'
+            . _T('numero')
+            . '</th><th>'
+            . _T('occurence')
+            . '</th><th>'
+            . _T('ligne')
+            . '</th><th>'
+            . _T('colonne')
+            . '</th><th>'
+            . _T('erreur')
+            . '</th></tr>';
+
+        $i = 0;
+        $style = "style='text-align: right; padding-right: 5px'";
+        foreach ($errs as $r) {
+            $i++;
+            [$msg, $ligne, $col] = $r;
+            #spip_log("$r = list($msg, $ligne, $col");
+            if (isset($encore2[$msg])) {
+                $ref = ++$encore2[$msg];
+            } else {
+                $encore2[$msg] = $ref = 1;
+            }
+            $err .= "<tr  style='background-color: "
+                . $colors[$i % 2]
+                . "'><td $style><a href='#debut_err'>"
+                . $i
+                . "</a></td><td $style>"
+                . "$ref/$encore[$msg]</td>"
+                . "<td $style><a href='#L"
+                . $ligne
+                . "' id='T$i'>"
+                . $ligne
+                . "</a></td><td $style>"
+                . $col
+                . "</td><td>$msg</td></tr>\n";
+            $fautifs[] = [$ligne, $col, $i, $msg];
+        }
+        $err = "<h2 style='text-align: center'>"
+            . $i
+            . "<a href='#fin_err'>"
+            . ' ' . _T('erreur_texte')
+            . "</a></h2><table id='debut_err' style='width: 100%'>"
+            . $err
+            . " </table><a id='fin_err'></a>";
+
+        return [ancre_texte($texte, $fautifs), $err];
+    } else {
+        [$msg, $fermant, $ouvrant] = $errs[0];
+        $rf = reference_boucle_debug($fermant, $fonc, $self);
+        $ro = reference_boucle_debug($ouvrant, $fonc, $self);
+        $err = $msg .
+            "<a href='#L" . $fermant . "'>$fermant</a>$rf<br />" .
+            "<a href='#L" . $ouvrant . "'>$ouvrant</a>$ro";
+
+        return [ancre_texte($texte, [[$ouvrant], [$fermant]]), $err];
+    }
 }
 
 function count_occ($regs) {
-	$encore = [];
-	foreach ($regs as $r) {
-		if (isset($encore[$r[0]])) {
-			$encore[$r[0]]++;
-		} else {
-			$encore[$r[0]] = 1;
-		}
-	}
-
-	return $encore;
+    $encore = [];
+    foreach ($regs as $r) {
+        if (isset($encore[$r[0]])) {
+            $encore[$r[0]]++;
+        } else {
+            $encore[$r[0]] = 1;
+        }
+    }
+
+    return $encore;
 }
 
 function debusquer_navigation_squelettes($self) {
 
-	$res = '';
-	$boucles = !empty($GLOBALS['debug_objets']['boucle']) ? $GLOBALS['debug_objets']['boucle'] : '';
-	$contexte = $GLOBALS['debug_objets']['contexte'];
-	$t_skel = _T('squelette');
-	foreach ($GLOBALS['debug_objets']['sourcefile'] as $nom => $sourcefile) {
-		$self2 = parametre_url($self, 'var_mode_objet', $nom);
-		$nav = !$boucles ? '' : debusquer_navigation_boucles($boucles, $nom, $self, $sourcefile);
-		$temps = !isset($GLOBALS['debug_objets']['profile'][$sourcefile]) ? '' : _T(
-			'zbug_profile',
-			['time' => $GLOBALS['debug_objets']['profile'][$sourcefile]]
-		);
-
-		$res .= "<fieldset id='f_" . $nom . "'><legend>"
-			. $t_skel
-			. ' '
-			. $sourcefile
-			. "&nbsp;:\n<a href='$self2&amp;var_mode_affiche=squelette#f_$nom'>"
-			. $t_skel
-			. "</a>\n<a href='$self2&amp;var_mode_affiche=resultat#f_$nom'>"
-			. _T('zbug_resultat')
-			. "</a>\n<a href='$self2&amp;var_mode_affiche=code#f_$nom'>"
-			. _T('zbug_code')
-			. "</a>\n<a href='"
-			. str_replace('var_mode=debug', 'var_profile=1&amp;var_mode=recalcul', $self)
-			. "'>"
-			. _T('zbug_calcul')
-			. '</a></legend>'
-			. (!$temps ? '' : ("\n<span style='display:block;float:" . $GLOBALS['spip_lang_right'] . "'>$temps</span><br />"))
-			. debusquer_contexte($contexte[$sourcefile])
-		. (!$nav ? '' : ("<table width='100%'>\n$nav</table>\n"))
-		. "</fieldset>\n";
-	}
-
-	return $res;
+    $res = '';
+    $boucles = !empty($GLOBALS['debug_objets']['boucle']) ? $GLOBALS['debug_objets']['boucle'] : '';
+    $contexte = $GLOBALS['debug_objets']['contexte'];
+    $t_skel = _T('squelette');
+    foreach ($GLOBALS['debug_objets']['sourcefile'] as $nom => $sourcefile) {
+        $self2 = parametre_url($self, 'var_mode_objet', $nom);
+        $nav = !$boucles ? '' : debusquer_navigation_boucles($boucles, $nom, $self, $sourcefile);
+        $temps = !isset($GLOBALS['debug_objets']['profile'][$sourcefile]) ? '' : _T(
+            'zbug_profile',
+            ['time' => $GLOBALS['debug_objets']['profile'][$sourcefile]]
+        );
+
+        $res .= "<fieldset id='f_" . $nom . "'><legend>"
+            . $t_skel
+            . ' '
+            . $sourcefile
+            . "&nbsp;:\n<a href='$self2&amp;var_mode_affiche=squelette#f_$nom'>"
+            . $t_skel
+            . "</a>\n<a href='$self2&amp;var_mode_affiche=resultat#f_$nom'>"
+            . _T('zbug_resultat')
+            . "</a>\n<a href='$self2&amp;var_mode_affiche=code#f_$nom'>"
+            . _T('zbug_code')
+            . "</a>\n<a href='"
+            . str_replace('var_mode=debug', 'var_profile=1&amp;var_mode=recalcul', $self)
+            . "'>"
+            . _T('zbug_calcul')
+            . '</a></legend>'
+            . (!$temps ? '' : ("\n<span style='display:block;float:" . $GLOBALS['spip_lang_right'] . "'>$temps</span><br />"))
+            . debusquer_contexte($contexte[$sourcefile])
+        . (!$nav ? '' : ("<table width='100%'>\n$nav</table>\n"))
+        . "</fieldset>\n";
+    }
+
+    return $res;
 }
 
 function debusquer_navigation_boucles($boucles, $nom_skel, $self, $nom_source) {
-	$i = 0;
-	$res = '';
-	$var_mode_objet = _request('var_mode_objet');
-	$gram = preg_match('/[.](\w+)$/', $nom_source, $r) ? $r[1] : '';
-
-	foreach ($boucles as $objet => $boucle) {
-		if (substr($objet, 0, strlen($nom_skel)) == $nom_skel) {
-			$i++;
-			$nom = $boucle->id_boucle;
-			$req = $boucle->type_requete;
-			$crit = public_decompiler($boucle, $gram, 0, 'criteres');
-			$self2 = $self . '&amp;var_mode_objet=' . $objet;
-
-			$res .= "\n<tr style='background-color: " .
-				($i % 2 ? '#e0e0f0' : '#f8f8ff') .
-				"'><td  align='right'>$i</td><td>\n" .
-				"<a  class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=boucle#f_$nom_skel'>" .
-				_T('zbug_boucle') .
-				"</a></td><td>\n<a class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=resultat#f_$nom_skel'>" .
-				_T('zbug_resultat') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=code#f_$nom_skel'>" .
-				_T('zbug_code') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				str_replace('var_mode=', 'var_profile=', $self2) .
-				"'>" .
-				_T('zbug_calcul') .
-				"</a></td><td>\n" .
-				(($var_mode_objet == $objet) ? "<b>$nom</b>" : $nom) .
-				"</td><td>\n" .
-				$req .
-				"</td><td>\n" .
-				spip_htmlspecialchars($crit) .
-				'</td></tr>';
-		}
-	}
-
-	return $res;
+    $i = 0;
+    $res = '';
+    $var_mode_objet = _request('var_mode_objet');
+    $gram = preg_match('/[.](\w+)$/', $nom_source, $r) ? $r[1] : '';
+
+    foreach ($boucles as $objet => $boucle) {
+        if (substr($objet, 0, strlen($nom_skel)) == $nom_skel) {
+            $i++;
+            $nom = $boucle->id_boucle;
+            $req = $boucle->type_requete;
+            $crit = public_decompiler($boucle, $gram, 0, 'criteres');
+            $self2 = $self . '&amp;var_mode_objet=' . $objet;
+
+            $res .= "\n<tr style='background-color: " .
+                ($i % 2 ? '#e0e0f0' : '#f8f8ff') .
+                "'><td  align='right'>$i</td><td>\n" .
+                "<a  class='debug_link_boucle' href='" .
+                $self2 .
+                "&amp;var_mode_affiche=boucle#f_$nom_skel'>" .
+                _T('zbug_boucle') .
+                "</a></td><td>\n<a class='debug_link_boucle' href='" .
+                $self2 .
+                "&amp;var_mode_affiche=resultat#f_$nom_skel'>" .
+                _T('zbug_resultat') .
+                "</a></td><td>\n<a class='debug_link_resultat' href='" .
+                $self2 .
+                "&amp;var_mode_affiche=code#f_$nom_skel'>" .
+                _T('zbug_code') .
+                "</a></td><td>\n<a class='debug_link_resultat' href='" .
+                str_replace('var_mode=', 'var_profile=', $self2) .
+                "'>" .
+                _T('zbug_calcul') .
+                "</a></td><td>\n" .
+                (($var_mode_objet == $objet) ? "<b>$nom</b>" : $nom) .
+                "</td><td>\n" .
+                $req .
+                "</td><td>\n" .
+                spip_htmlspecialchars($crit) .
+                '</td></tr>';
+        }
+    }
+
+    return $res;
 }
 
 function debusquer_source($objet, $affiche) {
-	$quoi = $GLOBALS['debug_objets'][$affiche][$objet];
-	if (!empty($GLOBALS['debug_objets']['boucle'][$objet]->id_boucle)) {
-		$nom = $GLOBALS['debug_objets']['boucle'][$objet]->id_boucle;
-	} else {
-		$nom = $GLOBALS['debug_objets']['sourcefile'][$objet];
-	}
-	$res2 = '';
-
-	if ($affiche == 'resultat') {
-		$legend = $nom;
-		$req = $GLOBALS['debug_objets']['requete'][$objet];
-		if (function_exists('_mysql_traite_query')) {
-			$c = strtolower(_request('connect') ?? '');
-			$c = $GLOBALS['connexions'][$c ?: 0]['prefixe'];
-			$req = _mysql_traite_query($req, '', $c);
-		}
-		//  permettre le copier/coller facile
-		// $res = ancre_texte($req, array(), true);
-		$res = "<div id='T" . md5($req) . "'>\n<pre>\n" . $req . "</pre>\n</div>\n";
-		//  formatage et affichage des resultats bruts de la requete
-		$ress_req = spip_query($req);
-		$brut_sql = '';
-		$num = 1;
-		//  eviter l'affichage de milliers de lignes
-		//  personnalisation possible dans mes_options
-		$max_aff = defined('_MAX_DEBUG_AFF') ? _MAX_DEBUG_AFF : 50;
-		while ($retours_sql = sql_fetch($ress_req)) {
-			if ($num <= $max_aff) {
-				$brut_sql .= '<h3>' . ($num == 1 ? $num . ' sur ' . sql_count($ress_req) : $num) . '</h3>';
-				$brut_sql .= '<p>';
-				foreach ($retours_sql as $key => $val) {
-					$brut_sql .= '<strong>' . $key . '</strong> => ' . spip_htmlspecialchars(couper($val, 150)) . "<br />\n";
-				}
-				$brut_sql .= '</p>';
-			}
-			$num++;
-		}
-		$res2 = interdire_scripts($brut_sql);
-		foreach ($quoi as $view) {
-			//  ne pas afficher les $contexte_inclus
-			$view = preg_replace(',<\?php.+\?[>],Uims', '', $view);
-			if ($view) {
-				$res2 .= "\n<br /><fieldset>" . interdire_scripts($view) . '</fieldset>';
-			}
-		}
-	} elseif ($affiche == 'code') {
-		$legend = $nom;
-		$res = ancre_texte('<' . "?php\n" . $quoi . "\n?" . '>');
-	} elseif ($affiche == 'boucle') {
-		$legend = _T('zbug_boucle') . ' ' . $nom;
-		// Le compilateur prefixe le nom des boucles par l'extension du fichier source.
-		$gram = preg_match('/^([^_]+)_/', $objet, $r) ? $r[1] : '';
-		$res = ancre_texte(public_decompiler($quoi, $gram, 0, 'boucle'));
-	} elseif ($affiche == 'squelette') {
-		$legend = $GLOBALS['debug_objets']['sourcefile'][$objet];
-		$res = ancre_texte($GLOBALS['debug_objets']['squelette'][$objet]);
-	}
-
-	return [$legend, $res, $res2];
+    $quoi = $GLOBALS['debug_objets'][$affiche][$objet];
+    if (!empty($GLOBALS['debug_objets']['boucle'][$objet]->id_boucle)) {
+        $nom = $GLOBALS['debug_objets']['boucle'][$objet]->id_boucle;
+    } else {
+        $nom = $GLOBALS['debug_objets']['sourcefile'][$objet];
+    }
+    $res2 = '';
+
+    if ($affiche == 'resultat') {
+        $legend = $nom;
+        $req = $GLOBALS['debug_objets']['requete'][$objet];
+        if (function_exists('_mysql_traite_query')) {
+            $c = strtolower(_request('connect') ?? '');
+            $c = $GLOBALS['connexions'][$c ?: 0]['prefixe'];
+            $req = _mysql_traite_query($req, '', $c);
+        }
+        //  permettre le copier/coller facile
+        // $res = ancre_texte($req, array(), true);
+        $res = "<div id='T" . md5($req) . "'>\n<pre>\n" . $req . "</pre>\n</div>\n";
+        //  formatage et affichage des resultats bruts de la requete
+        $ress_req = spip_query($req);
+        $brut_sql = '';
+        $num = 1;
+        //  eviter l'affichage de milliers de lignes
+        //  personnalisation possible dans mes_options
+        $max_aff = defined('_MAX_DEBUG_AFF') ? _MAX_DEBUG_AFF : 50;
+        while ($retours_sql = sql_fetch($ress_req)) {
+            if ($num <= $max_aff) {
+                $brut_sql .= '<h3>' . ($num == 1 ? $num . ' sur ' . sql_count($ress_req) : $num) . '</h3>';
+                $brut_sql .= '<p>';
+                foreach ($retours_sql as $key => $val) {
+                    $brut_sql .= '<strong>' . $key . '</strong> => ' . spip_htmlspecialchars(couper($val, 150)) . "<br />\n";
+                }
+                $brut_sql .= '</p>';
+            }
+            $num++;
+        }
+        $res2 = interdire_scripts($brut_sql);
+        foreach ($quoi as $view) {
+            //  ne pas afficher les $contexte_inclus
+            $view = preg_replace(',<\?php.+\?[>],Uims', '', $view);
+            if ($view) {
+                $res2 .= "\n<br /><fieldset>" . interdire_scripts($view) . '</fieldset>';
+            }
+        }
+    } elseif ($affiche == 'code') {
+        $legend = $nom;
+        $res = ancre_texte('<' . "?php\n" . $quoi . "\n?" . '>');
+    } elseif ($affiche == 'boucle') {
+        $legend = _T('zbug_boucle') . ' ' . $nom;
+        // Le compilateur prefixe le nom des boucles par l'extension du fichier source.
+        $gram = preg_match('/^([^_]+)_/', $objet, $r) ? $r[1] : '';
+        $res = ancre_texte(public_decompiler($quoi, $gram, 0, 'boucle'));
+    } elseif ($affiche == 'squelette') {
+        $legend = $GLOBALS['debug_objets']['sourcefile'][$objet];
+        $res = ancre_texte($GLOBALS['debug_objets']['squelette'][$objet]);
+    }
+
+    return [$legend, $res, $res2];
 }
 
 function debusquer_entete($titre, $corps) {
 
-	include_spip('balise/formulaire_admin');
-	include_spip('public/assembler'); // pour inclure_balise_dynamique
-	include_spip('inc/texte'); // pour corriger_typo
-
-	return _DOCTYPE_ECRIRE .
-	html_lang_attributes() .
-	"<head>\n<title>" .
-	('SPIP ' . $GLOBALS['spip_version_affichee'] . ' ' .
-		_T('admin_debug') . ' ' . $titre . ' (' .
-		supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))) .
-	")</title>\n" .
-	"<meta http-equiv='Content-Type' content='text/html" .
-	(($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '') .
-	"' />\n" .
-	http_script('', 'jquery.js')
-	. "<link rel='stylesheet' href='" . url_absolue(find_in_path('spip_admin.css'))
-	. "' type='text/css' />" .
-	"</head>\n" .
-	"<body style='margin:0 10px;'>\n" .
-	"<div id='spip-debug-header'>" .
-	$corps .
-	inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $GLOBALS['debug_objets']), false) .
-	'</div></body></html>';
+    include_spip('balise/formulaire_admin');
+    include_spip('public/assembler'); // pour inclure_balise_dynamique
+    include_spip('inc/texte'); // pour corriger_typo
+
+    return _DOCTYPE_ECRIRE .
+    html_lang_attributes() .
+    "<head>\n<title>" .
+    ('SPIP ' . $GLOBALS['spip_version_affichee'] . ' ' .
+        _T('admin_debug') . ' ' . $titre . ' (' .
+        supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))) .
+    ")</title>\n" .
+    "<meta http-equiv='Content-Type' content='text/html" .
+    (($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '') .
+    "' />\n" .
+    http_script('', 'jquery.js')
+    . "<link rel='stylesheet' href='" . url_absolue(find_in_path('spip_admin.css'))
+    . "' type='text/css' />" .
+    "</head>\n" .
+    "<body style='margin:0 10px;'>\n" .
+    "<div id='spip-debug-header'>" .
+    $corps .
+    inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $GLOBALS['debug_objets']), false) .
+    '</div></body></html>';
 }

Spacing +86 added lines, -89 removed lines

@@ -148,7 +148,7 @@ 
 		if (!$fonc) {
 			$fonc = $GLOBALS['debug_objets']['principal'];
 		}
-		$titre = !$mode ? $fonc : ($mode . (isset($GLOBALS['debug_objets']['sourcefile'][$fonc]) ? ' ' . $GLOBALS['debug_objets']['sourcefile'][$fonc] : ''));
+		$titre = !$mode ? $fonc : ($mode.(isset($GLOBALS['debug_objets']['sourcefile'][$fonc]) ? ' '.$GLOBALS['debug_objets']['sourcefile'][$fonc] : ''));
 	}
 	if ($message === false) {
 		lang_select();
@@ -177,7 +177,7 @@ 
 	$fond = $GLOBALS['fond'] ?? '';
 	// une erreur critique sort $message en array
 	$debug = is_array($msg) ? $msg[1] : $msg;
-	spip_log('Debug: ' . $debug . ' (' . $fond . ')');
+	spip_log('Debug: '.$debug.' ('.$fond.')');
 
 	return $msg;
 }
@@ -185,7 +185,7 @@ 
 function debusquer_bandeau($erreurs) {
 
 	if (!empty($erreurs)) {
-		$n = [(is_countable($erreurs) ? count($erreurs) : 0) . ' ' . _T('zbug_erreur_squelette')];
+		$n = [(is_countable($erreurs) ? count($erreurs) : 0).' '._T('zbug_erreur_squelette')];
 
 		return debusquer_navigation($erreurs, $n);
 	} elseif (!empty($GLOBALS['tableau_des_temps'])) {
@@ -218,25 +218,25 @@ 
 			$valeur_simple = [];
 			foreach ($valeur as $v) {
 				if (is_array($v)) {
-					$valeur_simple[] = 'array:' . count($v);
+					$valeur_simple[] = 'array:'.count($v);
 				} elseif (is_object($v)) {
 					$valeur_simple[] = get_class($v);
 				} elseif (is_string($v)) {
-					$valeur_simple[] = "'" . $v . "'";
+					$valeur_simple[] = "'".$v."'";
 				} else {
 					$valeur_simple[] = $v;
 				}
 			}
 			$n = count($valeur);
-			$valeur = (($n > 3) ? 'array:' . $n . ' ' : '');
-			$valeur .= '[' . join(', ', $valeur_simple) . ']';
+			$valeur = (($n > 3) ? 'array:'.$n.' ' : '');
+			$valeur .= '['.join(', ', $valeur_simple).']';
 		} elseif (is_object($valeur)) {
 			$valeur = get_class($valeur);
 		} elseif (is_string($valeur)) {
-			$valeur = "'" . $valeur . "'";
+			$valeur = "'".$valeur."'";
 		}
-		$res .= "\n<tr><td><strong>" . nl2br(entites_html($nom))
-			. '</strong></td><td>:&nbsp;' . nl2br(entites_html($valeur))
+		$res .= "\n<tr><td><strong>".nl2br(entites_html($nom))
+			. '</strong></td><td>:&nbsp;'.nl2br(entites_html($valeur))
 			. "</td></tr>\n";
 	}
 
@@ -264,10 +264,10 @@ 
 				$nom_code = $lieu->descr['nom'];
 				$skel = $lieu->descr['sourcefile'];
 				$h2 = parametre_url($href, 'var_mode_objet', $nom_code);
-				$h3 = parametre_url($h2, 'var_mode_affiche', 'squelette') . '#L' . $ligne;
+				$h3 = parametre_url($h2, 'var_mode_affiche', 'squelette').'#L'.$ligne;
 				$skel = "<a href='$h3'><b>$skel</b></a>";
 				if ($boucle) {
-					$h3 = parametre_url($h2 . $boucle, 'var_mode_affiche', 'boucle');
+					$h3 = parametre_url($h2.$boucle, 'var_mode_affiche', 'boucle');
 					$boucle = "<a href='$h3'><b>$boucle</b></a>";
 				}
 			}
@@ -356,7 +356,7 @@ 
 	}
 
 	// Requete erronee
-	$err = '<b>' . _T('avis_erreur_mysql') . " $errno</b><br /><tt>\n"
+	$err = '<b>'._T('avis_erreur_mysql')." $errno</b><br /><tt>\n"
 		. spip_htmlspecialchars($msg)
 		. "\n<br /><span style='color: red'><b>"
 		. spip_htmlspecialchars($query)
@@ -370,7 +370,7 @@ 
 
 function trouve_boucle_debug($n, $nom, $debut = 0, $boucle = '') {
 
-	$id = $nom . $boucle;
+	$id = $nom.$boucle;
 	if (is_array($GLOBALS['debug_objets']['sequence'][$id])) {
 		foreach ($GLOBALS['debug_objets']['sequence'][$id] as $v) {
 			if (!preg_match('/^(.*)(<\?.*\?>)(.*)$/s', $v[0], $r)) {
@@ -416,7 +416,7 @@ 
 		}
 	}
 	}
-	$incl = ',' . $reg[1] . '[.]\w$,';
+	$incl = ','.$reg[1].'[.]\w$,';
 
 	foreach ($GLOBALS['debug_objets']['sourcefile'] as $k => $v) {
 		if (preg_match($incl, $v)) {
@@ -431,16 +431,13 @@ 
 	[$skel, $boucle, $ligne] = trouve_boucle_debug($n, $nom);
 
 	if (!$boucle) {
-		return !$ligne ? '' :
-			(' (' .
-				(($nom != $skel) ? _T('squelette_inclus_ligne') :
-					_T('squelette_ligne')) .
+		return !$ligne ? '' : (' ('.
+				(($nom != $skel) ? _T('squelette_inclus_ligne') : _T('squelette_ligne')).
 				" <a href='$self&amp;var_mode_objet=$skel&amp;var_mode_affiche=squelette&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)");
 	} else {
 		$self .= "&amp;var_mode_objet=$skel$boucle&amp;var_mode_affiche=boucle";
 
-		return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" :
-			" (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
+		return !$ligne ? " (boucle\n<a href='$self#$skel$boucle'>$boucle</a>)" : " (boucle $boucle ligne\n<a href='$self&amp;var_mode_ligne=$ligne#L$ligne'>$ligne</a>)";
 	}
 }
 
@@ -462,14 +459,14 @@ 
 
 	$s = preg_replace(
 		',<(\w[^<>]*)>([^<]*)<br />([^<]*)</\1>,',
-		'<\1>\2</\1><br />' . "\n" . '<\1>\3</\1>',
+		'<\1>\2</\1><br />'."\n".'<\1>\3</\1>',
 		$s
 	);
 
 
 	$tableau = explode('<br />', $s);
 
-	$format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: " . ($nocpt ? 'hidden' : 'visible') . ";%s' href='#T%s' title=\"%s\">%0" . strval(@strlen(count($tableau))) . "d</a></span> %s<br />\n";
+	$format = "<span style='float:left;display:block;width:50px;height:1px'><a id='L%d' style='background-color: white; visibility: ".($nocpt ? 'hidden' : 'visible').";%s' href='#T%s' title=\"%s\">%0".strval(@strlen(count($tableau)))."d</a></span> %s<br />\n";
 
 	$format10 = str_replace('white', 'lightgrey', $format);
 	$formaterr = 'color: red;';
@@ -513,7 +510,7 @@ 
 	. '" style="cursor: pointer;">'
 	. ($nocpt ? '' : _T('info_numero_abbreviation'))
 	. '</div>
-	' . $res . "</div>\n";
+	' . $res."</div>\n";
 }
 
 // l'environnement graphique du debuggueur
@@ -535,14 +532,14 @@ 
 			if (!empty($GLOBALS['debug_objets'][$mode][$fonc])) {
 				[$legend, $texte, $res2] = debusquer_source($fonc, $mode);
 				$texte .= $res2;
-			} elseif (!empty($GLOBALS['debug_objets'][$mode][$fonc . 'tout'])) {
-				$legend = _T('zbug_' . $mode);
-				$texte = $GLOBALS['debug_objets'][$mode][$fonc . 'tout'];
+			} elseif (!empty($GLOBALS['debug_objets'][$mode][$fonc.'tout'])) {
+				$legend = _T('zbug_'.$mode);
+				$texte = $GLOBALS['debug_objets'][$mode][$fonc.'tout'];
 				$texte = ancre_texte($texte, ['', '']);
 			}
 		} else {
 			if (strlen(trim($res))) {
-				return "<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res</div>";
+				return "<img src='".chemin_image('debug-xx.svg')."' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res</div>";
 			} else {
 				// cas de l'appel sur erreur: montre la page
 				return $GLOBALS['debug_objets']['resultat']['tout'] ?? '';
@@ -550,7 +547,7 @@ 
 		}
 	} else {
 		$valider = charger_fonction('valider', 'xml');
-		$val = $valider($GLOBALS['debug_objets']['validation'][$fonc . 'tout']);
+		$val = $valider($GLOBALS['debug_objets']['validation'][$fonc.'tout']);
 		// Si erreur, signaler leur nombre dans le formulaire admin
 		$GLOBALS['debug_objets']['validation'] = $val->err ? count($val->err) : '';
 		[$texte, $err] = emboite_texte($val, $fonc, $self);
@@ -561,14 +558,14 @@ 
 		} else {
 			$err = ": $err";
 		}
-		$legend = _T('validation') . ' ' . $err;
+		$legend = _T('validation').' '.$err;
 		$res = $id = '';
 	}
 
 	return !trim($texte) ? '' : (
-		"<img src='" . chemin_image('debug-xx.svg') . "' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res"
+		"<img src='".chemin_image('debug-xx.svg')."' alt='afficher-masquer le debug' id='spip-debug-toggle' onclick=\"var x = document.getElementById('spip-debug'); (x.style.display == '' ? x.style.display = 'none' : x.style.display = '');\" /><div id='spip-debug'>$res"
 		. "<div id='debug_boucle'><fieldset$id><legend>"
-		. "<a href='" . $self . '#f_' . substr($fonc, 0, 37) . "'> &#8593; "
+		. "<a href='".$self.'#f_'.substr($fonc, 0, 37)."'> &#8593; "
 		. ($legend ?: $mode)
 		. '</a></legend>'
 		. $texte
@@ -579,7 +576,7 @@ 
 
 function emboite_texte($res, $fonc = '', $self = '') {
 	$errs = $res->err;
-	$texte = $res->entete . ($errs ? '' : $res->page);
+	$texte = $res->entete.($errs ? '' : $res->page);
 
 	if (!$texte and !$errs) {
 		return [ancre_texte('', ['', '']), false];
@@ -635,7 +632,7 @@ 
 		$err = "<h2 style='text-align: center'>"
 			. $i
 			. "<a href='#fin_err'>"
-			. ' ' . _T('erreur_texte')
+			. ' '._T('erreur_texte')
 			. "</a></h2><table id='debut_err' style='width: 100%'>"
 			. $err
 			. " </table><a id='fin_err'></a>";
@@ -645,9 +642,9 @@ 
 		[$msg, $fermant, $ouvrant] = $errs[0];
 		$rf = reference_boucle_debug($fermant, $fonc, $self);
 		$ro = reference_boucle_debug($ouvrant, $fonc, $self);
-		$err = $msg .
-			"<a href='#L" . $fermant . "'>$fermant</a>$rf<br />" .
-			"<a href='#L" . $ouvrant . "'>$ouvrant</a>$ro";
+		$err = $msg.
+			"<a href='#L".$fermant."'>$fermant</a>$rf<br />".
+			"<a href='#L".$ouvrant."'>$ouvrant</a>$ro";
 
 		return [ancre_texte($texte, [[$ouvrant], [$fermant]]), $err];
 	}
@@ -680,7 +677,7 @@ 
 			['time' => $GLOBALS['debug_objets']['profile'][$sourcefile]]
 		);
 
-		$res .= "<fieldset id='f_" . $nom . "'><legend>"
+		$res .= "<fieldset id='f_".$nom."'><legend>"
 			. $t_skel
 			. ' '
 			. $sourcefile
@@ -695,7 +692,7 @@ 
 			. "'>"
 			. _T('zbug_calcul')
 			. '</a></legend>'
-			. (!$temps ? '' : ("\n<span style='display:block;float:" . $GLOBALS['spip_lang_right'] . "'>$temps</span><br />"))
+			. (!$temps ? '' : ("\n<span style='display:block;float:".$GLOBALS['spip_lang_right']."'>$temps</span><br />"))
 			. debusquer_contexte($contexte[$sourcefile])
 		. (!$nav ? '' : ("<table width='100%'>\n$nav</table>\n"))
 		. "</fieldset>\n";
@@ -716,33 +713,33 @@ 
 			$nom = $boucle->id_boucle;
 			$req = $boucle->type_requete;
 			$crit = public_decompiler($boucle, $gram, 0, 'criteres');
-			$self2 = $self . '&amp;var_mode_objet=' . $objet;
-
-			$res .= "\n<tr style='background-color: " .
-				($i % 2 ? '#e0e0f0' : '#f8f8ff') .
-				"'><td  align='right'>$i</td><td>\n" .
-				"<a  class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=boucle#f_$nom_skel'>" .
-				_T('zbug_boucle') .
-				"</a></td><td>\n<a class='debug_link_boucle' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=resultat#f_$nom_skel'>" .
-				_T('zbug_resultat') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				$self2 .
-				"&amp;var_mode_affiche=code#f_$nom_skel'>" .
-				_T('zbug_code') .
-				"</a></td><td>\n<a class='debug_link_resultat' href='" .
-				str_replace('var_mode=', 'var_profile=', $self2) .
-				"'>" .
-				_T('zbug_calcul') .
-				"</a></td><td>\n" .
-				(($var_mode_objet == $objet) ? "<b>$nom</b>" : $nom) .
-				"</td><td>\n" .
-				$req .
-				"</td><td>\n" .
-				spip_htmlspecialchars($crit) .
+			$self2 = $self.'&amp;var_mode_objet='.$objet;
+
+			$res .= "\n<tr style='background-color: ".
+				($i % 2 ? '#e0e0f0' : '#f8f8ff').
+				"'><td  align='right'>$i</td><td>\n".
+				"<a  class='debug_link_boucle' href='".
+				$self2.
+				"&amp;var_mode_affiche=boucle#f_$nom_skel'>".
+				_T('zbug_boucle').
+				"</a></td><td>\n<a class='debug_link_boucle' href='".
+				$self2.
+				"&amp;var_mode_affiche=resultat#f_$nom_skel'>".
+				_T('zbug_resultat').
+				"</a></td><td>\n<a class='debug_link_resultat' href='".
+				$self2.
+				"&amp;var_mode_affiche=code#f_$nom_skel'>".
+				_T('zbug_code').
+				"</a></td><td>\n<a class='debug_link_resultat' href='".
+				str_replace('var_mode=', 'var_profile=', $self2).
+				"'>".
+				_T('zbug_calcul').
+				"</a></td><td>\n".
+				(($var_mode_objet == $objet) ? "<b>$nom</b>" : $nom).
+				"</td><td>\n".
+				$req.
+				"</td><td>\n".
+				spip_htmlspecialchars($crit).
 				'</td></tr>';
 		}
 	}
@@ -769,7 +766,7 @@ 
 		}
 		//  permettre le copier/coller facile
 		// $res = ancre_texte($req, array(), true);
-		$res = "<div id='T" . md5($req) . "'>\n<pre>\n" . $req . "</pre>\n</div>\n";
+		$res = "<div id='T".md5($req)."'>\n<pre>\n".$req."</pre>\n</div>\n";
 		//  formatage et affichage des resultats bruts de la requete
 		$ress_req = spip_query($req);
 		$brut_sql = '';
@@ -779,10 +776,10 @@ 
 		$max_aff = defined('_MAX_DEBUG_AFF') ? _MAX_DEBUG_AFF : 50;
 		while ($retours_sql = sql_fetch($ress_req)) {
 			if ($num <= $max_aff) {
-				$brut_sql .= '<h3>' . ($num == 1 ? $num . ' sur ' . sql_count($ress_req) : $num) . '</h3>';
+				$brut_sql .= '<h3>'.($num == 1 ? $num.' sur '.sql_count($ress_req) : $num).'</h3>';
 				$brut_sql .= '<p>';
 				foreach ($retours_sql as $key => $val) {
-					$brut_sql .= '<strong>' . $key . '</strong> => ' . spip_htmlspecialchars(couper($val, 150)) . "<br />\n";
+					$brut_sql .= '<strong>'.$key.'</strong> => '.spip_htmlspecialchars(couper($val, 150))."<br />\n";
 				}
 				$brut_sql .= '</p>';
 			}
@@ -793,14 +790,14 @@ 
 			//  ne pas afficher les $contexte_inclus
 			$view = preg_replace(',<\?php.+\?[>],Uims', '', $view);
 			if ($view) {
-				$res2 .= "\n<br /><fieldset>" . interdire_scripts($view) . '</fieldset>';
+				$res2 .= "\n<br /><fieldset>".interdire_scripts($view).'</fieldset>';
 			}
 		}
 	} elseif ($affiche == 'code') {
 		$legend = $nom;
-		$res = ancre_texte('<' . "?php\n" . $quoi . "\n?" . '>');
+		$res = ancre_texte('<'."?php\n".$quoi."\n?".'>');
 	} elseif ($affiche == 'boucle') {
-		$legend = _T('zbug_boucle') . ' ' . $nom;
+		$legend = _T('zbug_boucle').' '.$nom;
 		// Le compilateur prefixe le nom des boucles par l'extension du fichier source.
 		$gram = preg_match('/^([^_]+)_/', $objet, $r) ? $r[1] : '';
 		$res = ancre_texte(public_decompiler($quoi, $gram, 0, 'boucle'));
@@ -818,23 +815,23 @@ 
 	include_spip('public/assembler'); // pour inclure_balise_dynamique
 	include_spip('inc/texte'); // pour corriger_typo
 
-	return _DOCTYPE_ECRIRE .
-	html_lang_attributes() .
-	"<head>\n<title>" .
-	('SPIP ' . $GLOBALS['spip_version_affichee'] . ' ' .
-		_T('admin_debug') . ' ' . $titre . ' (' .
-		supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))) .
-	")</title>\n" .
-	"<meta http-equiv='Content-Type' content='text/html" .
-	(($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '') .
-	"' />\n" .
+	return _DOCTYPE_ECRIRE.
+	html_lang_attributes().
+	"<head>\n<title>".
+	('SPIP '.$GLOBALS['spip_version_affichee'].' '.
+		_T('admin_debug').' '.$titre.' ('.
+		supprimer_tags(corriger_typo($GLOBALS['meta']['nom_site']))).
+	")</title>\n".
+	"<meta http-equiv='Content-Type' content='text/html".
+	(($c = $GLOBALS['meta']['charset']) ? "; charset=$c" : '').
+	"' />\n".
 	http_script('', 'jquery.js')
-	. "<link rel='stylesheet' href='" . url_absolue(find_in_path('spip_admin.css'))
-	. "' type='text/css' />" .
-	"</head>\n" .
-	"<body style='margin:0 10px;'>\n" .
-	"<div id='spip-debug-header'>" .
-	$corps .
-	inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $GLOBALS['debug_objets']), false) .
+	. "<link rel='stylesheet' href='".url_absolue(find_in_path('spip_admin.css'))
+	. "' type='text/css' />".
+	"</head>\n".
+	"<body style='margin:0 10px;'>\n".
+	"<div id='spip-debug-header'>".
+	$corps.
+	inclure_balise_dynamique(balise_FORMULAIRE_ADMIN_dyn('spip-admin-float', $GLOBALS['debug_objets']), false).
 	'</div></body></html>';
 }