class.ilDBPdoReversePostgres.php

Go to the documentation of this file.

<?php
require_once('class.ilDBPdoReverse.php');

class ilDBPdoReversePostgres extends ilDBPdoReverse
{

    // {{{ getTableFieldDefinition()

    public function getTableFieldDefinition($table, $field_name)
    {
        $db = $this->db_instance;
        $result = $this->db_instance->loadModule(ilDBConstants::MODULE_REVERSE);

        $query = "SELECT a.attname AS name,
                         t.typname AS type,
                         CASE a.attlen
                           WHEN -1 THEN
                                 CASE t.typname
                                   WHEN 'numeric' THEN (a.atttypmod / 65536)
                                   WHEN 'decimal' THEN (a.atttypmod / 65536)
                                   WHEN 'money'   THEN (a.atttypmod / 65536)
                                   ELSE CASE a.atttypmod
                                 WHEN -1 THEN NULL
                                     ELSE a.atttypmod - 4
                                   END
                             END
                               ELSE a.attlen
                         END AS length,
                             CASE t.typname
                               WHEN 'numeric' THEN (a.atttypmod % 65536) - 4
                               WHEN 'decimal' THEN (a.atttypmod % 65536) - 4
                               WHEN 'money'   THEN (a.atttypmod % 65536) - 4
                               ELSE 0
                         END AS scale,
                         a.attnotnull,
                         a.atttypmod,
                         a.atthasdef,
                         (SELECT substring(pg_get_expr(d.adbin, d.adrelid) for 128)
                            FROM pg_attrdef d
                           WHERE d.adrelid = a.attrelid
                             AND d.adnum = a.attnum
                             AND a.atthasdef
                         ) as default
                    FROM pg_attribute a,
                         pg_class c,
                         pg_type t
                   WHERE c.relname = " . $db->quote($table, 'text') . "
                     AND a.atttypid = t.oid
                     AND c.oid = a.attrelid
                     AND NOT a.attisdropped
                     AND a.attnum > 0
                     AND a.attname = " . $db->quote($field_name, 'text') . "
                ORDER BY a.attnum";
        $column = $db->queryRow($query, null, ilDBConstants::FETCHMODE_ASSOC);

        if (empty($column)) {
            throw new ilDatabaseException('it was not specified an existing table column');
        }

        $column = array_change_key_case($column, CASE_LOWER);
        $mapped_datatype = $db->getFieldDefinition()->mapNativeDatatype($column);

        list($types, $length, $unsigned, $fixed) = $mapped_datatype;
        $notnull = false;
        if (!empty($column['attnotnull']) && $column['attnotnull'] == 't') {
            $notnull = true;
        }
        $default = null;
        if ($column['atthasdef'] === 't'
            && !preg_match("/nextval\('([^']+)'/", $column['default'])
        ) {
            $default = $column['default'];#substr($column['adsrc'], 1, -1);
            if (is_null($default) && $notnull) {
                $default = '';
            }
        }
        $autoincrement = false;
        if (preg_match("/nextval\('([^']+)'/", $column['default'], $nextvals)) {
            $autoincrement = true;
        }
        $definition[0] = array( 'notnull' => $notnull, 'nativetype' => $column['type'] );
        if (!is_null($length)) {
            $definition[0]['length'] = $length;
        }
        if (!is_null($unsigned)) {
            $definition[0]['unsigned'] = $unsigned;
        }
        if (!is_null($fixed)) {
            $definition[0]['fixed'] = $fixed;
        }
        if ($default !== false) {
            $definition[0]['default'] = $default;
        }
        if ($autoincrement !== false) {
            $definition[0]['autoincrement'] = $autoincrement;
        }
        foreach ($types as $key => $type) {
            $definition[$key] = $definition[0];
            if ($type == 'clob' || $type == 'blob') {
                unset($definition[$key]['default']);
            }
            $definition[$key]['type'] = $type;
            $definition[$key]['mdb2type'] = $type;
        }

        return $definition;
    }


    public function getTableIndexDefinition($table, $index_name)
    {
        $db = $this->db_instance;
        $manager = $db->loadModule(ilDBConstants::MODULE_MANAGER);
        $query = 'SELECT relname, indkey FROM pg_index, pg_class';
        $query .= ' WHERE pg_class.oid = pg_index.indexrelid';
        $query .= " AND indisunique != 't' AND indisprimary != 't'";
        $query .= ' AND pg_class.relname = %s';
        $index_name_mdb2 = $db->getIndexName($index_name);
        $failed = false;
        try {
            $row = $db->queryRow(sprintf($query, $db->quote($index_name_mdb2, 'text')), null, ilDBConstants::FETCHMODE_DEFAULT);
        } catch (Exception $e) {
            $failed = true;
        }
        if ($failed || empty($row)) {
            $row = $db->queryRow(sprintf($query, $db->quote($index_name, 'text')), null, ilDBConstants::FETCHMODE_DEFAULT);
        }

        if (empty($row)) {
            throw new ilDatabaseException('it was not specified an existing table index');
        }

        $row = array_change_key_case($row, CASE_LOWER);

        $columns = $manager->listTableFields($table);

        $definition = array();

        $index_column_numbers = explode(' ', $row['indkey']);

        $colpos = 1;
        foreach ($index_column_numbers as $number) {
            $definition['fields'][$columns[($number - 1)]] = array(
                'position' => $colpos++,
                'sorting' => 'ascending',
            );
        }

        return $definition;
    }

    // }}}
    // {{{ getTableConstraintDefinition()
    public function getTableConstraintDefinition($table, $constraint_name)
    {
        $db = $this->db_instance;

        $query = 'SELECT relname, indisunique, indisprimary, indkey FROM pg_index, pg_class';
        $query .= ' WHERE pg_class.oid = pg_index.indexrelid';
        $query .= " AND (indisunique = 't' OR indisprimary = 't')";
        $query .= ' AND pg_class.relname = %s';
        $constraint_name_mdb2 = $db->getIndexName($constraint_name);
        try {
            $row = $db->queryRow(sprintf($query, $db->quote($constraint_name_mdb2, 'text')), null, ilDBConstants::FETCHMODE_ASSOC);
        } catch (Exception $e) {
        }

        if ($e instanceof PDOException || empty($row)) {
            // fallback to the given $index_name, without transformation
            $row = $db->queryRow(sprintf($query, $db->quote($constraint_name, 'text')), null, ilDBConstants::FETCHMODE_ASSOC);
        }

        if (empty($row)) {
            throw new ilDatabaseException($constraint_name . ' is not an existing table constraint');
        }

        $row = array_change_key_case($row, CASE_LOWER);
        $columns = $db->loadModule(ilDBConstants::MODULE_MANAGER)->listTableFields($table);

        $definition = array();
        if ($row['indisprimary'] == 't') {
            $definition['primary'] = true;
        } elseif ($row['indisunique'] == 't') {
            $definition['unique'] = true;
        }

        $index_column_numbers = explode(' ', $row['indkey']);

        $colpos = 1;
        foreach ($index_column_numbers as $number) {
            $definition['fields'][$columns[($number - 1)]] = array(
                'position' => $colpos++,
                'sorting' => 'ascending',
            );
        }

        return $definition;
    }

    // }}}
    // {{{ getTriggerDefinition()

    public function getTriggerDefinition($trigger)
    {
        $db = $this->db_instance;

        $query = "SELECT trg.tgname AS trigger_name,
                         tbl.relname AS table_name,
                         CASE
                            WHEN p.proname IS NOT NULL THEN 'EXECUTE PROCEDURE ' || p.proname || '();'
                            ELSE ''
                         END AS trigger_body,
                         CASE trg.tgtype & cast(2 as int2)
                            WHEN 0 THEN 'AFTER'
                            ELSE 'BEFORE'
                         END AS trigger_type,
                         CASE trg.tgtype & cast(28 as int2)
                            WHEN 16 THEN 'UPDATE'
                            WHEN 8 THEN 'DELETE'
                            WHEN 4 THEN 'INSERT'
                            WHEN 20 THEN 'INSERT, UPDATE'
                            WHEN 28 THEN 'INSERT, UPDATE, DELETE'
                            WHEN 24 THEN 'UPDATE, DELETE'
                            WHEN 12 THEN 'INSERT, DELETE'
                         END AS trigger_event,
                         trg.tgenabled AS trigger_enabled,
                         obj_description(trg.oid, 'pg_trigger') AS trigger_comment
                    FROM pg_trigger trg,
                         pg_class tbl,
                         pg_proc p
                   WHERE trg.tgrelid = tbl.oid
                     AND trg.tgfoid = p.oid
                     AND trg.tgname = " . $db->quote($trigger, 'text');
        $types = array(
            'trigger_name' => 'text',
            'table_name' => 'text',
            'trigger_body' => 'text',
            'trigger_type' => 'text',
            'trigger_event' => 'text',
            'trigger_comment' => 'text',
            'trigger_enabled' => 'boolean',
        );

        return $db->queryRow($query, $types, ilDBConstants::FETCHMODE_ASSOC);
    }
}