includes/db/DatabaseIbm_db2.php

   1 <?php
   2 /**
   3  * This is the IBM DB2 database abstraction layer.
   4  * See maintenance/ibm_db2/README for development notes
   5  * and other specific information
   6  *
   7  * @file
   8  * @ingroup Database
   9  * @author leo.petr+mediawiki@gmail.com
  10  */
  11
  12 /**
  13  * This represents a column in a DB2 database
  14  * @ingroup Database
  15  */
  16 class IBM_DB2Field implements Field {
  17         private $name = '';
  18         private $tablename = '';
  19         private $type = '';
  20         private $nullable = false;
  21         private $max_length = 0;
  22
  23         /**
  24          * Builder method for the class
  25          * @param $db DatabaseIbm_db2: Database interface
  26          * @param $table String: table name
  27          * @param $field String: column name
  28          * @return IBM_DB2Field
  29          */
  30         static function fromText( $db, $table, $field ) {
  31                 global $wgDBmwschema;
  32
  33                 $q = <<<SQL
  34 SELECT
  35 lcase( coltype ) AS typname,
  36 nulls AS attnotnull, length AS attlen
  37 FROM sysibm.syscolumns
  38 WHERE tbcreator=%s AND tbname=%s AND name=%s;
  39 SQL;
  40                 $res = $db->query(
  41                         sprintf( $q,
  42                                 $db->addQuotes( $wgDBmwschema ),
  43                                 $db->addQuotes( $table ),
  44                                 $db->addQuotes( $field )
  45                         )
  46                 );
  47                 $row = $db->fetchObject( $res );
  48                 if ( !$row ) {
  49                         return null;
  50                 }
  51                 $n = new IBM_DB2Field;
  52                 $n->type = $row->typname;
  53                 $n->nullable = ( $row->attnotnull == 'N' );
  54                 $n->name = $field;
  55                 $n->tablename = $table;
  56                 $n->max_length = $row->attlen;
  57                 return $n;
  58         }
  59         /**
  60          * Get column name
  61          * @return string column name
  62          */
  63         function name() { return $this->name; }
  64         /**
  65          * Get table name
  66          * @return string table name
  67          */
  68         function tableName() { return $this->tablename; }
  69         /**
  70          * Get column type
  71          * @return string column type
  72          */
  73         function type() { return $this->type; }
  74         /**
  75          * Can column be null?
  76          * @return bool true or false
  77          */
  78         function isNullable() { return $this->nullable; }
  79         /**
  80          * How much can you fit in the column per row?
  81          * @return int length
  82          */
  83         function maxLength() { return $this->max_length; }
  84 }
  85
  86 /**
  87  * Wrapper around binary large objects
  88  * @ingroup Database
  89  */
  90 class IBM_DB2Blob {
  91         private $mData;
  92
  93         public function __construct( $data ) {
  94                 $this->mData = $data;
  95         }
  96
  97         public function getData() {
  98                 return $this->mData;
  99         }
 100
 101         public function __toString() {
 102                 return $this->mData;
 103         }
 104 }
 105
 106 /**
 107  * Primary database interface
 108  * @ingroup Database
 109  */
 110 class DatabaseIbm_db2 extends DatabaseBase {
 111         /*
 112          * Inherited members
 113         protected $mLastQuery = '';
 114         protected $mPHPError = false;
 115
 116         protected $mServer, $mUser, $mPassword, $mConn = null, $mDBname;
 117         protected $mOpened = false;
 118
 119         protected $mTablePrefix;
 120         protected $mFlags;
 121         protected $mTrxLevel = 0;
 122         protected $mErrorCount = 0;
 123         protected $mLBInfo = array();
 124         protected $mFakeSlaveLag = null, $mFakeMaster = false;
 125          *
 126          */
 127
 128         /** Database server port */
 129         protected $mPort = null;
 130         /** Schema for tables, stored procedures, triggers */
 131         protected $mSchema = null;
 132         /** Whether the schema has been applied in this session */
 133         protected $mSchemaSet = false;
 134         /** Result of last query */
 135         protected $mLastResult = null;
 136         /** Number of rows affected by last INSERT/UPDATE/DELETE */
 137         protected $mAffectedRows = null;
 138         /** Number of rows returned by last SELECT */
 139         protected $mNumRows = null;
 140
 141         /** Connection config options - see constructor */
 142         public $mConnOptions = array();
 143         /** Statement config options -- see constructor */
 144         public $mStmtOptions = array();
 145
 146         /** Default schema */
 147         const USE_GLOBAL = 'get from global';
 148
 149         /** Option that applies to nothing */
 150         const NONE_OPTION = 0x00;
 151         /** Option that applies to connection objects */
 152         const CONN_OPTION = 0x01;
 153         /** Option that applies to statement objects */
 154         const STMT_OPTION = 0x02;
 155
 156         /** Regular operation mode -- minimal debug messages */
 157         const REGULAR_MODE = 'regular';
 158         /** Installation mode -- lots of debug messages */
 159         const INSTALL_MODE = 'install';
 160
 161         /** Controls the level of debug message output */
 162         protected $mMode = self::REGULAR_MODE;
 163
 164         /** Last sequence value used for a primary key */
 165         protected $mInsertId = null;
 166
 167         ######################################
 168         # Getters and Setters
 169         ######################################
 170
 171         /**
 172          * Returns true if this database supports (and uses) cascading deletes
 173          */
 174         function cascadingDeletes() {
 175                 return true;
 176         }
 177
 178         /**
 179          * Returns true if this database supports (and uses) triggers (e.g. on the
 180          *  page table)
 181          */
 182         function cleanupTriggers() {
 183                 return true;
 184         }
 185
 186         /**
 187          * Returns true if this database is strict about what can be put into an
 188          *  IP field.
 189          * Specifically, it uses a NULL value instead of an empty string.
 190          */
 191         function strictIPs() {
 192                 return true;
 193         }
 194
 195         /**
 196          * Returns true if this database uses timestamps rather than integers
 197         */
 198         function realTimestamps() {
 199                 return true;
 200         }
 201
 202         /**
 203          * Returns true if this database does an implicit sort when doing GROUP BY
 204          */
 205         function implicitGroupby() {
 206                 return false;
 207         }
 208
 209         /**
 210          * Returns true if this database does an implicit order by when the column
 211          *  has an index
 212          * For example: SELECT page_title FROM page LIMIT 1
 213          */
 214         function implicitOrderby() {
 215                 return false;
 216         }
 217
 218         /**
 219          * Returns true if this database can do a native search on IP columns
 220          * e.g. this works as expected: .. WHERE rc_ip = '127.42.12.102/32';
 221          */
 222         function searchableIPs() {
 223                 return true;
 224         }
 225
 226         /**
 227          * Returns true if this database can use functional indexes
 228          */
 229         function functionalIndexes() {
 230                 return true;
 231         }
 232
 233         /**
 234          * Returns a unique string representing the wiki on the server
 235          */
 236         function getWikiID() {
 237                 if( $this->mSchema ) {
 238                         return "{$this->mDBname}-{$this->mSchema}";
 239                 } else {
 240                         return $this->mDBname;
 241                 }
 242         }
 243
 244         function getType() {
 245                 return 'ibm_db2';
 246         }
 247
 248         /**
 249          *
 250          * @param $server String: hostname of database server
 251          * @param $user String: username
 252          * @param $password String: password
 253          * @param $dbName String: database name on the server
 254          * @param $flags Integer: database behaviour flags (optional, unused)
 255          * @param $schema String
 256          */
 257         public function __construct( $server = false, $user = false,
 258                                                         $password = false,
 259                                                         $dbName = false, $flags = 0,
 260                                                         $schema = self::USE_GLOBAL )
 261         {
 262                 global $wgDBmwschema;
 263
 264                 if ( $schema == self::USE_GLOBAL ) {
 265                         $this->mSchema = $wgDBmwschema;
 266                 } else {
 267                         $this->mSchema = $schema;
 268                 }
 269
 270                 // configure the connection and statement objects
 271                 /*
 272                 $this->setDB2Option( 'cursor', 'DB2_SCROLLABLE',
 273                         self::CONN_OPTION | self::STMT_OPTION );
 274                 */
 275                 $this->setDB2Option( 'db2_attr_case', 'DB2_CASE_LOWER',
 276                         self::CONN_OPTION | self::STMT_OPTION );
 277                 $this->setDB2Option( 'deferred_prepare', 'DB2_DEFERRED_PREPARE_ON',
 278                         self::STMT_OPTION );
 279                 $this->setDB2Option( 'rowcount', 'DB2_ROWCOUNT_PREFETCH_ON',
 280                         self::STMT_OPTION );
 281
 282                 parent::__construct( $server, $user, $password, $dbName, DBO_TRX | $flags );
 283         }
 284
 285         /**
 286          * Enables options only if the ibm_db2 extension version supports them
 287          * @param $name String: name of the option in the options array
 288          * @param $const String: name of the constant holding the right option value
 289          * @param $type Integer: whether this is a Connection or Statement otion
 290          */
 291         private function setDB2Option( $name, $const, $type ) {
 292                 if ( defined( $const ) ) {
 293                         if ( $type & self::CONN_OPTION ) {
 294                                 $this->mConnOptions[$name] = constant( $const );
 295                         }
 296                         if ( $type & self::STMT_OPTION ) {
 297                                 $this->mStmtOptions[$name] = constant( $const );
 298                         }
 299                 } else {
 300                         $this->installPrint(
 301                                 "$const is not defined. ibm_db2 version is likely too low." );
 302                 }
 303         }
 304
 305         /**
 306          * Outputs debug information in the appropriate place
 307          * @param $string String: the relevant debug message
 308          */
 309         private function installPrint( $string ) {
 310                 wfDebug( "$string\n" );
 311                 if ( $this->mMode == self::INSTALL_MODE ) {
 312                         print "<li><pre>$string</pre></li>";
 313                         flush();
 314                 }
 315         }
 316
 317         /**
 318          * Opens a database connection and returns it
 319          * Closes any existing connection
 320          *
 321          * @param $server String: hostname
 322          * @param $user String
 323          * @param $password String
 324          * @param $dbName String: database name
 325          * @return a fresh connection
 326          */
 327         public function open( $server, $user, $password, $dbName ) {
 328                 wfProfileIn( __METHOD__ );
 329
 330                 # Load IBM DB2 driver if missing
 331                 wfDl( 'ibm_db2' );
 332
 333                 # Test for IBM DB2 support, to avoid suppressed fatal error
 334                 if ( !function_exists( 'db2_connect' ) ) {
 335                         throw new DBConnectionError( $this, "DB2 functions missing, have you enabled the ibm_db2 extension for PHP?" );
 336                 }
 337
 338                 global $wgDBport;
 339
 340                 // Close existing connection
 341                 $this->close();
 342                 // Cache conn info
 343                 $this->mServer = $server;
 344                 $this->mPort = $port = $wgDBport;
 345                 $this->mUser = $user;
 346                 $this->mPassword = $password;
 347                 $this->mDBname = $dbName;
 348
 349                 $this->openUncataloged( $dbName, $user, $password, $server, $port );
 350
 351                 if ( !$this->mConn ) {
 352                         $this->installPrint( "DB connection error\n" );
 353                         $this->installPrint(
 354                                 "Server: $server, Database: $dbName, User: $user, Password: "
 355                                 . substr( $password, 0, 3 ) . "...\n" );
 356                         $this->installPrint( $this->lastError() . "\n" );
 357                         wfProfileOut( __METHOD__ );
 358                         wfDebug( "DB connection error\n" );
 359                         wfDebug( "Server: $server, Database: $dbName, User: $user, Password: " . substr( $password, 0, 3 ) . "...\n" );
 360                         wfDebug( $this->lastError() . "\n" );
 361                         throw new DBConnectionError( $this, $this->lastError() );
 362                 }
 363
 364                 // Apply connection config
 365                 db2_set_option( $this->mConn, $this->mConnOptions, 1 );
 366                 // Some MediaWiki code is still transaction-less (?).
 367                 // The strategy is to keep AutoCommit on for that code
 368                 //  but switch it off whenever a transaction is begun.
 369                 db2_autocommit( $this->mConn, DB2_AUTOCOMMIT_ON );
 370
 371                 $this->mOpened = true;
 372                 $this->applySchema();
 373
 374                 wfProfileOut( __METHOD__ );
 375                 return $this->mConn;
 376         }
 377
 378         /**
 379          * Opens a cataloged database connection, sets mConn
 380          */
 381         protected function openCataloged( $dbName, $user, $password ) {
 382                 wfSuppressWarnings();
 383                 $this->mConn = db2_pconnect( $dbName, $user, $password );
 384                 wfRestoreWarnings();
 385         }
 386
 387         /**
 388          * Opens an uncataloged database connection, sets mConn
 389          */
 390         protected function openUncataloged( $dbName, $user, $password, $server, $port )
 391         {
 392                 $dsn = "DRIVER={IBM DB2 ODBC DRIVER};DATABASE=$dbName;CHARSET=UTF-8;HOSTNAME=$server;PORT=$port;PROTOCOL=TCPIP;UID=$user;PWD=$password;";
 393                 wfSuppressWarnings();
 394                 $this->mConn = db2_pconnect($dsn, "", "", array());
 395                 wfRestoreWarnings();
 396         }
 397
 398         /**
 399          * Closes a database connection, if it is open
 400          * Returns success, true if already closed
 401          */
 402         public function close() {
 403                 $this->mOpened = false;
 404                 if ( $this->mConn ) {
 405                         if ( $this->trxLevel() > 0 ) {
 406                                 $this->commit();
 407                         }
 408                         return db2_close( $this->mConn );
 409                 } else {
 410                         return true;
 411                 }
 412         }
 413
 414         /**
 415          * Retrieves the most current database error
 416          * Forces a database rollback
 417          */
 418         public function lastError() {
 419                 $connerr = db2_conn_errormsg();
 420                 if ( $connerr ) {
 421                         //$this->rollback();
 422                         return $connerr;
 423                 }
 424                 $stmterr = db2_stmt_errormsg();
 425                 if ( $stmterr ) {
 426                         //$this->rollback();
 427                         return $stmterr;
 428                 }
 429
 430                 return false;
 431         }
 432
 433         /**
 434          * Get the last error number
 435          * Return 0 if no error
 436          * @return integer
 437          */
 438         public function lastErrno() {
 439                 $connerr = db2_conn_error();
 440                 if ( $connerr ) {
 441                         return $connerr;
 442                 }
 443                 $stmterr = db2_stmt_error();
 444                 if ( $stmterr ) {
 445                         return $stmterr;
 446                 }
 447                 return 0;
 448         }
 449
 450         /**
 451          * Is a database connection open?
 452          * @return
 453          */
 454         public function isOpen() { return $this->mOpened; }
 455
 456         /**
 457          * The DBMS-dependent part of query()
 458          * @param  $sql String: SQL query.
 459          * @return object Result object for fetch functions or false on failure
 460          */
 461         protected function doQuery( $sql ) {
 462                 $this->applySchema();
 463
 464                 // Needed to handle any UTF-8 encoding issues in the raw sql
 465                 // Note that we fully support prepared statements for DB2
 466                 // prepare() and execute() should be used instead of doQuery() whenever possible
 467                 $sql = utf8_decode($sql);
 468
 469                 $ret = db2_exec( $this->mConn, $sql, $this->mStmtOptions );
 470                 if( $ret == false ) {
 471                         $error = db2_stmt_errormsg();
 472
 473                         $this->installPrint( "<pre>$sql</pre>" );
 474                         $this->installPrint( $error );
 475                         throw new DBUnexpectedError( $this, 'SQL error: '
 476                                 . htmlspecialchars( $error ) );
 477                 }
 478                 $this->mLastResult = $ret;
 479                 $this->mAffectedRows = null; // Not calculated until asked for
 480                 return $ret;
 481         }
 482
 483         /**
 484          * @return string Version information from the database
 485          */
 486         public function getServerVersion() {
 487                 $info = db2_server_info( $this->mConn );
 488                 return $info->DBMS_VER;
 489         }
 490
 491         /**
 492          * Queries whether a given table exists
 493          * @return boolean
 494          */
 495         public function tableExists( $table, $fname = __METHOD__ ) {
 496                 $schema = $this->mSchema;
 497
 498                 $sql = "SELECT COUNT( * ) FROM SYSIBM.SYSTABLES ST WHERE ST.NAME = '" .
 499                         strtoupper( $table ) .
 500                         "' AND ST.CREATOR = '" .
 501                         strtoupper( $schema ) . "'";
 502                 $res = $this->query( $sql );
 503                 if ( !$res ) {
 504                         return false;
 505                 }
 506
 507                 // If the table exists, there should be one of it
 508                 $row = $this->fetchRow( $res );
 509                 $count = $row[0];
 510                 if ( $count == '1' || $count == 1 ) {
 511                         return true;
 512                 }
 513
 514                 return false;
 515         }
 516
 517         /**
 518          * Fetch the next row from the given result object, in object form.
 519          * Fields can be retrieved with $row->fieldname, with fields acting like
 520          * member variables.
 521          *
 522          * @param $res SQL result object as returned from Database::query(), etc.
 523          * @return DB2 row object
 524          * @throws DBUnexpectedError Thrown if the database returns an error
 525          */
 526         public function fetchObject( $res ) {
 527                 if ( $res instanceof ResultWrapper ) {
 528                         $res = $res->result;
 529                 }
 530                 wfSuppressWarnings();
 531                 $row = db2_fetch_object( $res );
 532                 wfRestoreWarnings();
 533                 if( $this->lastErrno() ) {
 534                         throw new DBUnexpectedError( $this, 'Error in fetchObject(): '
 535                                 . htmlspecialchars( $this->lastError() ) );
 536                 }
 537                 return $row;
 538         }
 539
 540         /**
 541          * Fetch the next row from the given result object, in associative array
 542          * form. Fields are retrieved with $row['fieldname'].
 543          *
 544          * @param $res SQL result object as returned from Database::query(), etc.
 545          * @return DB2 row object
 546          * @throws DBUnexpectedError Thrown if the database returns an error
 547          */
 548         public function fetchRow( $res ) {
 549                 if ( $res instanceof ResultWrapper ) {
 550                         $res = $res->result;
 551                 }
 552                 if ( db2_num_rows( $res ) > 0) {
 553                         wfSuppressWarnings();
 554                         $row = db2_fetch_array( $res );
 555                         wfRestoreWarnings();
 556                         if ( $this->lastErrno() ) {
 557                                 throw new DBUnexpectedError( $this, 'Error in fetchRow(): '
 558                                         . htmlspecialchars( $this->lastError() ) );
 559                         }
 560                         return $row;
 561                 }
 562                 return false;
 563         }
 564
 565         /**
 566          * Escapes strings
 567          * Doesn't escape numbers
 568          *
 569          * @param $s String: string to escape
 570          * @return escaped string
 571          */
 572         public function addQuotes( $s ) {
 573                 //$this->installPrint( "DB2::addQuotes( $s )\n" );
 574                 if ( is_null( $s ) ) {
 575                         return 'NULL';
 576                 } elseif ( $s instanceof Blob ) {
 577                         return "'" . $s->fetch( $s ) . "'";
 578                 } elseif ( $s instanceof IBM_DB2Blob ) {
 579                         return "'" . $this->decodeBlob( $s ) . "'";
 580                 }
 581                 $s = $this->strencode( $s );
 582                 if ( is_numeric( $s ) ) {
 583                         return $s;
 584                 } else {
 585                         return "'$s'";
 586                 }
 587         }
 588
 589         /**
 590          * Verifies that a DB2 column/field type is numeric
 591          *
 592          * @param $type String: DB2 column type
 593          * @return Boolean: true if numeric
 594          */
 595         public function is_numeric_type( $type ) {
 596                 switch ( strtoupper( $type ) ) {
 597                         case 'SMALLINT':
 598                         case 'INTEGER':
 599                         case 'INT':
 600                         case 'BIGINT':
 601                         case 'DECIMAL':
 602                         case 'REAL':
 603                         case 'DOUBLE':
 604                         case 'DECFLOAT':
 605                                 return true;
 606                 }
 607                 return false;
 608         }
 609
 610         /**
 611          * Alias for addQuotes()
 612          * @param $s String: string to escape
 613          * @return escaped string
 614          */
 615         public function strencode( $s ) {
 616                 // Bloody useless function
 617                 //  Prepends backslashes to \x00, \n, \r, \, ', " and \x1a.
 618                 //  But also necessary
 619                 $s = db2_escape_string( $s );
 620                 // Wide characters are evil -- some of them look like '
 621                 $s = utf8_encode( $s );
 622                 // Fix its stupidity
 623                 $from = array(  "\\\\", "\\'",  '\\n',  '\\t',  '\\"',  '\\r' );
 624                 $to = array(            "\\",           "''",           "\n",           "\t",           '"',            "\r" );
 625                 $s = str_replace( $from, $to, $s ); // DB2 expects '', not \' escaping
 626                 return $s;
 627         }
 628
 629         /**
 630          * Switch into the database schema
 631          */
 632         protected function applySchema() {
 633                 if ( !( $this->mSchemaSet ) ) {
 634                         $this->mSchemaSet = true;
 635                         $this->begin();
 636                         $this->doQuery( "SET SCHEMA = $this->mSchema" );
 637                         $this->commit();
 638                 }
 639         }
 640
 641         /**
 642          * Start a transaction (mandatory)
 643          */
 644         public function begin( $fname = 'DatabaseIbm_db2::begin' ) {
 645                 // BEGIN is implicit for DB2
 646                 // However, it requires that AutoCommit be off.
 647
 648                 // Some MediaWiki code is still transaction-less (?).
 649                 // The strategy is to keep AutoCommit on for that code
 650                 //  but switch it off whenever a transaction is begun.
 651                 db2_autocommit( $this->mConn, DB2_AUTOCOMMIT_OFF );
 652
 653                 $this->mTrxLevel = 1;
 654         }
 655
 656         /**
 657          * End a transaction
 658          * Must have a preceding begin()
 659          */
 660         public function commit( $fname = 'DatabaseIbm_db2::commit' ) {
 661                 db2_commit( $this->mConn );
 662
 663                 // Some MediaWiki code is still transaction-less (?).
 664                 // The strategy is to keep AutoCommit on for that code
 665                 //  but switch it off whenever a transaction is begun.
 666                 db2_autocommit( $this->mConn, DB2_AUTOCOMMIT_ON );
 667
 668                 $this->mTrxLevel = 0;
 669         }
 670
 671         /**
 672          * Cancel a transaction
 673          */
 674         public function rollback( $fname = 'DatabaseIbm_db2::rollback' ) {
 675                 db2_rollback( $this->mConn );
 676                 // turn auto-commit back on
 677                 // not sure if this is appropriate
 678                 db2_autocommit( $this->mConn, DB2_AUTOCOMMIT_ON );
 679                 $this->mTrxLevel = 0;
 680         }
 681
 682         /**
 683          * Makes an encoded list of strings from an array
 684          * $mode:
 685          *   LIST_COMMA         - comma separated, no field names
 686          *   LIST_AND           - ANDed WHERE clause (without the WHERE)
 687          *   LIST_OR            - ORed WHERE clause (without the WHERE)
 688          *   LIST_SET           - comma separated with field names, like a SET clause
 689          *   LIST_NAMES         - comma separated field names
 690          *   LIST_SET_PREPARED  - like LIST_SET, except with ? tokens as values
 691          */
 692         function makeList( $a, $mode = LIST_COMMA ) {
 693                 if ( !is_array( $a ) ) {
 694                         throw new DBUnexpectedError( $this,
 695                                 'DatabaseIbm_db2::makeList called with incorrect parameters' );
 696                 }
 697
 698                 // if this is for a prepared UPDATE statement
 699                 // (this should be promoted to the parent class
 700                 //  once other databases use prepared statements)
 701                 if ( $mode == LIST_SET_PREPARED ) {
 702                         $first = true;
 703                         $list = '';
 704                         foreach ( $a as $field => $value ) {
 705                                 if ( !$first ) {
 706                                         $list .= ", $field = ?";
 707                                 } else {
 708                                         $list .= "$field = ?";
 709                                         $first = false;
 710                                 }
 711                         }
 712                         $list .= '';
 713
 714                         return $list;
 715                 }
 716
 717                 // otherwise, call the usual function
 718                 return parent::makeList( $a, $mode );
 719         }
 720
 721         /**
 722          * Construct a LIMIT query with optional offset
 723          * This is used for query pages
 724          *
 725          * @param $sql string SQL query we will append the limit too
 726          * @param $limit integer the SQL limit
 727          * @param $offset integer the SQL offset (default false)
 728          */
 729         public function limitResult( $sql, $limit, $offset=false ) {
 730                 if( !is_numeric( $limit ) ) {
 731                         throw new DBUnexpectedError( $this,
 732                                 "Invalid non-numeric limit passed to limitResult()\n" );
 733                 }
 734                 if( $offset ) {
 735                         if ( stripos( $sql, 'where' ) === false ) {
 736                                 return "$sql AND ( ROWNUM BETWEEN $offset AND $offset+$limit )";
 737                         } else {
 738                                 return "$sql WHERE ( ROWNUM BETWEEN $offset AND $offset+$limit )";
 739                         }
 740                 }
 741                 return "$sql FETCH FIRST $limit ROWS ONLY ";
 742         }
 743
 744         /**
 745          * Handle reserved keyword replacement in table names
 746          *
 747          * @param $name Object
 748          * @param $name Boolean
 749          * @return String
 750          */
 751         public function tableName( $name, $format = 'quoted' ) {
 752                 // we want maximum compatibility with MySQL schema
 753                 return $name;
 754         }
 755
 756         /**
 757          * Generates a timestamp in an insertable format
 758          *
 759          * @param $ts timestamp
 760          * @return String: timestamp value
 761          */
 762         public function timestamp( $ts = 0 ) {
 763                 // TS_MW cannot be easily distinguished from an integer
 764                 return wfTimestamp( TS_DB2, $ts );
 765         }
 766
 767         /**
 768          * Return the next in a sequence, save the value for retrieval via insertId()
 769          * @param $seqName String: name of a defined sequence in the database
 770          * @return next value in that sequence
 771          */
 772         public function nextSequenceValue( $seqName ) {
 773                 // Not using sequences in the primary schema to allow for easier migration
 774                 //  from MySQL
 775                 // Emulating MySQL behaviour of using NULL to signal that sequences
 776                 // aren't used
 777                 /*
 778                 $safeseq = preg_replace( "/'/", "''", $seqName );
 779                 $res = $this->query( "VALUES NEXTVAL FOR $safeseq" );
 780                 $row = $this->fetchRow( $res );
 781                 $this->mInsertId = $row[0];
 782                 return $this->mInsertId;
 783                 */
 784                 return null;
 785         }
 786
 787         /**
 788          * This must be called after nextSequenceVal
 789          * @return Last sequence value used as a primary key
 790          */
 791         public function insertId() {
 792                 return $this->mInsertId;
 793         }
 794
 795         /**
 796          * Updates the mInsertId property with the value of the last insert
 797          *  into a generated column
 798          *
 799          * @param $table      String: sanitized table name
 800          * @param $primaryKey Mixed: string name of the primary key
 801          * @param $stmt       Resource: prepared statement resource
 802          *  of the SELECT primary_key FROM FINAL TABLE ( INSERT ... ) form
 803          */
 804         private function calcInsertId( $table, $primaryKey, $stmt ) {
 805                 if ( $primaryKey ) {
 806                         $this->mInsertId = db2_last_insert_id( $this->mConn );
 807                 }
 808         }
 809
 810         /**
 811          * INSERT wrapper, inserts an array into a table
 812          *
 813          * $args may be a single associative array, or an array of arrays
 814          *  with numeric keys, for multi-row insert
 815          *
 816          * @param $table   String: Name of the table to insert to.
 817          * @param $args    Array: Items to insert into the table.
 818          * @param $fname   String: Name of the function, for profiling
 819          * @param $options String or Array. Valid options: IGNORE
 820          *
 821          * @return bool Success of insert operation. IGNORE always returns true.
 822          */
 823         public function insert( $table, $args, $fname = 'DatabaseIbm_db2::insert',
 824                 $options = array() )
 825         {
 826                 if ( !count( $args ) ) {
 827                         return true;
 828                 }
 829                 // get database-specific table name (not used)
 830                 $table = $this->tableName( $table );
 831                 // format options as an array
 832                 $options = IBM_DB2Helper::makeArray( $options );
 833                 // format args as an array of arrays
 834                 if ( !( isset( $args[0] ) && is_array( $args[0] ) ) ) {
 835                         $args = array( $args );
 836                 }
 837
 838                 // prevent insertion of NULL into primary key columns
 839                 list( $args, $primaryKeys ) = $this->removeNullPrimaryKeys( $table, $args );
 840                 // if there's only one primary key
 841                 // we'll be able to read its value after insertion
 842                 $primaryKey = false;
 843                 if ( count( $primaryKeys ) == 1 ) {
 844                         $primaryKey = $primaryKeys[0];
 845                 }
 846
 847                 // get column names
 848                 $keys = array_keys( $args[0] );
 849                 $key_count = count( $keys );
 850
 851                 // If IGNORE is set, we use savepoints to emulate mysql's behavior
 852                 $ignore = in_array( 'IGNORE', $options ) ? 'mw' : '';
 853
 854                 // assume success
 855                 $res = true;
 856                 // If we are not in a transaction, we need to be for savepoint trickery
 857                 if ( !$this->mTrxLevel ) {
 858                         $this->begin();
 859                 }
 860
 861                 $sql = "INSERT INTO $table ( " . implode( ',', $keys ) . ' ) VALUES ';
 862                 if ( $key_count == 1 ) {
 863                         $sql .= '( ? )';
 864                 } else {
 865                         $sql .= '( ?' . str_repeat( ',?', $key_count-1 ) . ' )';
 866                 }
 867                 $this->installPrint( "Preparing the following SQL:" );
 868                 $this->installPrint( "$sql" );
 869                 $this->installPrint( print_r( $args, true ));
 870                 $stmt = $this->prepare( $sql );
 871
 872                 // start a transaction/enter transaction mode
 873                 $this->begin();
 874
 875                 if ( !$ignore ) {
 876                         //$first = true;
 877                         foreach ( $args as $row ) {
 878                                 //$this->installPrint( "Inserting " . print_r( $row, true ));
 879                                 // insert each row into the database
 880                                 $res = $res & $this->execute( $stmt, $row );
 881                                 if ( !$res ) {
 882                                         $this->installPrint( 'Last error:' );
 883                                         $this->installPrint( $this->lastError() );
 884                                 }
 885                                 // get the last inserted value into a generated column
 886                                 $this->calcInsertId( $table, $primaryKey, $stmt );
 887                         }
 888                 } else {
 889                         $olde = error_reporting( 0 );
 890                         // For future use, we may want to track the number of actual inserts
 891                         // Right now, insert (all writes) simply return true/false
 892                         $numrowsinserted = 0;
 893
 894                         // always return true
 895                         $res = true;
 896
 897                         foreach ( $args as $row ) {
 898                                 $overhead = "SAVEPOINT $ignore ON ROLLBACK RETAIN CURSORS";
 899                                 db2_exec( $this->mConn, $overhead, $this->mStmtOptions );
 900
 901                                 $res2 = $this->execute( $stmt, $row );
 902
 903                                 if ( !$res2 ) {
 904                                         $this->installPrint( 'Last error:' );
 905                                         $this->installPrint( $this->lastError() );
 906                                 }
 907                                 // get the last inserted value into a generated column
 908                                 $this->calcInsertId( $table, $primaryKey, $stmt );
 909
 910                                 $errNum = $this->lastErrno();
 911                                 if ( $errNum ) {
 912                                         db2_exec( $this->mConn, "ROLLBACK TO SAVEPOINT $ignore",
 913                                                 $this->mStmtOptions );
 914                                 } else {
 915                                         db2_exec( $this->mConn, "RELEASE SAVEPOINT $ignore",
 916                                                 $this->mStmtOptions );
 917                                         $numrowsinserted++;
 918                                 }
 919                         }
 920
 921                         $olde = error_reporting( $olde );
 922                         // Set the affected row count for the whole operation
 923                         $this->mAffectedRows = $numrowsinserted;
 924                 }
 925                 // commit either way
 926                 $this->commit();
 927                 $this->freePrepared( $stmt );
 928
 929                 return $res;
 930         }
 931
 932         /**
 933          * Given a table name and a hash of columns with values
 934          * Removes primary key columns from the hash where the value is NULL
 935          *
 936          * @param $table String: name of the table
 937          * @param $args Array of hashes of column names with values
 938          * @return Array: tuple( filtered array of columns, array of primary keys )
 939          */
 940         private function removeNullPrimaryKeys( $table, $args ) {
 941                 $schema = $this->mSchema;
 942
 943                 // find out the primary keys
 944                 $keyres = $this->doQuery( "SELECT NAME FROM SYSIBM.SYSCOLUMNS WHERE TBNAME = '"
 945                   . strtoupper( $table )
 946                   . "' AND TBCREATOR = '"
 947                   . strtoupper( $schema )
 948                   . "' AND KEYSEQ > 0" );
 949
 950                 $keys = array();
 951                 for (
 952                         $row = $this->fetchRow( $keyres );
 953                         $row != null;
 954                         $row = $this->fetchRow( $keyres )
 955                 )
 956                 {
 957                         $keys[] = strtolower( $row[0] );
 958                 }
 959                 // remove primary keys
 960                 foreach ( $args as $ai => $row ) {
 961                         foreach ( $keys as $key ) {
 962                                 if ( $row[$key] == null ) {
 963                                         unset( $row[$key] );
 964                                 }
 965                         }
 966                         $args[$ai] = $row;
 967                 }
 968                 // return modified hash
 969                 return array( $args, $keys );
 970         }
 971
 972         /**
 973          * UPDATE wrapper, takes a condition array and a SET array
 974          *
 975          * @param $table  String: The table to UPDATE
 976          * @param $values An array of values to SET
 977          * @param $conds  An array of conditions ( WHERE ). Use '*' to update all rows.
 978          * @param $fname  String: The Class::Function calling this function
 979          *                ( for the log )
 980          * @param $options An array of UPDATE options, can be one or
 981          *                 more of IGNORE, LOW_PRIORITY
 982          * @return Boolean
 983          */
 984         public function update( $table, $values, $conds, $fname = 'DatabaseIbm_db2::update',
 985                 $options = array() )
 986         {
 987                 if ( is_array( $table ) ) {
 988                         $table =  implode( ',', array_map( array( $this, 'tableName' ), $table ) );
 989                 } else {
 990                         $table = $this->tableName( $table );
 991                 }
 992                 $opts = $this->makeUpdateOptions( $options );
 993                 $sql = "UPDATE $opts $table SET "
 994                         . $this->makeList( $values, LIST_SET_PREPARED );
 995                 if ( $conds != '*' ) {
 996                         $sql .= " WHERE " . $this->makeList( $conds, LIST_AND );
 997                 }
 998                 $stmt = $this->prepare( $sql );
 999                 $this->installPrint( 'UPDATE: ' . print_r( $values, true ) );
1000                 // assuming for now that an array with string keys will work
1001                 // if not, convert to simple array first
1002                 $result = $this->execute( $stmt, $values );
1003                 $this->freePrepared( $stmt );
1004
1005                 return $result;
1006         }
1007
1008         /**
1009          * DELETE query wrapper
1010          *
1011          * Use $conds == "*" to delete all rows
1012          */
1013         public function delete( $table, $conds, $fname = 'DatabaseIbm_db2::delete' ) {
1014                 if ( !$conds ) {
1015                         throw new DBUnexpectedError( $this,
1016                                 'DatabaseIbm_db2::delete() called with no conditions' );
1017                 }
1018                 $table = $this->tableName( $table );
1019                 $sql = "DELETE FROM $table";
1020                 if ( $conds != '*' ) {
1021                         $sql .= ' WHERE ' . $this->makeList( $conds, LIST_AND );
1022                 }
1023                 $result = $this->query( $sql, $fname );
1024
1025                 return $result;
1026         }
1027
1028         /**
1029          * Returns the number of rows affected by the last query or 0
1030          * @return Integer: the number of rows affected by the last query
1031          */
1032         public function affectedRows() {
1033                 if ( !is_null( $this->mAffectedRows ) ) {
1034                         // Forced result for simulated queries
1035                         return $this->mAffectedRows;
1036                 }
1037                 if( empty( $this->mLastResult ) ) {
1038                         return 0;
1039                 }
1040                 return db2_num_rows( $this->mLastResult );
1041         }
1042
1043         /**
1044          * Returns the number of rows in the result set
1045          * Has to be called right after the corresponding select query
1046          * @param $res Object result set
1047          * @return Integer: number of rows
1048          */
1049         public function numRows( $res ) {
1050                 if ( $res instanceof ResultWrapper ) {
1051                         $res = $res->result;
1052                 }
1053
1054                 if ( $this->mNumRows ) {
1055                         return $this->mNumRows;
1056                 } else {
1057                         return 0;
1058                 }
1059         }
1060
1061         /**
1062          * Moves the row pointer of the result set
1063          * @param $res Object: result set
1064          * @param $row Integer: row number
1065          * @return success or failure
1066          */
1067         public function dataSeek( $res, $row ) {
1068                 if ( $res instanceof ResultWrapper ) {
1069                         $res = $res->result;
1070                 }
1071                 return db2_fetch_row( $res, $row );
1072         }
1073
1074         ###
1075         # Fix notices in Block.php
1076         ###
1077
1078         /**
1079          * Frees memory associated with a statement resource
1080          * @param $res Object: statement resource to free
1081          * @return Boolean success or failure
1082          */
1083         public function freeResult( $res ) {
1084                 if ( $res instanceof ResultWrapper ) {
1085                         $res = $res->result;
1086                 }
1087                 wfSuppressWarnings();
1088                 $ok = db2_free_result( $res );
1089                 wfRestoreWarnings();
1090                 if ( !$ok ) {
1091                         throw new DBUnexpectedError( $this, "Unable to free DB2 result\n" );
1092                 }
1093         }
1094
1095         /**
1096          * Returns the number of columns in a resource
1097          * @param $res Object: statement resource
1098          * @return Number of fields/columns in resource
1099          */
1100         public function numFields( $res ) {
1101                 if ( $res instanceof ResultWrapper ) {
1102                         $res = $res->result;
1103                 }
1104                 return db2_num_fields( $res );
1105         }
1106
1107         /**
1108          * Returns the nth column name
1109          * @param $res Object: statement resource
1110          * @param $n Integer: Index of field or column
1111          * @return String name of nth column
1112          */
1113         public function fieldName( $res, $n ) {
1114                 if ( $res instanceof ResultWrapper ) {
1115                         $res = $res->result;
1116                 }
1117                 return db2_field_name( $res, $n );
1118         }
1119
1120         /**
1121          * SELECT wrapper
1122          *
1123          * @param $table   Array or string, table name(s) (prefix auto-added)
1124          * @param $vars    Array or string, field name(s) to be retrieved
1125          * @param $conds   Array or string, condition(s) for WHERE
1126          * @param $fname   String: calling function name (use __METHOD__)
1127          *                 for logs/profiling
1128          * @param $options Associative array of options
1129          *                 (e.g. array('GROUP BY' => 'page_title')),
1130          *                 see Database::makeSelectOptions code for list of
1131          *                 supported stuff
1132          * @param $join_conds Associative array of table join conditions (optional)
1133          *                    (e.g. array( 'page' => array('LEFT JOIN',
1134          *                    'page_latest=rev_id') )
1135          * @return Mixed: database result resource for fetch functions or false
1136          *                 on failure
1137          */
1138         public function select( $table, $vars, $conds = '', $fname = 'DatabaseIbm_db2::select', $options = array(), $join_conds = array() )
1139         {
1140                 $res = parent::select( $table, $vars, $conds, $fname, $options,
1141                         $join_conds );
1142
1143                 // We must adjust for offset
1144                 if ( isset( $options['LIMIT'] ) && isset ( $options['OFFSET'] ) ) {
1145                         $limit = $options['LIMIT'];
1146                         $offset = $options['OFFSET'];
1147                 }
1148
1149                 // DB2 does not have a proper num_rows() function yet, so we must emulate
1150                 // DB2 9.5.4 and the corresponding ibm_db2 driver will introduce
1151                 //  a working one
1152                 // TODO: Yay!
1153
1154                 // we want the count
1155                 $vars2 = array( 'count( * ) as num_rows' );
1156                 // respecting just the limit option
1157                 $options2 = array();
1158                 if ( isset( $options['LIMIT'] ) ) {
1159                         $options2['LIMIT'] = $options['LIMIT'];
1160                 }
1161                 // but don't try to emulate for GROUP BY
1162                 if ( isset( $options['GROUP BY'] ) ) {
1163                         return $res;
1164                 }
1165
1166                 $res2 = parent::select( $table, $vars2, $conds, $fname, $options2,
1167                         $join_conds );
1168                 $obj = $this->fetchObject( $res2 );
1169                 $this->mNumRows = $obj->num_rows;
1170
1171                 return $res;
1172         }
1173
1174         /**
1175          * Handles ordering, grouping, and having options ('GROUP BY' => colname)
1176          * Has limited support for per-column options (colnum => 'DISTINCT')
1177          *
1178          * @private
1179          *
1180          * @param $options Associative array of options to be turned into
1181          *              an SQL query, valid keys are listed in the function.
1182          * @return Array
1183          */
1184         function makeSelectOptions( $options ) {
1185                 $preLimitTail = $postLimitTail = '';
1186                 $startOpts = '';
1187
1188                 $noKeyOptions = array();
1189                 foreach ( $options as $key => $option ) {
1190                         if ( is_numeric( $key ) ) {
1191                                 $noKeyOptions[$option] = true;
1192                         }
1193                 }
1194
1195                 if ( isset( $options['GROUP BY'] ) ) {
1196                         $preLimitTail .= " GROUP BY {$options['GROUP BY']}";
1197                 }
1198                 if ( isset( $options['HAVING'] ) ) {
1199                         $preLimitTail .= " HAVING {$options['HAVING']}";
1200                 }
1201                 if ( isset( $options['ORDER BY'] ) ) {
1202                         $preLimitTail .= " ORDER BY {$options['ORDER BY']}";
1203                 }
1204
1205                 if ( isset( $noKeyOptions['DISTINCT'] )
1206                         || isset( $noKeyOptions['DISTINCTROW'] ) )
1207                 {
1208                         $startOpts .= 'DISTINCT';
1209                 }
1210
1211                 return array( $startOpts, '', $preLimitTail, $postLimitTail );
1212         }
1213
1214         /**
1215          * Returns link to IBM DB2 free download
1216          * @return String: wikitext of a link to the server software's web site
1217          */
1218         public static function getSoftwareLink() {
1219                 return '[http://www.ibm.com/db2/express/ IBM DB2]';
1220         }
1221
1222         /**
1223          * Get search engine class. All subclasses of this
1224          * need to implement this if they wish to use searching.
1225          *
1226          * @return String
1227          */
1228         public function getSearchEngine() {
1229                 return 'SearchIBM_DB2';
1230         }
1231
1232         /**
1233          * Did the last database access fail because of deadlock?
1234          * @return Boolean
1235          */
1236         public function wasDeadlock() {
1237                 // get SQLSTATE
1238                 $err = $this->lastErrno();
1239                 switch( $err ) {
1240                         // This is literal port of the MySQL logic and may be wrong for DB2
1241                         case '40001':   // sql0911n, Deadlock or timeout, rollback
1242                         case '57011':   // sql0904n, Resource unavailable, no rollback
1243                         case '57033':   // sql0913n, Deadlock or timeout, no rollback
1244                         $this->installPrint( "In a deadlock because of SQLSTATE $err" );
1245                         return true;
1246                 }
1247                 return false;
1248         }
1249
1250         /**
1251          * Ping the server and try to reconnect if it there is no connection
1252          * The connection may be closed and reopened while this happens
1253          * @return Boolean: whether the connection exists
1254          */
1255         public function ping() {
1256                 // db2_ping() doesn't exist
1257                 // Emulate
1258                 $this->close();
1259                 $this->mConn = $this->openUncataloged( $this->mDBName, $this->mUser,
1260                         $this->mPassword, $this->mServer, $this->mPort );
1261
1262                 return false;
1263         }
1264         ######################################
1265         # Unimplemented and not applicable
1266         ######################################
1267         /**
1268          * Not implemented
1269          * @return string $sql
1270          */
1271         public function limitResultForUpdate( $sql, $num ) {
1272                 $this->installPrint( 'Not implemented for DB2: limitResultForUpdate()' );
1273                 return $sql;
1274         }
1275
1276         /**
1277          * Only useful with fake prepare like in base Database class
1278          * @return      string
1279          */
1280         public function fillPreparedArg( $matches ) {
1281                 $this->installPrint( 'Not useful for DB2: fillPreparedArg()' );
1282                 return '';
1283         }
1284
1285         ######################################
1286         # Reflection
1287         ######################################
1288
1289         /**
1290          * Returns information about an index
1291          * If errors are explicitly ignored, returns NULL on failure
1292          * @param $table String: table name
1293          * @param $index String: index name
1294          * @param $fname String: function name for logging and profiling
1295          * @return Object query row in object form
1296          */
1297         public function indexInfo( $table, $index,
1298                 $fname = 'DatabaseIbm_db2::indexExists' )
1299         {
1300                 $table = $this->tableName( $table );
1301                 $sql = <<<SQL
1302 SELECT name as indexname
1303 FROM sysibm.sysindexes si
1304 WHERE si.name='$index' AND si.tbname='$table'
1305 AND sc.tbcreator='$this->mSchema'
1306 SQL;
1307                 $res = $this->query( $sql, $fname );
1308                 if ( !$res ) {
1309                         return null;
1310                 }
1311                 $row = $this->fetchObject( $res );
1312                 if ( $row != null ) {
1313                         return $row;
1314                 } else {
1315                         return false;
1316                 }
1317         }
1318
1319         /**
1320          * Returns an information object on a table column
1321          * @param $table String: table name
1322          * @param $field String: column name
1323          * @return IBM_DB2Field
1324          */
1325         public function fieldInfo( $table, $field ) {
1326                 return IBM_DB2Field::fromText( $this, $table, $field );
1327         }
1328
1329         /**
1330          * db2_field_type() wrapper
1331          * @param $res Object: result of executed statement
1332          * @param $index Mixed: number or name of the column
1333          * @return String column type
1334          */
1335         public function fieldType( $res, $index ) {
1336                 if ( $res instanceof ResultWrapper ) {
1337                         $res = $res->result;
1338                 }
1339                 return db2_field_type( $res, $index );
1340         }
1341
1342         /**
1343          * Verifies that an index was created as unique
1344          * @param $table String: table name
1345          * @param $index String: index name
1346          * @param $fname function name for profiling
1347          * @return Bool
1348          */
1349         public function indexUnique ( $table, $index,
1350                 $fname = 'DatabaseIbm_db2::indexUnique' )
1351         {
1352                 $table = $this->tableName( $table );
1353                 $sql = <<<SQL
1354 SELECT si.name as indexname
1355 FROM sysibm.sysindexes si
1356 WHERE si.name='$index' AND si.tbname='$table'
1357 AND sc.tbcreator='$this->mSchema'
1358 AND si.uniquerule IN ( 'U', 'P' )
1359 SQL;
1360                 $res = $this->query( $sql, $fname );
1361                 if ( !$res ) {
1362                         return null;
1363                 }
1364                 if ( $this->fetchObject( $res ) ) {
1365                         return true;
1366                 }
1367                 return false;
1368
1369         }
1370
1371         /**
1372          * Returns the size of a text field, or -1 for "unlimited"
1373          * @param $table String: table name
1374          * @param $field String: column name
1375          * @return Integer: length or -1 for unlimited
1376          */
1377         public function textFieldSize( $table, $field ) {
1378                 $table = $this->tableName( $table );
1379                 $sql = <<<SQL
1380 SELECT length as size
1381 FROM sysibm.syscolumns sc
1382 WHERE sc.name='$field' AND sc.tbname='$table'
1383 AND sc.tbcreator='$this->mSchema'
1384 SQL;
1385                 $res = $this->query( $sql );
1386                 $row = $this->fetchObject( $res );
1387                 $size = $row->size;
1388                 return $size;
1389         }
1390
1391         /**
1392          * Description is left as an exercise for the reader
1393          * @param $b Mixed: data to be encoded
1394          * @return IBM_DB2Blob
1395          */
1396         public function encodeBlob( $b ) {
1397                 return new IBM_DB2Blob( $b );
1398         }
1399
1400         /**
1401          * Description is left as an exercise for the reader
1402          * @param $b IBM_DB2Blob: data to be decoded
1403          * @return mixed
1404          */
1405         public function decodeBlob( $b ) {
1406                 return "$b";
1407         }
1408
1409         /**
1410          * Convert into a list of string being concatenated
1411          * @param $stringList Array: strings that need to be joined together
1412          *                    by the SQL engine
1413          * @return String: joined by the concatenation operator
1414          */
1415         public function buildConcat( $stringList ) {
1416                 // || is equivalent to CONCAT
1417                 // Sample query: VALUES 'foo' CONCAT 'bar' CONCAT 'baz'
1418                 return implode( ' || ', $stringList );
1419         }
1420
1421         /**
1422          * Generates the SQL required to convert a DB2 timestamp into a Unix epoch
1423          * @param $column String: name of timestamp column
1424          * @return String: SQL code
1425          */
1426         public function extractUnixEpoch( $column ) {
1427                 // TODO
1428                 // see SpecialAncientpages
1429         }
1430
1431         ######################################
1432         # Prepared statements
1433         ######################################
1434
1435         /**
1436          * Intended to be compatible with the PEAR::DB wrapper functions.
1437          * http://pear.php.net/manual/en/package.database.db.intro-execute.php
1438          *
1439          * ? = scalar value, quoted as necessary
1440          * ! = raw SQL bit (a function for instance)
1441          * & = filename; reads the file and inserts as a blob
1442          *     (we don't use this though...)
1443          * @param $sql String: SQL statement with appropriate markers
1444          * @param $func String: Name of the function, for profiling
1445          * @return resource a prepared DB2 SQL statement
1446          */
1447         public function prepare( $sql, $func = 'DB2::prepare' ) {
1448                 $stmt = db2_prepare( $this->mConn, $sql, $this->mStmtOptions );
1449                 return $stmt;
1450         }
1451
1452         /**
1453          * Frees resources associated with a prepared statement
1454          * @return Boolean success or failure
1455          */
1456         public function freePrepared( $prepared ) {
1457                 return db2_free_stmt( $prepared );
1458         }
1459
1460         /**
1461          * Execute a prepared query with the various arguments
1462          * @param $prepared String: the prepared sql
1463          * @param $args Mixed: either an array here, or put scalars as varargs
1464          * @return Resource: results object
1465          */
1466         public function execute( $prepared, $args = null ) {
1467                 if( !is_array( $args ) ) {
1468                         # Pull the var args
1469                         $args = func_get_args();
1470                         array_shift( $args );
1471                 }
1472                 $res = db2_execute( $prepared, $args );
1473                 if ( !$res ) {
1474                         $this->installPrint( db2_stmt_errormsg() );
1475                 }
1476                 return $res;
1477         }
1478
1479         /**
1480          * Prepare & execute an SQL statement, quoting and inserting arguments
1481          * in the appropriate places.
1482          * @param $query String
1483          * @param $args ...
1484          */
1485         public function safeQuery( $query, $args = null ) {
1486                 // copied verbatim from Database.php
1487                 $prepared = $this->prepare( $query, 'DB2::safeQuery' );
1488                 if( !is_array( $args ) ) {
1489                         # Pull the var args
1490                         $args = func_get_args();
1491                         array_shift( $args );
1492                 }
1493                 $retval = $this->execute( $prepared, $args );
1494                 $this->freePrepared( $prepared );
1495                 return $retval;
1496         }
1497
1498         /**
1499          * For faking prepared SQL statements on DBs that don't support
1500          * it directly.
1501          * @param $preparedQuery String: a 'preparable' SQL statement
1502          * @param $args Array of arguments to fill it with
1503          * @return String: executable statement
1504          */
1505         public function fillPrepared( $preparedQuery, $args ) {
1506                 reset( $args );
1507                 $this->preparedArgs =& $args;
1508
1509                 foreach ( $args as $i => $arg ) {
1510                         db2_bind_param( $preparedQuery, $i+1, $args[$i] );
1511                 }
1512
1513                 return $preparedQuery;
1514         }
1515
1516         /**
1517          * Switches module between regular and install modes
1518          */
1519         public function setMode( $mode ) {
1520                 $old = $this->mMode;
1521                 $this->mMode = $mode;
1522                 return $old;
1523         }
1524
1525         /**
1526          * Bitwise negation of a column or value in SQL
1527          * Same as (~field) in C
1528          * @param $field String
1529          * @return String
1530          */
1531         function bitNot( $field ) {
1532                 // expecting bit-fields smaller than 4bytes
1533                 return "BITNOT( $field )";
1534         }
1535
1536         /**
1537          * Bitwise AND of two columns or values in SQL
1538          * Same as (fieldLeft & fieldRight) in C
1539          * @param $fieldLeft String
1540          * @param $fieldRight String
1541          * @return String
1542          */
1543         function bitAnd( $fieldLeft, $fieldRight ) {
1544                 return "BITAND( $fieldLeft, $fieldRight )";
1545         }
1546
1547         /**
1548          * Bitwise OR of two columns or values in SQL
1549          * Same as (fieldLeft | fieldRight) in C
1550          * @param $fieldLeft String
1551          * @param $fieldRight String
1552          * @return String
1553          */
1554         function bitOr( $fieldLeft, $fieldRight ) {
1555                 return "BITOR( $fieldLeft, $fieldRight )";
1556         }
1557 }
1558
1559 class IBM_DB2Helper {
1560         public static function makeArray( $maybeArray ) {
1561                 if ( !is_array( $maybeArray ) ) {
1562                         return array( $maybeArray );
1563                 }
1564
1565                 return $maybeArray;
1566         }
1567 }