Sh3ll
OdayForums


Server : LiteSpeed
System : Linux premium84.web-hosting.com 4.18.0-553.44.1.lve.el8.x86_64 #1 SMP Thu Mar 13 14:29:12 UTC 2025 x86_64
User : claqxcrl ( 523)
PHP Version : 8.1.32
Disable Function : NONE
Directory :  /home/claqxcrl/anfangola.com/wp-content/plugins/matomo/app/libs/Zend/Db/Adapter/

Upload File :
current_dir [ Writeable ] document_root [ Writeable ]

 

Current File : /home/claqxcrl/anfangola.com/wp-content/plugins/matomo/app/libs/Zend/Db/Adapter/Db2.php
<?php

namespace {
    /**
     * Zend Framework
     *
     * LICENSE
     *
     * This source file is subject to the new BSD license that is bundled
     * with this package in the file LICENSE.txt.
     * It is also available through the world-wide-web at this URL:
     * http://framework.zend.com/license/new-bsd
     * If you did not receive a copy of the license and are unable to
     * obtain it through the world-wide-web, please send an email
     * to license@zend.com so we can send you a copy immediately.
     *
     * @category   Zend
     * @package    Zend_Db
     * @subpackage Adapter
     * @copyright  Copyright (c) 2005-2011 Zend Technologies USA Inc. (http://www.zend.com)
     * @license    http://framework.zend.com/license/new-bsd     New BSD License
     * @version    $Id: Db2.php 23775 2011-03-01 17:25:24Z ralph $
     *
     */
    /**
     * @see Zend_Db
     */
    // require_once 'Zend/Db.php';
    /**
     * @see Zend_Db_Adapter_Abstract
     */
    // require_once 'Zend/Db/Adapter/Abstract.php';
    /**
     * @see Zend_Db_Statement_Db2
     */
    // require_once 'Zend/Db/Statement/Db2.php';
    /**
     * @package    Zend_Db
     * @copyright  Copyright (c) 2005-2011 Zend Technologies USA Inc. (http://www.zend.com)
     * @license    http://framework.zend.com/license/new-bsd     New BSD License
     */
    class Zend_Db_Adapter_Db2 extends \Zend_Db_Adapter_Abstract
    {
        /**
         * User-provided configuration.
         *
         * Basic keys are:
         *
         * username   => (string)  Connect to the database as this username.
         * password   => (string)  Password associated with the username.
         * host       => (string)  What host to connect to (default 127.0.0.1)
         * dbname     => (string)  The name of the database to user
         * protocol   => (string)  Protocol to use, defaults to "TCPIP"
         * port       => (integer) Port number to use for TCP/IP if protocol is "TCPIP"
         * persistent => (boolean) Set TRUE to use a persistent connection (db2_pconnect)
         * os         => (string)  This should be set to 'i5' if the db is on an os400/i5
         * schema     => (string)  The default schema the connection should use
         *
         * @var array
         */
        protected $_config = array('dbname' => null, 'username' => null, 'password' => null, 'host' => 'localhost', 'port' => '50000', 'protocol' => 'TCPIP', 'persistent' => \false, 'os' => null, 'schema' => null);
        /**
         * Execution mode
         *
         * @var int execution flag (DB2_AUTOCOMMIT_ON or DB2_AUTOCOMMIT_OFF)
         */
        protected $_execute_mode = \DB2_AUTOCOMMIT_ON;
        /**
         * Default class name for a DB statement.
         *
         * @var string
         */
        protected $_defaultStmtClass = 'Zend_Db_Statement_Db2';
        protected $_isI5 = \false;
        /**
         * Keys are UPPERCASE SQL datatypes or the constants
         * Zend_Db::INT_TYPE, Zend_Db::BIGINT_TYPE, or Zend_Db::FLOAT_TYPE.
         *
         * Values are:
         * 0 = 32-bit integer
         * 1 = 64-bit integer
         * 2 = float or decimal
         *
         * @var array Associative array of datatypes to values 0, 1, or 2.
         */
        protected $_numericDataTypes = array(\Zend_Db::INT_TYPE => \Zend_Db::INT_TYPE, \Zend_Db::BIGINT_TYPE => \Zend_Db::BIGINT_TYPE, \Zend_Db::FLOAT_TYPE => \Zend_Db::FLOAT_TYPE, 'INTEGER' => \Zend_Db::INT_TYPE, 'SMALLINT' => \Zend_Db::INT_TYPE, 'BIGINT' => \Zend_Db::BIGINT_TYPE, 'DECIMAL' => \Zend_Db::FLOAT_TYPE, 'NUMERIC' => \Zend_Db::FLOAT_TYPE);
        /**
         * Creates a connection resource.
         *
         * @return void
         */
        protected function _connect()
        {
            if (\is_resource($this->_connection)) {
                // connection already exists
                return;
            }
            if (!\extension_loaded('ibm_db2')) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception('The IBM DB2 extension is required for this adapter but the extension is not loaded');
            }
            $this->_determineI5();
            if ($this->_config['persistent']) {
                // use persistent connection
                $conn_func_name = 'db2_pconnect';
            } else {
                // use "normal" connection
                $conn_func_name = 'db2_connect';
            }
            if (!isset($this->_config['driver_options']['autocommit'])) {
                // set execution mode
                $this->_config['driver_options']['autocommit'] =& $this->_execute_mode;
            }
            if (isset($this->_config['options'][\Zend_Db::CASE_FOLDING])) {
                $caseAttrMap = array(\Zend_Db::CASE_NATURAL => \DB2_CASE_NATURAL, \Zend_Db::CASE_UPPER => \DB2_CASE_UPPER, \Zend_Db::CASE_LOWER => \DB2_CASE_LOWER);
                $this->_config['driver_options']['DB2_ATTR_CASE'] = $caseAttrMap[$this->_config['options'][\Zend_Db::CASE_FOLDING]];
            }
            if ($this->_isI5 && isset($this->_config['driver_options']['i5_naming'])) {
                if ($this->_config['driver_options']['i5_naming']) {
                    $this->_config['driver_options']['i5_naming'] = \DB2_I5_NAMING_ON;
                } else {
                    $this->_config['driver_options']['i5_naming'] = \DB2_I5_NAMING_OFF;
                }
            }
            if ($this->_config['host'] !== 'localhost' && !$this->_isI5) {
                // if the host isn't localhost, use extended connection params
                $dbname = 'DRIVER={IBM DB2 ODBC DRIVER}' . ';DATABASE=' . $this->_config['dbname'] . ';HOSTNAME=' . $this->_config['host'] . ';PORT=' . $this->_config['port'] . ';PROTOCOL=' . $this->_config['protocol'] . ';UID=' . $this->_config['username'] . ';PWD=' . $this->_config['password'] . ';';
                $this->_connection = $conn_func_name($dbname, null, null, $this->_config['driver_options']);
            } else {
                // host is localhost, so use standard connection params
                $this->_connection = $conn_func_name($this->_config['dbname'], $this->_config['username'], $this->_config['password'], $this->_config['driver_options']);
            }
            // check the connection
            if (!$this->_connection) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception(\db2_conn_errormsg(), \db2_conn_error());
            }
        }
        /**
         * Test if a connection is active
         *
         * @return boolean
         */
        public function isConnected()
        {
            return (bool) (\is_resource($this->_connection) && \get_resource_type($this->_connection) == 'DB2 Connection');
        }
        /**
         * Force the connection to close.
         *
         * @return void
         */
        public function closeConnection()
        {
            if ($this->isConnected()) {
                \db2_close($this->_connection);
            }
            $this->_connection = null;
        }
        /**
         * Returns an SQL statement for preparation.
         *
         * @param string $sql The SQL statement with placeholders.
         * @return Zend_Db_Statement_Db2
         */
        public function prepare($sql)
        {
            $this->_connect();
            $stmtClass = $this->_defaultStmtClass;
            if (!\class_exists($stmtClass)) {
                // require_once 'Zend/Loader.php';
                \Zend_Loader::loadClass($stmtClass);
            }
            $stmt = new $stmtClass($this, $sql);
            $stmt->setFetchMode($this->_fetchMode);
            return $stmt;
        }
        /**
         * Gets the execution mode
         *
         * @return int the execution mode (DB2_AUTOCOMMIT_ON or DB2_AUTOCOMMIT_OFF)
         */
        public function _getExecuteMode()
        {
            return $this->_execute_mode;
        }
        /**
         * @param integer $mode
         * @return void
         */
        public function _setExecuteMode($mode)
        {
            switch ($mode) {
                case \DB2_AUTOCOMMIT_OFF:
                case \DB2_AUTOCOMMIT_ON:
                    $this->_execute_mode = $mode;
                    \db2_autocommit($this->_connection, $mode);
                    break;
                default:
                    /**
                     * @see Zend_Db_Adapter_Db2_Exception
                     */
                    // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                    throw new \Zend_Db_Adapter_Db2_Exception("execution mode not supported");
                    break;
            }
        }
        /**
         * Quote a raw string.
         *
         * @param string $value     Raw string
         * @return string           Quoted string
         */
        protected function _quote($value)
        {
            if (\is_int($value) || \is_float($value)) {
                return $value;
            }
            /**
             * Use db2_escape_string() if it is present in the IBM DB2 extension.
             * But some supported versions of PHP do not include this function,
             * so fall back to default quoting in the parent class.
             */
            if (\function_exists('db2_escape_string')) {
                return "'" . \db2_escape_string($value) . "'";
            }
            return parent::_quote($value);
        }
        /**
         * @return string
         */
        public function getQuoteIdentifierSymbol()
        {
            $this->_connect();
            $info = \db2_server_info($this->_connection);
            if ($info) {
                $identQuote = $info->IDENTIFIER_QUOTE_CHAR;
            } else {
                // db2_server_info() does not return result on some i5 OS version
                if ($this->_isI5) {
                    $identQuote = "'";
                }
            }
            return $identQuote;
        }
        /**
         * Returns a list of the tables in the database.
         * @param string $schema OPTIONAL
         * @return array
         */
        public function listTables($schema = null)
        {
            $this->_connect();
            if ($schema === null && $this->_config['schema'] != null) {
                $schema = $this->_config['schema'];
            }
            $tables = array();
            if (!$this->_isI5) {
                if ($schema) {
                    $stmt = \db2_tables($this->_connection, null, $schema);
                } else {
                    $stmt = \db2_tables($this->_connection);
                }
                while ($row = \db2_fetch_assoc($stmt)) {
                    $tables[] = $row['TABLE_NAME'];
                }
            } else {
                $tables = $this->_i5listTables($schema);
            }
            return $tables;
        }
        /**
         * Returns the column descriptions for a table.
         *
         * The return value is an associative array keyed by the column name,
         * as returned by the RDBMS.
         *
         * The value of each array element is an associative array
         * with the following keys:
         *
         * SCHEMA_NAME      => string; name of database or schema
         * TABLE_NAME       => string;
         * COLUMN_NAME      => string; column name
         * COLUMN_POSITION  => number; ordinal position of column in table
         * DATA_TYPE        => string; SQL datatype name of column
         * DEFAULT          => string; default expression of column, null if none
         * NULLABLE         => boolean; true if column can have nulls
         * LENGTH           => number; length of CHAR/VARCHAR
         * SCALE            => number; scale of NUMERIC/DECIMAL
         * PRECISION        => number; precision of NUMERIC/DECIMAL
         * UNSIGNED         => boolean; unsigned property of an integer type
         *                     DB2 not supports UNSIGNED integer.
         * PRIMARY          => boolean; true if column is part of the primary key
         * PRIMARY_POSITION => integer; position of column in primary key
         * IDENTITY         => integer; true if column is auto-generated with unique values
         *
         * @param string $tableName
         * @param string $schemaName OPTIONAL
         * @return array
         */
        public function describeTable($tableName, $schemaName = null)
        {
            // Ensure the connection is made so that _isI5 is set
            $this->_connect();
            if ($schemaName === null && $this->_config['schema'] != null) {
                $schemaName = $this->_config['schema'];
            }
            if (!$this->_isI5) {
                $sql = "SELECT DISTINCT c.tabschema, c.tabname, c.colname, c.colno,\n                c.typename, c.default, c.nulls, c.length, c.scale,\n                c.identity, tc.type AS tabconsttype, k.colseq\n                FROM syscat.columns c\n                LEFT JOIN (syscat.keycoluse k JOIN syscat.tabconst tc\n                ON (k.tabschema = tc.tabschema\n                    AND k.tabname = tc.tabname\n                    AND tc.type = 'P'))\n                ON (c.tabschema = k.tabschema\n                    AND c.tabname = k.tabname\n                    AND c.colname = k.colname)\n                WHERE " . $this->quoteInto('UPPER(c.tabname) = UPPER(?)', $tableName);
                if ($schemaName) {
                    $sql .= $this->quoteInto(' AND UPPER(c.tabschema) = UPPER(?)', $schemaName);
                }
                $sql .= " ORDER BY c.colno";
            } else {
                // DB2 On I5 specific query
                $sql = "SELECT DISTINCT C.TABLE_SCHEMA, C.TABLE_NAME, C.COLUMN_NAME, C.ORDINAL_POSITION,\n                C.DATA_TYPE, C.COLUMN_DEFAULT, C.NULLS ,C.LENGTH, C.SCALE, LEFT(C.IDENTITY,1),\n                LEFT(tc.TYPE, 1) AS tabconsttype, k.COLSEQ\n                FROM QSYS2.SYSCOLUMNS C\n                LEFT JOIN (QSYS2.syskeycst k JOIN QSYS2.SYSCST tc\n                    ON (k.TABLE_SCHEMA = tc.TABLE_SCHEMA\n                      AND k.TABLE_NAME = tc.TABLE_NAME\n                      AND LEFT(tc.type,1) = 'P'))\n                    ON (C.TABLE_SCHEMA = k.TABLE_SCHEMA\n                       AND C.TABLE_NAME = k.TABLE_NAME\n                       AND C.COLUMN_NAME = k.COLUMN_NAME)\n                WHERE " . $this->quoteInto('UPPER(C.TABLE_NAME) = UPPER(?)', $tableName);
                if ($schemaName) {
                    $sql .= $this->quoteInto(' AND UPPER(C.TABLE_SCHEMA) = UPPER(?)', $schemaName);
                }
                $sql .= " ORDER BY C.ORDINAL_POSITION FOR FETCH ONLY";
            }
            $desc = array();
            $stmt = $this->query($sql);
            /**
             * To avoid case issues, fetch using FETCH_NUM
             */
            $result = $stmt->fetchAll(\Zend_Db::FETCH_NUM);
            /**
             * The ordering of columns is defined by the query so we can map
             * to variables to improve readability
             */
            $tabschema = 0;
            $tabname = 1;
            $colname = 2;
            $colno = 3;
            $typename = 4;
            $default = 5;
            $nulls = 6;
            $length = 7;
            $scale = 8;
            $identityCol = 9;
            $tabconstType = 10;
            $colseq = 11;
            foreach ($result as $key => $row) {
                list($primary, $primaryPosition, $identity) = array(\false, null, \false);
                if ($row[$tabconstType] == 'P') {
                    $primary = \true;
                    $primaryPosition = $row[$colseq];
                }
                /**
                 * In IBM DB2, an column can be IDENTITY
                 * even if it is not part of the PRIMARY KEY.
                 */
                if ($row[$identityCol] == 'Y') {
                    $identity = \true;
                }
                // only colname needs to be case adjusted
                $desc[$this->foldCase($row[$colname])] = array('SCHEMA_NAME' => $this->foldCase($row[$tabschema]), 'TABLE_NAME' => $this->foldCase($row[$tabname]), 'COLUMN_NAME' => $this->foldCase($row[$colname]), 'COLUMN_POSITION' => !$this->_isI5 ? $row[$colno] + 1 : $row[$colno], 'DATA_TYPE' => $row[$typename], 'DEFAULT' => $row[$default], 'NULLABLE' => (bool) ($row[$nulls] == 'Y'), 'LENGTH' => $row[$length], 'SCALE' => $row[$scale], 'PRECISION' => $row[$typename] == 'DECIMAL' ? $row[$length] : 0, 'UNSIGNED' => \false, 'PRIMARY' => $primary, 'PRIMARY_POSITION' => $primaryPosition, 'IDENTITY' => $identity);
            }
            return $desc;
        }
        /**
         * Return the most recent value from the specified sequence in the database.
         * This is supported only on RDBMS brands that support sequences
         * (e.g. Oracle, PostgreSQL, DB2).  Other RDBMS brands return null.
         *
         * @param string $sequenceName
         * @return string
         */
        public function lastSequenceId($sequenceName)
        {
            $this->_connect();
            if (!$this->_isI5) {
                $quotedSequenceName = $this->quoteIdentifier($sequenceName, \true);
                $sql = 'SELECT PREVVAL FOR ' . $quotedSequenceName . ' AS VAL FROM SYSIBM.SYSDUMMY1';
            } else {
                $quotedSequenceName = $sequenceName;
                $sql = 'SELECT PREVVAL FOR ' . $this->quoteIdentifier($sequenceName, \true) . ' AS VAL FROM QSYS2.QSQPTABL';
            }
            $value = $this->fetchOne($sql);
            return (string) $value;
        }
        /**
         * Generate a new value from the specified sequence in the database, and return it.
         * This is supported only on RDBMS brands that support sequences
         * (e.g. Oracle, PostgreSQL, DB2).  Other RDBMS brands return null.
         *
         * @param string $sequenceName
         * @return string
         */
        public function nextSequenceId($sequenceName)
        {
            $this->_connect();
            $sql = 'SELECT NEXTVAL FOR ' . $this->quoteIdentifier($sequenceName, \true) . ' AS VAL FROM SYSIBM.SYSDUMMY1';
            $value = $this->fetchOne($sql);
            return (string) $value;
        }
        /**
         * Gets the last ID generated automatically by an IDENTITY/AUTOINCREMENT column.
         *
         * As a convention, on RDBMS brands that support sequences
         * (e.g. Oracle, PostgreSQL, DB2), this method forms the name of a sequence
         * from the arguments and returns the last id generated by that sequence.
         * On RDBMS brands that support IDENTITY/AUTOINCREMENT columns, this method
         * returns the last value generated for such a column, and the table name
         * argument is disregarded.
         *
         * The IDENTITY_VAL_LOCAL() function gives the last generated identity value
         * in the current process, even if it was for a GENERATED column.
         *
         * @param string $tableName OPTIONAL
         * @param string $primaryKey OPTIONAL
         * @param string $idType OPTIONAL used for i5 platform to define sequence/idenity unique value
         * @return string
         */
        public function lastInsertId($tableName = null, $primaryKey = null, $idType = null)
        {
            $this->_connect();
            if ($this->_isI5) {
                return (string) $this->_i5LastInsertId($tableName, $idType);
            }
            if ($tableName !== null) {
                $sequenceName = $tableName;
                if ($primaryKey) {
                    $sequenceName .= "_{$primaryKey}";
                }
                $sequenceName .= '_seq';
                return $this->lastSequenceId($sequenceName);
            }
            $sql = 'SELECT IDENTITY_VAL_LOCAL() AS VAL FROM SYSIBM.SYSDUMMY1';
            $value = $this->fetchOne($sql);
            return (string) $value;
        }
        /**
         * Begin a transaction.
         *
         * @return void
         */
        protected function _beginTransaction()
        {
            $this->_setExecuteMode(\DB2_AUTOCOMMIT_OFF);
        }
        /**
         * Commit a transaction.
         *
         * @return void
         */
        protected function _commit()
        {
            if (!\db2_commit($this->_connection)) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception(\db2_conn_errormsg($this->_connection), \db2_conn_error($this->_connection));
            }
            $this->_setExecuteMode(\DB2_AUTOCOMMIT_ON);
        }
        /**
         * Rollback a transaction.
         *
         * @return void
         */
        protected function _rollBack()
        {
            if (!\db2_rollback($this->_connection)) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception(\db2_conn_errormsg($this->_connection), \db2_conn_error($this->_connection));
            }
            $this->_setExecuteMode(\DB2_AUTOCOMMIT_ON);
        }
        /**
         * Set the fetch mode.
         *
         * @param integer $mode
         * @return void
         * @throws Zend_Db_Adapter_Db2_Exception
         */
        public function setFetchMode($mode)
        {
            switch ($mode) {
                case \Zend_Db::FETCH_NUM:
                // seq array
                case \Zend_Db::FETCH_ASSOC:
                // assoc array
                case \Zend_Db::FETCH_BOTH:
                // seq+assoc array
                case \Zend_Db::FETCH_OBJ:
                    // object
                    $this->_fetchMode = $mode;
                    break;
                case \Zend_Db::FETCH_BOUND:
                    // bound to PHP variable
                    /**
                     * @see Zend_Db_Adapter_Db2_Exception
                     */
                    // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                    throw new \Zend_Db_Adapter_Db2_Exception('FETCH_BOUND is not supported yet');
                    break;
                default:
                    /**
                     * @see Zend_Db_Adapter_Db2_Exception
                     */
                    // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                    throw new \Zend_Db_Adapter_Db2_Exception("Invalid fetch mode '{$mode}' specified");
                    break;
            }
        }
        /**
         * Adds an adapter-specific LIMIT clause to the SELECT statement.
         *
         * @param string $sql
         * @param integer $count
         * @param integer $offset OPTIONAL
         * @return string
         */
        public function limit($sql, $count, $offset = 0)
        {
            $count = \intval($count);
            if ($count <= 0) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception("LIMIT argument count={$count} is not valid");
            }
            $offset = \intval($offset);
            if ($offset < 0) {
                /**
                 * @see Zend_Db_Adapter_Db2_Exception
                 */
                // require_once 'Zend/Db/Adapter/Db2/Exception.php';
                throw new \Zend_Db_Adapter_Db2_Exception("LIMIT argument offset={$offset} is not valid");
            }
            if ($offset == 0) {
                $limit_sql = $sql . " FETCH FIRST {$count} ROWS ONLY";
                return $limit_sql;
            }
            /**
             * DB2 does not implement the LIMIT clause as some RDBMS do.
             * We have to simulate it with subqueries and ROWNUM.
             * Unfortunately because we use the column wildcard "*",
             * this puts an extra column into the query result set.
             */
            $limit_sql = "SELECT z2.*\n            FROM (\n                SELECT ROW_NUMBER() OVER() AS \"ZEND_DB_ROWNUM\", z1.*\n                FROM (\n                    " . $sql . "\n                ) z1\n            ) z2\n            WHERE z2.zend_db_rownum BETWEEN " . ($offset + 1) . " AND " . ($offset + $count);
            return $limit_sql;
        }
        /**
         * Check if the adapter supports real SQL parameters.
         *
         * @param string $type 'positional' or 'named'
         * @return bool
         */
        public function supportsParameters($type)
        {
            if ($type == 'positional') {
                return \true;
            }
            // if its 'named' or anything else
            return \false;
        }
        /**
         * Retrieve server version in PHP style
         *
         * @return string
         */
        public function getServerVersion()
        {
            $this->_connect();
            $server_info = \db2_server_info($this->_connection);
            if ($server_info !== \false) {
                $version = $server_info->DBMS_VER;
                if ($this->_isI5) {
                    $version = (int) \substr($version, 0, 2) . '.' . (int) \substr($version, 2, 2) . '.' . (int) \substr($version, 4);
                }
                return $version;
            } else {
                return null;
            }
        }
        /**
         * Return whether or not this is running on i5
         *
         * @return bool
         */
        public function isI5()
        {
            if ($this->_isI5 === null) {
                $this->_determineI5();
            }
            return (bool) $this->_isI5;
        }
        /**
         * Check the connection parameters according to verify
         * type of used OS
         *
         *  @return void
         */
        protected function _determineI5()
        {
            // first us the compiled flag.
            $this->_isI5 = \php_uname('s') == 'OS400' ? \true : \false;
            // if this is set, then us it
            if (isset($this->_config['os'])) {
                if (\strtolower($this->_config['os']) === 'i5') {
                    $this->_isI5 = \true;
                } else {
                    // any other value passed in, its null
                    $this->_isI5 = \false;
                }
            }
        }
        /**
         * Db2 On I5 specific method
         *
         * Returns a list of the tables in the database .
         * Used only for DB2/400.
         *
         * @return array
         */
        protected function _i5listTables($schema = null)
        {
            //list of i5 libraries.
            $tables = array();
            if ($schema) {
                $tablesStatement = \db2_tables($this->_connection, null, $schema);
                while ($rowTables = \db2_fetch_assoc($tablesStatement)) {
                    if ($rowTables['TABLE_NAME'] !== null) {
                        $tables[] = $rowTables['TABLE_NAME'];
                    }
                }
            } else {
                $schemaStatement = \db2_tables($this->_connection);
                while ($schema = \db2_fetch_assoc($schemaStatement)) {
                    if ($schema['TABLE_SCHEM'] !== null) {
                        // list of the tables which belongs to the selected library
                        $tablesStatement = \db2_tables($this->_connection, NULL, $schema['TABLE_SCHEM']);
                        if (\is_resource($tablesStatement)) {
                            while ($rowTables = \db2_fetch_assoc($tablesStatement)) {
                                if ($rowTables['TABLE_NAME'] !== null) {
                                    $tables[] = $rowTables['TABLE_NAME'];
                                }
                            }
                        }
                    }
                }
            }
            return $tables;
        }
        protected function _i5LastInsertId($objectName = null, $idType = null)
        {
            if ($objectName === null) {
                $sql = 'SELECT IDENTITY_VAL_LOCAL() AS VAL FROM QSYS2.QSQPTABL';
                $value = $this->fetchOne($sql);
                return $value;
            }
            if (\strtoupper($idType) === 'S') {
                //check i5_lib option
                $sequenceName = $objectName;
                return $this->lastSequenceId($sequenceName);
            }
            //returns last identity value for the specified table
            //if (strtoupper($idType) === 'I') {
            $tableName = $objectName;
            return $this->fetchOne('SELECT IDENTITY_VAL_LOCAL() from ' . $this->quoteIdentifier($tableName));
        }
    }
}

ZeroDay Forums Mini