2010-08-16 04:49:29 +00:00
< ? php
2012-01-02 19:16:28 +00:00
$install_wizard_pass = 1 ;
2012-11-03 21:59:46 +00:00
function setup_init ( & $a ){
2013-11-06 03:45:02 +00:00
// Ensure that if somebody hasn't read the install documentation and doesn't have all
// the required modules or has a totally borked shared hosting provider and they can't
// figure out what the hell is going on - that we at least spit out an error message which
// we can inquire about when they write to tell us that our software doesn't work.
// The worst thing we can do at this point is throw a white screen of death and rely on
// them knowing about servers and php modules and logfiles enough so that we can guess
// at the source of the problem. As ugly as it may be, we need to throw a technically worded
// PHP error message in their face. Once installation is complete application errors will
// throw a white screen because these error messages divulge information which can
// potentially be useful to hackers.
2012-05-23 11:38:31 +00:00
2013-11-06 03:45:02 +00:00
error_reporting ( E_ERROR | E_WARNING | E_PARSE );
ini_set ( 'log_errors' , '0' );
ini_set ( 'display_errors' , '1' );
2012-11-03 21:59:46 +00:00
// $baseurl/setup/testrwrite to test if rewite in .htaccess is working
2012-10-05 06:05:45 +00:00
if ( argc () == 2 && argv ( 1 ) == " testrewrite " ) {
2012-05-23 11:38:31 +00:00
echo " ok " ;
killme ();
}
2012-01-02 19:16:28 +00:00
global $install_wizard_pass ;
if ( x ( $_POST , 'pass' ))
$install_wizard_pass = intval ( $_POST [ 'pass' ]);
2013-11-06 03:45:02 +00:00
2012-01-02 19:16:28 +00:00
}
2010-08-16 04:49:29 +00:00
2012-11-03 21:59:46 +00:00
function setup_post ( & $a ) {
2012-01-02 19:16:28 +00:00
global $install_wizard_pass , $db ;
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
switch ( $install_wizard_pass ) {
case 1 :
case 2 :
return ;
break ; // just in case return don't return :)
case 3 :
$urlpath = $a -> get_path ();
2014-06-03 02:05:24 +00:00
$dbhost = trim ( $_POST [ 'dbhost' ]);
$dbport = intval ( trim ( $_POST [ 'dbport' ]));
$dbuser = trim ( $_POST [ 'dbuser' ]);
$dbpass = trim ( $_POST [ 'dbpass' ]);
$dbdata = trim ( $_POST [ 'dbdata' ]);
$phpath = trim ( $_POST [ 'phpath' ]);
$adminmail = trim ( $_POST [ 'adminmail' ]);
$siteurl = trim ( $_POST [ 'siteurl' ]);
2012-01-02 19:16:28 +00:00
2013-04-23 03:02:21 +00:00
require_once ( 'include/dba/dba_driver.php' );
2012-01-02 19:16:28 +00:00
unset ( $db );
2013-05-10 10:37:41 +00:00
$db = dba_factory ( $dbhost , $dbport , $dbuser , $dbpass , $dbdata , true );
2013-05-16 05:27:35 +00:00
if ( ! $db -> connected ) {
echo " Database Connect failed: " . $db -> error ;
killme ();
}
2012-01-02 19:16:28 +00:00
/* if ( get_db_errno ()) {
2011-03-22 00:34:29 +00:00
unset ( $db );
2013-05-10 10:37:41 +00:00
$db = dba_factory ( $dbhost , $dbport , $dbuser , $dbpass , '' , true );
2012-01-02 19:16:28 +00:00
if ( ! get_db_errno ()) {
$r = q ( " CREATE DATABASE '%s' " ,
dbesc ( $dbdata )
);
if ( $r ) {
unset ( $db );
2013-05-16 03:45:35 +00:00
$db = new dba ( $dbhost , $dbport , $dbuser , $dbpass , $dbdata , true );
2012-01-02 19:16:28 +00:00
} else {
$a -> data [ 'db_create_failed' ] = true ;
}
} else {
$a -> data [ 'db_conn_failed' ] = true ;
return ;
}
} */
if ( get_db_errno ()) {
$a -> data [ 'db_conn_failed' ] = true ;
2011-03-22 00:34:29 +00:00
}
2011-07-08 02:12:35 +00:00
2012-01-02 19:16:28 +00:00
return ;
break ;
2012-08-20 13:34:54 +00:00
case 4 :
2012-01-02 19:16:28 +00:00
$urlpath = $a -> get_path ();
$dbhost = notags ( trim ( $_POST [ 'dbhost' ]));
2013-05-16 03:45:35 +00:00
$dbport = intval ( notags ( trim ( $_POST [ 'dbport' ])));
2012-01-02 19:16:28 +00:00
$dbuser = notags ( trim ( $_POST [ 'dbuser' ]));
$dbpass = notags ( trim ( $_POST [ 'dbpass' ]));
$dbdata = notags ( trim ( $_POST [ 'dbdata' ]));
$phpath = notags ( trim ( $_POST [ 'phpath' ]));
$timezone = notags ( trim ( $_POST [ 'timezone' ]));
$adminmail = notags ( trim ( $_POST [ 'adminmail' ]));
2012-10-19 01:34:38 +00:00
$siteurl = notags ( trim ( $_POST [ 'siteurl' ]));
2013-05-16 11:27:28 +00:00
if ( $siteurl != z_root ()) {
$test = z_fetch_url ( $siteurl . " /setup/testrewrite " );
if (( ! $test [ 'success' ]) || ( $test [ 'body' ] != 'ok' )) {
$a -> data [ 'url_fail' ] = true ;
2014-03-23 22:48:08 +00:00
$a -> data [ 'url_error' ] = $test [ 'error' ];
2013-05-16 11:27:28 +00:00
return ;
}
}
2012-01-02 19:16:28 +00:00
// connect to db
2013-05-10 10:37:41 +00:00
$db = dba_factory ( $dbhost , $dbport , $dbuser , $dbpass , $dbdata , true );
2012-01-02 19:16:28 +00:00
2013-05-16 05:27:35 +00:00
if ( ! $db -> connected ) {
echo 'CRITICAL: DB not connected.' ;
killme ();
}
2012-01-02 19:16:28 +00:00
$tpl = get_intltext_template ( 'htconfig.tpl' );
$txt = replace_macros ( $tpl , array (
'$dbhost' => $dbhost ,
2013-05-16 03:45:35 +00:00
'$dbport' => $dbport ,
2012-01-02 19:16:28 +00:00
'$dbuser' => $dbuser ,
'$dbpass' => $dbpass ,
'$dbdata' => $dbdata ,
'$timezone' => $timezone ,
2012-10-19 01:34:38 +00:00
'$siteurl' => $siteurl ,
2012-10-19 10:36:09 +00:00
'$site_id' => random_string (),
2012-01-02 19:16:28 +00:00
'$phpath' => $phpath ,
'$adminmail' => $adminmail
));
$result = file_put_contents ( '.htconfig.php' , $txt );
if ( ! $result ) {
$a -> data [ 'txt' ] = $txt ;
}
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
$errors = load_database ( $db );
2010-11-06 12:07:10 +00:00
2012-01-02 19:16:28 +00:00
if ( $errors )
$a -> data [ 'db_failed' ] = $errors ;
else
$a -> data [ 'db_installed' ] = true ;
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
return ;
break ;
}
2010-08-16 04:49:29 +00:00
}
2011-12-03 08:08:04 +00:00
function get_db_errno () {
if ( class_exists ( 'mysqli' ))
return mysqli_connect_errno ();
else
return mysql_errno ();
}
2010-08-16 04:49:29 +00:00
2012-11-03 21:59:46 +00:00
function setup_content ( & $a ) {
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
global $install_wizard_pass , $db ;
2010-11-18 10:59:59 +00:00
$o = '' ;
2012-01-02 19:16:28 +00:00
$wizard_status = " " ;
2013-05-16 03:45:35 +00:00
$install_title = t ( 'Red Matrix Server - Setup' );
2012-01-02 19:16:28 +00:00
2012-05-23 11:38:31 +00:00
2012-01-02 19:16:28 +00:00
if ( x ( $a -> data , 'db_conn_failed' )) {
$install_wizard_pass = 2 ;
$wizard_status = t ( 'Could not connect to database.' );
}
2013-05-16 11:27:28 +00:00
if ( x ( $a -> data , 'url_fail' )) {
$install_wizard_pass = 3 ;
$wizard_status = t ( 'Could not connect to specified site URL. Possible SSL certificate or DNS issue.' );
2014-03-23 22:48:08 +00:00
if ( $a -> data [ 'url_error' ])
$wizard_status .= ' ' . $a -> data [ 'url_error' ];
2013-05-16 11:27:28 +00:00
}
2012-01-02 19:16:28 +00:00
if ( x ( $a -> data , 'db_create_failed' )) {
$install_wizard_pass = 2 ;
$wizard_status = t ( 'Could not create table.' );
}
2011-03-22 00:34:29 +00:00
2012-05-23 11:38:31 +00:00
$db_return_text = " " ;
2011-03-22 00:34:29 +00:00
if ( x ( $a -> data , 'db_installed' )) {
2012-01-02 19:16:28 +00:00
$txt = '<p style="font-size: 130%;">' ;
2013-04-23 03:02:21 +00:00
$txt .= t ( 'Your site database has been installed.' ) . EOL ;
2012-05-23 11:38:31 +00:00
$db_return_text .= $txt ;
2011-03-22 00:34:29 +00:00
}
if ( x ( $a -> data , 'db_failed' )) {
2012-10-24 08:44:41 +00:00
$txt = t ( 'You may need to import the file "install/database.sql" manually using phpmyadmin or mysql.' ) . EOL ;
$txt .= t ( 'Please see the file "install/INSTALL.txt".' ) . EOL . " <hr> " ;
2012-01-02 19:16:28 +00:00
$txt .= " <pre> " . $a -> data [ 'db_failed' ] . " </pre> " . EOL ;
2012-05-23 11:38:31 +00:00
$db_return_text .= $txt ;
2011-03-22 00:34:29 +00:00
}
2012-05-23 11:38:31 +00:00
2011-03-22 00:34:29 +00:00
if ( $db && $db -> connected ) {
2013-05-15 04:25:58 +00:00
$r = q ( " SELECT COUNT(*) as `total` FROM `account` " );
2011-03-22 00:34:29 +00:00
if ( $r && count ( $r ) && $r [ 0 ][ 'total' ]) {
2012-01-02 19:16:28 +00:00
$tpl = get_markup_template ( 'install.tpl' );
return replace_macros ( $tpl , array (
'$title' => $install_title ,
'$pass' => '' ,
'$status' => t ( 'Permission denied.' ),
'$text' => '' ,
));
2011-03-22 00:34:29 +00:00
}
}
2010-11-18 10:59:59 +00:00
2012-05-23 11:38:31 +00:00
if ( x ( $a -> data , 'txt' ) && strlen ( $a -> data [ 'txt' ])) {
$db_return_text .= manual_config ( $a );
}
if ( $db_return_text != " " ) {
2012-08-20 13:34:54 +00:00
$tpl = get_markup_template ( 'install.tpl' );
2012-05-23 11:38:31 +00:00
return replace_macros ( $tpl , array (
'$title' => $install_title ,
'$pass' => " " ,
'$text' => $db_return_text . what_next (),
));
}
2012-01-02 19:16:28 +00:00
switch ( $install_wizard_pass ){
case 1 : { // System check
2010-11-18 10:59:59 +00:00
2012-01-02 19:16:28 +00:00
$checks = array ();
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
check_funcs ( $checks );
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
check_htconfig ( $checks );
2010-08-16 04:49:29 +00:00
2013-01-07 02:34:54 +00:00
check_smarty3 ( $checks );
2014-01-09 02:20:47 +00:00
check_store ( $checks );
2012-01-02 19:16:28 +00:00
check_keys ( $checks );
2012-02-10 22:03:43 +00:00
if ( x ( $_POST , 'phpath' ))
$phpath = notags ( trim ( $_POST [ 'phpath' ]));
2010-11-25 23:33:32 +00:00
2012-01-02 19:16:28 +00:00
check_php ( $phpath , $checks );
2010-11-25 23:33:32 +00:00
2012-06-01 07:31:24 +00:00
check_htaccess ( $checks );
2012-01-02 19:16:28 +00:00
function check_passed ( $v , $c ){
if ( $c [ 'required' ])
$v = $v && $c [ 'status' ];
return $v ;
}
$checkspassed = array_reduce ( $checks , " check_passed " , true );
2012-06-01 07:31:24 +00:00
2012-01-02 19:16:28 +00:00
$tpl = get_markup_template ( 'install_checks.tpl' );
$o .= replace_macros ( $tpl , array (
'$title' => $install_title ,
'$pass' => t ( 'System check' ),
'$checks' => $checks ,
'$passed' => $checkspassed ,
2012-10-24 08:44:41 +00:00
'$see_install' => t ( 'Please see the file "install/INSTALL.txt".' ),
2012-01-02 19:16:28 +00:00
'$next' => t ( 'Next' ),
'$reload' => t ( 'Check again' ),
'$phpath' => $phpath ,
2012-02-09 23:13:34 +00:00
'$baseurl' => $a -> get_baseurl (),
2012-01-02 19:16:28 +00:00
));
return $o ;
}; break ;
case 2 : { // Database config
$dbhost = (( x ( $_POST , 'dbhost' )) ? notags ( trim ( $_POST [ 'dbhost' ])) : 'localhost' );
$dbuser = notags ( trim ( $_POST [ 'dbuser' ]));
2013-05-16 03:45:35 +00:00
$dbport = intval ( notags ( trim ( $_POST [ 'dbport' ])));
2012-01-02 19:16:28 +00:00
$dbpass = notags ( trim ( $_POST [ 'dbpass' ]));
$dbdata = notags ( trim ( $_POST [ 'dbdata' ]));
2012-02-10 22:03:43 +00:00
$phpath = notags ( trim ( $_POST [ 'phpath' ]));
2012-11-07 07:55:05 +00:00
$adminmail = notags ( trim ( $_POST [ 'adminmail' ]));
$siteurl = notags ( trim ( $_POST [ 'siteurl' ]));
2012-01-02 19:16:28 +00:00
$tpl = get_markup_template ( 'install_db.tpl' );
$o .= replace_macros ( $tpl , array (
'$title' => $install_title ,
'$pass' => t ( 'Database connection' ),
2013-05-16 03:59:39 +00:00
'$info_01' => t ( 'In order to install Red Matrix we need to know how to connect to your database.' ),
2012-01-02 19:16:28 +00:00
'$info_02' => t ( 'Please contact your hosting provider or site administrator if you have questions about these settings.' ),
'$info_03' => t ( 'The database you specify below should already exist. If it does not, please create it before continuing.' ),
'$status' => $wizard_status ,
2013-05-16 04:01:06 +00:00
'$dbhost' => array ( 'dbhost' , t ( 'Database Server Name' ), $dbhost , t ( 'Default is localhost' )),
2013-05-16 03:59:39 +00:00
'$dbport' => array ( 'dbport' , t ( 'Database Port' ), $dbport , t ( 'Communication port number - use 0 for default' )),
2012-01-02 19:16:28 +00:00
'$dbuser' => array ( 'dbuser' , t ( 'Database Login Name' ), $dbuser , '' ),
'$dbpass' => array ( 'dbpass' , t ( 'Database Login Password' ), $dbpass , '' ),
'$dbdata' => array ( 'dbdata' , t ( 'Database Name' ), $dbdata , '' ),
2012-08-31 05:42:51 +00:00
2012-01-02 19:16:28 +00:00
'$adminmail' => array ( 'adminmail' , t ( 'Site administrator email address' ), $adminmail , t ( 'Your account email address must match this in order to use the web admin panel.' )),
2012-10-19 01:34:38 +00:00
'$siteurl' => array ( 'siteurl' , t ( 'Website URL' ), z_root (), t ( 'Please use SSL (https) URL if available.' )),
2012-01-02 19:16:28 +00:00
'$lbl_10' => t ( 'Please select a default timezone for your website' ),
'$baseurl' => $a -> get_baseurl (),
'$phpath' => $phpath ,
'$submit' => t ( 'Submit' ),
));
return $o ;
}; break ;
case 3 : { // Site settings
2013-09-17 07:41:48 +00:00
require_once ( 'include/datetime.php' );
2012-01-02 19:16:28 +00:00
$dbhost = (( x ( $_POST , 'dbhost' )) ? notags ( trim ( $_POST [ 'dbhost' ])) : 'localhost' );
2013-05-16 03:45:35 +00:00
$dbport = intval ( notags ( trim ( $_POST [ 'dbuser' ])));
2012-01-02 19:16:28 +00:00
$dbuser = notags ( trim ( $_POST [ 'dbuser' ]));
$dbpass = notags ( trim ( $_POST [ 'dbpass' ]));
$dbdata = notags ( trim ( $_POST [ 'dbdata' ]));
2012-02-10 22:03:43 +00:00
$phpath = notags ( trim ( $_POST [ 'phpath' ]));
2012-01-02 19:16:28 +00:00
$adminmail = notags ( trim ( $_POST [ 'adminmail' ]));
2012-11-07 07:55:05 +00:00
$siteurl = notags ( trim ( $_POST [ 'siteurl' ]));
2012-01-02 19:16:28 +00:00
$timezone = (( x ( $_POST , 'timezone' )) ? ( $_POST [ 'timezone' ]) : 'America/Los_Angeles' );
$tpl = get_markup_template ( 'install_settings.tpl' );
$o .= replace_macros ( $tpl , array (
'$title' => $install_title ,
'$pass' => t ( 'Site settings' ),
'$status' => $wizard_status ,
'$dbhost' => $dbhost ,
2013-05-16 03:45:35 +00:00
'$dbport' => $dbport ,
2012-01-02 19:16:28 +00:00
'$dbuser' => $dbuser ,
'$dbpass' => $dbpass ,
'$dbdata' => $dbdata ,
'$phpath' => $phpath ,
'$adminmail' => array ( 'adminmail' , t ( 'Site administrator email address' ), $adminmail , t ( 'Your account email address must match this in order to use the web admin panel.' )),
2012-10-19 01:34:38 +00:00
'$siteurl' => array ( 'siteurl' , t ( 'Website URL' ), z_root (), t ( 'Please use SSL (https) URL if available.' )),
2012-01-02 19:16:28 +00:00
'$timezone' => field_timezone ( 'timezone' , t ( 'Please select a default timezone for your website' ), $timezone , '' ),
'$baseurl' => $a -> get_baseurl (),
'$submit' => t ( 'Submit' ),
));
return $o ;
}; break ;
}
}
2010-08-16 04:49:29 +00:00
2012-01-02 19:16:28 +00:00
/**
* checks : array passed to template
* title : string
* status : boolean
* required : boolean
* help : string optional
*/
function check_add ( & $checks , $title , $status , $required , $help ){
$checks [] = array (
'title' => $title ,
'status' => $status ,
'required' => $required ,
'help' => $help ,
);
2010-08-16 04:49:29 +00:00
}
2012-01-02 19:16:28 +00:00
function check_php ( & $phpath , & $checks ) {
if ( strlen ( $phpath )){
$passed = file_exists ( $phpath );
} else {
2014-02-02 22:06:36 +00:00
if ( is_windows ())
$phpath = trim ( shell_exec ( 'where php' ));
else
$phpath = trim ( shell_exec ( 'which php' ));
2012-01-02 19:16:28 +00:00
$passed = strlen ( $phpath );
2010-11-25 23:33:32 +00:00
}
2012-01-02 19:16:28 +00:00
$help = " " ;
if ( ! $passed ) {
$help .= t ( 'Could not find a command line version of PHP in the web server PATH.' ) . EOL ;
2013-04-23 03:02:21 +00:00
$help .= t ( " If you don't have a command line version of PHP installed on server, you will not be able to run background polling via cron. " ) . EOL ;
2012-05-24 08:21:33 +00:00
$help .= EOL . EOL ;
2012-01-02 19:16:28 +00:00
$tpl = get_markup_template ( 'field_input.tpl' );
$help .= replace_macros ( $tpl , array (
2012-05-24 08:21:33 +00:00
'$field' => array ( 'phpath' , t ( 'PHP executable path' ), $phpath , t ( 'Enter full path to php executable. You can leave this blank to continue the installation.' )),
2012-01-02 19:16:28 +00:00
));
$phpath = " " ;
}
2012-05-24 08:21:33 +00:00
check_add ( $checks , t ( 'Command line PHP' ) . ( $passed ? " (<tt> $phpath </tt>) " : " " ), $passed , false , $help );
2012-01-02 19:16:28 +00:00
if ( $passed ) {
2010-11-25 23:33:32 +00:00
$str = autoname ( 8 );
2012-11-01 22:10:05 +00:00
$cmd = " $phpath install/testargs.php $str " ;
2010-11-25 23:33:32 +00:00
$result = trim ( shell_exec ( $cmd ));
2012-01-02 19:16:28 +00:00
$passed2 = $result == $str ;
$help = " " ;
if ( ! $passed2 ) {
$help .= t ( 'The command line version of PHP on your system does not have "register_argc_argv" enabled.' ) . EOL ;
$help .= t ( 'This is required for message delivery to work.' );
2010-11-25 23:33:32 +00:00
}
2012-04-05 09:15:03 +00:00
check_add ( $checks , t ( 'PHP register_argc_argv' ), $passed , true , $help );
2010-08-16 04:49:29 +00:00
}
2012-01-02 19:16:28 +00:00
2010-11-25 23:33:32 +00:00
2010-08-16 04:49:29 +00:00
}
2012-01-02 19:16:28 +00:00
function check_keys ( & $checks ) {
2010-11-25 23:33:32 +00:00
2012-01-02 19:16:28 +00:00
$help = '' ;
2010-11-25 23:33:32 +00:00
$res = false ;
if ( function_exists ( 'openssl_pkey_new' ))
$res = openssl_pkey_new ( array (
'digest_alg' => 'sha1' ,
'private_key_bits' => 4096 ,
'encrypt_key' => false ));
// Get private key
2010-12-22 22:07:27 +00:00
if ( ! $res ) {
2012-01-02 19:16:28 +00:00
$help .= t ( 'Error: the "openssl_pkey_new" function on this system is not able to generate encryption keys' ) . EOL ;
$help .= t ( 'If running under Windows, please see "http://www.php.net/manual/en/openssl.installation.php".' );
2010-12-22 22:07:27 +00:00
}
2012-01-02 19:16:28 +00:00
check_add ( $checks , t ( 'Generate encryption keys' ), $res , true , $help );
2010-11-25 23:33:32 +00:00
}
2012-01-02 19:16:28 +00:00
function check_funcs ( & $checks ) {
$ck_funcs = array ();
check_add ( $ck_funcs , t ( 'libCurl PHP module' ), true , true , " " );
check_add ( $ck_funcs , t ( 'GD graphics PHP module' ), true , true , " " );
check_add ( $ck_funcs , t ( 'OpenSSL PHP module' ), true , true , " " );
check_add ( $ck_funcs , t ( 'mysqli PHP module' ), true , true , " " );
check_add ( $ck_funcs , t ( 'mb_string PHP module' ), true , true , " " );
2013-01-28 06:49:18 +00:00
check_add ( $ck_funcs , t ( 'mcrypt PHP module' ), true , true , " " );
2012-01-02 19:16:28 +00:00
if ( function_exists ( 'apache_get_modules' )){
if ( ! in_array ( 'mod_rewrite' , apache_get_modules ())) {
2012-04-17 05:58:52 +00:00
check_add ( $ck_funcs , t ( 'Apache mod_rewrite module' ), false , true , t ( 'Error: Apache webserver mod-rewrite module is required but not installed.' ));
2012-01-02 19:16:28 +00:00
} else {
2012-04-17 05:58:52 +00:00
check_add ( $ck_funcs , t ( 'Apache mod_rewrite module' ), true , true , " " );
2012-01-02 19:16:28 +00:00
}
}
2013-02-27 03:41:44 +00:00
if (( ! function_exists ( 'proc_open' )) || strstr ( ini_get ( 'disable_functions' ), 'proc_open' )) {
check_add ( $ck_funcs , t ( 'proc_open' ), false , true , t ( 'Error: proc_open is required but is either not installed or has been disabled in php.ini' ));
}
else {
check_add ( $ck_funcs , t ( 'proc_open' ), true , true , " " );
}
2012-06-01 07:31:24 +00:00
2012-01-02 19:16:28 +00:00
if ( ! function_exists ( 'curl_init' )){
$ck_funcs [ 0 ][ 'status' ] = false ;
$ck_funcs [ 0 ][ 'help' ] = t ( 'Error: libCURL PHP module required but not installed.' );
}
2012-09-02 08:59:11 +00:00
if ( ! function_exists ( 'imagecreatefromjpeg' )){
2012-01-02 19:16:28 +00:00
$ck_funcs [ 1 ][ 'status' ] = false ;
$ck_funcs [ 1 ][ 'help' ] = t ( 'Error: GD graphics PHP module with JPEG support required but not installed.' );
}
if ( ! function_exists ( 'openssl_public_encrypt' )) {
$ck_funcs [ 2 ][ 'status' ] = false ;
$ck_funcs [ 2 ][ 'help' ] = t ( 'Error: openssl PHP module required but not installed.' );
}
if ( ! function_exists ( 'mysqli_connect' )){
$ck_funcs [ 3 ][ 'status' ] = false ;
$ck_funcs [ 3 ][ 'help' ] = t ( 'Error: mysqli PHP module required but not installed.' );
}
if ( ! function_exists ( 'mb_strlen' )){
$ck_funcs [ 4 ][ 'status' ] = false ;
$ck_funcs [ 4 ][ 'help' ] = t ( 'Error: mb_string PHP module required but not installed.' );
}
2013-01-28 06:49:18 +00:00
if ( ! function_exists ( 'mcrypt_encrypt' )){
2013-10-14 20:44:35 +00:00
$ck_funcs [ 5 ][ 'status' ] = false ;
$ck_funcs [ 5 ][ 'help' ] = t ( 'Error: mcrypt PHP module required but not installed.' );
2013-01-28 06:49:18 +00:00
}
2011-06-05 05:48:43 +00:00
2012-01-02 19:16:28 +00:00
$checks = array_merge ( $checks , $ck_funcs );
2012-08-31 05:42:51 +00:00
2010-11-18 10:59:59 +00:00
}
2012-01-02 19:16:28 +00:00
function check_htconfig ( & $checks ) {
$status = true ;
$help = " " ;
if ( ( file_exists ( '.htconfig.php' ) && ! is_writable ( '.htconfig.php' )) ||
( ! file_exists ( '.htconfig.php' ) && ! is_writable ( '.' )) ) {
$status = false ;
$help = t ( 'The web installer needs to be able to create a file called ".htconfig.php" in the top folder of your web server and it is unable to do so.' ) . EOL ;
$help .= t ( 'This is most often a permission setting, as the web server may not be able to write files in your folder - even if you can.' ) . EOL ;
2013-04-23 03:02:21 +00:00
$help .= t ( 'At the end of this procedure, we will give you a text to save in a file named .htconfig.php in your Red top folder.' ) . EOL ;
2012-10-24 08:44:41 +00:00
$help .= t ( 'You can alternatively skip this procedure and perform a manual installation. Please see the file "install/INSTALL.txt" for instructions.' ) . EOL ;
2010-08-16 04:49:29 +00:00
}
2012-06-01 07:31:24 +00:00
2012-05-23 11:38:31 +00:00
check_add ( $checks , t ( '.htconfig.php is writable' ), $status , false , $help );
2012-06-01 07:31:24 +00:00
2010-08-16 04:49:29 +00:00
}
2013-01-07 02:34:54 +00:00
function check_smarty3 ( & $checks ) {
$status = true ;
$help = " " ;
2014-07-11 04:34:52 +00:00
if ( ! is_writable ( TEMPLATE_BUILD_PATH ) ) {
2013-01-07 02:34:54 +00:00
$status = false ;
2013-04-23 03:02:21 +00:00
$help = t ( 'Red uses the Smarty3 template engine to render its web views. Smarty3 compiles templates to PHP to speed up rendering.' ) . EOL ;
2014-07-11 04:34:52 +00:00
$help .= sprintf ( t ( 'In order to store these compiled templates, the web server needs to have write access to the directory %s under the Red top level folder.' ), TEMPLATE_BUILD_PATH ) . EOL ;
2013-01-07 02:34:54 +00:00
$help .= t ( 'Please ensure that the user that your web server runs as (e.g. www-data) has write access to this folder.' ) . EOL ;
2014-07-11 04:34:52 +00:00
$help .= sprintf ( t ( 'Note: as a security measure, you should give the web server write access to %s only--not the template files (.tpl) that it contains.' ), TEMPLATE_BUILD_PATH ) . EOL ;
2013-01-07 02:34:54 +00:00
}
2014-07-11 04:34:52 +00:00
check_add ( $checks , sprintf ( t ( '%s is writable' ), TEMPLATE_BUILD_PATH ), $status , true , $help );
2013-01-07 02:34:54 +00:00
}
2014-01-09 02:20:47 +00:00
function check_store ( & $checks ) {
$status = true ;
$help = " " ;
2014-07-16 08:07:00 +00:00
@ os_mkdir ( 'store' , STORAGE_DEFAULT_PERMISSIONS );
2014-01-09 02:20:47 +00:00
if ( ! is_writable ( 'store' ) ) {
$status = false ;
$help = t ( 'Red uses the store directory to save uploaded files. The web server needs to have write access to the store directory under the Red top level folder' ) . EOL ;
$help .= t ( 'Please ensure that the user that your web server runs as (e.g. www-data) has write access to this folder.' ) . EOL ;
}
check_add ( $checks , t ( 'store is writable' ), $status , true , $help );
}
2012-05-23 11:38:31 +00:00
function check_htaccess ( & $checks ) {
$a = get_app ();
$status = true ;
$help = " " ;
2014-05-07 00:32:22 +00:00
$ssl_error = false ;
2014-05-31 23:10:31 +00:00
$url = $a -> get_baseurl () . '/setup/testrewrite' ;
2014-05-07 00:32:22 +00:00
2012-06-01 07:31:24 +00:00
if ( function_exists ( 'curl_init' )){
2014-05-07 00:32:22 +00:00
$test = z_fetch_url ( $url );
2013-05-16 01:35:16 +00:00
if ( ! $test [ 'success' ]) {
2014-05-07 00:32:22 +00:00
if ( strstr ( $url , 'https://' )) {
$test = z_fetch_url ( $url , false , 0 , array ( 'novalidate' => true ));
if ( $test [ 'success' ]) {
$ssl_error = true ;
}
}
else {
$test = z_fetch_url ( str_replace ( 'http://' , 'https://' , $url ), false , 0 , array ( 'novalidate' => true ));
2013-05-16 01:35:16 +00:00
if ( $test [ 'success' ]) {
2014-05-07 00:32:22 +00:00
$ssl_error = true ;
2013-05-16 01:35:16 +00:00
}
}
2014-05-07 00:32:22 +00:00
if ( $ssl_error ) {
$help = t ( 'SSL certificate cannot be validated. Fix certificate or disable https access to this site.' ) . EOL ;
$help .= t ( 'If you have https access to your website or allow connections to TCP port 443 (the https: port), you MUST use a browser-valid certificate. You MUST NOT use self-signed certificates!' ) . EOL ;
$help .= t ( 'This restriction is incorporated because public posts from you may for example contain references to images on your own hub.' ) . EOL ;
2014-07-31 09:33:34 +00:00
$help .= t ( 'If your certificate is not recognized, members of other sites (who may themselves have valid certificates) will get a warning message on their own site complaining about security issues.' ) . EOL ;
2014-05-07 00:32:22 +00:00
$help .= t ( 'This can cause usability issues elsewhere (not just on your own site) so we must insist on this requirement.' ) . EOL ;
$help .= t ( 'Providers are available that issue free certificates which are browser-valid.' ) . EOL ;
check_add ( $checks , t ( 'SSL certificate validation' ), false , true , $help );
}
2013-05-16 01:35:16 +00:00
}
2013-02-26 04:06:33 +00:00
if (( ! $test [ 'success' ]) || ( $test [ 'body' ] != " ok " )) {
2012-06-01 07:31:24 +00:00
$status = false ;
$help = t ( 'Url rewrite in .htaccess is not working. Check your server configuration.' );
}
check_add ( $checks , t ( 'Url rewrite is working' ), $status , true , $help );
} else {
// cannot check modrewrite if libcurl is not installed
}
2012-05-23 11:38:31 +00:00
}
2010-08-16 04:49:29 +00:00
function manual_config ( & $a ) {
2013-12-12 07:13:36 +00:00
$data = htmlspecialchars ( $a -> data [ 'txt' ], ENT_COMPAT , 'UTF-8' );
2010-11-06 12:07:10 +00:00
$o = t ( 'The database configuration file ".htconfig.php" could not be written. Please use the enclosed text to create a configuration file in your web server root.' );
2010-11-16 03:27:15 +00:00
$o .= " <textarea rows= \" 24 \" cols= \" 80 \" > $data </textarea> " ;
2010-11-06 12:07:10 +00:00
return $o ;
2010-08-16 04:49:29 +00:00
}
2012-01-02 19:16:28 +00:00
function load_database_rem ( $v , $i ){
$l = trim ( $i );
if ( strlen ( $l ) > 1 && ( $l [ 0 ] == " - " || ( $l [ 0 ] == " / " && $l [ 1 ] == " * " ))){
return $v ;
} else {
return $v . " \n " . $i ;
}
}
2010-08-16 04:49:29 +00:00
function load_database ( $db ) {
2012-10-24 08:44:41 +00:00
$str = file_get_contents ( 'install/database.sql' );
2010-08-16 04:49:29 +00:00
$arr = explode ( ';' , $str );
2012-01-02 19:16:28 +00:00
$errors = false ;
2010-08-16 04:49:29 +00:00
foreach ( $arr as $a ) {
if ( strlen ( trim ( $a ))) {
$r = @ $db -> q ( trim ( $a ));
if ( ! $r ) {
2012-01-02 19:16:28 +00:00
$errors .= t ( 'Errors encountered creating database tables.' ) . $a . EOL ;
2010-08-16 04:49:29 +00:00
}
}
2010-11-22 07:00:01 +00:00
}
2010-08-16 04:49:29 +00:00
return $errors ;
2011-05-23 09:39:57 +00:00
}
2012-04-17 05:58:52 +00:00
2012-05-23 11:38:31 +00:00
function what_next () {
$a = get_app ();
2013-12-16 08:25:08 +00:00
// install the standard theme
set_config ( 'system' , 'allowed_themes' , 'redbasic' );
2014-03-25 22:19:18 +00:00
// Set a lenient list of ciphers if using openssl. Other ssl engines
// (e.g. NSS used in RedHat) require different syntax, so hopefully
// the default curl cipher list will work for most sites. If not,
// this can set via config. Many distros are now disabling RC4,
// but many Red sites still use it and are unable to change it.
// We do not use SSL for encryption, only to protect session cookies.
// z_fetch_url() is also used to import shared links and other content
// so in theory most any cipher could show up and we should do our best
// to make the content available rather than tell folks that there's a
// weird SSL error which they can't do anything about.
$x = curl_version ();
if ( stristr ( $x [ 'ssl_version' ], 'openssl' ))
set_config ( 'system' , 'curl_ssl_ciphers' , 'ALL:!eNULL' );
2014-03-07 17:29:36 +00:00
// Create a system channel
require_once ( 'include/identity.php' );
create_sys_channel ();
2014-03-25 22:19:18 +00:00
2012-05-23 11:38:31 +00:00
$baseurl = $a -> get_baseurl ();
return
t ( '<h1>What next</h1>' )
. " <p> " . t ( 'IMPORTANT: You will need to [manually] setup a scheduled task for the poller.' )
2012-10-24 08:44:41 +00:00
. t ( 'Please see the file "install/INSTALL.txt".' )
2012-05-23 11:38:31 +00:00
. " </p><p> "
2013-04-23 03:02:21 +00:00
. t ( " Go to your new Red node <a href=' $baseurl /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. " )
2012-05-23 11:38:31 +00:00
. " </p> " ;
}
2012-04-17 05:58:52 +00:00