www/ecrire/exec/admin_declarer.php

   1 <?php
   2
   3 /***************************************************************************\
   4  *  SPIP, Systeme de publication pour l'internet                           *
   5  *                                                                         *
   6  *  Copyright (c) 2001-2014                                                *
   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 include_spip('inc/presentation');
  16 include_spip('inc/install');
  17
  18 // http://doc.spip.org/@exec_admin_declarer_dist
  19 function exec_admin_declarer_dist()
  20 {
  21         if (!autoriser('detruire')) {
  22                 include_spip('inc/minipres');
  23                 echo minipres();
  24         } else {
  25
  26         $commencer_page = charger_fonction('commencer_page', 'inc');
  27         echo $commencer_page(_T('titre_admin_tech'), "configuration", "base");
  28
  29         echo "\n<br /><br />";
  30         echo gros_titre(_T('titre_admin_effacer'),'',false);
  31         echo barre_onglets("administration", "declarer");
  32
  33         echo debut_gauche('',true);
  34         echo debut_boite_info(true);
  35
  36         echo _T('info_gauche_admin_effacer');
  37
  38         echo fin_boite_info(true);
  39
  40         echo creer_colonne_droite('',true);
  41         echo pipeline('affiche_droite',array('args'=>array('exec'=>'admin_effacer'),'data'=>''));
  42
  43         echo debut_droite('',true);
  44
  45         echo autres_bases();
  46
  47         echo pipeline('affiche_milieu',array('args'=>array('exec'=>'admin_effacer'),'data'=>''));
  48
  49         echo fin_gauche(), fin_page();
  50         }
  51 }
  52
  53 // http://doc.spip.org/@autres_bases
  54 function autres_bases()
  55 {
  56         $tables =  bases_referencees(_FILE_CONNECT);
  57
  58         if ($tables)
  59                 $tables = "<br /><br /><fieldset style='margin-bottom: 10px;'>"
  60                   .  "<legend>"._T('config_info_base_sup_disponibles')."</legend>"
  61                   . "<ul>\n<li>"
  62                   . join("</li>\n<li>",  $tables)
  63                   . "</li>\n</ul></fieldset>";
  64         else $tables ='';
  65
  66         if (defined('_INSTALL_PASS_DB')) {
  67
  68           // Si l'utilisateur n'a pas a donner le mot de passe de la base SQL
  69           // ce doit etre une installation mutualisee sur une meme base:
  70           // interdiction de creer d'autres acces pour assure la confidentialite
  71                 $form = '';
  72
  73         } else {
  74
  75         // Lire le fichier de connexion pour valeurs par defaut probables
  76                 list($adresse_db, $login_db, $pass_db, $sel, $server_db)
  77                   = analyse_fichier_connection(_FILE_CONNECT);
  78
  79         // Passer la base courante en Hidden pour ne pas la proposer
  80                 $name_db = ("\n<input type='hidden' name='sel_db' value='" . $sel . "' />\n");
  81                 // Dire que rien n'est predefini
  82                 $predef = array(false, false, false, false);
  83
  84                 if (!autoriser('webmestre')){
  85                         $login_db = $pass_db = "";
  86                 }
  87                 $form = install_connexion_form(array($adresse_db), array($login_db), array($pass_db), $predef, $name_db, 'sup1');
  88         }
  89
  90         return debut_cadre_trait_couleur('',true,'',_T('onglet_declarer_une_autre_base'))
  91           . _T('config_info_base_sup')
  92           . $tables
  93           . $form
  94           . fin_cadre_trait_couleur(true);
  95 }
  96
  97 ?>