forked from GNUsocial/gnu-social
455 lines
14 KiB
PHP
455 lines
14 KiB
PHP
<?php
|
|
/**
|
|
* StatusNet, the distributed open-source microblogging tool
|
|
*
|
|
* Database schema utilities
|
|
*
|
|
* PHP version 5
|
|
*
|
|
* LICENCE: This program is free software: you can redistribute it and/or modify
|
|
* it under the terms of the GNU Affero General Public License as published by
|
|
* the Free Software Foundation, either version 3 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 Affero General Public License for more details.
|
|
*
|
|
* You should have received a copy of the GNU Affero General Public License
|
|
* along with this program. If not, see <http://www.gnu.org/licenses/>.
|
|
*
|
|
* @category Database
|
|
* @package StatusNet
|
|
* @author Evan Prodromou <evan@status.net>
|
|
* @copyright 2009 StatusNet, Inc.
|
|
* @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
|
|
* @link http://status.net/
|
|
*/
|
|
|
|
if (!defined('STATUSNET')) {
|
|
exit(1);
|
|
}
|
|
|
|
/**
|
|
* Class representing the database schema
|
|
*
|
|
* A class representing the database schema. Can be used to
|
|
* manipulate the schema -- especially for plugins and upgrade
|
|
* utilities.
|
|
*
|
|
* @category Database
|
|
* @package StatusNet
|
|
* @author Evan Prodromou <evan@status.net>
|
|
* @author Brenda Wallace <shiny@cpan.org>
|
|
* @author Brion Vibber <brion@status.net>
|
|
* @license http://www.fsf.org/licensing/licenses/agpl-3.0.html GNU Affero General Public License version 3.0
|
|
* @link http://status.net/
|
|
*/
|
|
|
|
class PgsqlSchema extends Schema
|
|
{
|
|
|
|
/**
|
|
* Returns a table definition array for the table
|
|
* in the schema with the given name.
|
|
*
|
|
* Throws an exception if the table is not found.
|
|
*
|
|
* @param string $table Name of the table to get
|
|
*
|
|
* @return array tabledef for that table.
|
|
*/
|
|
|
|
public function getTableDef($table)
|
|
{
|
|
$def = array();
|
|
$hasKeys = false;
|
|
|
|
// Pull column data from INFORMATION_SCHEMA
|
|
$columns = $this->fetchMetaInfo($table, 'columns', 'ordinal_position');
|
|
if (count($columns) == 0) {
|
|
throw new SchemaTableMissingException("No such table: $table");
|
|
}
|
|
|
|
// We'll need to match up fields by ordinal reference
|
|
$orderedFields = array();
|
|
|
|
foreach ($columns as $row) {
|
|
|
|
$name = $row['column_name'];
|
|
$orderedFields[$row['ordinal_position']] = $name;
|
|
|
|
$field = array();
|
|
|
|
// ??
|
|
list($type, $size) = $this->reverseMapType($row['udt_name']);
|
|
$field['type'] = $type;
|
|
if ($size !== null) {
|
|
$field['size'] = $size;
|
|
}
|
|
|
|
if ($type == 'char' || $type == 'varchar') {
|
|
if ($row['character_maximum_length'] !== null) {
|
|
$field['length'] = intval($row['character_maximum_length']);
|
|
}
|
|
}
|
|
if ($type == 'numeric') {
|
|
// Other int types may report these values, but they're irrelevant.
|
|
// Just ignore them!
|
|
if ($row['numeric_precision'] !== null) {
|
|
$field['precision'] = intval($row['numeric_precision']);
|
|
}
|
|
if ($row['numeric_scale'] !== null) {
|
|
$field['scale'] = intval($row['numeric_scale']);
|
|
}
|
|
}
|
|
if ($row['is_nullable'] == 'NO') {
|
|
$field['not null'] = true;
|
|
}
|
|
if ($row['column_default'] !== null) {
|
|
$field['default'] = $row['column_default'];
|
|
if ($this->isNumericType($type)) {
|
|
$field['default'] = intval($field['default']);
|
|
}
|
|
}
|
|
|
|
$def['fields'][$name] = $field;
|
|
}
|
|
|
|
// Pulling index info from pg_class & pg_index
|
|
// This can provide us basic info on primary, unique, and multi-val keys
|
|
// But... it doesn't list plain constraints or foreign key constraints. :P
|
|
$indexInfo = $this->getIndexInfo($table);
|
|
foreach ($indexInfo as $row) {
|
|
$keyName = $row['key_name'];
|
|
|
|
// Dig the column references out!
|
|
$cols = array();
|
|
$colPositions = explode(' ', $row['indkey']);
|
|
foreach ($colPositions as $ord) {
|
|
// ordinal_position from above is 1-based
|
|
// but values in indkey are 0-based
|
|
if ($ord == 0) {
|
|
$cols[] = 'FUNCTION'; // @fixme
|
|
} else {
|
|
$cols[] = $orderedFields[$ord];
|
|
}
|
|
}
|
|
|
|
// @fixme foreign keys?
|
|
// @fixme prefixes?
|
|
// @fixme funky stuff like fulltext?
|
|
if ($row['indisprimary'] == 't') {
|
|
$def['primary key'] = $cols;
|
|
} else if ($row['indisunique'] == 't') {
|
|
$def['unique keys'][$keyName] = $cols;
|
|
} else {
|
|
$def['indexes'][$keyName] = $cols;
|
|
}
|
|
}
|
|
|
|
// Pull constraint data from INFORMATION_SCHEMA
|
|
// @fixme also find multi-val indexes
|
|
// @fixme distinguish the primary key
|
|
// @fixme pull foreign key references
|
|
$keyColumns = $this->fetchMetaInfo($table, 'key_column_usage', 'constraint_name,ordinal_position');
|
|
$keys = array();
|
|
|
|
foreach ($keyColumns as $row) {
|
|
var_dump($row);
|
|
$keyName = $row['constraint_name'];
|
|
$keyCol = $row['column_name'];
|
|
if (!isset($keys[$keyName])) {
|
|
$keys[$keyName] = array();
|
|
}
|
|
$keys[$keyName][] = $keyCol;
|
|
}
|
|
|
|
foreach ($keys as $keyName => $cols) {
|
|
// hack -- is this reliable?
|
|
if ($keyName == "{$table}_pkey") {
|
|
$def['xprimary key'] = $cols;
|
|
} else if (preg_match("/^{$table}_(.*)_fkey$/", $keyName, $matches)) {
|
|
$keys = array_keys($cols);
|
|
if (count($cols) == 1 && $cols[$keys[0]] == $keyName) {
|
|
$def['foreign keys'][$keyname][$matches[1]] = $keys[0];
|
|
}
|
|
$def['foreign keys'][$keyName][$matches[1]] = $cols;
|
|
} else {
|
|
$def['xunique indexes'][$keyName] = $cols;
|
|
}
|
|
}
|
|
return $def;
|
|
}
|
|
|
|
/**
|
|
* Pull some INFORMATION.SCHEMA data for the given table.
|
|
*
|
|
* @param string $table
|
|
* @return array of arrays
|
|
*/
|
|
function fetchMetaInfo($table, $infoTable, $orderBy=null)
|
|
{
|
|
$query = "SELECT * FROM information_schema.%s " .
|
|
"WHERE table_name='%s'";
|
|
$sql = sprintf($query, $infoTable, $table);
|
|
if ($orderBy) {
|
|
$sql .= ' ORDER BY ' . $orderBy;
|
|
}
|
|
return $this->fetchQueryData($sql);
|
|
}
|
|
|
|
/**
|
|
* Pull some PG-specific index info
|
|
* @param string $table
|
|
* @return array of arrays
|
|
*/
|
|
function getIndexInfo($table)
|
|
{
|
|
$query = 'SELECT ' .
|
|
'(SELECT relname FROM pg_class WHERE oid=indexrelid) AS key_name, ' .
|
|
'* FROM pg_index ' .
|
|
'WHERE indrelid=(SELECT oid FROM pg_class WHERE relname=\'%s\') ' .
|
|
'ORDER BY indrelid, indexrelid';
|
|
$sql = sprintf($query, $table);
|
|
return $this->fetchQueryData($sql);
|
|
}
|
|
|
|
/**
|
|
*
|
|
* Creates a table with the given names and columns.
|
|
*
|
|
* @param string $name Name of the table
|
|
* @param array $columns Array of ColumnDef objects
|
|
* for new table.
|
|
*
|
|
* @return boolean success flag
|
|
*/
|
|
|
|
public function createTable($name, $columns)
|
|
{
|
|
$uniques = array();
|
|
$primary = array();
|
|
$indices = array();
|
|
$onupdate = array();
|
|
|
|
$sql = "CREATE TABLE $name (\n";
|
|
|
|
for ($i = 0; $i < count($columns); $i++) {
|
|
|
|
$cd =& $columns[$i];
|
|
|
|
if ($i > 0) {
|
|
$sql .= ",\n";
|
|
}
|
|
|
|
$sql .= $this->_columnSql($cd);
|
|
switch ($cd->key) {
|
|
case 'UNI':
|
|
$uniques[] = $cd->name;
|
|
break;
|
|
case 'PRI':
|
|
$primary[] = $cd->name;
|
|
break;
|
|
case 'MUL':
|
|
$indices[] = $cd->name;
|
|
break;
|
|
}
|
|
}
|
|
|
|
if (count($primary) > 0) { // it really should be...
|
|
$sql .= ",\n PRIMARY KEY (" . implode(',', $primary) . ")";
|
|
}
|
|
|
|
$sql .= "); ";
|
|
|
|
|
|
foreach ($uniques as $u) {
|
|
$sql .= "\n CREATE index {$name}_{$u}_idx ON {$name} ($u); ";
|
|
}
|
|
|
|
foreach ($indices as $i) {
|
|
$sql .= "CREATE index {$name}_{$i}_idx ON {$name} ($i)";
|
|
}
|
|
$res = $this->conn->query($sql);
|
|
|
|
if (PEAR::isError($res)) {
|
|
throw new Exception($res->getMessage(). ' SQL was '. $sql);
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Translate the (mostly) mysql-ish column types into somethings more standard
|
|
* @param string column type
|
|
*
|
|
* @return string postgres happy column type
|
|
*/
|
|
private function _columnTypeTranslation($type) {
|
|
$map = array(
|
|
'datetime' => 'timestamp',
|
|
);
|
|
if(!empty($map[$type])) {
|
|
return $map[$type];
|
|
}
|
|
return $type;
|
|
}
|
|
|
|
/**
|
|
* Modifies a column in the schema.
|
|
*
|
|
* The name must match an existing column and table.
|
|
*
|
|
* @param string $table name of the table
|
|
* @param ColumnDef $columndef new definition of the column.
|
|
*
|
|
* @return boolean success flag
|
|
*/
|
|
|
|
public function modifyColumn($table, $columndef)
|
|
{
|
|
$sql = "ALTER TABLE $table ALTER COLUMN TYPE " .
|
|
$this->_columnSql($columndef);
|
|
|
|
$res = $this->conn->query($sql);
|
|
|
|
if (PEAR::isError($res)) {
|
|
throw new Exception($res->getMessage());
|
|
}
|
|
|
|
return true;
|
|
}
|
|
|
|
/**
|
|
* Return the proper SQL for creating or
|
|
* altering a column.
|
|
*
|
|
* Appropriate for use in CREATE TABLE or
|
|
* ALTER TABLE statements.
|
|
*
|
|
* @param string $tableName
|
|
* @param array $tableDef
|
|
* @param string $columnName
|
|
* @param array $cd column to create
|
|
*
|
|
* @return string correct SQL for that column
|
|
*/
|
|
|
|
function columnSql($name, array $cd)
|
|
{
|
|
$line = array();
|
|
$line[] = parent::_columnSql($cd);
|
|
|
|
if ($table['foreign keys'][$name]) {
|
|
foreach ($table['foreign keys'][$name] as $foreignTable => $foreignColumn) {
|
|
$line[] = 'references';
|
|
$line[] = $this->quoteId($foreignTable);
|
|
$line[] = '(' . $this->quoteId($foreignColumn) . ')';
|
|
}
|
|
}
|
|
|
|
return implode(' ', $line);
|
|
}
|
|
|
|
/**
|
|
* Append phrase(s) to an array of partial ALTER TABLE chunks in order
|
|
* to alter the given column from its old state to a new one.
|
|
*
|
|
* @param array $phrase
|
|
* @param string $columnName
|
|
* @param array $old previous column definition as found in DB
|
|
* @param array $cd current column definition
|
|
*/
|
|
function appendAlterModifyColumn(array &$phrase, $columnName, array $old, array $cd)
|
|
{
|
|
$prefix = 'ALTER COLUMN ' . $this->quoteIdentifier($columnName) . ' ';
|
|
|
|
$oldType = $this->mapType($old);
|
|
$newType = $this->mapType($cd);
|
|
if ($oldType != $newType) {
|
|
$phrase[] = $prefix . 'TYPE ' . $newType;
|
|
}
|
|
|
|
if (!empty($old['not null']) && empty($cd['not null'])) {
|
|
$phrase[] = $prefix . 'DROP NOT NULL';
|
|
} else if (empty($old['not null']) && !empty($cd['not null'])) {
|
|
$phrase[] = $prefix . 'SET NOT NULL';
|
|
}
|
|
|
|
if (isset($old['default']) && !isset($cd['default'])) {
|
|
$phrase[] = $prefix . 'DROP DEFAULT';
|
|
} else if (!isset($old['default']) && isset($cd['default'])) {
|
|
$phrase[] = $prefix . 'SET DEFAULT ' . $this->quoteDefaultValue($cd);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Quote a db/table/column identifier if necessary.
|
|
*
|
|
* @param string $name
|
|
* @return string
|
|
*/
|
|
function quoteIdentifier($name)
|
|
{
|
|
return '"' . $name . '"';
|
|
}
|
|
|
|
function mapType($column)
|
|
{
|
|
$map = array('serial' => 'bigserial', // FIXME: creates the wrong name for the sequence for some internal sequence-lookup function, so better fix this to do the real 'create sequence' dance.
|
|
'numeric' => 'decimal',
|
|
'datetime' => 'timestamp',
|
|
'blob' => 'bytea');
|
|
|
|
$type = $column['type'];
|
|
if (isset($map[$type])) {
|
|
$type = $map[$type];
|
|
}
|
|
|
|
if (!empty($column['size'])) {
|
|
$size = $column['size'];
|
|
if ($type == 'integer' &&
|
|
in_array($size, array('small', 'big'))) {
|
|
$type = $size . 'int';
|
|
}
|
|
}
|
|
|
|
return $type;
|
|
}
|
|
|
|
// @fixme need name... :P
|
|
function typeAndSize($column)
|
|
{
|
|
if ($column['type'] == 'enum') {
|
|
$vals = array_map(array($this, 'quote'), $column['enum']);
|
|
return "text check ($name in " . implode(',', $vals) . ')';
|
|
} else {
|
|
return parent::typeAndSize($column);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Map a native type back to an independent type + size
|
|
*
|
|
* @param string $type
|
|
* @return array ($type, $size) -- $size may be null
|
|
*/
|
|
protected function reverseMapType($type)
|
|
{
|
|
$type = strtolower($type);
|
|
$map = array(
|
|
'int4' => array('int', null),
|
|
'int8' => array('int', 'big'),
|
|
'bytea' => array('blob', null),
|
|
);
|
|
if (isset($map[$type])) {
|
|
return $map[$type];
|
|
} else {
|
|
return array($type, null);
|
|
}
|
|
}
|
|
|
|
}
|