Your IP : 216.73.216.108
<?php
# ***** BEGIN LICENSE BLOCK *****
# This file is part of Clearbricks.
# Copyright (c) 2007 Olivier Meunier and contributors. All rights
# reserved.
#
# Clearbricks 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.
#
# Clearbricks 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 Clearbricks; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
#
# ***** END LICENSE BLOCK *****
class pgsqlSchema extends dbSchema implements i_dbSchema
{
protected $ref_actions_map = array(
'a' => 'no action',
'r' => 'restrict',
'c' => 'cascade',
'n' => 'set null',
'd' => 'set default'
);
public function dbt2udt($type,&$len,&$default)
{
$type = parent::dbt2udt($type,$len,$default);
return $type;
}
public function udt2dbt($type,&$len,&$default)
{
$type = parent::udt2dbt($type,$len,$default);
return $type;
}
public function db_get_tables()
{
$sql =
'SELECT table_name '.
'FROM information_schema.tables '.
"WHERE table_schema = 'public' ";
$rs = $this->con->select($sql);
$res = array();
while ($rs->fetch()) {
$res[] = $rs->f(0);
}
return $res;
}
public function db_get_columns($table)
{
$sql =
'SELECT column_name, udt_name, character_maximum_length, '.
'is_nullable, column_default '.
'FROM information_schema.columns '.
"WHERE table_name = '".$this->con->escape($table)."' ";
$rs = $this->con->select($sql);
$res = array();
while ($rs->fetch())
{
$field = trim($rs->column_name);
$type = trim($rs->udt_name);
$null = strtolower($rs->is_nullable) == 'yes';
$default = $rs->column_default;
$len = $rs->character_maximum_length;
if ($len == '') {
$len = null;
}
$default = preg_replace('/::([\w\d\s]*)$/','',$default);
$res[$field] = array(
'type' => $type,
'len' => $len,
'null' => $null,
'default' => $default
);
}
return $res;
}
public function db_get_keys($table)
{
$sql =
'SELECT DISTINCT ON(cls.relname) cls.oid, cls.relname as idxname, indisunique::integer, indisprimary::integer, '.
'indnatts, tab.relname as tabname, contype, amname '.
'FROM pg_index idx '.
'JOIN pg_class cls ON cls.oid=indexrelid '.
'JOIN pg_class tab ON tab.oid=indrelid '.
'LEFT OUTER JOIN pg_tablespace ta on ta.oid=cls.reltablespace '.
'JOIN pg_namespace n ON n.oid=tab.relnamespace '.
'JOIN pg_am am ON am.oid=cls.relam '.
"LEFT JOIN pg_depend dep ON (dep.classid = cls.tableoid AND dep.objid = cls.oid AND dep.refobjsubid = '0') ".
'LEFT OUTER JOIN pg_constraint con ON (con.tableoid = dep.refclassid AND con.oid = dep.refobjid) '.
'LEFT OUTER JOIN pg_description des ON des.objoid=con.oid '.
'LEFT OUTER JOIN pg_description desp ON (desp.objoid=con.oid AND desp.objsubid = 0) '.
"WHERE tab.relname = '".$this->con->escape($table)."' ".
"AND contype IN ('p','u') ".
'ORDER BY cls.relname ';
$rs = $this->con->select($sql);
$res = array();
while ($rs->fetch())
{
$k = array(
'name' => $rs->idxname,
'primary' => (boolean) $rs->indisprimary,
'unique' => (boolean) $rs->indisunique,
'cols' => array()
);
for ($i=1; $i<=$rs->indnatts; $i++) {
$cols = $this->con->select('SELECT pg_get_indexdef('.$rs->oid.'::oid, '.$i.', true);');
$k['cols'][] = $cols->f(0);
}
$res[] = $k;
}
return $res;
}
public function db_get_indexes($table)
{
$sql =
'SELECT DISTINCT ON(cls.relname) cls.oid, cls.relname as idxname, n.nspname, '.
'indnatts, tab.relname as tabname, contype, amname '.
'FROM pg_index idx '.
'JOIN pg_class cls ON cls.oid=indexrelid '.
'JOIN pg_class tab ON tab.oid=indrelid '.
'LEFT OUTER JOIN pg_tablespace ta on ta.oid=cls.reltablespace '.
'JOIN pg_namespace n ON n.oid=tab.relnamespace '.
'JOIN pg_am am ON am.oid=cls.relam '.
"LEFT JOIN pg_depend dep ON (dep.classid = cls.tableoid AND dep.objid = cls.oid AND dep.refobjsubid = '0') ".
'LEFT OUTER JOIN pg_constraint con ON (con.tableoid = dep.refclassid AND con.oid = dep.refobjid) '.
'LEFT OUTER JOIN pg_description des ON des.objoid=con.oid '.
'LEFT OUTER JOIN pg_description desp ON (desp.objoid=con.oid AND desp.objsubid = 0) '.
"WHERE tab.relname = '".$this->con->escape($table)."' ".
'AND conname IS NULL '.
'ORDER BY cls.relname ';
$rs = $this->con->select($sql);
$res = array();
while ($rs->fetch())
{
$k = array(
'name' => $rs->idxname,
'type' => $rs->amname,
'cols' => array()
);
for ($i=1; $i<=$rs->indnatts; $i++) {
$cols = $this->con->select('SELECT pg_get_indexdef('.$rs->oid.'::oid, '.$i.', true);');
$k['cols'][] = $cols->f(0);
}
$res[] = $k;
}
return $res;
}
public function db_get_references($table)
{
$sql =
'SELECT ct.oid, conname, condeferrable, condeferred, confupdtype, '.
'confdeltype, confmatchtype, conkey, confkey, conrelid, confrelid, cl.relname as fktab, '.
'cr.relname as reftab '.
'FROM pg_constraint ct '.
'JOIN pg_class cl ON cl.oid=conrelid '.
'JOIN pg_namespace nl ON nl.oid=cl.relnamespace '.
'JOIN pg_class cr ON cr.oid=confrelid '.
'JOIN pg_namespace nr ON nr.oid=cr.relnamespace '.
"WHERE contype='f' ".
"AND cl.relname = '".$this->con->escape($table)."' ".
'ORDER BY conname ';
$rs = $this->con->select($sql);
$cols_sql =
'SELECT a1.attname as conattname, a2.attname as confattname '.
'FROM pg_attribute a1, pg_attribute a2 '.
'WHERE a1.attrelid=%1$s::oid AND a1.attnum=%2$s '.
'AND a2.attrelid=%3$s::oid AND a2.attnum=%4$s ';
$res = array();
while ($rs->fetch())
{
$conkey = preg_replace('/[^\d]/','',$rs->conkey);
$confkey = preg_replace('/[^\d]/','',$rs->confkey);
$k = array(
'name' => $rs->conname,
'c_cols' => array(),
'p_table' => $rs->reftab,
'p_cols' => array(),
'update' => $this->ref_actions_map[$rs->confupdtype],
'delete' => $this->ref_actions_map[$rs->confdeltype]
);
$cols = $this->con->select(sprintf($cols_sql,$rs->conrelid,$conkey,$rs->confrelid,$confkey));
while ($cols->fetch()) {
$k['c_cols'][] = $cols->conattname;
$k['p_cols'][] = $cols->confattname;
}
$res[] = $k;
}
return $res;
}
public function db_create_table($name,$fields)
{
$a = array();
foreach ($fields as $n => $f)
{
$type = $f['type'];
$len = (integer) $f['len'];
$default = $f['default'];
$null = $f['null'];
$type = $this->udt2dbt($type,$len,$default);
$len = $len > 0 ? '('.$len.')' : '';
$null = $null ? 'NULL' : 'NOT NULL';
if ($default === null) {
$default = 'DEFAULT NULL';
} elseif ($default !== false) {
$default = 'DEFAULT '.$default.' ';
} else {
$default = '';
}
$a[] =
$n.' '.
$type.$len.' '.$null.' '.$default;
}
$sql =
'CREATE TABLE '.$name." (\n".
implode(",\n",$a).
"\n)";
$this->con->execute($sql);
}
public function db_create_field($table,$name,$type,$len,$null,$default)
{
$type = $this->udt2dbt($type,$len,$default);
$len = $len > 0 ? '('.$len.')' : '';
$null = $null ? 'NULL' : 'NOT NULL';
if ($default === null) {
$default = 'DEFAULT NULL';
} elseif ($default !== false) {
$default = 'DEFAULT '.$default.' ';
} else {
$default = '';
}
$sql =
'ALTER TABLE '.$table.' ADD COLUMN '.$name.' '.
$type.$len.' '.$null.' '.$default;
$this->con->execute($sql);
}
public function db_create_primary($table,$name,$cols)
{
$sql =
'ALTER TABLE '.$table.' '.
'ADD CONSTRAINT '.$name.' PRIMARY KEY ('.implode(",",$cols).') ';
$this->con->execute($sql);
}
public function db_create_unique($table,$name,$cols)
{
$sql =
'ALTER TABLE '.$table.' '.
'ADD CONSTRAINT '.$name.' UNIQUE ('.implode(',',$cols).') ';
$this->con->execute($sql);
}
public function db_create_index($table,$name,$type,$cols)
{
$sql =
'CREATE INDEX '.$name.' ON '.$table.' USING '.$type.
'('.implode(',',$cols).') ';
$this->con->execute($sql);
}
public function db_create_reference($name,$c_table,$c_cols,$p_table,$p_cols,$update,$delete)
{
$sql =
'ALTER TABLE '.$c_table.' '.
'ADD CONSTRAINT '.$name.' FOREIGN KEY '.
'('.implode(',',$c_cols).') '.
'REFERENCES '.$p_table.' '.
'('.implode(',',$p_cols).') ';
if ($update) {
$sql .= 'ON UPDATE '.$update.' ';
}
if ($delete) {
$sql .= 'ON DELETE '.$delete.' ';
}
$this->con->execute($sql);
}
public function db_alter_field($table,$name,$type,$len,$null,$default)
{
$type = $this->udt2dbt($type,$len,$default);
$len = (integer) $len > 0 ? '('.(integer) $len.')' : '';
$sql = 'ALTER TABLE '.$table.' ALTER COLUMN '.$name.' TYPE '.$type.$len;
$this->con->execute($sql);
if ($default === null) {
$default = 'SET DEFAULT NULL';
} elseif ($default !== false) {
$default = 'SET DEFAULT '.$default;
} else {
$default = 'DROP DEFAULT';
}
$sql = 'ALTER TABLE '.$table.' ALTER COLUMN '.$name.' '.$default;
$this->con->execute($sql);
$null = $null ? 'DROP NOT NULL' : 'SET NOT NULL';
$sql = 'ALTER TABLE '.$table.' ALTER COLUMN '.$name.' '.$null;
$this->con->execute($sql);
}
public function db_alter_primary($table,$name,$newname,$cols)
{
$sql = 'ALTER TABLE '.$table.' DROP CONSTRAINT '.$name;
$this->con->execute($sql);
$this->createPrimary($table,$newname,$cols);
}
public function db_alter_unique($table,$name,$newname,$cols)
{
$sql = 'ALTER TABLE '.$table.' DROP CONSTRAINT '.$name;
$this->con->execute($sql);
$this->createUnique($table,$newname,$cols);
}
public function db_alter_index($table,$name,$newname,$type,$cols)
{
$sql = 'DROP INDEX '.$name;
$this->con->execute($sql);
$this->createIndex($table,$newname,$type,$cols);
}
public function db_alter_reference($name,$newname,$c_table,$c_cols,$p_table,$p_cols,$update,$delete)
{
$sql = 'ALTER TABLE '.$c_table.' DROP CONSTRAINT '.$name;
$this->con->execute($sql);
$this->createReference($newname,$c_table,$c_cols,$p_table,$p_cols,$update,$delete);
}
}
?>