View source
<?php
namespace Drupal\Core\Database\Driver\pgsql;
use Drupal\Component\Utility\Unicode;
use Drupal\Core\Database\SchemaObjectExistsException;
use Drupal\Core\Database\SchemaObjectDoesNotExistException;
use Drupal\Core\Database\Schema as DatabaseSchema;
class Schema extends DatabaseSchema {
protected $tableInformation = array();
protected $maxIdentifierLength;
protected function ensureIdentifiersLength($identifier) {
$args = func_get_args();
$info = $this
->getPrefixInfo($identifier);
$args[0] = $info['table'];
$identifierName = implode('__', $args);
$this->maxIdentifierLength = $this->connection
->query("SHOW max_identifier_length")
->fetchField();
if (strlen($identifierName) > $this->maxIdentifierLength) {
$saveIdentifier = '"drupal_' . $this
->hashBase64($identifierName) . '_' . $args[2] . '"';
}
else {
$saveIdentifier = $identifierName;
}
return $saveIdentifier;
}
public function queryTableInformation($table) {
$key = $this->connection
->prefixTables('{' . $table . '}');
if (strpos($key, '.') === FALSE && strpos($table, 'db_temporary_') === FALSE) {
$key = 'public.' . $key;
}
else {
$schema = $this->connection
->query('SELECT nspname FROM pg_namespace WHERE oid = pg_my_temp_schema()')
->fetchField();
$key = $schema . '.' . $key;
}
if (!isset($this->tableInformation[$key])) {
list($schema, $table_name) = explode('.', $key);
$table_information = (object) array(
'blob_fields' => array(),
'sequences' => array(),
);
$this->connection
->addSavepoint();
try {
$table_information_exists = (bool) $this->connection
->query("SELECT 1 FROM pg_class WHERE relname = :table", array(
':table' => $table_name,
))
->fetchField();
if (!$table_information_exists) {
$this->connection
->releaseSavepoint();
return $table_information;
}
else {
$result = $this->connection
->query("SELECT column_name, data_type, column_default FROM information_schema.columns WHERE table_schema = :schema AND table_name = :table AND (data_type = 'bytea' OR (numeric_precision IS NOT NULL AND column_default LIKE :default))", array(
':schema' => $schema,
':table' => $table_name,
':default' => '%nextval%',
));
}
} catch (\Exception $e) {
$this->connection
->rollbackSavepoint();
throw $e;
}
$this->connection
->releaseSavepoint();
foreach ($result as $column) {
if ($column->data_type == 'bytea') {
$table_information->blob_fields[$column->column_name] = TRUE;
}
elseif (preg_match("/nextval\\('([^']+)'/", $column->column_default, $matches)) {
$table_information->sequences[] = $matches[1];
$table_information->serial_fields[] = $column->column_name;
}
}
$this->tableInformation[$key] = $table_information;
}
return $this->tableInformation[$key];
}
protected function resetTableInformation($table) {
$key = $this->connection
->prefixTables('{' . $table . '}');
if (strpos($key, '.') === FALSE) {
$key = 'public.' . $key;
}
unset($this->tableInformation[$key]);
}
public function queryFieldInformation($table, $field) {
$prefixInfo = $this
->getPrefixInfo($table, TRUE);
$schema = $prefixInfo['schema'];
$table_name = $prefixInfo['table'];
$this->connection
->addSavepoint();
try {
$checks = $this->connection
->query("SELECT conname FROM pg_class cl INNER JOIN pg_constraint co ON co.conrelid = cl.oid INNER JOIN pg_attribute attr ON attr.attrelid = cl.oid AND attr.attnum = ANY (co.conkey) INNER JOIN pg_namespace ns ON cl.relnamespace = ns.oid WHERE co.contype = 'c' AND ns.nspname = :schema AND cl.relname = :table AND attr.attname = :column", array(
':schema' => $schema,
':table' => $table_name,
':column' => $field,
));
} catch (\Exception $e) {
$this->connection
->rollbackSavepoint();
throw $e;
}
$this->connection
->releaseSavepoint();
$field_information = $checks
->fetchCol();
return $field_information;
}
protected function createTableSql($name, $table) {
$sql_fields = array();
foreach ($table['fields'] as $field_name => $field) {
$sql_fields[] = $this
->createFieldSql($field_name, $this
->processField($field));
}
$sql_keys = array();
if (isset($table['primary key']) && is_array($table['primary key'])) {
$sql_keys[] = 'CONSTRAINT ' . $this
->ensureIdentifiersLength($name, '', 'pkey') . ' PRIMARY KEY (' . $this
->createPrimaryKeySql($table['primary key']) . ')';
}
if (isset($table['unique keys']) && is_array($table['unique keys'])) {
foreach ($table['unique keys'] as $key_name => $key) {
$sql_keys[] = 'CONSTRAINT ' . $this
->ensureIdentifiersLength($name, $key_name, 'key') . ' UNIQUE (' . implode(', ', $key) . ')';
}
}
$sql = "CREATE TABLE {" . $name . "} (\n\t";
$sql .= implode(",\n\t", $sql_fields);
if (count($sql_keys) > 0) {
$sql .= ",\n\t";
}
$sql .= implode(",\n\t", $sql_keys);
$sql .= "\n)";
$statements[] = $sql;
if (isset($table['indexes']) && is_array($table['indexes'])) {
foreach ($table['indexes'] as $key_name => $key) {
$statements[] = $this
->_createIndexSql($name, $key_name, $key);
}
}
if (!empty($table['description'])) {
$statements[] = 'COMMENT ON TABLE {' . $name . '} IS ' . $this
->prepareComment($table['description']);
}
foreach ($table['fields'] as $field_name => $field) {
if (!empty($field['description'])) {
$statements[] = 'COMMENT ON COLUMN {' . $name . '}.' . $field_name . ' IS ' . $this
->prepareComment($field['description']);
}
}
return $statements;
}
protected function createFieldSql($name, $spec) {
$sql = '"' . $name . '" ' . $spec['pgsql_type'];
if (isset($spec['type']) && $spec['type'] == 'serial') {
unset($spec['not null']);
}
if (in_array($spec['pgsql_type'], array(
'varchar',
'character',
)) && isset($spec['length'])) {
$sql .= '(' . $spec['length'] . ')';
}
elseif (isset($spec['precision']) && isset($spec['scale'])) {
$sql .= '(' . $spec['precision'] . ', ' . $spec['scale'] . ')';
}
if (!empty($spec['unsigned'])) {
$sql .= " CHECK ({$name} >= 0)";
}
if (isset($spec['not null'])) {
if ($spec['not null']) {
$sql .= ' NOT NULL';
}
else {
$sql .= ' NULL';
}
}
if (array_key_exists('default', $spec)) {
$default = $this
->escapeDefaultValue($spec['default']);
$sql .= " default {$default}";
}
return $sql;
}
protected function processField($field) {
if (!isset($field['size'])) {
$field['size'] = 'normal';
}
if (isset($field['pgsql_type'])) {
$field['pgsql_type'] = Unicode::strtolower($field['pgsql_type']);
}
else {
$map = $this
->getFieldTypeMap();
$field['pgsql_type'] = $map[$field['type'] . ':' . $field['size']];
}
if (!empty($field['unsigned'])) {
if (!isset($map)) {
$map = $this
->getFieldTypeMap();
}
switch ($field['pgsql_type']) {
case 'smallint':
$field['pgsql_type'] = $map['int:medium'];
break;
case 'int':
$field['pgsql_type'] = $map['int:big'];
break;
}
}
if (isset($field['type']) && $field['type'] == 'serial') {
unset($field['not null']);
}
return $field;
}
function getFieldTypeMap() {
static $map = array(
'varchar_ascii:normal' => 'varchar',
'varchar:normal' => 'varchar',
'char:normal' => 'character',
'text:tiny' => 'text',
'text:small' => 'text',
'text:medium' => 'text',
'text:big' => 'text',
'text:normal' => 'text',
'int:tiny' => 'smallint',
'int:small' => 'smallint',
'int:medium' => 'int',
'int:big' => 'bigint',
'int:normal' => 'int',
'float:tiny' => 'real',
'float:small' => 'real',
'float:medium' => 'real',
'float:big' => 'double precision',
'float:normal' => 'real',
'numeric:normal' => 'numeric',
'blob:big' => 'bytea',
'blob:normal' => 'bytea',
'serial:tiny' => 'serial',
'serial:small' => 'serial',
'serial:medium' => 'serial',
'serial:big' => 'bigserial',
'serial:normal' => 'serial',
);
return $map;
}
protected function _createKeySql($fields) {
$return = array();
foreach ($fields as $field) {
if (is_array($field)) {
$return[] = 'substr(' . $field[0] . ', 1, ' . $field[1] . ')';
}
else {
$return[] = '"' . $field . '"';
}
}
return implode(', ', $return);
}
protected function createPrimaryKeySql($fields) {
$return = array();
foreach ($fields as $field) {
if (is_array($field)) {
$return[] = '"' . $field[0] . '"';
}
else {
$return[] = '"' . $field . '"';
}
}
return implode(', ', $return);
}
public function tableExists($table) {
$prefixInfo = $this
->getPrefixInfo($table, TRUE);
return (bool) $this->connection
->query("SELECT 1 FROM pg_tables WHERE schemaname = :schema AND tablename = :table", array(
':schema' => $prefixInfo['schema'],
':table' => $prefixInfo['table'],
))
->fetchField();
}
function renameTable($table, $new_name) {
if (!$this
->tableExists($table)) {
throw new SchemaObjectDoesNotExistException(t("Cannot rename @table to @table_new: table @table doesn't exist.", array(
'@table' => $table,
'@table_new' => $new_name,
)));
}
if ($this
->tableExists($new_name)) {
throw new SchemaObjectExistsException(t("Cannot rename @table to @table_new: table @table_new already exists.", array(
'@table' => $table,
'@table_new' => $new_name,
)));
}
$old_full_name = $this->connection
->prefixTables('{' . $table . '}');
list($old_schema, $old_table_name) = strpos($old_full_name, '.') ? explode('.', $old_full_name) : array(
'public',
$old_full_name,
);
$indexes = $this->connection
->query('SELECT indexname FROM pg_indexes WHERE schemaname = :schema AND tablename = :table', array(
':schema' => $old_schema,
':table' => $old_table_name,
));
foreach ($indexes as $index) {
$index_type = substr($index->indexname, strrpos($index->indexname, '_') + 1);
if (strpos($index->indexname, 'drupal_') !== FALSE) {
preg_match('/^drupal_(.*)_' . preg_quote($index_type) . '/', $index->indexname, $matches);
$index_name = $matches[1];
}
else {
preg_match('/^' . preg_quote($old_full_name) . '__(.*)__' . preg_quote($index_type) . '/', $index->indexname, $matches);
$index_name = $matches[1];
}
$this->connection
->query('ALTER INDEX "' . $index->indexname . '" RENAME TO ' . $this
->ensureIdentifiersLength($new_name, $index_name, $index_type) . '');
}
$prefixInfo = $this
->getPrefixInfo($new_name);
$info = $this
->queryTableInformation($table);
if (!empty($info->serial_fields)) {
foreach ($info->serial_fields as $field) {
$old_sequence = $this
->prefixNonTable($table, $field, 'seq');
$new_sequence = $this
->prefixNonTable($new_name, $field, 'seq');
$this->connection
->query('ALTER SEQUENCE ' . $old_sequence . ' RENAME TO ' . $new_sequence);
}
}
$this->connection
->query('ALTER TABLE {' . $table . '} RENAME TO ' . $prefixInfo['table']);
$this
->resetTableInformation($table);
}
public function dropTable($table) {
if (!$this
->tableExists($table)) {
return FALSE;
}
$this->connection
->query('DROP TABLE {' . $table . '}');
$this
->resetTableInformation($table);
return TRUE;
}
public function addField($table, $field, $spec, $new_keys = array()) {
if (!$this
->tableExists($table)) {
throw new SchemaObjectDoesNotExistException(t("Cannot add field @table.@field: table doesn't exist.", array(
'@field' => $field,
'@table' => $table,
)));
}
if ($this
->fieldExists($table, $field)) {
throw new SchemaObjectExistsException(t("Cannot add field @table.@field: field already exists.", array(
'@field' => $field,
'@table' => $table,
)));
}
$fixnull = FALSE;
if (!empty($spec['not null']) && !isset($spec['default'])) {
$fixnull = TRUE;
$spec['not null'] = FALSE;
}
$query = 'ALTER TABLE {' . $table . '} ADD COLUMN ';
$query .= $this
->createFieldSql($field, $this
->processField($spec));
$this->connection
->query($query);
if (isset($spec['initial'])) {
$this->connection
->update($table)
->fields(array(
$field => $spec['initial'],
))
->execute();
}
if ($fixnull) {
$this->connection
->query("ALTER TABLE {" . $table . "} ALTER {$field} SET NOT NULL");
}
if (isset($new_keys)) {
$this
->_createKeys($table, $new_keys);
}
if (!empty($spec['description'])) {
$this->connection
->query('COMMENT ON COLUMN {' . $table . '}.' . $field . ' IS ' . $this
->prepareComment($spec['description']));
}
$this
->resetTableInformation($table);
}
public function dropField($table, $field) {
if (!$this
->fieldExists($table, $field)) {
return FALSE;
}
$this->connection
->query('ALTER TABLE {' . $table . '} DROP COLUMN "' . $field . '"');
$this
->resetTableInformation($table);
return TRUE;
}
public function fieldSetDefault($table, $field, $default) {
if (!$this
->fieldExists($table, $field)) {
throw new SchemaObjectDoesNotExistException(t("Cannot set default value of field @table.@field: field doesn't exist.", array(
'@table' => $table,
'@field' => $field,
)));
}
$default = $this
->escapeDefaultValue($default);
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER COLUMN "' . $field . '" SET DEFAULT ' . $default);
}
public function fieldSetNoDefault($table, $field) {
if (!$this
->fieldExists($table, $field)) {
throw new SchemaObjectDoesNotExistException(t("Cannot remove default value of field @table.@field: field doesn't exist.", array(
'@table' => $table,
'@field' => $field,
)));
}
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER COLUMN "' . $field . '" DROP DEFAULT');
}
public function indexExists($table, $name) {
$index_name = $this
->ensureIdentifiersLength($table, $name, 'idx');
$index_name = str_replace('"', '', $index_name);
return (bool) $this->connection
->query("SELECT 1 FROM pg_indexes WHERE indexname = '{$index_name}'")
->fetchField();
}
public function constraintExists($table, $name) {
if ($name == 'pkey') {
$suffix = $name;
$name = '';
}
else {
$pos = strrpos($name, '__');
$suffix = substr($name, $pos + 2);
$name = substr($name, 0, $pos);
}
$constraint_name = $this
->ensureIdentifiersLength($table, $name, $suffix);
$constraint_name = str_replace('"', '', $constraint_name);
return (bool) $this->connection
->query("SELECT 1 FROM pg_constraint WHERE conname = '{$constraint_name}'")
->fetchField();
}
public function addPrimaryKey($table, $fields) {
if (!$this
->tableExists($table)) {
throw new SchemaObjectDoesNotExistException(t("Cannot add primary key to table @table: table doesn't exist.", array(
'@table' => $table,
)));
}
if ($this
->constraintExists($table, 'pkey')) {
throw new SchemaObjectExistsException(t("Cannot add primary key to table @table: primary key already exists.", array(
'@table' => $table,
)));
}
$this->connection
->query('ALTER TABLE {' . $table . '} ADD CONSTRAINT ' . $this
->ensureIdentifiersLength($table, '', 'pkey') . ' PRIMARY KEY (' . $this
->createPrimaryKeySql($fields) . ')');
$this
->resetTableInformation($table);
}
public function dropPrimaryKey($table) {
if (!$this
->constraintExists($table, 'pkey')) {
return FALSE;
}
$this->connection
->query('ALTER TABLE {' . $table . '} DROP CONSTRAINT ' . $this
->ensureIdentifiersLength($table, '', 'pkey'));
$this
->resetTableInformation($table);
return TRUE;
}
function addUniqueKey($table, $name, $fields) {
if (!$this
->tableExists($table)) {
throw new SchemaObjectDoesNotExistException(t("Cannot add unique key @name to table @table: table doesn't exist.", array(
'@table' => $table,
'@name' => $name,
)));
}
if ($this
->constraintExists($table, $name . '__key')) {
throw new SchemaObjectExistsException(t("Cannot add unique key @name to table @table: unique key already exists.", array(
'@table' => $table,
'@name' => $name,
)));
}
$this->connection
->query('ALTER TABLE {' . $table . '} ADD CONSTRAINT ' . $this
->ensureIdentifiersLength($table, $name, 'key') . ' UNIQUE (' . implode(',', $fields) . ')');
$this
->resetTableInformation($table);
}
public function dropUniqueKey($table, $name) {
if (!$this
->constraintExists($table, $name . '__key')) {
return FALSE;
}
$this->connection
->query('ALTER TABLE {' . $table . '} DROP CONSTRAINT ' . $this
->ensureIdentifiersLength($table, $name, 'key'));
$this
->resetTableInformation($table);
return TRUE;
}
public function addIndex($table, $name, $fields, array $spec) {
if (!$this
->tableExists($table)) {
throw new SchemaObjectDoesNotExistException(t("Cannot add index @name to table @table: table doesn't exist.", array(
'@table' => $table,
'@name' => $name,
)));
}
if ($this
->indexExists($table, $name)) {
throw new SchemaObjectExistsException(t("Cannot add index @name to table @table: index already exists.", array(
'@table' => $table,
'@name' => $name,
)));
}
$this->connection
->query($this
->_createIndexSql($table, $name, $fields));
$this
->resetTableInformation($table);
}
public function dropIndex($table, $name) {
if (!$this
->indexExists($table, $name)) {
return FALSE;
}
$this->connection
->query('DROP INDEX ' . $this
->ensureIdentifiersLength($table, $name, 'idx'));
$this
->resetTableInformation($table);
return TRUE;
}
public function changeField($table, $field, $field_new, $spec, $new_keys = array()) {
if (!$this
->fieldExists($table, $field)) {
throw new SchemaObjectDoesNotExistException(t("Cannot change the definition of field @table.@name: field doesn't exist.", array(
'@table' => $table,
'@name' => $field,
)));
}
if ($field != $field_new && $this
->fieldExists($table, $field_new)) {
throw new SchemaObjectExistsException(t("Cannot rename field @table.@name to @name_new: target field already exists.", array(
'@table' => $table,
'@name' => $field,
'@name_new' => $field_new,
)));
}
$spec = $this
->processField($spec);
if (in_array($spec['pgsql_type'], array(
'serial',
'bigserial',
))) {
$field_def = 'int';
}
else {
$field_def = $spec['pgsql_type'];
}
if (in_array($spec['pgsql_type'], array(
'varchar',
'character',
'text',
)) && isset($spec['length'])) {
$field_def .= '(' . $spec['length'] . ')';
}
elseif (isset($spec['precision']) && isset($spec['scale'])) {
$field_def .= '(' . $spec['precision'] . ', ' . $spec['scale'] . ')';
}
$field_info = $this
->queryFieldInformation($table, $field);
foreach ($field_info as $check) {
$this->connection
->query('ALTER TABLE {' . $table . '} DROP CONSTRAINT "' . $check . '"');
}
$this
->fieldSetNoDefault($table, $field);
$table_information = $this
->queryTableInformation($table);
$is_bytea = !empty($table_information->blob_fields[$field]);
if ($spec['pgsql_type'] != 'bytea') {
if ($is_bytea) {
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER "' . $field . '" TYPE ' . $field_def . ' USING convert_from("' . $field . '"' . ", 'UTF8')");
}
else {
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER "' . $field . '" TYPE ' . $field_def . ' USING "' . $field . '"::' . $field_def);
}
}
else {
if (!$is_bytea) {
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER "' . $field . '" TYPE ' . $field_def . ' USING decode(replace("' . $field . '"' . ", E'\\\\', E'\\\\\\\\'), 'escape');");
}
}
if (isset($spec['not null'])) {
if ($spec['not null']) {
$nullaction = 'SET NOT NULL';
}
else {
$nullaction = 'DROP NOT NULL';
}
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER "' . $field . '" ' . $nullaction);
}
if (in_array($spec['pgsql_type'], array(
'serial',
'bigserial',
))) {
$seq = "{" . $table . "}_" . $field_new . "_seq";
$this->connection
->query("CREATE SEQUENCE " . $seq);
$this->connection
->query("SELECT setval('" . $seq . "', MAX(\"" . $field . '")) FROM {' . $table . "}");
$this->connection
->query('ALTER TABLE {' . $table . '} ALTER ' . $field . ' SET DEFAULT nextval(' . $this->connection
->quote($seq) . ')');
}
if ($field != $field_new) {
$this->connection
->query('ALTER TABLE {' . $table . '} RENAME "' . $field . '" TO "' . $field_new . '"');
}
if (!empty($spec['unsigned'])) {
$this->connection
->query('ALTER TABLE {' . $table . '} ADD CHECK ("' . $field_new . '" >= 0)');
}
if (isset($spec['default'])) {
$this
->fieldSetDefault($table, $field_new, $spec['default']);
}
if (!empty($spec['description'])) {
$this->connection
->query('COMMENT ON COLUMN {' . $table . '}."' . $field_new . '" IS ' . $this
->prepareComment($spec['description']));
}
if (isset($new_keys)) {
$this
->_createKeys($table, $new_keys);
}
$this
->resetTableInformation($table);
}
protected function _createIndexSql($table, $name, $fields) {
$query = 'CREATE INDEX ' . $this
->ensureIdentifiersLength($table, $name, 'idx') . ' ON {' . $table . '} (';
$query .= $this
->_createKeySql($fields) . ')';
return $query;
}
protected function _createKeys($table, $new_keys) {
if (isset($new_keys['primary key'])) {
$this
->addPrimaryKey($table, $new_keys['primary key']);
}
if (isset($new_keys['unique keys'])) {
foreach ($new_keys['unique keys'] as $name => $fields) {
$this
->addUniqueKey($table, $name, $fields);
}
}
if (isset($new_keys['indexes'])) {
foreach ($new_keys['indexes'] as $name => $fields) {
$this
->addIndex($table, $name, $fields, $new_keys);
}
}
}
public function getComment($table, $column = NULL) {
$info = $this
->getPrefixInfo($table);
if (isset($column)) {
return $this->connection
->query('SELECT col_description(oid, attnum) FROM pg_class, pg_attribute WHERE attrelid = oid AND relname = ? AND attname = ?', array(
$info['table'],
$column,
))
->fetchField();
}
else {
return $this->connection
->query('SELECT obj_description(oid, ?) FROM pg_class WHERE relname = ?', array(
'pg_class',
$info['table'],
))
->fetchField();
}
}
protected function hashBase64($data) {
$hash = base64_encode(hash('sha256', $data, TRUE));
return strtr($hash, array(
'+' => '_',
'/' => '_',
'=' => '',
));
}
}