www/ecrire/exec/base_delete_all.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2016                                                *
   7  *  Arnaud Martin, Antoine Pitrou, Philippe Riviere, Emmanuel Saint-James  *
   8  *                                                                         *
   9  *  Ce programme est un logiciel libre distribue sous licence GNU/GPL.     *
  10  *  Pour plus de details voir le fichier COPYING.txt ou l'aide en ligne.   *
  11 \***************************************************************************/
  12
  13 if (!defined('_ECRIRE_INC_VERSION')) return;
  14
  15 // http://doc.spip.org/@exec_delete_all_dist
  16 function exec_base_delete_all_dist()
  17 {
  18         include_spip('inc/autoriser');
  19         if (!autoriser('detruire')) {
  20                 include_spip('inc/minipres');
  21                 echo minipres();
  22         } else {
  23                 include_spip('base/dump');
  24                 $res = base_lister_toutes_tables('',array(),array(),true);
  25                 if (!$res) {
  26                         include_spip('inc/minipres');
  27                         spip_log("Erreur base de donnees");
  28                         echo minipres(_T('info_travaux_titre'), _T('titre_probleme_technique'). "<p><tt>".sql_errno()." ".sql_error()."</tt></p>");
  29                 } else {
  30                         $res = base_saisie_tables('delete', $res);
  31                         include_spip('inc/headers');
  32                         $res = "\n<ol style='text-align:left'><li>\n" .
  33                           join("</li>\n<li>", $res) .
  34                           '</li></ol>';
  35                         $admin = charger_fonction('admin', 'inc');
  36                         $res = $admin('delete_all', _T('titre_page_delete_all'), $res);
  37                         if (!$res)
  38                                 redirige_url_ecrire('install','');
  39                         else echo $res;
  40                 }
  41         }
  42 }
  43
  44 ?>