]> git.mxchange.org Git - quix0rs-gnu-social.git/blob - lib/installer.php
Less StatusNet, more GNU social
[quix0rs-gnu-social.git] / lib / installer.php
1 <?php
2
3 /**
4  * StatusNet - the distributed open-source microblogging tool
5  * Copyright (C) 2009-2010, StatusNet, Inc.
6  *
7  * This program is free software: you can redistribute it and/or modify
8  * it under the terms of the GNU Affero General Public License as published by
9  * the Free Software Foundation, either version 3 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU Affero General Public License for more details.
16  *
17  * You should have received a copy of the GNU Affero General Public License
18  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
19  *
20  * @category Installation
21  * @package  Installation
22  *
23  * @author   Adrian Lang <mail@adrianlang.de>
24  * @author   Brenda Wallace <shiny@cpan.org>
25  * @author   Brett Taylor <brett@webfroot.co.nz>
26  * @author   Brion Vibber <brion@pobox.com>
27  * @author   CiaranG <ciaran@ciarang.com>
28  * @author   Craig Andrews <candrews@integralblue.com>
29  * @author   Eric Helgeson <helfire@Erics-MBP.local>
30  * @author   Evan Prodromou <evan@status.net>
31  * @author   Mikael Nordfeldth <mmn@hethane.se>
32  * @author   Robin Millette <millette@controlyourself.ca>
33  * @author   Sarven Capadisli <csarven@status.net>
34  * @author   Tom Adams <tom@holizz.com>
35  * @author   Zach Copley <zach@status.net>
36  * @copyright 2009-2010 StatusNet, Inc http://status.net
37  * @copyright 2009-2014 Free Software Foundation, Inc http://www.fsf.org
38  * @license  GNU Affero General Public License http://www.gnu.org/licenses/
39  * @version  1.0.x
40  * @link     http://status.net
41  */
42
43 abstract class Installer
44 {
45     /** Web site info */
46     public $sitename, $server, $path, $fancy, $siteProfile, $ssl;
47     /** DB info */
48     public $host, $database, $dbtype, $username, $password, $db;
49     /** Administrator info */
50     public $adminNick, $adminPass, $adminEmail, $adminUpdates;
51     /** Should we skip writing the configuration file? */
52     public $skipConfig = false;
53
54     public static $dbModules = array(
55         'mysql' => array(
56             'name' => 'MySQL',
57             'check_module' => 'mysqli',
58             'scheme' => 'mysqli', // DSN prefix for PEAR::DB
59         ),
60         'pgsql' => array(
61             'name' => 'PostgreSQL',
62             'check_module' => 'pgsql',
63             'scheme' => 'pgsql', // DSN prefix for PEAR::DB
64         ),
65     );
66
67     /**
68      * Attempt to include a PHP file and report if it worked, while
69      * suppressing the annoying warning messages on failure.
70      */
71     private function haveIncludeFile($filename) {
72         $old = error_reporting(error_reporting() & ~E_WARNING);
73         $ok = include_once($filename);
74         error_reporting($old);
75         return $ok;
76     }
77
78     /**
79      * Check if all is ready for installation
80      *
81      * @return void
82      */
83     function checkPrereqs()
84     {
85         $pass = true;
86
87         $config = INSTALLDIR.'/config.php';
88         if (file_exists($config)) {
89             if (!is_writable($config) || filesize($config) > 0) {
90                 if (filesize($config) == 0) {
91                     $this->warning('Config file "config.php" already exists and is empty, but is not writable.');
92                 } else {
93                     $this->warning('Config file "config.php" already exists.');
94                 }
95                 $pass = false;
96             }
97         }
98
99         if (version_compare(PHP_VERSION, '5.2.3', '<')) {
100             $this->warning('Require PHP version 5.2.3 or greater.');
101             $pass = false;
102         }
103
104         // Look for known library bugs
105         $str = "abcdefghijklmnopqrstuvwxyz";
106         $replaced = preg_replace('/[\p{Cc}\p{Cs}]/u', '*', $str);
107         if ($str != $replaced) {
108             $this->warning('PHP is linked to a version of the PCRE library ' .
109                            'that does not support Unicode properties. ' .
110                            'If you are running Red Hat Enterprise Linux / ' .
111                            'CentOS 5.4 or earlier, see <a href="' .
112                            'http://status.net/wiki/Red_Hat_Enterprise_Linux#PCRE_library' .
113                            '">our documentation page</a> on fixing this.');
114             $pass = false;
115         }
116
117         $reqs = array('gd', 'curl', 'json',
118                       'xmlwriter', 'mbstring', 'xml', 'dom', 'simplexml');
119
120         foreach ($reqs as $req) {
121             if (!$this->checkExtension($req)) {
122                 $this->warning(sprintf('Cannot load required extension: <code>%s</code>', $req));
123                 $pass = false;
124             }
125         }
126
127         // Make sure we have at least one database module available
128         $missingExtensions = array();
129         foreach (self::$dbModules as $type => $info) {
130             if (!$this->checkExtension($info['check_module'])) {
131                 $missingExtensions[] = $info['check_module'];
132             }
133         }
134
135         if (count($missingExtensions) == count(self::$dbModules)) {
136             $req = implode(', ', $missingExtensions);
137             $this->warning(sprintf('Cannot find a database extension. You need at least one of %s.', $req));
138             $pass = false;
139         }
140
141         // @fixme this check seems to be insufficient with Windows ACLs
142         if (!is_writable(INSTALLDIR)) {
143             $this->warning(sprintf('Cannot write config file to: <code>%s</code></p>', INSTALLDIR),
144                            sprintf('On your server, try this command: <code>chmod a+w %s</code>', INSTALLDIR));
145             $pass = false;
146         }
147
148         // Check the subdirs used for file uploads
149         $fileSubdirs = array('avatar', 'background', 'file');
150         foreach ($fileSubdirs as $fileSubdir) {
151             $fileFullPath = INSTALLDIR."/$fileSubdir/";
152             if (!is_writable($fileFullPath)) {
153                 $this->warning(sprintf('Cannot write to %s directory: <code>%s</code>', $fileSubdir, $fileFullPath),
154                                sprintf('On your server, try this command: <code>chmod a+w %s</code>', $fileFullPath));
155                 $pass = false;
156             }
157         }
158
159         return $pass;
160     }
161
162     /**
163      * Checks if a php extension is both installed and loaded
164      *
165      * @param string $name of extension to check
166      *
167      * @return boolean whether extension is installed and loaded
168      */
169     function checkExtension($name)
170     {
171         if (extension_loaded($name)) {
172             return true;
173         } elseif (function_exists('dl') && ini_get('enable_dl') && !ini_get('safe_mode')) {
174             // dl will throw a fatal error if it's disabled or we're in safe mode.
175             // More fun, it may not even exist under some SAPIs in 5.3.0 or later...
176             $soname = $name . '.' . PHP_SHLIB_SUFFIX;
177             if (PHP_SHLIB_SUFFIX == 'dll') {
178                 $soname = "php_" . $soname;
179             }
180             return @dl($soname);
181         } else {
182             return false;
183         }
184     }
185
186     /**
187      * Basic validation on the database paramters
188      * Side effects: error output if not valid
189      *
190      * @return boolean success
191      */
192     function validateDb()
193     {
194         $fail = false;
195
196         if (empty($this->host)) {
197             $this->updateStatus("No hostname specified.", true);
198             $fail = true;
199         }
200
201         if (empty($this->database)) {
202             $this->updateStatus("No database specified.", true);
203             $fail = true;
204         }
205
206         if (empty($this->username)) {
207             $this->updateStatus("No username specified.", true);
208             $fail = true;
209         }
210
211         if (empty($this->sitename)) {
212             $this->updateStatus("No sitename specified.", true);
213             $fail = true;
214         }
215
216         return !$fail;
217     }
218
219     /**
220      * Basic validation on the administrator user paramters
221      * Side effects: error output if not valid
222      *
223      * @return boolean success
224      */
225     function validateAdmin()
226     {
227         $fail = false;
228
229         if (empty($this->adminNick)) {
230             $this->updateStatus("No initial user nickname specified.", true);
231             $fail = true;
232         }
233         if ($this->adminNick && !preg_match('/^[0-9a-z]{1,64}$/', $this->adminNick)) {
234             $this->updateStatus('The user nickname "' . htmlspecialchars($this->adminNick) .
235                          '" is invalid; should be plain letters and numbers no longer than 64 characters.', true);
236             $fail = true;
237         }
238         // @fixme hardcoded list; should use Nickname::isValid()
239         // if/when it's safe to have loaded the infrastructure here
240         $blacklist = array('main', 'panel', 'twitter', 'settings', 'rsd.xml', 'favorited', 'featured', 'favoritedrss', 'featuredrss', 'rss', 'getfile', 'api', 'groups', 'group', 'peopletag', 'tag', 'user', 'message', 'conversation', 'bookmarklet', 'notice', 'attachment', 'search', 'index.php', 'doc', 'opensearch', 'robots.txt', 'xd_receiver.html', 'facebook');
241         if (in_array($this->adminNick, $blacklist)) {
242             $this->updateStatus('The user nickname "' . htmlspecialchars($this->adminNick) .
243                          '" is reserved.', true);
244             $fail = true;
245         }
246
247         if (empty($this->adminPass)) {
248             $this->updateStatus("No initial user password specified.", true);
249             $fail = true;
250         }
251
252         return !$fail;
253     }
254
255     /**
256      * Make sure a site profile was selected
257      *
258      * @return type boolean success
259      */
260     function validateSiteProfile()
261     {
262         if (empty($this->siteProfile))  {
263             $this->updateStatus("No site profile selected.", true);
264             return false;
265         }
266
267         return true;
268     }
269
270     /**
271      * Set up the database with the appropriate function for the selected type...
272      * Saves database info into $this->db.
273      *
274      * @fixme escape things in the connection string in case we have a funny pass etc
275      * @return mixed array of database connection params on success, false on failure
276      */
277     function setupDatabase()
278     {
279         if ($this->db) {
280             throw new Exception("Bad order of operations: DB already set up.");
281         }
282         $this->updateStatus("Starting installation...");
283
284         if (empty($this->password)) {
285             $auth = '';
286         } else {
287             $auth = ":$this->password";
288         }
289         $scheme = self::$dbModules[$this->dbtype]['scheme'];
290         $dsn = "{$scheme}://{$this->username}{$auth}@{$this->host}/{$this->database}";
291
292         $this->updateStatus("Checking database...");
293         $conn = $this->connectDatabase($dsn);
294
295         // ensure database encoding is UTF8
296         if ($this->dbtype == 'mysql') {
297             // @fixme utf8m4 support for mysql 5.5?
298             // Force the comms charset to utf8 for sanity
299             // This doesn't currently work. :P
300             //$conn->executes('set names utf8');
301         } else if ($this->dbtype == 'pgsql') {
302             $record = $conn->getRow('SHOW server_encoding');
303             if ($record->server_encoding != 'UTF8') {
304                 $this->updateStatus("GNU social requires UTF8 character encoding. Your database is ". htmlentities($record->server_encoding));
305                 return false;
306             }
307         }
308
309         $res = $this->updateStatus("Creating database tables...");
310         if (!$this->createCoreTables($conn)) {
311             $this->updateStatus("Error creating tables.", true);
312             return false;
313         }
314
315         foreach (array('sms_carrier' => 'SMS carrier',
316                     'notice_source' => 'notice source',
317                     'foreign_services' => 'foreign service')
318               as $scr => $name) {
319             $this->updateStatus(sprintf("Adding %s data to database...", $name));
320             $res = $this->runDbScript($scr.'.sql', $conn);
321             if ($res === false) {
322                 $this->updateStatus(sprintf("Can't run %s script.", $name), true);
323                 return false;
324             }
325         }
326
327         $db = array('type' => $this->dbtype, 'database' => $dsn);
328         return $db;
329     }
330
331     /**
332      * Open a connection to the database.
333      *
334      * @param <type> $dsn
335      * @return <type>
336      */
337     function connectDatabase($dsn)
338     {
339         global $_DB;
340         return $_DB->connect($dsn);
341     }
342
343     /**
344      * Create core tables on the given database connection.
345      *
346      * @param DB_common $conn
347      */
348     function createCoreTables(DB_common $conn)
349     {
350         $schema = Schema::get($conn);
351         $tableDefs = $this->getCoreSchema();
352         foreach ($tableDefs as $name => $def) {
353             if (defined('DEBUG_INSTALLER')) {
354                 echo " $name ";
355             }
356             $schema->ensureTable($name, $def);
357         }
358         return true;
359     }
360
361     /**
362      * Fetch the core table schema definitions.
363      *
364      * @return array of table names => table def arrays
365      */
366     function getCoreSchema()
367     {
368         $schema = array();
369         include INSTALLDIR . '/db/core.php';
370         return $schema;
371     }
372
373     /**
374      * Return a parseable PHP literal for the given value.
375      * This will include quotes for strings, etc.
376      *
377      * @param mixed $val
378      * @return string
379      */
380     function phpVal($val)
381     {
382         return var_export($val, true);
383     }
384
385     /**
386      * Return an array of parseable PHP literal for the given values.
387      * These will include quotes for strings, etc.
388      *
389      * @param mixed $val
390      * @return array
391      */
392     function phpVals($map)
393     {
394         return array_map(array($this, 'phpVal'), $map);
395     }
396
397     /**
398      * Write a stock configuration file.
399      *
400      * @return boolean success
401      *
402      * @fixme escape variables in output in case we have funny chars, apostrophes etc
403      */
404     function writeConf()
405     {
406         $vals = $this->phpVals(array(
407             'sitename' => $this->sitename,
408             'server' => $this->server,
409             'path' => $this->path,
410             'ssl' => in_array($this->ssl, array('never', 'sometimes', 'always'))
411                      ? $this->ssl
412                      : 'never',
413             'db_database' => $this->db['database'],
414             'db_type' => $this->db['type']
415         ));
416
417         // assemble configuration file in a string
418         $cfg =  "<?php\n".
419                 "if (!defined('GNUSOCIAL')) { exit(1); }\n\n".
420
421                 // site name
422                 "\$config['site']['name'] = {$vals['sitename']};\n\n".
423
424                 // site location
425                 "\$config['site']['server'] = {$vals['server']};\n".
426                 "\$config['site']['path'] = {$vals['path']}; \n\n".
427                 "\$config['site']['ssl'] = {$vals['ssl']}; \n\n".
428
429                 // checks if fancy URLs are enabled
430                 ($this->fancy ? "\$config['site']['fancy'] = true;\n\n":'').
431
432                 // database
433                 "\$config['db']['database'] = {$vals['db_database']};\n\n".
434                 ($this->db['type'] == 'pgsql' ? "\$config['db']['quote_identifiers'] = true;\n\n":'').
435                 "\$config['db']['type'] = {$vals['db_type']};\n\n";
436
437         // Normalize line endings for Windows servers
438         $cfg = str_replace("\n", PHP_EOL, $cfg);
439
440         // write configuration file out to install directory
441         $res = file_put_contents(INSTALLDIR.'/config.php', $cfg);
442
443         return $res;
444     }
445
446     /**
447      * Write the site profile. We do this after creating the initial user
448      * in case the site profile is set to single user. This gets around the
449      * 'chicken-and-egg' problem of the system requiring a valid user for
450      * single user mode, before the intial user is actually created. Yeah,
451      * we should probably do this in smarter way.
452      *
453      * @return int res number of bytes written
454      */
455     function writeSiteProfile()
456     {
457         $vals = $this->phpVals(array(
458             'site_profile' => $this->siteProfile,
459             'nickname' => $this->adminNick
460         ));
461
462         $cfg =
463         // site profile
464         "\$config['site']['profile'] = {$vals['site_profile']};\n";
465
466         if ($this->siteProfile == "singleuser") {
467             $cfg .= "\$config['singleuser']['nickname'] = {$vals['nickname']};\n\n";
468         } else {
469             $cfg .= "\n";
470         }
471
472         // Normalize line endings for Windows servers
473         $cfg = str_replace("\n", PHP_EOL, $cfg);
474
475         // write configuration file out to install directory
476         $res = file_put_contents(INSTALLDIR.'/config.php', $cfg, FILE_APPEND);
477
478         return $res;
479     }
480
481     /**
482      * Install schema into the database
483      *
484      * @param string    $filename location of database schema file
485      * @param DB_common $conn     connection to database
486      *
487      * @return boolean - indicating success or failure
488      */
489     function runDbScript($filename, DB_common $conn)
490     {
491         $sql = trim(file_get_contents(INSTALLDIR . '/db/' . $filename));
492         $stmts = explode(';', $sql);
493         foreach ($stmts as $stmt) {
494             $stmt = trim($stmt);
495             if (!mb_strlen($stmt)) {
496                 continue;
497             }
498             try {
499                 $res = $conn->simpleQuery($stmt);
500             } catch (Exception $e) {
501                 $error = $e->getMessage();
502                 $this->updateStatus("ERROR ($error) for SQL '$stmt'");
503                 return false;
504             }
505         }
506         return true;
507     }
508
509     /**
510      * Create the initial admin user account.
511      * Side effect: may load portions of GNU social framework.
512      * Side effect: outputs program info
513      */
514     function registerInitialUser()
515     {
516         require_once INSTALLDIR . '/lib/common.php';
517
518         $data = array('nickname' => $this->adminNick,
519                       'password' => $this->adminPass,
520                       'fullname' => $this->adminNick);
521         if ($this->adminEmail) {
522             $data['email'] = $this->adminEmail;
523         }
524         $user = User::register($data);
525
526         if (empty($user)) {
527             return false;
528         }
529
530         // give initial user carte blanche
531
532         $user->grantRole('owner');
533         $user->grantRole('moderator');
534         $user->grantRole('administrator');
535
536         // Attempt to do a remote subscribe to update@status.net
537         // Will fail if instance is on a private network.
538
539         if ($this->adminUpdates && class_exists('Ostatus_profile')) {
540             try {
541                 $oprofile = Ostatus_profile::ensureProfileURL('http://update.status.net/');
542                 Subscription::start($user->getProfile(), $oprofile->localProfile());
543                 $this->updateStatus("Set up subscription to <a href='http://update.status.net/'>update@status.net</a>.");
544             } catch (Exception $e) {
545                 $this->updateStatus("Could not set up subscription to <a href='http://update.status.net/'>update@status.net</a>.", true);
546             }
547         }
548
549         return true;
550     }
551
552     /**
553      * The beef of the installer!
554      * Create database, config file, and admin user.
555      *
556      * Prerequisites: validation of input data.
557      *
558      * @return boolean success
559      */
560     function doInstall()
561     {
562         global $config;
563
564         $this->updateStatus("Initializing...");
565         ini_set('display_errors', 1);
566         error_reporting(E_ALL);
567         if (!defined('GNUSOCIAL')) {
568             define('GNUSOCIAL', true);
569         }
570         if (!defined('STATUSNET')) {
571             define('STATUSNET', true);
572         }
573
574         require_once INSTALLDIR . '/lib/framework.php';
575         StatusNet::initDefaults($this->server, $this->path);
576
577         if ($this->siteProfile == "singleuser") {
578             // Until we use ['site']['profile']==='singleuser' everywhere
579             $config['singleuser']['enabled'] = true;
580         }
581
582         try {
583             $this->db = $this->setupDatabase();
584             if (!$this->db) {
585                 // database connection failed, do not move on to create config file.
586                 return false;
587             }
588         } catch (Exception $e) {
589             // Lower-level DB error!
590             $this->updateStatus("Database error: " . $e->getMessage(), true);
591             return false;
592         }
593
594         // Make sure we can write to the file twice
595         $oldUmask = umask(000); 
596
597         if (!$this->skipConfig) {
598             $this->updateStatus("Writing config file...");
599             $res = $this->writeConf();
600
601             if (!$res) {
602                 $this->updateStatus("Can't write config file.", true);
603                 return false;
604             }
605         }
606
607         if (!empty($this->adminNick)) {
608             // Okay, cross fingers and try to register an initial user
609             if ($this->registerInitialUser()) {
610                 $this->updateStatus(
611                     "An initial user with the administrator role has been created."
612                 );
613             } else {
614                 $this->updateStatus(
615                     "Could not create initial user account.",
616                     true
617                 );
618                 return false;
619             }
620         }
621
622         if (!$this->skipConfig) {
623             $this->updateStatus("Setting site profile...");
624             $res = $this->writeSiteProfile();
625
626             if (!$res) {
627                 $this->updateStatus("Can't write to config file.", true);
628                 return false;
629             }
630         }
631
632         // Restore original umask
633         umask($oldUmask);
634         // Set permissions back to something decent
635         chmod(INSTALLDIR.'/config.php', 0644);
636         
637         $scheme = $this->ssl === 'always' ? 'https' : 'http';
638         $link = "{$scheme}://{$this->server}/{$this->path}";
639
640         $this->updateStatus("GNU social has been installed at $link");
641         $this->updateStatus(
642             '<strong>DONE!</strong> You can visit your <a href="'.htmlspecialchars($link).'">new GNU social site</a> (log in as "'.htmlspecialchars($this->adminNick).'"). If this is your first GNU social install, make your experience the best possible by visiting our resource site to join the mailing list and <a href="http://gnu.io/resources/">good documentation</a>.'
643         );
644
645         return true;
646     }
647
648     /**
649      * Output a pre-install-time warning message
650      * @param string $message HTML ok, but should be plaintext-able
651      * @param string $submessage HTML ok, but should be plaintext-able
652      */
653     abstract function warning($message, $submessage='');
654
655     /**
656      * Output an install-time progress message
657      * @param string $message HTML ok, but should be plaintext-able
658      * @param boolean $error true if this should be marked as an error condition
659      */
660     abstract function updateStatus($status, $error=false);
661
662 }