Blindage du script d'admin et de destruction de la base: il y a des...

Blindage du script d'admin et de destruction de la base: il y a des destructions partielles qui pouvaient empêcher de reprendre la main.

ecrire/exec/delete_all.php

@@ -27,9 +27,19 @@ function exec_delete_all_dist()
 	$res = '';
 	while ($r = sql_fetch($q)) {
 		$t = array_shift($r);
-		$res .= "<li><input type='checkbox' checked='checked' name='delete[]' id='delete_$t' value='$t' /> $t\n</li>";
+		$res .= "<li>"
+		.  "<input type='checkbox' checked='checked' name='delete[]' id='delete_$t' value='$t'/>\n"
+		. $t
+		. "\n</li>";
 	}
 	  
+	if (!$res) {
+	  	include_spip('inc/minipres');
+		spip_log("Erreur base de donnees");
+		echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'). "<p><tt>".sql_errno()." ".sql_error()."</tt></p>");
+		exit;
+	} else spip_log($res);
+
 	$res = "<ol style='text-align:left'>$res</ol>";
 	$r = generer_url_ecrire('install','',true);
 	$admin = charger_fonction('admin', 'inc');

ecrire/inc/admin.php

@@ -22,7 +22,8 @@ include_spip('inc/headers');
 function inc_admin_dist($script, $titre, $comment='', $retour='')
 {
 	$reprise = true;
-	if (!isset($GLOBALS['meta'][$script])) {
+	if (!isset($GLOBALS['meta'][$script])
+	OR  !isset($GLOBALS['meta']['admin'])) {
 		$reprise = false;
 		debut_admin($script, $titre, $comment); 
 		spip_log("meta: $script " . join(',', $_POST));
@@ -71,7 +72,7 @@ function admin_verifie_session($script) {
 			}
 		}
 	}
-	spip_log("admin $pref" . ($row ? " (reprise)" : ''));
+	spip_log("admin $pref" . ($row ? " (reprise)" : ' (init)'));
 }
 
 // http://doc.spip.org/@dir_admin
@@ -167,7 +168,7 @@ function copy_request($script, $suite, $submit='')
 {
         include_spip('inc/filtres');
 	foreach($_POST as $n => $c) {
-	  if ($n != 'fichier')
+	  if (($n != 'fichier') AND !is_array($c))
 		$suite .= "\n<input type='hidden' name='$n' value='" .
 		  entites_html($c) .
 		  "'  />";