2018-10-29 13:10:45 +00:00
< ? php
namespace Friendica\Module ;
use Friendica\App ;
use Friendica\BaseModule ;
use Friendica\Core ;
2019-07-12 21:08:01 +00:00
use Friendica\Core\Config\Cache\ConfigCache ;
2018-10-29 13:10:45 +00:00
use Friendica\Core\L10n ;
2018-10-31 14:35:50 +00:00
use Friendica\Core\Renderer ;
2019-12-15 21:34:11 +00:00
use Friendica\DI ;
2019-07-12 21:08:01 +00:00
use Friendica\Network\HTTPException ;
2019-03-26 21:04:31 +00:00
use Friendica\Util\BasePath ;
2018-11-08 15:14:37 +00:00
use Friendica\Util\Strings ;
2018-10-29 13:10:45 +00:00
use Friendica\Util\Temporal ;
class Install extends BaseModule
{
/**
* Step one - System check
*/
const SYSTEM_CHECK = 1 ;
/**
2019-03-26 21:04:31 +00:00
* Step two - Base information
2018-10-29 13:10:45 +00:00
*/
2019-03-26 21:04:31 +00:00
const BASE_CONFIG = 2 ;
2018-10-29 13:10:45 +00:00
/**
2019-03-26 21:04:31 +00:00
* Step three - Database configuration
2018-10-29 13:10:45 +00:00
*/
2019-03-26 21:04:31 +00:00
const DATABASE_CONFIG = 3 ;
2018-10-29 13:10:45 +00:00
/**
2019-04-14 12:05:48 +00:00
* Step four - Adapt site settings
2018-10-29 13:10:45 +00:00
*/
2019-03-26 21:04:31 +00:00
const SITE_SETTINGS = 4 ;
/**
* Step five - All steps finished
*/
const FINISHED = 5 ;
2018-10-29 13:10:45 +00:00
/**
* @ var int The current step of the wizard
*/
private static $currentWizardStep ;
2018-10-29 17:44:39 +00:00
/**
* @ var Core\Installer The installer
*/
private static $installer ;
2019-11-05 21:48:54 +00:00
public static function init ( array $parameters = [])
2018-10-29 13:10:45 +00:00
{
2019-12-15 21:34:11 +00:00
$a = DI :: app ();
2018-10-29 13:10:45 +00:00
2019-12-15 22:52:15 +00:00
if ( ! DI :: mode () -> isInstall ()) {
2019-07-12 21:08:01 +00:00
throw new HTTPException\ForbiddenException ();
2019-04-14 12:05:48 +00:00
}
2018-10-29 13:10:45 +00:00
// route: install/testrwrite
// $baseurl/install/testrwrite to test if rewrite in .htaccess is working
2019-05-01 19:29:04 +00:00
// @TODO: Replace with parameter from router
2018-10-29 13:10:45 +00:00
if ( $a -> getArgumentValue ( 1 , '' ) == 'testrewrite' ) {
// Status Code 204 means that it worked without content
2019-07-12 21:08:01 +00:00
throw new HTTPException\NoContentException ();
2018-10-29 13:10:45 +00:00
}
2019-03-26 21:04:31 +00:00
self :: $installer = new Core\Installer ();
// get basic installation information and save them to the config cache
$configCache = $a -> getConfigCache ();
2019-07-20 23:30:28 +00:00
$basePath = new BasePath ( $a -> getBasePath ());
self :: $installer -> setUpCache ( $configCache , $basePath -> getPath ());
2019-03-26 21:04:31 +00:00
2018-10-29 13:39:09 +00:00
// We overwrite current theme css, because during install we may not have a working mod_rewrite
// so we may not have a css at all. Here we set a static css file for the install procedure pages
2018-10-31 17:25:38 +00:00
Renderer :: $theme [ 'stylesheet' ] = $a -> getBaseURL () . '/view/install/style.css' ;
2018-10-29 13:10:45 +00:00
2019-10-15 13:20:32 +00:00
self :: $currentWizardStep = ( $_POST [ 'pass' ] ? ? '' ) ? : self :: SYSTEM_CHECK ;
2018-10-29 13:10:45 +00:00
}
2019-11-05 21:48:54 +00:00
public static function post ( array $parameters = [])
2018-10-29 13:10:45 +00:00
{
2019-12-15 21:34:11 +00:00
$a = DI :: app ();
2019-03-14 09:00:05 +00:00
$configCache = $a -> getConfigCache ();
2018-10-29 13:10:45 +00:00
switch ( self :: $currentWizardStep ) {
case self :: SYSTEM_CHECK :
2019-03-26 21:04:31 +00:00
case self :: BASE_CONFIG :
self :: checkSetting ( $configCache , $_POST , 'config' , 'php_path' );
break ;
2018-10-29 13:10:45 +00:00
case self :: DATABASE_CONFIG :
2019-03-14 09:00:05 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'php_path' );
2019-03-26 21:04:31 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'hostname' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'ssl_policy' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'basepath' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'urlpath' );
2018-10-29 17:44:39 +00:00
break ;
2018-10-29 13:10:45 +00:00
case self :: SITE_SETTINGS :
2019-03-14 09:00:05 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'php_path' );
2019-03-26 21:04:31 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'hostname' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'ssl_policy' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'basepath' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'urlpath' );
2019-03-14 09:00:05 +00:00
self :: checkSetting ( $configCache , $_POST , 'database' , 'hostname' , Core\Installer :: DEFAULT_HOST );
self :: checkSetting ( $configCache , $_POST , 'database' , 'username' , '' );
self :: checkSetting ( $configCache , $_POST , 'database' , 'password' , '' );
self :: checkSetting ( $configCache , $_POST , 'database' , 'database' , '' );
2018-10-29 13:10:45 +00:00
2018-10-29 17:44:39 +00:00
// If we cannot connect to the database, return to the previous step
2019-12-15 22:52:47 +00:00
if ( ! self :: $installer -> checkDB ( DI :: dba ())) {
2018-10-29 17:44:39 +00:00
self :: $currentWizardStep = self :: DATABASE_CONFIG ;
2018-10-29 13:10:45 +00:00
}
2018-10-29 17:44:39 +00:00
break ;
2018-10-29 13:10:45 +00:00
case self :: FINISHED :
2019-03-14 09:00:05 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'php_path' );
2019-03-26 21:04:31 +00:00
self :: checkSetting ( $configCache , $_POST , 'config' , 'hostname' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'ssl_policy' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'basepath' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'urlpath' );
2019-03-14 09:00:05 +00:00
self :: checkSetting ( $configCache , $_POST , 'database' , 'hostname' , Core\Installer :: DEFAULT_HOST );
self :: checkSetting ( $configCache , $_POST , 'database' , 'username' , '' );
self :: checkSetting ( $configCache , $_POST , 'database' , 'password' , '' );
self :: checkSetting ( $configCache , $_POST , 'database' , 'database' , '' );
self :: checkSetting ( $configCache , $_POST , 'system' , 'default_timezone' , Core\Installer :: DEFAULT_TZ );
self :: checkSetting ( $configCache , $_POST , 'system' , 'language' , Core\Installer :: DEFAULT_LANG );
self :: checkSetting ( $configCache , $_POST , 'config' , 'admin_email' , '' );
2018-10-29 13:10:45 +00:00
2018-10-29 17:44:39 +00:00
// If we cannot connect to the database, return to the Database config wizard
2019-12-15 22:52:47 +00:00
if ( ! self :: $installer -> checkDB ( DI :: dba ())) {
2018-10-29 17:44:39 +00:00
self :: $currentWizardStep = self :: DATABASE_CONFIG ;
2018-10-30 10:30:19 +00:00
return ;
2018-10-29 13:10:45 +00:00
}
2019-03-26 21:04:31 +00:00
if ( ! self :: $installer -> createConfig ( $configCache )) {
2018-10-29 17:44:39 +00:00
return ;
2018-10-29 13:10:45 +00:00
}
2019-03-26 21:04:31 +00:00
self :: $installer -> installDatabase ( $configCache -> get ( 'system' , 'basepath' ));
2018-10-29 13:10:45 +00:00
2018-10-29 17:44:39 +00:00
break ;
2018-10-29 13:10:45 +00:00
}
}
2019-11-05 21:48:54 +00:00
public static function content ( array $parameters = [])
2018-10-29 13:10:45 +00:00
{
2019-12-15 21:34:11 +00:00
$a = DI :: app ();
2019-03-14 09:00:05 +00:00
$configCache = $a -> getConfigCache ();
2018-10-29 13:10:45 +00:00
$output = '' ;
2018-10-31 20:03:32 +00:00
$install_title = L10n :: t ( 'Friendica Communications Server - Setup' );
2018-10-29 13:10:45 +00:00
switch ( self :: $currentWizardStep ) {
case self :: SYSTEM_CHECK :
2019-03-14 09:00:05 +00:00
$php_path = $configCache -> get ( 'config' , 'php_path' );
2018-10-29 13:10:45 +00:00
2019-03-14 09:00:05 +00:00
$status = self :: $installer -> checkEnvironment ( $a -> getBaseURL (), $php_path );
2018-10-29 13:10:45 +00:00
2019-07-12 21:08:01 +00:00
$tpl = Renderer :: getMarkupTemplate ( 'install_checks.tpl' );
2018-10-31 14:35:50 +00:00
$output .= Renderer :: replaceMacros ( $tpl , [
2019-04-14 12:05:48 +00:00
'$title' => $install_title ,
'$pass' => L10n :: t ( 'System check' ),
'$checks' => self :: $installer -> getChecks (),
'$passed' => $status ,
'$see_install' => L10n :: t ( 'Please see the file "INSTALL.txt".' ),
'$next' => L10n :: t ( 'Next' ),
'$reload' => L10n :: t ( 'Check again' ),
'$php_path' => $php_path ,
2018-10-29 13:10:45 +00:00
]);
break ;
2019-03-26 21:04:31 +00:00
case self :: BASE_CONFIG :
$ssl_choices = [
2019-08-15 15:23:00 +00:00
App\BaseURL :: SSL_POLICY_NONE => L10n :: t ( " No SSL policy, links will track page SSL state " ),
App\BaseURL :: SSL_POLICY_FULL => L10n :: t ( " Force all links to use SSL " ),
App\BaseURL :: SSL_POLICY_SELFSIGN => L10n :: t ( " Self-signed certificate, use SSL for local links only \x28 discouraged \x29 " )
2019-03-26 21:04:31 +00:00
];
2019-07-12 21:08:01 +00:00
$tpl = Renderer :: getMarkupTemplate ( 'install_base.tpl' );
2019-03-26 21:04:31 +00:00
$output .= Renderer :: replaceMacros ( $tpl , [
'$title' => $install_title ,
'$pass' => L10n :: t ( 'Base settings' ),
'$ssl_policy' => [ 'system-ssl_policy' ,
2019-04-14 12:05:48 +00:00
L10n :: t ( " SSL link policy " ),
$configCache -> get ( 'system' , 'ssl_policy' ),
L10n :: t ( " Determines whether generated links should be forced to use SSL " ),
$ssl_choices ],
2019-03-26 21:04:31 +00:00
'$hostname' => [ 'config-hostname' ,
2019-04-14 12:05:48 +00:00
L10n :: t ( 'Host name' ),
$configCache -> get ( 'config' , 'hostname' ),
L10n :: t ( 'Overwrite this field in case the determinated hostname isn\'t right, otherweise leave it as is.' ),
'required' ],
2019-03-26 21:04:31 +00:00
'$basepath' => [ 'system-basepath' ,
2019-04-14 12:05:48 +00:00
L10n :: t ( " Base path to installation " ),
$configCache -> get ( 'system' , 'basepath' ),
L10n :: t ( " If the system cannot detect the correct path to your installation, enter the correct path here. This setting should only be set if you are using a restricted system and symbolic links to your webroot. " ),
'required' ],
2019-03-26 21:04:31 +00:00
'$urlpath' => [ 'system-urlpath' ,
2019-04-14 12:05:48 +00:00
L10n :: t ( 'Sub path of the URL' ),
$configCache -> get ( 'system' , 'urlpath' ),
L10n :: t ( 'Overwrite this field in case the sub path determination isn\'t right, otherwise leave it as is. Leaving this field blank means the installation is at the base URL without sub path.' ),
'' ],
2019-03-26 21:04:31 +00:00
'$php_path' => $configCache -> get ( 'config' , 'php_path' ),
'$submit' => L10n :: t ( 'Submit' ),
]);
break ;
2018-10-29 13:10:45 +00:00
case self :: DATABASE_CONFIG :
2019-07-12 21:08:01 +00:00
$tpl = Renderer :: getMarkupTemplate ( 'install_db.tpl' );
2018-10-31 14:35:50 +00:00
$output .= Renderer :: replaceMacros ( $tpl , [
2019-04-14 12:05:48 +00:00
'$title' => $install_title ,
'$pass' => L10n :: t ( 'Database connection' ),
'$info_01' => L10n :: t ( 'In order to install Friendica we need to know how to connect to your database.' ),
'$info_02' => L10n :: t ( 'Please contact your hosting provider or site administrator if you have questions about these settings.' ),
'$info_03' => L10n :: t ( 'The database you specify below should already exist. If it does not, please create it before continuing.' ),
'checks' => self :: $installer -> getChecks (),
2019-03-26 21:04:31 +00:00
'$hostname' => $configCache -> get ( 'config' , 'hostname' ),
'$ssl_policy' => $configCache -> get ( 'system' , 'ssl_policy' ),
'$basepath' => $configCache -> get ( 'system' , 'basepath' ),
'$urlpath' => $configCache -> get ( 'system' , 'urlpath' ),
2019-04-14 12:05:48 +00:00
'$dbhost' => [ 'database-hostname' ,
L10n :: t ( 'Database Server Name' ),
$configCache -> get ( 'database' , 'hostname' ),
'' ,
'required' ],
2019-04-14 12:40:26 +00:00
'$dbuser' => [ 'database-username' ,
2019-04-14 12:05:48 +00:00
L10n :: t ( 'Database Login Name' ),
$configCache -> get ( 'database' , 'username' ),
'' ,
'required' ,
'autofocus' ],
'$dbpass' => [ 'database-password' ,
L10n :: t ( 'Database Login Password' ),
$configCache -> get ( 'database' , 'password' ),
L10n :: t ( " For security reasons the password must not be empty " ),
'required' ],
'$dbdata' => [ 'database-database' ,
L10n :: t ( 'Database Name' ),
$configCache -> get ( 'database' , 'database' ),
'' ,
'required' ],
'$lbl_10' => L10n :: t ( 'Please select a default timezone for your website' ),
'$php_path' => $configCache -> get ( 'config' , 'php_path' ),
'$submit' => L10n :: t ( 'Submit' )
2018-10-29 13:10:45 +00:00
]);
break ;
2018-10-29 17:44:39 +00:00
2018-10-29 13:10:45 +00:00
case self :: SITE_SETTINGS :
/* Installed langs */
$lang_choices = L10n :: getAvailableLanguages ();
2019-07-12 21:08:01 +00:00
$tpl = Renderer :: getMarkupTemplate ( 'install_settings.tpl' );
2018-10-31 14:35:50 +00:00
$output .= Renderer :: replaceMacros ( $tpl , [
2019-04-14 12:05:48 +00:00
'$title' => $install_title ,
'$checks' => self :: $installer -> getChecks (),
'$pass' => L10n :: t ( 'Site settings' ),
'$hostname' => $configCache -> get ( 'config' , 'hostname' ),
'$ssl_policy' => $configCache -> get ( 'system' , 'ssl_policy' ),
'$basepath' => $configCache -> get ( 'system' , 'basepath' ),
'$urlpath' => $configCache -> get ( 'system' , 'urlpath' ),
'$dbhost' => $configCache -> get ( 'database' , 'hostname' ),
'$dbuser' => $configCache -> get ( 'database' , 'username' ),
'$dbpass' => $configCache -> get ( 'database' , 'password' ),
'$dbdata' => $configCache -> get ( 'database' , 'database' ),
'$adminmail' => [ 'config-admin_email' ,
L10n :: t ( 'Site administrator email address' ),
$configCache -> get ( 'config' , 'admin_email' ),
L10n :: t ( 'Your account email address must match this in order to use the web admin panel.' ),
'required' , 'autofocus' , 'email' ],
'$timezone' => Temporal :: getTimezoneField ( 'system-default_timezone' ,
L10n :: t ( 'Please select a default timezone for your website' ),
$configCache -> get ( 'system' , 'default_timezone' ),
'' ),
'$language' => [ 'system-language' ,
L10n :: t ( 'System Language:' ),
$configCache -> get ( 'system' , 'language' ),
L10n :: t ( 'Set the default language for your Friendica installation interface and to send emails.' ),
$lang_choices ],
'$php_path' => $configCache -> get ( 'config' , 'php_path' ),
'$submit' => L10n :: t ( 'Submit' )
2018-10-29 13:10:45 +00:00
]);
break ;
case self :: FINISHED :
$db_return_text = " " ;
2018-10-29 17:44:39 +00:00
if ( count ( self :: $installer -> getChecks ()) == 0 ) {
2019-07-12 21:08:01 +00:00
$txt = '<p style="font-size: 130%;">' ;
$txt .= L10n :: t ( 'Your Friendica site database has been installed.' ) . EOL ;
2018-10-29 13:10:45 +00:00
$db_return_text .= $txt ;
}
2019-07-12 21:08:01 +00:00
$tpl = Renderer :: getMarkupTemplate ( 'install_finished.tpl' );
2018-10-31 14:35:50 +00:00
$output .= Renderer :: replaceMacros ( $tpl , [
2018-10-29 17:44:39 +00:00
'$title' => $install_title ,
'$checks' => self :: $installer -> getChecks (),
'$pass' => L10n :: t ( 'Installation finished' ),
'$text' => $db_return_text . self :: whatNext ( $a ),
2018-10-29 13:10:45 +00:00
]);
break ;
}
return $output ;
}
/**
* Creates the text for the next steps
*
* @ param App $a The global App
*
* @ return string The text for the next steps
2019-01-06 21:06:53 +00:00
* @ throws \Friendica\Network\HTTPException\InternalServerErrorException
2018-10-29 13:10:45 +00:00
*/
2018-10-29 13:39:09 +00:00
private static function whatNext ( $a )
{
2018-10-29 13:10:45 +00:00
$baseurl = $a -> getBaseUrl ();
return
L10n :: t ( '<h1>What next</h1>' )
2019-07-12 21:08:01 +00:00
. " <p> " . L10n :: t ( 'IMPORTANT: You will need to [manually] setup a scheduled task for the worker.' )
2018-10-29 13:39:09 +00:00
. L10n :: t ( 'Please see the file "INSTALL.txt".' )
. " </p><p> "
. L10n :: t ( 'Go to your new Friendica node <a href="%s/register">registration page</a> and register as new user. Remember to use the same email you have entered as administrator email. This will allow you to enter the site admin panel.' , $baseurl )
. " </p> " ;
2018-10-29 13:10:45 +00:00
}
2019-03-14 09:00:05 +00:00
/**
* Checks the $_POST settings and updates the config Cache for it
*
2019-07-12 21:08:01 +00:00
* @ param ConfigCache $configCache The current config cache
2019-07-12 20:38:50 +00:00
* @ param array $post The $_POST data
* @ param string $cat The category of the setting
* @ param string $key The key of the setting
* @ param null | string $default The default value
2019-03-14 09:00:05 +00:00
*/
2019-07-12 21:08:01 +00:00
private static function checkSetting ( ConfigCache $configCache , array $post , $cat , $key , $default = null )
2019-03-14 09:00:05 +00:00
{
$configCache -> set ( $cat , $key ,
Strings :: escapeTags (
2019-10-15 13:20:32 +00:00
trim (( $post [ sprintf ( '%s-%s' , $cat , $key )] ? ? '' ) ? :
( $default ? ? $configCache -> get ( $cat , $key ))
2019-03-14 09:00:05 +00:00
)
)
);
}
2018-10-29 13:10:45 +00:00
}