Merge "Http::getProxy() method to get proxy configuration"
[lhc/web/wiklou.git] / includes / installer / SqliteInstaller.php
1 <?php
2 /**
3 * Sqlite-specific installer.
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 Deployment
22 */
23
24 /**
25 * Class for setting up the MediaWiki database using SQLLite.
26 *
27 * @ingroup Deployment
28 * @since 1.17
29 */
30 class SqliteInstaller extends DatabaseInstaller {
31 const MINIMUM_VERSION = '3.3.7';
32
33 /**
34 * @var DatabaseSqlite
35 */
36 public $db;
37
38 protected $globalNames = [
39 'wgDBname',
40 'wgSQLiteDataDir',
41 ];
42
43 public function getName() {
44 return 'sqlite';
45 }
46
47 public function isCompiled() {
48 return self::checkExtension( 'pdo_sqlite' );
49 }
50
51 /**
52 *
53 * @return Status
54 */
55 public function checkPrerequisites() {
56 $result = Status::newGood();
57 // Bail out if SQLite is too old
58 $db = DatabaseSqlite::newStandaloneInstance( ':memory:' );
59 if ( version_compare( $db->getServerVersion(), self::MINIMUM_VERSION, '<' ) ) {
60 $result->fatal( 'config-outdated-sqlite', $db->getServerVersion(), self::MINIMUM_VERSION );
61 }
62 // Check for FTS3 full-text search module
63 if ( DatabaseSqlite::getFulltextSearchModule() != 'FTS3' ) {
64 $result->warning( 'config-no-fts3' );
65 }
66
67 return $result;
68 }
69
70 public function getGlobalDefaults() {
71 $defaults = parent::getGlobalDefaults();
72 if ( isset( $_SERVER['DOCUMENT_ROOT'] ) ) {
73 $path = str_replace(
74 [ '/', '\\' ],
75 DIRECTORY_SEPARATOR,
76 dirname( $_SERVER['DOCUMENT_ROOT'] ) . '/data'
77 );
78
79 $defaults['wgSQLiteDataDir'] = $path;
80 }
81 return $defaults;
82 }
83
84 public function getConnectForm() {
85 return $this->getTextBox(
86 'wgSQLiteDataDir',
87 'config-sqlite-dir', [],
88 $this->parent->getHelpBox( 'config-sqlite-dir-help' )
89 ) .
90 $this->getTextBox(
91 'wgDBname',
92 'config-db-name',
93 [],
94 $this->parent->getHelpBox( 'config-sqlite-name-help' )
95 );
96 }
97
98 /**
99 * Safe wrapper for PHP's realpath() that fails gracefully if it's unable to canonicalize the path.
100 *
101 * @param string $path
102 *
103 * @return string
104 */
105 private static function realpath( $path ) {
106 $result = realpath( $path );
107 if ( !$result ) {
108 return $path;
109 }
110
111 return $result;
112 }
113
114 /**
115 * @return Status
116 */
117 public function submitConnectForm() {
118 $this->setVarsFromRequest( [ 'wgSQLiteDataDir', 'wgDBname' ] );
119
120 # Try realpath() if the directory already exists
121 $dir = self::realpath( $this->getVar( 'wgSQLiteDataDir' ) );
122 $result = self::dataDirOKmaybeCreate( $dir, true /* create? */ );
123 if ( $result->isOK() ) {
124 # Try expanding again in case we've just created it
125 $dir = self::realpath( $dir );
126 $this->setVar( 'wgSQLiteDataDir', $dir );
127 }
128 # Table prefix is not used on SQLite, keep it empty
129 $this->setVar( 'wgDBprefix', '' );
130
131 return $result;
132 }
133
134 /**
135 * @param string $dir
136 * @param bool $create
137 * @return Status
138 */
139 private static function dataDirOKmaybeCreate( $dir, $create = false ) {
140 if ( !is_dir( $dir ) ) {
141 if ( !is_writable( dirname( $dir ) ) ) {
142 $webserverGroup = Installer::maybeGetWebserverPrimaryGroup();
143 if ( $webserverGroup !== null ) {
144 return Status::newFatal(
145 'config-sqlite-parent-unwritable-group',
146 $dir, dirname( $dir ), basename( $dir ),
147 $webserverGroup
148 );
149 } else {
150 return Status::newFatal(
151 'config-sqlite-parent-unwritable-nogroup',
152 $dir, dirname( $dir ), basename( $dir )
153 );
154 }
155 }
156
157 # Called early on in the installer, later we just want to sanity check
158 # if it's still writable
159 if ( $create ) {
160 MediaWiki\suppressWarnings();
161 $ok = wfMkdirParents( $dir, 0700, __METHOD__ );
162 MediaWiki\restoreWarnings();
163 if ( !$ok ) {
164 return Status::newFatal( 'config-sqlite-mkdir-error', $dir );
165 }
166 # Put a .htaccess file in in case the user didn't take our advice
167 file_put_contents( "$dir/.htaccess", "Deny from all\n" );
168 }
169 }
170 if ( !is_writable( $dir ) ) {
171 return Status::newFatal( 'config-sqlite-dir-unwritable', $dir );
172 }
173
174 # We haven't blown up yet, fall through
175 return Status::newGood();
176 }
177
178 /**
179 * @return Status
180 */
181 public function openConnection() {
182 global $wgSQLiteDataDir;
183
184 $status = Status::newGood();
185 $dir = $this->getVar( 'wgSQLiteDataDir' );
186 $dbName = $this->getVar( 'wgDBname' );
187 try {
188 # @todo FIXME: Need more sensible constructor parameters, e.g. single associative array
189 # Setting globals kind of sucks
190 $wgSQLiteDataDir = $dir;
191 $db = DatabaseBase::factory( 'sqlite', [ 'dbname' => $dbName ] );
192 $status->value = $db;
193 } catch ( DBConnectionError $e ) {
194 $status->fatal( 'config-sqlite-connection-error', $e->getMessage() );
195 }
196
197 return $status;
198 }
199
200 /**
201 * @return bool
202 */
203 public function needsUpgrade() {
204 $dir = $this->getVar( 'wgSQLiteDataDir' );
205 $dbName = $this->getVar( 'wgDBname' );
206 // Don't create the data file yet
207 if ( !file_exists( DatabaseSqlite::generateFileName( $dir, $dbName ) ) ) {
208 return false;
209 }
210
211 // If the data file exists, look inside it
212 return parent::needsUpgrade();
213 }
214
215 /**
216 * @return Status
217 */
218 public function setupDatabase() {
219 $dir = $this->getVar( 'wgSQLiteDataDir' );
220
221 # Sanity check. We checked this before but maybe someone deleted the
222 # data dir between then and now
223 $dir_status = self::dataDirOKmaybeCreate( $dir, false /* create? */ );
224 if ( !$dir_status->isOK() ) {
225 return $dir_status;
226 }
227
228 $db = $this->getVar( 'wgDBname' );
229
230 # Make the main and cache stub DB files
231 $status = Status::newGood();
232 $status->merge( $this->makeStubDBFile( $dir, $db ) );
233 $status->merge( $this->makeStubDBFile( $dir, "wikicache" ) );
234 if ( !$status->isOK() ) {
235 return $status;
236 }
237
238 # Nuke the unused settings for clarity
239 $this->setVar( 'wgDBserver', '' );
240 $this->setVar( 'wgDBuser', '' );
241 $this->setVar( 'wgDBpassword', '' );
242 $this->setupSchemaVars();
243
244 # Create the global cache DB
245 try {
246 global $wgSQLiteDataDir;
247 # @todo FIXME: setting globals kind of sucks
248 $wgSQLiteDataDir = $dir;
249 $conn = DatabaseBase::factory( 'sqlite', [ 'dbname' => "wikicache" ] );
250 # @todo: don't duplicate objectcache definition, though it's very simple
251 $sql =
252 <<<EOT
253 CREATE TABLE IF NOT EXISTS objectcache (
254 keyname BLOB NOT NULL default '' PRIMARY KEY,
255 value BLOB,
256 exptime TEXT
257 )
258 EOT;
259 $conn->query( $sql );
260 $conn->query( "CREATE INDEX IF NOT EXISTS exptime ON objectcache (exptime)" );
261 $conn->query( "PRAGMA journal_mode=WAL" ); // this is permanent
262 $conn->close();
263 } catch ( DBConnectionError $e ) {
264 return Status::newFatal( 'config-sqlite-connection-error', $e->getMessage() );
265 }
266
267 # Open the main DB
268 return $this->getConnection();
269 }
270
271 protected function makeStubDBFile( $dir, $db ) {
272 $file = DatabaseSqlite::generateFileName( $dir, $db );
273 if ( file_exists( $file ) ) {
274 if ( !is_writable( $file ) ) {
275 return Status::newFatal( 'config-sqlite-readonly', $file );
276 }
277 } else {
278 if ( file_put_contents( $file, '' ) === false ) {
279 return Status::newFatal( 'config-sqlite-cant-create-db', $file );
280 }
281 }
282
283 return Status::newGood();
284 }
285
286 /**
287 * @return Status
288 */
289 public function createTables() {
290 $status = parent::createTables();
291
292 return $this->setupSearchIndex( $status );
293 }
294
295 /**
296 * @param Status $status
297 * @return Status
298 */
299 public function setupSearchIndex( &$status ) {
300 global $IP;
301
302 $module = DatabaseSqlite::getFulltextSearchModule();
303 $fts3tTable = $this->db->checkForEnabledSearch();
304 if ( $fts3tTable && !$module ) {
305 $status->warning( 'config-sqlite-fts3-downgrade' );
306 $this->db->sourceFile( "$IP/maintenance/sqlite/archives/searchindex-no-fts.sql" );
307 } elseif ( !$fts3tTable && $module == 'FTS3' ) {
308 $this->db->sourceFile( "$IP/maintenance/sqlite/archives/searchindex-fts3.sql" );
309 }
310
311 return $status;
312 }
313
314 /**
315 * @return string
316 */
317 public function getLocalSettings() {
318 $dir = LocalSettingsGenerator::escapePhpString( $this->getVar( 'wgSQLiteDataDir' ) );
319
320 return "# SQLite-specific settings
321 \$wgSQLiteDataDir = \"{$dir}\";
322 \$wgObjectCaches[CACHE_DB] = [
323 'class' => 'SqlBagOStuff',
324 'loggroup' => 'SQLBagOStuff',
325 'server' => [
326 'type' => 'sqlite',
327 'dbname' => 'wikicache',
328 'tablePrefix' => '',
329 'flags' => 0
330 ]
331 ];";
332 }
333 }