parser: Validate $length in padleft/padright parser functions
[lhc/web/wiklou.git] / includes / db / DatabaseOracle.php
1 <?php
2 /**
3 * This is the Oracle database abstraction layer.
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 * @ingroup Database
22 */
23
24 use Wikimedia\Rdbms\Database;
25 use Wikimedia\Rdbms\Blob;
26 use Wikimedia\Rdbms\ResultWrapper;
27 use Wikimedia\Rdbms\DBConnectionError;
28 use Wikimedia\Rdbms\DBUnexpectedError;
29
30 /**
31 * @ingroup Database
32 */
33 class DatabaseOracle extends Database {
34 /** @var resource */
35 protected $mLastResult = null;
36
37 /** @var int The number of rows affected as an integer */
38 protected $mAffectedRows;
39
40 /** @var bool */
41 private $ignoreDupValOnIndex = false;
42
43 /** @var bool|array */
44 private $sequenceData = null;
45
46 /** @var string Character set for Oracle database */
47 private $defaultCharset = 'AL32UTF8';
48
49 /** @var array */
50 private $mFieldInfoCache = [];
51
52 function __construct( array $p ) {
53 global $wgDBprefix;
54
55 if ( $p['tablePrefix'] == 'get from global' ) {
56 $p['tablePrefix'] = $wgDBprefix;
57 }
58 $p['tablePrefix'] = strtoupper( $p['tablePrefix'] );
59 parent::__construct( $p );
60 Hooks::run( 'DatabaseOraclePostInit', [ $this ] );
61 }
62
63 function __destruct() {
64 if ( $this->opened ) {
65 Wikimedia\suppressWarnings();
66 $this->close();
67 Wikimedia\restoreWarnings();
68 }
69 }
70
71 function getType() {
72 return 'oracle';
73 }
74
75 function implicitGroupby() {
76 return false;
77 }
78
79 function implicitOrderby() {
80 return false;
81 }
82
83 /**
84 * Usually aborts on failure
85 * @param string $server
86 * @param string $user
87 * @param string $password
88 * @param string $dbName
89 * @throws DBConnectionError
90 * @return resource|null
91 */
92 function open( $server, $user, $password, $dbName ) {
93 global $wgDBOracleDRCP;
94 if ( !function_exists( 'oci_connect' ) ) {
95 throw new DBConnectionError(
96 $this,
97 "Oracle functions missing, have you compiled PHP with the --with-oci8 option?\n " .
98 "(Note: if you recently installed PHP, you may need to restart your webserver\n " .
99 "and database)\n" );
100 }
101
102 $this->close();
103 $this->user = $user;
104 $this->password = $password;
105 // changed internal variables functions
106 // mServer now holds the TNS endpoint
107 // mDBname is schema name if different from username
108 if ( !$server ) {
109 // backward compatibillity (server used to be null and TNS was supplied in dbname)
110 $this->server = $dbName;
111 $this->dbName = $user;
112 } else {
113 $this->server = $server;
114 if ( !$dbName ) {
115 $this->dbName = $user;
116 } else {
117 $this->dbName = $dbName;
118 }
119 }
120
121 if ( !strlen( $user ) ) { # e.g. the class is being loaded
122 return null;
123 }
124
125 if ( $wgDBOracleDRCP ) {
126 $this->setFlag( DBO_PERSISTENT );
127 }
128
129 $session_mode = $this->flags & DBO_SYSDBA ? OCI_SYSDBA : OCI_DEFAULT;
130
131 Wikimedia\suppressWarnings();
132 if ( $this->flags & DBO_PERSISTENT ) {
133 $this->conn = oci_pconnect(
134 $this->user,
135 $this->password,
136 $this->server,
137 $this->defaultCharset,
138 $session_mode
139 );
140 } elseif ( $this->flags & DBO_DEFAULT ) {
141 $this->conn = oci_new_connect(
142 $this->user,
143 $this->password,
144 $this->server,
145 $this->defaultCharset,
146 $session_mode
147 );
148 } else {
149 $this->conn = oci_connect(
150 $this->user,
151 $this->password,
152 $this->server,
153 $this->defaultCharset,
154 $session_mode
155 );
156 }
157 Wikimedia\restoreWarnings();
158
159 if ( $this->user != $this->dbName ) {
160 // change current schema in session
161 $this->selectDB( $this->dbName );
162 }
163
164 if ( !$this->conn ) {
165 throw new DBConnectionError( $this, $this->lastError() );
166 }
167
168 $this->opened = true;
169
170 # removed putenv calls because they interfere with the system globaly
171 $this->doQuery( 'ALTER SESSION SET NLS_TIMESTAMP_FORMAT=\'DD-MM-YYYY HH24:MI:SS.FF6\'' );
172 $this->doQuery( 'ALTER SESSION SET NLS_TIMESTAMP_TZ_FORMAT=\'DD-MM-YYYY HH24:MI:SS.FF6\'' );
173 $this->doQuery( 'ALTER SESSION SET NLS_NUMERIC_CHARACTERS=\'.,\'' );
174
175 return $this->conn;
176 }
177
178 /**
179 * Closes a database connection, if it is open
180 * Returns success, true if already closed
181 * @return bool
182 */
183 protected function closeConnection() {
184 return oci_close( $this->conn );
185 }
186
187 function execFlags() {
188 return $this->trxLevel ? OCI_NO_AUTO_COMMIT : OCI_COMMIT_ON_SUCCESS;
189 }
190
191 protected function doQuery( $sql ) {
192 wfDebug( "SQL: [$sql]\n" );
193 if ( !StringUtils::isUtf8( $sql ) ) {
194 throw new InvalidArgumentException( "SQL encoding is invalid\n$sql" );
195 }
196
197 // handle some oracle specifics
198 // remove AS column/table/subquery namings
199 if ( !$this->getFlag( DBO_DDLMODE ) ) {
200 $sql = preg_replace( '/ as /i', ' ', $sql );
201 }
202
203 // Oracle has issues with UNION clause if the statement includes LOB fields
204 // So we do a UNION ALL and then filter the results array with array_unique
205 $union_unique = ( preg_match( '/\/\* UNION_UNIQUE \*\/ /', $sql ) != 0 );
206 // EXPLAIN syntax in Oracle is EXPLAIN PLAN FOR and it return nothing
207 // you have to select data from plan table after explain
208 $explain_id = MWTimestamp::getLocalInstance()->format( 'dmYHis' );
209
210 $sql = preg_replace(
211 '/^EXPLAIN /',
212 'EXPLAIN PLAN SET STATEMENT_ID = \'' . $explain_id . '\' FOR',
213 $sql,
214 1,
215 $explain_count
216 );
217
218 Wikimedia\suppressWarnings();
219
220 $this->mLastResult = $stmt = oci_parse( $this->conn, $sql );
221 if ( $stmt === false ) {
222 $e = oci_error( $this->conn );
223 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
224
225 return false;
226 }
227
228 if ( !oci_execute( $stmt, $this->execFlags() ) ) {
229 $e = oci_error( $stmt );
230 if ( !$this->ignoreDupValOnIndex || $e['code'] != '1' ) {
231 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
232
233 return false;
234 }
235 }
236
237 Wikimedia\restoreWarnings();
238
239 if ( $explain_count > 0 ) {
240 return $this->doQuery( 'SELECT id, cardinality "ROWS" FROM plan_table ' .
241 'WHERE statement_id = \'' . $explain_id . '\'' );
242 } elseif ( oci_statement_type( $stmt ) == 'SELECT' ) {
243 return new ORAResult( $this, $stmt, $union_unique );
244 } else {
245 $this->mAffectedRows = oci_num_rows( $stmt );
246
247 return true;
248 }
249 }
250
251 function queryIgnore( $sql, $fname = '' ) {
252 return $this->query( $sql, $fname, true );
253 }
254
255 /**
256 * Frees resources associated with the LOB descriptor
257 * @param ResultWrapper|ORAResult $res
258 */
259 function freeResult( $res ) {
260 if ( $res instanceof ResultWrapper ) {
261 $res = $res->result;
262 }
263
264 $res->free();
265 }
266
267 /**
268 * @param ResultWrapper|ORAResult $res
269 * @return mixed
270 */
271 function fetchObject( $res ) {
272 if ( $res instanceof ResultWrapper ) {
273 $res = $res->result;
274 }
275
276 return $res->fetchObject();
277 }
278
279 /**
280 * @param ResultWrapper|ORAResult $res
281 * @return mixed
282 */
283 function fetchRow( $res ) {
284 if ( $res instanceof ResultWrapper ) {
285 $res = $res->result;
286 }
287
288 return $res->fetchRow();
289 }
290
291 /**
292 * @param ResultWrapper|ORAResult $res
293 * @return int
294 */
295 function numRows( $res ) {
296 if ( $res instanceof ResultWrapper ) {
297 $res = $res->result;
298 }
299
300 return $res->numRows();
301 }
302
303 /**
304 * @param ResultWrapper|ORAResult $res
305 * @return int
306 */
307 function numFields( $res ) {
308 if ( $res instanceof ResultWrapper ) {
309 $res = $res->result;
310 }
311
312 return $res->numFields();
313 }
314
315 function fieldName( $stmt, $n ) {
316 return oci_field_name( $stmt, $n );
317 }
318
319 function insertId() {
320 $res = $this->query( "SELECT lastval_pkg.getLastval FROM dual" );
321 $row = $this->fetchRow( $res );
322 return is_null( $row[0] ) ? null : (int)$row[0];
323 }
324
325 /**
326 * @param mixed $res
327 * @param int $row
328 */
329 function dataSeek( $res, $row ) {
330 if ( $res instanceof ORAResult ) {
331 $res->seek( $row );
332 } else {
333 $res->result->seek( $row );
334 }
335 }
336
337 function lastError() {
338 if ( $this->conn === false ) {
339 $e = oci_error();
340 } else {
341 $e = oci_error( $this->conn );
342 }
343
344 return $e['message'];
345 }
346
347 function lastErrno() {
348 if ( $this->conn === false ) {
349 $e = oci_error();
350 } else {
351 $e = oci_error( $this->conn );
352 }
353
354 return $e['code'];
355 }
356
357 protected function fetchAffectedRowCount() {
358 return $this->mAffectedRows;
359 }
360
361 /**
362 * Returns information about an index
363 * If errors are explicitly ignored, returns NULL on failure
364 * @param string $table
365 * @param string $index
366 * @param string $fname
367 * @return bool
368 */
369 function indexInfo( $table, $index, $fname = __METHOD__ ) {
370 return false;
371 }
372
373 function indexUnique( $table, $index, $fname = __METHOD__ ) {
374 return false;
375 }
376
377 function insert( $table, $a, $fname = __METHOD__, $options = [] ) {
378 if ( !count( $a ) ) {
379 return true;
380 }
381
382 if ( !is_array( $options ) ) {
383 $options = [ $options ];
384 }
385
386 if ( in_array( 'IGNORE', $options ) ) {
387 $this->ignoreDupValOnIndex = true;
388 }
389
390 if ( !is_array( reset( $a ) ) ) {
391 $a = [ $a ];
392 }
393
394 foreach ( $a as &$row ) {
395 $this->insertOneRow( $table, $row, $fname );
396 }
397 $retVal = true;
398
399 if ( in_array( 'IGNORE', $options ) ) {
400 $this->ignoreDupValOnIndex = false;
401 }
402
403 return $retVal;
404 }
405
406 private function fieldBindStatement( $table, $col, &$val, $includeCol = false ) {
407 $col_info = $this->fieldInfoMulti( $table, $col );
408 $col_type = $col_info != false ? $col_info->type() : 'CONSTANT';
409
410 $bind = '';
411 if ( is_numeric( $col ) ) {
412 $bind = $val;
413 $val = null;
414
415 return $bind;
416 } elseif ( $includeCol ) {
417 $bind = "$col = ";
418 }
419
420 if ( $val == '' && $val !== 0 && $col_type != 'BLOB' && $col_type != 'CLOB' ) {
421 $val = null;
422 }
423
424 if ( $val === 'NULL' ) {
425 $val = null;
426 }
427
428 if ( $val === null ) {
429 if ( $col_info != false && $col_info->isNullable() == 0 && $col_info->defaultValue() != null ) {
430 $bind .= 'DEFAULT';
431 } else {
432 $bind .= 'NULL';
433 }
434 } else {
435 $bind .= ':' . $col;
436 }
437
438 return $bind;
439 }
440
441 /**
442 * @param string $table
443 * @param array $row
444 * @param string $fname
445 * @return bool
446 * @throws DBUnexpectedError
447 */
448 private function insertOneRow( $table, $row, $fname ) {
449 global $wgContLang;
450
451 $table = $this->tableName( $table );
452 // "INSERT INTO tables (a, b, c)"
453 $sql = "INSERT INTO " . $table . " (" . implode( ',', array_keys( $row ) ) . ')';
454 $sql .= " VALUES (";
455
456 // for each value, append ":key"
457 $first = true;
458 foreach ( $row as $col => &$val ) {
459 if ( !$first ) {
460 $sql .= ', ';
461 } else {
462 $first = false;
463 }
464 if ( $this->isQuotedIdentifier( $val ) ) {
465 $sql .= $this->removeIdentifierQuotes( $val );
466 unset( $row[$col] );
467 } else {
468 $sql .= $this->fieldBindStatement( $table, $col, $val );
469 }
470 }
471 $sql .= ')';
472
473 $this->mLastResult = $stmt = oci_parse( $this->conn, $sql );
474 if ( $stmt === false ) {
475 $e = oci_error( $this->conn );
476 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
477
478 return false;
479 }
480 foreach ( $row as $col => &$val ) {
481 $col_info = $this->fieldInfoMulti( $table, $col );
482 $col_type = $col_info != false ? $col_info->type() : 'CONSTANT';
483
484 if ( $val === null ) {
485 // do nothing ... null was inserted in statement creation
486 } elseif ( $col_type != 'BLOB' && $col_type != 'CLOB' ) {
487 if ( is_object( $val ) ) {
488 $val = $val->fetch();
489 }
490
491 // backward compatibility
492 if ( preg_match( '/^timestamp.*/i', $col_type ) == 1 && strtolower( $val ) == 'infinity' ) {
493 $val = $this->getInfinity();
494 }
495
496 $val = ( $wgContLang != null ) ? $wgContLang->checkTitleEncoding( $val ) : $val;
497 if ( oci_bind_by_name( $stmt, ":$col", $val, -1, SQLT_CHR ) === false ) {
498 $e = oci_error( $stmt );
499 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
500
501 return false;
502 }
503 } else {
504 /** @var OCI_Lob[] $lob */
505 $lob[$col] = oci_new_descriptor( $this->conn, OCI_D_LOB );
506 if ( $lob[$col] === false ) {
507 $e = oci_error( $stmt );
508 throw new DBUnexpectedError( $this, "Cannot create LOB descriptor: " . $e['message'] );
509 }
510
511 if ( is_object( $val ) ) {
512 $val = $val->fetch();
513 }
514
515 if ( $col_type == 'BLOB' ) {
516 $lob[$col]->writeTemporary( $val, OCI_TEMP_BLOB );
517 oci_bind_by_name( $stmt, ":$col", $lob[$col], -1, OCI_B_BLOB );
518 } else {
519 $lob[$col]->writeTemporary( $val, OCI_TEMP_CLOB );
520 oci_bind_by_name( $stmt, ":$col", $lob[$col], -1, OCI_B_CLOB );
521 }
522 }
523 }
524
525 Wikimedia\suppressWarnings();
526
527 if ( oci_execute( $stmt, $this->execFlags() ) === false ) {
528 $e = oci_error( $stmt );
529 if ( !$this->ignoreDupValOnIndex || $e['code'] != '1' ) {
530 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
531
532 return false;
533 } else {
534 $this->mAffectedRows = oci_num_rows( $stmt );
535 }
536 } else {
537 $this->mAffectedRows = oci_num_rows( $stmt );
538 }
539
540 Wikimedia\restoreWarnings();
541
542 if ( isset( $lob ) ) {
543 foreach ( $lob as $lob_v ) {
544 $lob_v->free();
545 }
546 }
547
548 if ( !$this->trxLevel ) {
549 oci_commit( $this->conn );
550 }
551
552 return oci_free_statement( $stmt );
553 }
554
555 function nativeInsertSelect( $destTable, $srcTable, $varMap, $conds, $fname = __METHOD__,
556 $insertOptions = [], $selectOptions = [], $selectJoinConds = []
557 ) {
558 $destTable = $this->tableName( $destTable );
559
560 $sequenceData = $this->getSequenceData( $destTable );
561 if ( $sequenceData !== false &&
562 !isset( $varMap[$sequenceData['column']] )
563 ) {
564 $varMap[$sequenceData['column']] = 'GET_SEQUENCE_VALUE(\'' . $sequenceData['sequence'] . '\')';
565 }
566
567 // count-alias subselect fields to avoid abigious definition errors
568 $i = 0;
569 foreach ( $varMap as &$val ) {
570 $val = $val . ' field' . ( $i++ );
571 }
572
573 $selectSql = $this->selectSQLText(
574 $srcTable,
575 array_values( $varMap ),
576 $conds,
577 $fname,
578 $selectOptions,
579 $selectJoinConds
580 );
581
582 $sql = "INSERT INTO $destTable (" . implode( ',', array_keys( $varMap ) ) . ') ' . $selectSql;
583
584 if ( in_array( 'IGNORE', $insertOptions ) ) {
585 $this->ignoreDupValOnIndex = true;
586 }
587
588 $retval = $this->query( $sql, $fname );
589
590 if ( in_array( 'IGNORE', $insertOptions ) ) {
591 $this->ignoreDupValOnIndex = false;
592 }
593
594 return $retval;
595 }
596
597 public function upsert( $table, array $rows, array $uniqueIndexes, array $set,
598 $fname = __METHOD__
599 ) {
600 if ( !count( $rows ) ) {
601 return true; // nothing to do
602 }
603
604 if ( !is_array( reset( $rows ) ) ) {
605 $rows = [ $rows ];
606 }
607
608 $sequenceData = $this->getSequenceData( $table );
609 if ( $sequenceData !== false ) {
610 // add sequence column to each list of columns, when not set
611 foreach ( $rows as &$row ) {
612 if ( !isset( $row[$sequenceData['column']] ) ) {
613 $row[$sequenceData['column']] =
614 $this->addIdentifierQuotes( 'GET_SEQUENCE_VALUE(\'' .
615 $sequenceData['sequence'] . '\')' );
616 }
617 }
618 }
619
620 return parent::upsert( $table, $rows, $uniqueIndexes, $set, $fname );
621 }
622
623 function tableName( $name, $format = 'quoted' ) {
624 /*
625 Replace reserved words with better ones
626 Using uppercase because that's the only way Oracle can handle
627 quoted tablenames
628 */
629 switch ( $name ) {
630 case 'user':
631 $name = 'MWUSER';
632 break;
633 case 'text':
634 $name = 'PAGECONTENT';
635 break;
636 }
637
638 return strtoupper( parent::tableName( $name, $format ) );
639 }
640
641 function tableNameInternal( $name ) {
642 $name = $this->tableName( $name );
643
644 return preg_replace( '/.*\.(.*)/', '$1', $name );
645 }
646
647 /**
648 * Return sequence_name if table has a sequence
649 *
650 * @param string $table
651 * @return bool
652 */
653 private function getSequenceData( $table ) {
654 if ( $this->sequenceData == null ) {
655 $result = $this->doQuery( "SELECT lower(asq.sequence_name),
656 lower(atc.table_name),
657 lower(atc.column_name)
658 FROM all_sequences asq, all_tab_columns atc
659 WHERE decode(
660 atc.table_name,
661 '{$this->tablePrefix}MWUSER',
662 '{$this->tablePrefix}USER',
663 atc.table_name
664 ) || '_' ||
665 atc.column_name || '_SEQ' = '{$this->tablePrefix}' || asq.sequence_name
666 AND asq.sequence_owner = upper('{$this->dbName}')
667 AND atc.owner = upper('{$this->dbName}')" );
668
669 while ( ( $row = $result->fetchRow() ) !== false ) {
670 $this->sequenceData[$row[1]] = [
671 'sequence' => $row[0],
672 'column' => $row[2]
673 ];
674 }
675 }
676 $table = strtolower( $this->removeIdentifierQuotes( $this->tableName( $table ) ) );
677
678 return ( isset( $this->sequenceData[$table] ) ) ? $this->sequenceData[$table] : false;
679 }
680
681 /**
682 * Returns the size of a text field, or -1 for "unlimited"
683 *
684 * @param string $table
685 * @param string $field
686 * @return mixed
687 */
688 function textFieldSize( $table, $field ) {
689 $fieldInfoData = $this->fieldInfo( $table, $field );
690
691 return $fieldInfoData->maxLength();
692 }
693
694 function limitResult( $sql, $limit, $offset = false ) {
695 if ( $offset === false ) {
696 $offset = 0;
697 }
698
699 return "SELECT * FROM ($sql) WHERE rownum >= (1 + $offset) AND rownum < (1 + $limit + $offset)";
700 }
701
702 function encodeBlob( $b ) {
703 return new Blob( $b );
704 }
705
706 function decodeBlob( $b ) {
707 if ( $b instanceof Blob ) {
708 $b = $b->fetch();
709 }
710
711 return $b;
712 }
713
714 function unionQueries( $sqls, $all ) {
715 $glue = ' UNION ALL ';
716
717 return 'SELECT * ' . ( $all ? '' : '/* UNION_UNIQUE */ ' ) .
718 'FROM (' . implode( $glue, $sqls ) . ')';
719 }
720
721 function wasDeadlock() {
722 return $this->lastErrno() == 'OCI-00060';
723 }
724
725 function duplicateTableStructure( $oldName, $newName, $temporary = false,
726 $fname = __METHOD__
727 ) {
728 $temporary = $temporary ? 'TRUE' : 'FALSE';
729
730 $newName = strtoupper( $newName );
731 $oldName = strtoupper( $oldName );
732
733 $tabName = substr( $newName, strlen( $this->tablePrefix ) );
734 $oldPrefix = substr( $oldName, 0, strlen( $oldName ) - strlen( $tabName ) );
735 $newPrefix = strtoupper( $this->tablePrefix );
736
737 return $this->doQuery( "BEGIN DUPLICATE_TABLE( '$tabName', " .
738 "'$oldPrefix', '$newPrefix', $temporary ); END;" );
739 }
740
741 function listTables( $prefix = null, $fname = __METHOD__ ) {
742 $listWhere = '';
743 if ( !empty( $prefix ) ) {
744 $listWhere = ' AND table_name LIKE \'' . strtoupper( $prefix ) . '%\'';
745 }
746
747 $owner = strtoupper( $this->dbName );
748 $result = $this->doQuery( "SELECT table_name FROM all_tables " .
749 "WHERE owner='$owner' AND table_name NOT LIKE '%!_IDX\$_' ESCAPE '!' $listWhere" );
750
751 // dirty code ... i know
752 $endArray = [];
753 $endArray[] = strtoupper( $prefix . 'MWUSER' );
754 $endArray[] = strtoupper( $prefix . 'PAGE' );
755 $endArray[] = strtoupper( $prefix . 'IMAGE' );
756 $fixedOrderTabs = $endArray;
757 while ( ( $row = $result->fetchRow() ) !== false ) {
758 if ( !in_array( $row['table_name'], $fixedOrderTabs ) ) {
759 $endArray[] = $row['table_name'];
760 }
761 }
762
763 return $endArray;
764 }
765
766 public function dropTable( $tableName, $fName = __METHOD__ ) {
767 $tableName = $this->tableName( $tableName );
768 if ( !$this->tableExists( $tableName ) ) {
769 return false;
770 }
771
772 return $this->doQuery( "DROP TABLE $tableName CASCADE CONSTRAINTS PURGE" );
773 }
774
775 function timestamp( $ts = 0 ) {
776 return wfTimestamp( TS_ORACLE, $ts );
777 }
778
779 /**
780 * Return aggregated value function call
781 *
782 * @param array $valuedata
783 * @param string $valuename
784 * @return mixed
785 */
786 public function aggregateValue( $valuedata, $valuename = 'value' ) {
787 return $valuedata;
788 }
789
790 /**
791 * @return string Wikitext of a link to the server software's web site
792 */
793 public function getSoftwareLink() {
794 return '[{{int:version-db-oracle-url}} Oracle]';
795 }
796
797 /**
798 * @return string Version information from the database
799 */
800 function getServerVersion() {
801 // better version number, fallback on driver
802 $rset = $this->doQuery(
803 'SELECT version FROM product_component_version ' .
804 'WHERE UPPER(product) LIKE \'ORACLE DATABASE%\''
805 );
806 $row = $rset->fetchRow();
807 if ( !$row ) {
808 return oci_server_version( $this->conn );
809 }
810
811 return $row['version'];
812 }
813
814 /**
815 * Query whether a given index exists
816 * @param string $table
817 * @param string $index
818 * @param string $fname
819 * @return bool
820 */
821 function indexExists( $table, $index, $fname = __METHOD__ ) {
822 $table = $this->tableName( $table );
823 $table = strtoupper( $this->removeIdentifierQuotes( $table ) );
824 $index = strtoupper( $index );
825 $owner = strtoupper( $this->dbName );
826 $sql = "SELECT 1 FROM all_indexes WHERE owner='$owner' AND index_name='{$table}_{$index}'";
827 $res = $this->doQuery( $sql );
828 if ( $res ) {
829 $count = $res->numRows();
830 $res->free();
831 } else {
832 $count = 0;
833 }
834
835 return $count != 0;
836 }
837
838 /**
839 * Query whether a given table exists (in the given schema, or the default mw one if not given)
840 * @param string $table
841 * @param string $fname
842 * @return bool
843 */
844 function tableExists( $table, $fname = __METHOD__ ) {
845 $table = $this->tableName( $table );
846 $table = $this->addQuotes( strtoupper( $this->removeIdentifierQuotes( $table ) ) );
847 $owner = $this->addQuotes( strtoupper( $this->dbName ) );
848 $sql = "SELECT 1 FROM all_tables WHERE owner=$owner AND table_name=$table";
849 $res = $this->doQuery( $sql );
850 if ( $res && $res->numRows() > 0 ) {
851 $exists = true;
852 } else {
853 $exists = false;
854 }
855
856 $res->free();
857
858 return $exists;
859 }
860
861 /**
862 * Function translates mysql_fetch_field() functionality on ORACLE.
863 * Caching is present for reducing query time.
864 * For internal calls. Use fieldInfo for normal usage.
865 * Returns false if the field doesn't exist
866 *
867 * @param array|string $table
868 * @param string $field
869 * @return ORAField|ORAResult|false
870 */
871 private function fieldInfoMulti( $table, $field ) {
872 $field = strtoupper( $field );
873 if ( is_array( $table ) ) {
874 $table = array_map( [ $this, 'tableNameInternal' ], $table );
875 $tableWhere = 'IN (';
876 foreach ( $table as &$singleTable ) {
877 $singleTable = $this->removeIdentifierQuotes( $singleTable );
878 if ( isset( $this->mFieldInfoCache["$singleTable.$field"] ) ) {
879 return $this->mFieldInfoCache["$singleTable.$field"];
880 }
881 $tableWhere .= '\'' . $singleTable . '\',';
882 }
883 $tableWhere = rtrim( $tableWhere, ',' ) . ')';
884 } else {
885 $table = $this->removeIdentifierQuotes( $this->tableNameInternal( $table ) );
886 if ( isset( $this->mFieldInfoCache["$table.$field"] ) ) {
887 return $this->mFieldInfoCache["$table.$field"];
888 }
889 $tableWhere = '= \'' . $table . '\'';
890 }
891
892 $fieldInfoStmt = oci_parse(
893 $this->conn,
894 'SELECT * FROM wiki_field_info_full WHERE table_name ' .
895 $tableWhere . ' and column_name = \'' . $field . '\''
896 );
897 if ( oci_execute( $fieldInfoStmt, $this->execFlags() ) === false ) {
898 $e = oci_error( $fieldInfoStmt );
899 $this->reportQueryError( $e['message'], $e['code'], 'fieldInfo QUERY', __METHOD__ );
900
901 return false;
902 }
903 $res = new ORAResult( $this, $fieldInfoStmt );
904 if ( $res->numRows() == 0 ) {
905 if ( is_array( $table ) ) {
906 foreach ( $table as &$singleTable ) {
907 $this->mFieldInfoCache["$singleTable.$field"] = false;
908 }
909 } else {
910 $this->mFieldInfoCache["$table.$field"] = false;
911 }
912 $fieldInfoTemp = null;
913 } else {
914 $fieldInfoTemp = new ORAField( $res->fetchRow() );
915 $table = $fieldInfoTemp->tableName();
916 $this->mFieldInfoCache["$table.$field"] = $fieldInfoTemp;
917 }
918 $res->free();
919
920 return $fieldInfoTemp;
921 }
922
923 /**
924 * @throws DBUnexpectedError
925 * @param string $table
926 * @param string $field
927 * @return ORAField
928 */
929 function fieldInfo( $table, $field ) {
930 if ( is_array( $table ) ) {
931 throw new DBUnexpectedError( $this, 'DatabaseOracle::fieldInfo called with table array!' );
932 }
933
934 return $this->fieldInfoMulti( $table, $field );
935 }
936
937 protected function doBegin( $fname = __METHOD__ ) {
938 $this->trxLevel = 1;
939 $this->doQuery( 'SET CONSTRAINTS ALL DEFERRED' );
940 }
941
942 protected function doCommit( $fname = __METHOD__ ) {
943 if ( $this->trxLevel ) {
944 $ret = oci_commit( $this->conn );
945 if ( !$ret ) {
946 throw new DBUnexpectedError( $this, $this->lastError() );
947 }
948 $this->trxLevel = 0;
949 $this->doQuery( 'SET CONSTRAINTS ALL IMMEDIATE' );
950 }
951 }
952
953 protected function doRollback( $fname = __METHOD__ ) {
954 if ( $this->trxLevel ) {
955 oci_rollback( $this->conn );
956 $this->trxLevel = 0;
957 $this->doQuery( 'SET CONSTRAINTS ALL IMMEDIATE' );
958 }
959 }
960
961 function sourceStream(
962 $fp,
963 callable $lineCallback = null,
964 callable $resultCallback = null,
965 $fname = __METHOD__, callable $inputCallback = null
966 ) {
967 $cmd = '';
968 $done = false;
969 $dollarquote = false;
970
971 $replacements = [];
972 // Defines must comply with ^define\s*([^\s=]*)\s*=\s?'\{\$([^\}]*)\}';
973 while ( !feof( $fp ) ) {
974 if ( $lineCallback ) {
975 call_user_func( $lineCallback );
976 }
977 $line = trim( fgets( $fp, 1024 ) );
978 $sl = strlen( $line ) - 1;
979
980 if ( $sl < 0 ) {
981 continue;
982 }
983 if ( '-' == $line[0] && '-' == $line[1] ) {
984 continue;
985 }
986
987 // Allow dollar quoting for function declarations
988 if ( substr( $line, 0, 8 ) == '/*$mw$*/' ) {
989 if ( $dollarquote ) {
990 $dollarquote = false;
991 $line = str_replace( '/*$mw$*/', '', $line ); // remove dollarquotes
992 $done = true;
993 } else {
994 $dollarquote = true;
995 }
996 } elseif ( !$dollarquote ) {
997 if ( ';' == $line[$sl] && ( $sl < 2 || ';' != $line[$sl - 1] ) ) {
998 $done = true;
999 $line = substr( $line, 0, $sl );
1000 }
1001 }
1002
1003 if ( $cmd != '' ) {
1004 $cmd .= ' ';
1005 }
1006 $cmd .= "$line\n";
1007
1008 if ( $done ) {
1009 $cmd = str_replace( ';;', ";", $cmd );
1010 if ( strtolower( substr( $cmd, 0, 6 ) ) == 'define' ) {
1011 if ( preg_match( '/^define\s*([^\s=]*)\s*=\s*\'\{\$([^\}]*)\}\'/', $cmd, $defines ) ) {
1012 $replacements[$defines[2]] = $defines[1];
1013 }
1014 } else {
1015 foreach ( $replacements as $mwVar => $scVar ) {
1016 $cmd = str_replace( '&' . $scVar . '.', '`{$' . $mwVar . '}`', $cmd );
1017 }
1018
1019 $cmd = $this->replaceVars( $cmd );
1020 if ( $inputCallback ) {
1021 call_user_func( $inputCallback, $cmd );
1022 }
1023 $res = $this->doQuery( $cmd );
1024 if ( $resultCallback ) {
1025 call_user_func( $resultCallback, $res, $this );
1026 }
1027
1028 if ( false === $res ) {
1029 $err = $this->lastError();
1030
1031 return "Query \"{$cmd}\" failed with error code \"$err\".\n";
1032 }
1033 }
1034
1035 $cmd = '';
1036 $done = false;
1037 }
1038 }
1039
1040 return true;
1041 }
1042
1043 function selectDB( $db ) {
1044 $this->dbName = $db;
1045 if ( $db == null || $db == $this->user ) {
1046 return true;
1047 }
1048 $sql = 'ALTER SESSION SET CURRENT_SCHEMA=' . strtoupper( $db );
1049 $stmt = oci_parse( $this->conn, $sql );
1050 Wikimedia\suppressWarnings();
1051 $success = oci_execute( $stmt );
1052 Wikimedia\restoreWarnings();
1053 if ( !$success ) {
1054 $e = oci_error( $stmt );
1055 if ( $e['code'] != '1435' ) {
1056 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
1057 }
1058
1059 return false;
1060 }
1061
1062 return true;
1063 }
1064
1065 function strencode( $s ) {
1066 return str_replace( "'", "''", $s );
1067 }
1068
1069 function addQuotes( $s ) {
1070 global $wgContLang;
1071 if ( isset( $wgContLang->mLoaded ) && $wgContLang->mLoaded ) {
1072 $s = $wgContLang->checkTitleEncoding( $s );
1073 }
1074
1075 return "'" . $this->strencode( $s ) . "'";
1076 }
1077
1078 public function addIdentifierQuotes( $s ) {
1079 if ( !$this->getFlag( DBO_DDLMODE ) ) {
1080 $s = '/*Q*/' . $s;
1081 }
1082
1083 return $s;
1084 }
1085
1086 public function removeIdentifierQuotes( $s ) {
1087 return strpos( $s, '/*Q*/' ) === false ? $s : substr( $s, 5 );
1088 }
1089
1090 public function isQuotedIdentifier( $s ) {
1091 return strpos( $s, '/*Q*/' ) !== false;
1092 }
1093
1094 private function wrapFieldForWhere( $table, &$col, &$val ) {
1095 global $wgContLang;
1096
1097 $col_info = $this->fieldInfoMulti( $table, $col );
1098 $col_type = $col_info != false ? $col_info->type() : 'CONSTANT';
1099 if ( $col_type == 'CLOB' ) {
1100 $col = 'TO_CHAR(' . $col . ')';
1101 $val = $wgContLang->checkTitleEncoding( $val );
1102 } elseif ( $col_type == 'VARCHAR2' ) {
1103 $val = $wgContLang->checkTitleEncoding( $val );
1104 }
1105 }
1106
1107 private function wrapConditionsForWhere( $table, $conds, $parentCol = null ) {
1108 $conds2 = [];
1109 foreach ( $conds as $col => $val ) {
1110 if ( is_array( $val ) ) {
1111 $conds2[$col] = $this->wrapConditionsForWhere( $table, $val, $col );
1112 } else {
1113 if ( is_numeric( $col ) && $parentCol != null ) {
1114 $this->wrapFieldForWhere( $table, $parentCol, $val );
1115 } else {
1116 $this->wrapFieldForWhere( $table, $col, $val );
1117 }
1118 $conds2[$col] = $val;
1119 }
1120 }
1121
1122 return $conds2;
1123 }
1124
1125 function selectRow( $table, $vars, $conds, $fname = __METHOD__,
1126 $options = [], $join_conds = []
1127 ) {
1128 if ( is_array( $conds ) ) {
1129 $conds = $this->wrapConditionsForWhere( $table, $conds );
1130 }
1131
1132 return parent::selectRow( $table, $vars, $conds, $fname, $options, $join_conds );
1133 }
1134
1135 /**
1136 * Returns an optional USE INDEX clause to go after the table, and a
1137 * string to go at the end of the query
1138 *
1139 * @param array $options An associative array of options to be turned into
1140 * an SQL query, valid keys are listed in the function.
1141 * @return array
1142 */
1143 function makeSelectOptions( $options ) {
1144 $preLimitTail = $postLimitTail = '';
1145 $startOpts = '';
1146
1147 $noKeyOptions = [];
1148 foreach ( $options as $key => $option ) {
1149 if ( is_numeric( $key ) ) {
1150 $noKeyOptions[$option] = true;
1151 }
1152 }
1153
1154 $preLimitTail .= $this->makeGroupByWithHaving( $options );
1155
1156 $preLimitTail .= $this->makeOrderBy( $options );
1157
1158 if ( isset( $noKeyOptions['FOR UPDATE'] ) ) {
1159 $postLimitTail .= ' FOR UPDATE';
1160 }
1161
1162 if ( isset( $noKeyOptions['DISTINCT'] ) || isset( $noKeyOptions['DISTINCTROW'] ) ) {
1163 $startOpts .= 'DISTINCT';
1164 }
1165
1166 if ( isset( $options['USE INDEX'] ) && !is_array( $options['USE INDEX'] ) ) {
1167 $useIndex = $this->useIndexClause( $options['USE INDEX'] );
1168 } else {
1169 $useIndex = '';
1170 }
1171
1172 if ( isset( $options['IGNORE INDEX'] ) && !is_array( $options['IGNORE INDEX'] ) ) {
1173 $ignoreIndex = $this->ignoreIndexClause( $options['IGNORE INDEX'] );
1174 } else {
1175 $ignoreIndex = '';
1176 }
1177
1178 return [ $startOpts, $useIndex, $preLimitTail, $postLimitTail, $ignoreIndex ];
1179 }
1180
1181 public function delete( $table, $conds, $fname = __METHOD__ ) {
1182 global $wgActorTableSchemaMigrationStage;
1183
1184 if ( is_array( $conds ) ) {
1185 $conds = $this->wrapConditionsForWhere( $table, $conds );
1186 }
1187 // a hack for deleting pages, users and images (which have non-nullable FKs)
1188 // all deletions on these tables have transactions so final failure rollbacks these updates
1189 // @todo: Normalize the schema to match MySQL, no special FKs and such
1190 $table = $this->tableName( $table );
1191 if ( $table == $this->tableName( 'user' ) && $wgActorTableSchemaMigrationStage < MIGRATION_NEW ) {
1192 $this->update( 'archive', [ 'ar_user' => 0 ],
1193 [ 'ar_user' => $conds['user_id'] ], $fname );
1194 $this->update( 'ipblocks', [ 'ipb_user' => 0 ],
1195 [ 'ipb_user' => $conds['user_id'] ], $fname );
1196 $this->update( 'image', [ 'img_user' => 0 ],
1197 [ 'img_user' => $conds['user_id'] ], $fname );
1198 $this->update( 'oldimage', [ 'oi_user' => 0 ],
1199 [ 'oi_user' => $conds['user_id'] ], $fname );
1200 $this->update( 'filearchive', [ 'fa_deleted_user' => 0 ],
1201 [ 'fa_deleted_user' => $conds['user_id'] ], $fname );
1202 $this->update( 'filearchive', [ 'fa_user' => 0 ],
1203 [ 'fa_user' => $conds['user_id'] ], $fname );
1204 $this->update( 'uploadstash', [ 'us_user' => 0 ],
1205 [ 'us_user' => $conds['user_id'] ], $fname );
1206 $this->update( 'recentchanges', [ 'rc_user' => 0 ],
1207 [ 'rc_user' => $conds['user_id'] ], $fname );
1208 $this->update( 'logging', [ 'log_user' => 0 ],
1209 [ 'log_user' => $conds['user_id'] ], $fname );
1210 } elseif ( $table == $this->tableName( 'image' ) ) {
1211 $this->update( 'oldimage', [ 'oi_name' => 0 ],
1212 [ 'oi_name' => $conds['img_name'] ], $fname );
1213 }
1214
1215 return parent::delete( $table, $conds, $fname );
1216 }
1217
1218 /**
1219 * @param string $table
1220 * @param array $values
1221 * @param array $conds
1222 * @param string $fname
1223 * @param array $options
1224 * @return bool
1225 * @throws DBUnexpectedError
1226 */
1227 function update( $table, $values, $conds, $fname = __METHOD__, $options = [] ) {
1228 global $wgContLang;
1229
1230 $table = $this->tableName( $table );
1231 $opts = $this->makeUpdateOptions( $options );
1232 $sql = "UPDATE $opts $table SET ";
1233
1234 $first = true;
1235 foreach ( $values as $col => &$val ) {
1236 $sqlSet = $this->fieldBindStatement( $table, $col, $val, true );
1237
1238 if ( !$first ) {
1239 $sqlSet = ', ' . $sqlSet;
1240 } else {
1241 $first = false;
1242 }
1243 $sql .= $sqlSet;
1244 }
1245
1246 if ( $conds !== [] && $conds !== '*' ) {
1247 $conds = $this->wrapConditionsForWhere( $table, $conds );
1248 $sql .= ' WHERE ' . $this->makeList( $conds, LIST_AND );
1249 }
1250
1251 $this->mLastResult = $stmt = oci_parse( $this->conn, $sql );
1252 if ( $stmt === false ) {
1253 $e = oci_error( $this->conn );
1254 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
1255
1256 return false;
1257 }
1258 foreach ( $values as $col => &$val ) {
1259 $col_info = $this->fieldInfoMulti( $table, $col );
1260 $col_type = $col_info != false ? $col_info->type() : 'CONSTANT';
1261
1262 if ( $val === null ) {
1263 // do nothing ... null was inserted in statement creation
1264 } elseif ( $col_type != 'BLOB' && $col_type != 'CLOB' ) {
1265 if ( is_object( $val ) ) {
1266 $val = $val->getData();
1267 }
1268
1269 if ( preg_match( '/^timestamp.*/i', $col_type ) == 1 && strtolower( $val ) == 'infinity' ) {
1270 $val = '31-12-2030 12:00:00.000000';
1271 }
1272
1273 $val = ( $wgContLang != null ) ? $wgContLang->checkTitleEncoding( $val ) : $val;
1274 if ( oci_bind_by_name( $stmt, ":$col", $val ) === false ) {
1275 $e = oci_error( $stmt );
1276 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
1277
1278 return false;
1279 }
1280 } else {
1281 /** @var OCI_Lob[] $lob */
1282 $lob[$col] = oci_new_descriptor( $this->conn, OCI_D_LOB );
1283 if ( $lob[$col] === false ) {
1284 $e = oci_error( $stmt );
1285 throw new DBUnexpectedError( $this, "Cannot create LOB descriptor: " . $e['message'] );
1286 }
1287
1288 if ( is_object( $val ) ) {
1289 $val = $val->getData();
1290 }
1291
1292 if ( $col_type == 'BLOB' ) {
1293 $lob[$col]->writeTemporary( $val );
1294 oci_bind_by_name( $stmt, ":$col", $lob[$col], -1, SQLT_BLOB );
1295 } else {
1296 $lob[$col]->writeTemporary( $val );
1297 oci_bind_by_name( $stmt, ":$col", $lob[$col], -1, OCI_B_CLOB );
1298 }
1299 }
1300 }
1301
1302 Wikimedia\suppressWarnings();
1303
1304 if ( oci_execute( $stmt, $this->execFlags() ) === false ) {
1305 $e = oci_error( $stmt );
1306 if ( !$this->ignoreDupValOnIndex || $e['code'] != '1' ) {
1307 $this->reportQueryError( $e['message'], $e['code'], $sql, __METHOD__ );
1308
1309 return false;
1310 } else {
1311 $this->mAffectedRows = oci_num_rows( $stmt );
1312 }
1313 } else {
1314 $this->mAffectedRows = oci_num_rows( $stmt );
1315 }
1316
1317 Wikimedia\restoreWarnings();
1318
1319 if ( isset( $lob ) ) {
1320 foreach ( $lob as $lob_v ) {
1321 $lob_v->free();
1322 }
1323 }
1324
1325 if ( !$this->trxLevel ) {
1326 oci_commit( $this->conn );
1327 }
1328
1329 return oci_free_statement( $stmt );
1330 }
1331
1332 function bitNot( $field ) {
1333 // expecting bit-fields smaller than 4bytes
1334 return 'BITNOT(' . $field . ')';
1335 }
1336
1337 function bitAnd( $fieldLeft, $fieldRight ) {
1338 return 'BITAND(' . $fieldLeft . ', ' . $fieldRight . ')';
1339 }
1340
1341 function bitOr( $fieldLeft, $fieldRight ) {
1342 return 'BITOR(' . $fieldLeft . ', ' . $fieldRight . ')';
1343 }
1344
1345 function getDBname() {
1346 return $this->dbName;
1347 }
1348
1349 function getServer() {
1350 return $this->server;
1351 }
1352
1353 public function buildGroupConcatField(
1354 $delim, $table, $field, $conds = '', $join_conds = []
1355 ) {
1356 $fld = "LISTAGG($field," . $this->addQuotes( $delim ) . ") WITHIN GROUP (ORDER BY $field)";
1357
1358 return '(' . $this->selectSQLText( $table, $fld, $conds, null, [], $join_conds ) . ')';
1359 }
1360
1361 public function buildSubstring( $input, $startPosition, $length = null ) {
1362 $this->assertBuildSubstringParams( $startPosition, $length );
1363 $params = [ $input, $startPosition ];
1364 if ( $length !== null ) {
1365 $params[] = $length;
1366 }
1367 return 'SUBSTR(' . implode( ',', $params ) . ')';
1368 }
1369
1370 /**
1371 * @param string $field Field or column to cast
1372 * @return string
1373 * @since 1.28
1374 */
1375 public function buildStringCast( $field ) {
1376 return 'CAST ( ' . $field . ' AS VARCHAR2 )';
1377 }
1378
1379 public function getInfinity() {
1380 return '31-12-2030 12:00:00.000000';
1381 }
1382 }