* Copyright (C) 2004 Laurent Destailleur * Copyright (C) 2004 Sebastien Di Cintio * Copyright (C) 2004 Benoit Mortier * * 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$ */ /*! \file htdocs/admin/system/database-tables-contraintes.php \brief Page d'info des contraintes de la base \version $Revision$ */ require("./pre.inc.php"); include_once $dolibarr_main_document_root."/lib/".$conf->db->type.".lib.php"; $langs->load("admin"); if (!$user->admin) accessforbidden(); llxHeader(); print_titre($langs->trans("Table") . " ".$_GET["table"]); if ($conf->db->type == 'mysql') { $sql = "SHOW TABLE STATUS LIKE '".$_GET["table"]."'"; $base=1; } if ($conf->db->type == 'pgsql') { $sql = "SELECT conname,contype FROM pg_constraint;"; $base=2; } print '
'; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); $var=True; $i=0; while ($i < $num) { $row = $db->fetch_row(); $i++; } } if ($base==1) { $cons = explode(";",$row[14]); foreach ($cons as $cc) { $cx = ereg_replace("\) REFER", "", $cc); $cx = ereg_replace("\(`", "", $cx); $cx = ereg_replace("`\)", "", $cx); $cx = ereg_replace("` ", "", $cx); $val = explode("`",$cx); $link[trim($val[0])][0] = $val[1]; $link[trim($val[0])][1] = $val[2]; } // var_dump($link); print ''; print ''; $sql = "DESCRIBE ".$_GET["table"]; $result = $db->query($sql); if ($result) { $num = $db->num_rows(); $var=True; $i=0; while ($i < $num) { $row = $db->fetch_row($i); $var=!$var; print ""; print ""; print ""; print ""; print ""; print ''; $i++; } } print '

Champs	Type	Index	Champ lié
$row[0]	$row[1]	$row[3]	".$link[$row[0]][0]."."; print $link[$row[0]][1]."

'; } llxFooter(); ?>