rdbms: inject reserved word table name rewrite logic into DatabaseOracle
[lhc/web/wiklou.git] / includes / db / MWLBFactory.php
1 <?php
2 /**
3 * Generator of database load balancing objects.
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 MediaWiki\Logger\LoggerFactory;
25 use Wikimedia\Rdbms\LBFactory;
26 use Wikimedia\Rdbms\DatabaseDomain;
27
28 /**
29 * MediaWiki-specific class for generating database load balancers
30 * @ingroup Database
31 */
32 abstract class MWLBFactory {
33
34 /** @var array Cache of already-logged deprecation messages */
35 private static $loggedDeprecations = [];
36
37 /**
38 * @param array $lbConf Config for LBFactory::__construct()
39 * @param Config $mainConfig Main config object from MediaWikiServices
40 * @param ConfiguredReadOnlyMode $readOnlyMode
41 * @param BagOStuff $srvCace
42 * @param BagOStuff $mainStash
43 * @param WANObjectCache $wanCache
44 * @return array
45 */
46 public static function applyDefaultConfig(
47 array $lbConf,
48 Config $mainConfig,
49 ConfiguredReadOnlyMode $readOnlyMode,
50 BagOStuff $srvCace,
51 BagOStuff $mainStash,
52 WANObjectCache $wanCache
53 ) {
54 global $wgCommandLineMode;
55
56 $typesWithSchema = self::getDbTypesWithSchemas();
57
58 $lbConf += [
59 'localDomain' => new DatabaseDomain(
60 $mainConfig->get( 'DBname' ),
61 $mainConfig->get( 'DBmwschema' ),
62 $mainConfig->get( 'DBprefix' )
63 ),
64 'profiler' => function ( $section ) {
65 return Profiler::instance()->scopedProfileIn( $section );
66 },
67 'trxProfiler' => Profiler::instance()->getTransactionProfiler(),
68 'replLogger' => LoggerFactory::getInstance( 'DBReplication' ),
69 'queryLogger' => LoggerFactory::getInstance( 'DBQuery' ),
70 'connLogger' => LoggerFactory::getInstance( 'DBConnection' ),
71 'perfLogger' => LoggerFactory::getInstance( 'DBPerformance' ),
72 'errorLogger' => [ MWExceptionHandler::class, 'logException' ],
73 'deprecationLogger' => [ static::class, 'logDeprecation' ],
74 'cliMode' => $wgCommandLineMode,
75 'hostname' => wfHostname(),
76 'readOnlyReason' => $readOnlyMode->getReason(),
77 'defaultGroup' => $mainConfig->get( 'DBDefaultGroup' ),
78 ];
79
80 $serversCheck = [];
81 // When making changes here, remember to also specify MediaWiki-specific options
82 // for Database classes in the relevant Installer subclass.
83 // Such as MysqlInstaller::openConnection and PostgresInstaller::openConnectionWithParams.
84 if ( $lbConf['class'] === Wikimedia\Rdbms\LBFactorySimple::class ) {
85 if ( isset( $lbConf['servers'] ) ) {
86 // Server array is already explicitly configured
87 } elseif ( is_array( $mainConfig->get( 'DBservers' ) ) ) {
88 $lbConf['servers'] = [];
89 foreach ( $mainConfig->get( 'DBservers' ) as $i => $server ) {
90 $lbConf['servers'][$i] = self::initServerInfo( $server, $mainConfig );
91 }
92 } else {
93 $server = self::initServerInfo(
94 [
95 'host' => $mainConfig->get( 'DBserver' ),
96 'user' => $mainConfig->get( 'DBuser' ),
97 'password' => $mainConfig->get( 'DBpassword' ),
98 'dbname' => $mainConfig->get( 'DBname' ),
99 'type' => $mainConfig->get( 'DBtype' ),
100 'load' => 1
101 ],
102 $mainConfig
103 );
104
105 $server['flags'] |= $mainConfig->get( 'DBssl' ) ? DBO_SSL : 0;
106 $server['flags'] |= $mainConfig->get( 'DBcompress' ) ? DBO_COMPRESS : 0;
107
108 $lbConf['servers'] = [ $server ];
109 }
110 if ( !isset( $lbConf['externalClusters'] ) ) {
111 $lbConf['externalClusters'] = $mainConfig->get( 'ExternalServers' );
112 }
113
114 $serversCheck = $lbConf['servers'];
115 } elseif ( $lbConf['class'] === Wikimedia\Rdbms\LBFactoryMulti::class ) {
116 if ( isset( $lbConf['serverTemplate'] ) ) {
117 if ( in_array( $lbConf['serverTemplate']['type'], $typesWithSchema, true ) ) {
118 $lbConf['serverTemplate']['schema'] = $mainConfig->get( 'DBmwschema' );
119 }
120 $lbConf['serverTemplate']['sqlMode'] = $mainConfig->get( 'SQLMode' );
121 }
122 $serversCheck = [ $lbConf['serverTemplate'] ] ?? [];
123 }
124
125 self::assertValidServerConfigs( $serversCheck, $mainConfig );
126
127 $lbConf = self::injectObjectCaches( $lbConf, $srvCace, $mainStash, $wanCache );
128
129 return $lbConf;
130 }
131
132 /**
133 * @return array
134 */
135 private static function getDbTypesWithSchemas() {
136 return [ 'postgres', 'msssql' ];
137 }
138
139 /**
140 * @param array $server
141 * @param Config $mainConfig
142 * @return array
143 */
144 private static function initServerInfo( array $server, Config $mainConfig ) {
145 if ( $server['type'] === 'sqlite' ) {
146 $httpMethod = $_SERVER['REQUEST_METHOD'] ?? null;
147 // T93097: hint for how file-based databases (e.g. sqlite) should go about locking.
148 // See https://www.sqlite.org/lang_transaction.html
149 // See https://www.sqlite.org/lockingv3.html#shared_lock
150 $isHttpRead = in_array( $httpMethod, [ 'GET', 'HEAD', 'OPTIONS', 'TRACE' ] );
151 $server += [
152 'dbDirectory' => $mainConfig->get( 'SQLiteDataDir' ),
153 'trxMode' => $isHttpRead ? 'DEFERRED' : 'IMMEDIATE'
154 ];
155 } elseif ( $server['type'] === 'postgres' ) {
156 $server += [
157 'port' => $mainConfig->get( 'DBport' ),
158 // Work around the reserved word usage in MediaWiki schema
159 'keywordTableMap' => [ 'user' => 'mwuser', 'text' => 'pagecontent' ]
160 ];
161 } elseif ( $server['type'] === 'oracle' ) {
162 $server += [
163 // Work around the reserved word usage in MediaWiki schema
164 'keywordTableMap' => [ 'user' => 'mwuser', 'text' => 'pagecontent' ]
165 ];
166 } elseif ( $server['type'] === 'mssql' ) {
167 $server += [
168 'port' => $mainConfig->get( 'DBport' ),
169 'useWindowsAuth' => $mainConfig->get( 'DBWindowsAuthentication' )
170 ];
171 }
172
173 if ( in_array( $server['type'], self::getDbTypesWithSchemas(), true ) ) {
174 $server += [ 'schema' => $mainConfig->get( 'DBmwschema' ) ];
175 }
176
177 $flags = DBO_DEFAULT;
178 $flags |= $mainConfig->get( 'DebugDumpSql' ) ? DBO_DEBUG : 0;
179 if ( $server['type'] === 'oracle' ) {
180 $flags |= $mainConfig->get( 'DBOracleDRCP' ) ? DBO_PERSISTENT : 0;
181 }
182
183 $server += [
184 'tablePrefix' => $mainConfig->get( 'DBprefix' ),
185 'flags' => $flags,
186 'sqlMode' => $mainConfig->get( 'SQLMode' ),
187 ];
188
189 return $server;
190 }
191
192 /**
193 * @param array $lbConf
194 * @param BagOStuff $sCache
195 * @param BagOStuff $mStash
196 * @param WANObjectCache $wCache
197 * @return array
198 */
199 private static function injectObjectCaches(
200 array $lbConf, BagOStuff $sCache, BagOStuff $mStash, WANObjectCache $wCache
201 ) {
202 // Use APC/memcached style caching, but avoids loops with CACHE_DB (T141804)
203 if ( $sCache->getQoS( $sCache::ATTR_EMULATION ) > $sCache::QOS_EMULATION_SQL ) {
204 $lbConf['srvCache'] = $sCache;
205 }
206 if ( $mStash->getQoS( $mStash::ATTR_EMULATION ) > $mStash::QOS_EMULATION_SQL ) {
207 $lbConf['memStash'] = $mStash;
208 }
209 if ( $wCache->getQoS( $wCache::ATTR_EMULATION ) > $wCache::QOS_EMULATION_SQL ) {
210 $lbConf['wanCache'] = $wCache;
211 }
212
213 return $lbConf;
214 }
215
216 /**
217 * @param array $servers
218 * @param Config $mainConfig
219 */
220 private static function assertValidServerConfigs( array $servers, Config $mainConfig ) {
221 $ldDB = $mainConfig->get( 'DBname' ); // local domain DB
222 $ldTP = $mainConfig->get( 'DBprefix' ); // local domain prefix
223
224 foreach ( $servers as $server ) {
225 $type = $server['type'] ?? null;
226 $srvDB = $server['dbname'] ?? null; // server DB
227 $srvTP = $server['tablePrefix'] ?? ''; // server table prefix
228
229 if ( $type === 'mysql' ) {
230 // A DB name is not needed to connect to mysql; 'dbname' is useless.
231 // This field only defines the DB to use for unspecified DB domains.
232 if ( $srvDB !== null && $srvDB !== $ldDB ) {
233 self::reportMismatchedDBs( $srvDB, $ldDB );
234 }
235 } elseif ( $type === 'postgres' ) {
236 if ( $srvTP !== '' ) {
237 self::reportIfPrefixSet( $srvTP, $type );
238 }
239 }
240
241 if ( $srvTP !== '' && $srvTP !== $ldTP ) {
242 self::reportMismatchedPrefixes( $srvTP, $ldTP );
243 }
244 }
245 }
246
247 /**
248 * @param string $prefix Table prefix
249 * @param string $dbType Database type
250 */
251 private static function reportIfPrefixSet( $prefix, $dbType ) {
252 $e = new UnexpectedValueException(
253 "\$wgDBprefix is set to '$prefix' but the database type is '$dbType'. " .
254 "MediaWiki does not support using a table prefix with this RDBMS type."
255 );
256 MWExceptionRenderer::output( $e, MWExceptionRenderer::AS_PRETTY );
257 exit;
258 }
259
260 /**
261 * @param string $srvDB Server config database
262 * @param string $ldDB Local DB domain database
263 */
264 private static function reportMismatchedDBs( $srvDB, $ldDB ) {
265 $e = new UnexpectedValueException(
266 "\$wgDBservers has dbname='$srvDB' but \$wgDBname='$ldDB'. " .
267 "Set \$wgDBname to the database used by this wiki project. " .
268 "There is rarely a need to set 'dbname' in \$wgDBservers. " .
269 "Cross-wiki database access, use of WikiMap::getCurrentWikiDbDomain(), " .
270 "use of Database::getDomainId(), and other features are not reliable when " .
271 "\$wgDBservers does not match the local wiki database/prefix."
272 );
273 MWExceptionRenderer::output( $e, MWExceptionRenderer::AS_PRETTY );
274 exit;
275 }
276
277 /**
278 * @param string $srvTP Server config table prefix
279 * @param string $ldTP Local DB domain database
280 */
281 private static function reportMismatchedPrefixes( $srvTP, $ldTP ) {
282 $e = new UnexpectedValueException(
283 "\$wgDBservers has tablePrefix='$srvTP' but \$wgDBprefix='$ldTP'. " .
284 "Set \$wgDBprefix to the table prefix used by this wiki project. " .
285 "There is rarely a need to set 'tablePrefix' in \$wgDBservers. " .
286 "Cross-wiki database access, use of WikiMap::getCurrentWikiDbDomain(), " .
287 "use of Database::getDomainId(), and other features are not reliable when " .
288 "\$wgDBservers does not match the local wiki database/prefix."
289 );
290 MWExceptionRenderer::output( $e, MWExceptionRenderer::AS_PRETTY );
291 exit;
292 }
293
294 /**
295 * Returns the LBFactory class to use and the load balancer configuration.
296 *
297 * @todo instead of this, use a ServiceContainer for managing the different implementations.
298 *
299 * @param array $config (e.g. $wgLBFactoryConf)
300 * @return string Class name
301 */
302 public static function getLBFactoryClass( array $config ) {
303 // For configuration backward compatibility after removing
304 // underscores from class names in MediaWiki 1.23.
305 $bcClasses = [
306 'LBFactory_Simple' => 'LBFactorySimple',
307 'LBFactory_Single' => 'LBFactorySingle',
308 'LBFactory_Multi' => 'LBFactoryMulti'
309 ];
310
311 $class = $config['class'];
312
313 if ( isset( $bcClasses[$class] ) ) {
314 $class = $bcClasses[$class];
315 wfDeprecated(
316 '$wgLBFactoryConf must be updated. See RELEASE-NOTES for details',
317 '1.23'
318 );
319 }
320
321 // For configuration backward compatibility after moving classes to namespaces (1.29)
322 $compat = [
323 'LBFactorySingle' => Wikimedia\Rdbms\LBFactorySingle::class,
324 'LBFactorySimple' => Wikimedia\Rdbms\LBFactorySimple::class,
325 'LBFactoryMulti' => Wikimedia\Rdbms\LBFactoryMulti::class
326 ];
327
328 if ( isset( $compat[$class] ) ) {
329 $class = $compat[$class];
330 }
331
332 return $class;
333 }
334
335 public static function setSchemaAliases( LBFactory $lbFactory, Config $config ) {
336 if ( $config->get( 'DBtype' ) === 'mysql' ) {
337 /**
338 * When SQLite indexes were introduced in r45764, it was noted that
339 * SQLite requires index names to be unique within the whole database,
340 * not just within a schema. As discussed in CR r45819, to avoid the
341 * need for a schema change on existing installations, the indexes
342 * were implicitly mapped from the new names to the old names.
343 *
344 * This mapping can be removed if DB patches are introduced to alter
345 * the relevant tables in existing installations. Note that because
346 * this index mapping applies to table creation, even new installations
347 * of MySQL have the old names (except for installations created during
348 * a period where this mapping was inappropriately removed, see
349 * T154872).
350 */
351 $lbFactory->setIndexAliases( [
352 'ar_usertext_timestamp' => 'usertext_timestamp',
353 'un_user_id' => 'user_id',
354 'un_user_ip' => 'user_ip',
355 ] );
356 }
357 }
358
359 /**
360 * Log a database deprecation warning
361 * @param string $msg Deprecation message
362 */
363 public static function logDeprecation( $msg ) {
364 global $wgDevelopmentWarnings;
365
366 if ( isset( self::$loggedDeprecations[$msg] ) ) {
367 return;
368 }
369 self::$loggedDeprecations[$msg] = true;
370
371 if ( $wgDevelopmentWarnings ) {
372 trigger_error( $msg, E_USER_DEPRECATED );
373 }
374 wfDebugLog( 'deprecated', $msg, 'private' );
375 }
376 }