[SPIP] +2.1.12

[velocampus/web/www.git] / www / ecrire / exec / delete_all.php

diff --git a/www/ecrire/exec/delete_all.php b/www/ecrire/exec/delete_all.php
new file mode 100644 (file)
index 0000000..a71f8bd
--- /dev/null
+++ b/www/ecrire/exec/delete_all.php
@@ -0,0 +1,56 @@
+<?php
+
+/***************************************************************************\
+ *  SPIP, Systeme de publication pour l'internet                           *
+ *                                                                         *
+ *  Copyright (c) 2001-2011                                                *
+ *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
+ *                                                                         *
+ *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
+ *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
+\***************************************************************************/
+
+if (!defined('_ECRIRE_INC_VERSION')) return;
+
+// http://doc.spip.org/@exec_delete_all_dist
+function exec_delete_all_dist()
+{
+       include_spip('inc/autoriser');
+       if (!autoriser('detruire')) {
+               include_spip('inc/minipres');
+               echo minipres();
+       } else {
+               $res = liste_tables_en_base('delete');
+               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>");
+               } else {
+                       include_spip('inc/headers');
+                       $res = "\n<ol style='text-align:left'><li>\n" .
+                         join("</li>\n<li>", $res) .
+                         '</li></ol>';
+                       $admin = charger_fonction('admin', 'inc');
+                       $res = $admin('delete_all', _T('titre_page_delete_all'), $res);
+                       if (!$res)
+                               redirige_url_ecrire('install','');
+                       else echo $res;
+               }
+       }
+}
+
+function liste_tables_en_base($name)
+{
+       $res = sql_alltable();
+       $c = "type='checkbox' checked='checked'";
+       foreach ($res as $k => $t) {
+               $res[$k] = "<input $c value='$t' id='$name_$t' name='$name"
+                       . "[]' />\n"
+                       . $t
+                       . " ("
+                       .  sql_countsel($t)
+                       . ")";
+       }
+       return $res;
+}
+?>