Nettoyage du code

htdocs/admin/pre.inc.php

@@ -70,8 +70,6 @@ function llxHeader($head = "", $urlp = "") {
 
   $menu->add_submenu("constall.php", "Tout voir");
 
-  $menu->add("mysql.php", "Mysql");
-
   //$menu->add_submenu("sqltables.php", "Tables");
 
   if ($conf->boutique->enabled)
@@ -84,13 +82,7 @@ function llxHeader($head = "", $urlp = "") {
 	}      
     }
 
-  $menu->add("phpinfo.php", "phpinfo");
-
-  $menu->add_submenu("phpinfo.php?what=conf", "Conf");
-
-  $menu->add_submenu("phpinfo.php?what=env", "Env");
-
-  $menu->add_submenu("phpinfo.php?what=modules", "Modules");
+  $menu->add("system/", "system");
 
   left_menu($menu->liste);
 }

htdocs/admin/system/index.php

@@ -0,0 +1,48 @@
+<?PHP
+/* Copyright (C) 2001-2003 Rodolphe Quiedeville <rodolphe@quiedeville.org>
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2 of the License, or
+ * (at your option) any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this program; if not, write to the Free Software
+ * Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
+ *
+ * $Id$
+ * $Source$
+ */
+require("./pre.inc.php");
+
+llxHeader();
+
+print_titre("Configuration Dolibarr (version ".DOL_VERSION.")");
+
+print '<table border="1" cellpadding="3" cellspacing="0">';
+print '<TR class="liste_titre">';
+print '<td>Nom</td><td>Valeur</td><td>Action</td>';
+print "</TR>\n";
+
+print '<tr><td>Version</td><td>' . DOL_VERSION . '</td><td>&nbsp;</td></tr>';
+print '<tr><td>css</td><td>' . $conf->css . '</td><td>&nbsp;</td></tr>';
+print '<tr><td>theme</td><td>' . $conf->theme . '</td><td>&nbsp;</td></tr>';
+print '<tr><td>document root</td><td>' . DOL_DOCUMENT_ROOT . '</td><td>&nbsp;</td></tr>';
+
+
+print '<tr class="liste_titre"><td colspan="3">Database</td></tr>';
+print '<tr><td>type</td><td>' . $conf->db->type . '</td><td>&nbsp;</td></tr>';
+print '<tr><td>host</td><td>' . $conf->db->host . '</td><td>&nbsp;</td></tr>';
+print '<tr><td>user</td><td>' . $conf->db->user . '&nbsp;</td><td>&nbsp;</td></tr>';
+print '<tr><td>pass</td><td>' . $conf->db->pass . '&nbsp;</td><td>&nbsp;</td></tr>';
+print '<tr><td>Database name</td><td>' . $conf->db->name . '</td><td>&nbsp;</td></tr>';
+
+print '</table>';
+
+llxFooter("<em>Derni&egrave;re modification $Date$ r&eacute;vision $Revision$</em>");
+?>

htdocs/admin/system/pre.inc.php

@@ -18,39 +18,40 @@
  * $Id$
  * $Source$
  */
-require("./pre.inc.php");
+require("../../main.inc.php3");
 
-llxHeader();
+function llxHeader($head = "", $urlp = "") {
 
-print_titre("Configuration Mysql");
+  /*
+   *
+   *
+   */
+  top_menu($head);
 
-print '<table border="0" cellpadding="3" cellspacing="1">';
+  $menu = new Menu();
 
-$sql = "SHOW VARIABLES";
+  $menu->add("index.php", "System");
+  $menu->add_submenu("../modules.php", "Modules");
 
-$result = $db->query($sql);
-if ($result) 
-{
-  $num = $db->num_rows();
-    
-  $var=True;
-  while ($i < $num)
-    {
-      $objp = $db->fetch_object( $i);
-      $var=!$var;
-      print "<TR $bc[$var]>";
+  $menu->add("mysql.php", "Mysql");
 
-      print '<td>'.$objp->Variable_name.'</td><td>'.$objp->Value.'</td>';
-      print '</tr>';
+  $menu->add("pear.php", "Pear");
 
-      $i++;
+  $menu->add("phpinfo.php", "phpinfo");
+
+  $menu->add_submenu("phpinfo.php?what=conf", "Conf");
+
+  $menu->add_submenu("phpinfo.php?what=env", "Env");
+
+  $menu->add_submenu("phpinfo.php?what=modules", "Modules");
+
+  if ($user->admin)
+    {      
+      $menu->add(DOL_URL_ROOT."/admin/", "Configuration");
     }
+
+
+  left_menu($menu->liste);
 }
-print '</table>';
 
-
-
-
-
-llxFooter();
 ?>