* Copyright (C) 2004-2012 Laurent Destailleur * Copyright (C) 2004 Benoit Mortier * Copyright (C) 2004 Sebastien Di Cintio * Copyright (C) 2005-2011 Regis Houssin * Copyright (C) 2015 Raphaël Doursenaud * * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License as published by * the Free Software Foundation; either version 3 of the License, or * (at your option) any later version. * * This program is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with this program. If not, see . */ /** * \file htdocs/install/step1.php * \ingroup install * \brief Build conf file on disk */ define('DONOTLOADCONF',1); // To avoid loading conf by file inc.php include 'inc.php'; $action=GETPOST('action','alpha'); $setuplang=(GETPOST('selectlang','',3)?GETPOST('selectlang','',3):'auto'); $langs->setDefaultLang($setuplang); $langs->load("admin"); $langs->load("install"); $langs->load("errors"); // Recuparation des information de connexion $userroot=GETPOST('db_user_root'); $passroot=GETPOST('db_pass_root'); // Repertoire des pages dolibarr $main_dir=GETPOST('main_dir'); $main_url=GETPOST('main_url'); // Database server $db_type=GETPOST('db_type','alpha'); $db_host=GETPOST('db_host','alpha'); $db_name=GETPOST('db_name','alpha'); $db_user=GETPOST('db_user','alpha'); $db_pass=GETPOST('db_pass'); $db_port=GETPOST('db_port','int'); $db_prefix=GETPOST('db_prefix','alpha'); session_start(); // To be able to keep info into session (used for not loosing pass during navigation. pass must not transit throug parmaeters) // Save a flag to tell to restore input value if we do back $_SESSION['dol_save_pass']=$db_pass; //$_SESSION['dol_save_passroot']=$passroot; // Now we load forced value from install.forced.php file. $useforcedwizard=false; $forcedfile="./install.forced.php"; if ($conffile == "/etc/dolibarr/conf.php") $forcedfile="/etc/dolibarr/install.forced.php"; if (@file_exists($forcedfile)) { $useforcedwizard=true; include_once $forcedfile; } dolibarr_install_syslog("--- step1: entering step1.php page"); $error = 0; /* * View */ pHeader($langs->trans("ConfigurationFile"),"step2"); // Test if we can run a first install process if (! is_writable($conffile)) { print $langs->trans("ConfFileIsNotWritable",$conffiletoshow); pFooter(1,$setuplang,'jscheckparam'); exit; } // Check parameters $is_sqlite = false; if (empty($db_type)) { print '

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("DatabaseType")).'

'; $error++; } else { $is_sqlite = ($db_type === 'sqlite' || $db_type === 'sqlite3' ); } if (empty($db_host) && ! $is_sqlite) { print '

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("Server")).'

'; $error++; } if (empty($db_name)) { print '

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("DatabaseName")).'

'; $error++; } if (empty($db_user) && ! $is_sqlite) { print '

'.$langs->trans("ErrorFieldRequired",$langs->transnoentities("Login")).'

'; $error++; } if (! empty($db_port) && ! is_numeric($db_port)) { print '

'.$langs->trans("ErrorBadValueForParameter",$db_port,$langs->transnoentities("Port")).'

'; $error++; } if (! empty($db_prefix) && ! preg_match('/^[a-z0-9]+_$/i', $db_prefix)) { print '

'.$langs->trans("ErrorBadValueForParameter",$db_prefix,$langs->transnoentities("DatabasePrefix")).'

'; $error++; } // Remove last / into dans main_dir if (substr($main_dir, dol_strlen($main_dir) -1) == "/") { $main_dir = substr($main_dir, 0, dol_strlen($main_dir)-1); } // Remove last / into dans main_url if (! empty($main_url) && substr($main_url, dol_strlen($main_url) -1) == "/") { $main_url = substr($main_url, 0, dol_strlen($main_url)-1); } // Directory for generated documents (invoices, orders, ecm, etc...) $main_data_dir=isset($_POST["main_data_dir"])?$_POST["main_data_dir"]:''; if (! $main_data_dir) { $main_data_dir="$main_dir/documents"; } // Test database connexion if (! $error) { $result=@include_once $main_dir."/core/db/".$db_type.'.class.php'; if ($result) { // If we ask database or user creation we need to connect as root, so we need root login if (! empty($_POST["db_create_database"]) && ! $userroot) { print '

'.$langs->trans("YouAskDatabaseCreationSoDolibarrNeedToConnect",$db_name).'

'; print '
'; print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'

'; print $langs->trans("ErrorGoBackAndCorrectParameters"); $error++; } if (! empty($_POST["db_create_user"]) && ! $userroot) { print '

'.$langs->trans("YouAskLoginCreationSoDolibarrNeedToConnect",$db_user).'

'; print '
'; print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'

'; print $langs->trans("ErrorGoBackAndCorrectParameters"); $error++; } // If we need root access if (! $error && (! empty($_POST["db_create_database"]) || ! empty($_POST["db_create_user"]))) { $databasefortest=$db_name; if (! empty($_POST["db_create_database"])) { if ($db_type == 'mysql' || $db_type == 'mysqli') { $databasefortest='mysql'; } elseif ($db_type == 'pgsql') { $databasefortest='postgres'; } else { $databasefortest='master'; } } //print $_POST["db_type"].",".$_POST["db_host"].",$userroot,$passroot,$databasefortest,".$_POST["db_port"]; $db=getDoliDBInstance($db_type, $db_host, $userroot, $passroot, $databasefortest, $db_port); dol_syslog("databasefortest=" . $databasefortest . " connected=" . $db->connected . " database_selected=" . $db->database_selected, LOG_DEBUG); //print "databasefortest=".$databasefortest." connected=".$db->connected." database_selected=".$db->database_selected; if (empty($_POST["db_create_database"]) && $db->connected && ! $db->database_selected) { print '

'.$langs->trans("ErrorConnectedButDatabaseNotFound",$db_name).'

'; print '
'; if (! $db->connected) print $langs->trans("IfDatabaseNotExistsGoBackAndUncheckCreate").'

'; print $langs->trans("ErrorGoBackAndCorrectParameters"); $error++; } elseif ($db->error && ! (! empty($_POST["db_create_database"]) && $db->connected)) { // Note: you may experience error here with message "No such file or directory" when mysql was installed for the first time but not yet launched. if ($db->error == "No such file or directory") print '

'.$langs->trans("ErrorToConnectToMysqlCheckInstance").'

'; else print '

'.$db->error.'

'; if (! $db->connected) print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'

'; //print ''; print $langs->trans("ErrorGoBackAndCorrectParameters"); //print ''; $error++; } } // If we need simple access if (! $error && (empty($_POST["db_create_database"]) && empty($_POST["db_create_user"]))) { $db=getDoliDBInstance($db_type, $db_host, $db_user, $db_pass, $db_name, $db_port); if ($db->error) { print '

'.$db->error.'

'; if (! $db->connected) print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'

'; //print ''; print $langs->trans("ErrorGoBackAndCorrectParameters"); //print ''; $error++; } } } else { print "
\nFailed to include_once(\"".$main_dir."/core/db/".$db_type.".class.php\")
\n"; print '

'.$langs->trans("ErrorWrongValueForParameter",$langs->transnoentities("WebPagesDirectory")).'

'; //print ''; print $langs->trans("ErrorGoBackAndCorrectParameters"); //print ''; $error++; } } else { if (isset($db)) print $db->lasterror(); if (isset($db) && ! $db->connected) print '
'.$langs->trans("BecauseConnectionFailedParametersMayBeWrong").'

'; print $langs->trans("ErrorGoBackAndCorrectParameters"); $error++; } if (! $error && $db->connected) { if (! empty($_POST["db_create_database"])) { $result=$db->select_db($db_name); if ($result) { print '

'.$langs->trans("ErrorDatabaseAlreadyExists", $db_name).'

'; print $langs->trans("IfDatabaseExistsGoBackAndCheckCreate").'

'; print $langs->trans("ErrorGoBackAndCorrectParameters"); $error++; } } } // Define $defaultCharacterSet and $defaultDBSortingCollation if (! $error && $db->connected) { if (! empty($_POST["db_create_database"])) // If we create database, we force default value { $defaultCharacterSet=$db->forcecharset; $defaultDBSortingCollation=$db->forcecollate; } else // If already created, we take current value { $defaultCharacterSet=$db->getDefaultCharacterSetDatabase(); $defaultDBSortingCollation=$db->getDefaultCollationDatabase(); } print ''; print ''; $db_character_set=$defaultCharacterSet; $db_collation=$defaultDBSortingCollation; dolibarr_install_syslog("step1: db_character_set=" . $db_character_set . " db_collation=" . $db_collation); } // Create config file if (! $error && $db->connected && $action == "set") { umask(0); foreach($_POST as $key => $value) { if (! preg_match('/^db_pass/i', $key)) { dolibarr_install_syslog("step1: choice for " . $key . " = " . $value); } } // Show title of step print '

'.$langs->trans("ConfigurationFile").'

'; print ''; // Check parameter main_dir if (! $error) { if (! is_dir($main_dir)) { dolibarr_install_syslog("step1: directory '" . $main_dir . "' is unavailable or can't be accessed"); print ""; $error++; } } if (! $error) { dolibarr_install_syslog("step1: directory '" . $main_dir . "' exists"); } // Create subdirectory main_data_dir if (! $error) { // Create directory for documents if (! is_dir($main_data_dir)) { dol_mkdir($main_data_dir); } if (! is_dir($main_data_dir)) { print ""; print ''; $error++; } else { // Create .htaccess file in document directory $pathhtaccess=$main_data_dir.'/.htaccess'; if (! file_exists($pathhtaccess)) { dolibarr_install_syslog("step1: .htaccess file did not exist, we created it in '" . $main_data_dir . "'"); $handlehtaccess=@fopen($pathhtaccess,'w'); if ($handlehtaccess) { fwrite($handlehtaccess,'Order allow,deny'."\n"); fwrite($handlehtaccess,'Deny from all'."\n"); fclose($handlehtaccess); dolibarr_install_syslog("step1: .htaccess file created"); } } // Les documents sont en dehors de htdocs car ne doivent pas pouvoir etre telecharges en passant outre l'authentification $dir[0] = $main_data_dir."/mycompany"; $dir[1] = $main_data_dir."/users"; $dir[2] = $main_data_dir."/custom"; $dir[3] = $main_data_dir."/facture"; $dir[4] = $main_data_dir."/propale"; $dir[5] = $main_data_dir."/ficheinter"; $dir[6] = $main_data_dir."/produit"; $dir[7] = $main_data_dir."/doctemplates"; $dir[7] = $main_data_dir."/extensions"; // Boucle sur chaque repertoire de dir[] pour les creer s'ils nexistent pas $num=count($dir); for ($i = 0; $i < $num; $i++) { if (is_dir($dir[$i])) { dolibarr_install_syslog("step1: directory '" . $dir[$i] . "' exists"); } else { if (dol_mkdir($dir[$i]) < 0) { print ""; $error++; } else { dolibarr_install_syslog("step1: directory '" . $dir[$i] . "' created"); } } } if ($error) { print ""; print ''; } else { //ODT templates require_once DOL_DOCUMENT_ROOT.'/core/lib/files.lib.php'; $srcroot=$main_dir.'/install/doctemplates'; $destroot=$main_data_dir.'/doctemplates'; $docs=array('thirdparties' => 'thirdparty', 'proposals' => 'proposal', 'orders' => 'order', 'invoices' => 'invoice', 'projects' => 'project', 'tasks' => 'task_summary'); foreach($docs as $cursordir => $cursorfile) { $src=$srcroot.'/'.$cursordir.'/template_'.$cursorfile.'.odt'; $dirodt=$destroot.'/'.$cursordir; $dest=$dirodt.'/template_'.$cursorfile.'.odt'; dol_mkdir($dirodt); $result=dol_copy($src,$dest,0,0); if ($result < 0) { print ''; } } } } } // Table prefix $main_db_prefix = (! empty($db_prefix) ? $db_prefix : 'llx_'); // Force https $main_force_https = ((GETPOST("main_force_https") && (GETPOST("main_force_https") == "on" || GETPOST("main_force_https") == 1)) ? '1' : '0'); // Use alternative directory $main_use_alt_dir = ((GETPOST("main_use_alt_dir") && (GETPOST("main_use_alt_dir") == "on" || GETPOST("main_use_alt_dir") == 1)) ? '' : '//'); // Alternative root directory name $main_alt_dir_name = ((GETPOST("main_alt_dir_name") && GETPOST("main_alt_dir_name") != '') ? GETPOST("main_alt_dir_name") : 'custom'); // Write conf file on disk if (! $error) { // Save old conf file on disk if (file_exists("$conffile")) { // We must ignore errors as an existing old file may already exists and not be replacable or // the installer (like for ubuntu) may not have permission to create another file than conf.php. // Also no other process must be able to read file or we expose the new file, so content with password. @dol_copy($conffile, $conffile.'.old', '0400'); } $error+=write_conf_file($conffile); } // Write main.inc.php and master.inc.php into documents/custom dir $error+=write_main_file($main_data_dir.'/custom/main.inc.php',$main_dir); $error+=write_master_file($main_data_dir.'/custom/master.inc.php',$main_dir); // Create database and admin user database if (! $error) { // We reload configuration file conf($dolibarr_main_document_root); print ''; print ''; $userroot=isset($_POST["db_user_root"])?$_POST["db_user_root"]:""; $passroot=isset($_POST["db_pass_root"])?$_POST["db_pass_root"]:""; // Si creation utilisateur admin demandee, on le cree if (isset($_POST["db_create_user"]) && $_POST["db_create_user"] == "on") { dolibarr_install_syslog("step1: create database user: " . $dolibarr_main_db_user); //print $conf->db->host." , ".$conf->db->name." , ".$conf->db->user." , ".$conf->db->port; $databasefortest=$conf->db->name; if ($conf->db->type == 'mysql' || $conf->db->type == 'mysqli') { $databasefortest='mysql'; } else if ($conf->db->type == 'pgsql') { $databasefortest='postgres'; } else if ($conf->db->type == 'mssql') { $databasefortest='master'; } // Creation handler de base, verification du support et connexion $db=getDoliDBInstance($conf->db->type,$conf->db->host,$userroot,$passroot,$databasefortest,$conf->db->port); if ($db->error) { print '

'.$db->error.'

'; $error++; } if (! $error) { if ($db->connected) { $result=$db->DDLCreateUser($dolibarr_main_db_host,$dolibarr_main_db_user,$dolibarr_main_db_pass,$dolibarr_main_db_name); if ($result > 0) { print ''; print ''; } else { if ($db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS' || $db->errno() == 'DB_ERROR_KEY_NAME_ALREADY_EXISTS' || $db->errno() == 'DB_ERROR_USER_ALREADY_EXISTS') { dolibarr_install_syslog("step1: user already exists"); print ''; print ''; } else { dolibarr_install_syslog("step1: failed to create user", LOG_ERR); print ''; print '"; } } $db->close(); } else { print ''; print ''; print ''; // Affiche aide diagnostique print ''; $error++; } } } // Fin si "creation utilisateur" // If database creation is asked, we create it if (! $error && (isset($_POST["db_create_database"]) && $_POST["db_create_database"] == "on")) { dolibarr_install_syslog("step1: create database: " . $dolibarr_main_db_name . " " . $dolibarr_main_db_character_set . " " . $dolibarr_main_db_collation . " " . $dolibarr_main_db_user); $newdb=getDoliDBInstance($conf->db->type,$conf->db->host,$userroot,$passroot,'',$conf->db->port); //print 'eee'.$conf->db->type." ".$conf->db->host." ".$userroot." ".$passroot." ".$conf->db->port." ".$newdb->connected." ".$newdb->forcecharset;exit; if ($newdb->connected) { $result=$newdb->DDLCreateDb($dolibarr_main_db_name, $dolibarr_main_db_character_set, $dolibarr_main_db_collation, $dolibarr_main_db_user); if ($result) { print ''; print ''; $check1=$newdb->getDefaultCharacterSetDatabase(); $check2=$newdb->getDefaultCollationDatabase(); dolibarr_install_syslog('step1: note that default server was charset=' . $check1 . ' collation=' . $check2); // If values differs, we save conf file again //if ($check1 != $dolibarr_main_db_character_set) dolibarr_install_syslog('step1: value for character_set is not the one asked for database creation', LOG_WARNING); //if ($check2 != $dolibarr_main_db_collation) dolibarr_install_syslog('step1: value for collation is not the one asked for database creation', LOG_WARNING); } else { // Affiche aide diagnostique print ''; dolibarr_install_syslog('step1: failed to create database ' . $dolibarr_main_db_name . ' ' . $newdb->lasterrno() . ' ' . $newdb->lasterror(), LOG_ERR); $error++; } $newdb->close(); } else { print ''; print ''; print ''; // Affiche aide diagnostique print ''; $error++; } } // Fin si "creation database" // We test access with dolibarr database user (not admin) if (! $error) { dolibarr_install_syslog("step1: connection type=" . $conf->db->type . " on host=" . $conf->db->host . " port=" . $conf->db->port . " user=" . $conf->db->user . " name=" . $conf->db->name); //print "connexion de type=".$conf->db->type." sur host=".$conf->db->host." port=".$conf->db->port." user=".$conf->db->user." name=".$conf->db->name; $db=getDoliDBInstance($conf->db->type,$conf->db->host,$conf->db->user,$conf->db->pass,$conf->db->name,$conf->db->port); if ($db->connected) { dolibarr_install_syslog("step1: connection to server by user " . $conf->db->user . " ok"); print ""; // si acces serveur ok et acces base ok, tout est ok, on ne va pas plus loin, on a meme pas utilise le compte root. if ($db->database_selected) { dolibarr_install_syslog("step1: connection to database " . $conf->db->name . " by user " . $conf->db->user . " ok"); print ""; $error = 0; } else { dolibarr_install_syslog("step1: connection to database " . $conf->db->name . " by user " . $conf->db->user . " failed", LOG_ERR); print ""; // Affiche aide diagnostique print ''; $error++; } } else { dolibarr_install_syslog("step1: connection to server by user " . $conf->db->user . " failed", LOG_ERR); print ""; // Affiche aide diagnostique print ''; $error++; } } } print '

"; print $langs->trans("ErrorDirDoesNotExists",$main_dir).' '; print $langs->trans("ErrorWrongValueForParameter",$langs->trans("WebPagesDirectory")).' '; print $langs->trans("ErrorGoBackAndCorrectParameters").' '; print '	'; print $langs->trans("Error"); print "
".$langs->trans("ErrorDirDoesNotExists",$main_data_dir); print ' '.$langs->trans("YouMustCreateItAndAllowServerToWrite"); print '	'; print ''.$langs->trans("Error").''; print "
'.$langs->trans("CorrectProblemAndReloadPage",$_SERVER['PHP_SELF'].'?testget=ok').'
"; print "Failed to create directory: ".$dir[$i]; print '	'; print $langs->trans("Error"); print "
".$langs->trans("ErrorDirDoesNotExists",$main_data_dir); print ' '.$langs->trans("YouMustCreateItAndAllowServerToWrite"); print '	'; print ''.$langs->trans("Error").''; print "
'.$langs->trans("CorrectProblemAndReloadPage",$_SERVER['PHP_SELF'].'?testget=ok').'
'.$langs->trans('ErrorFailToCopyFile',$src,$dest).'
'; print $langs->trans("ConfFileReload"); print '
'; print $langs->trans("UserCreation").' : '; print $dolibarr_main_db_user; print '
'; print $langs->trans("UserCreation").' : '; print $dolibarr_main_db_user; print '	'.$langs->trans("LoginAlreadyExists").'
'; print $langs->trans("UserCreation").' : '; print $dolibarr_main_db_user; print '	'.$langs->trans("Error").': '.$db->errno().' '.$db->error()."
'; print $langs->trans("UserCreation").' : '; print $dolibarr_main_db_user; print '
'; print $langs->trans("YouAskDatabaseCreationSoDolibarrNeedToConnect",$dolibarr_main_db_user,$dolibarr_main_db_host,$userroot); print ' '; print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").' '; print $langs->trans("ErrorGoBackAndCorrectParameters").' '; print '
'; print $langs->trans("DatabaseCreation")." (".$langs->trans("User")." ".$userroot.") : "; print $dolibarr_main_db_name; print '
'; print $langs->trans("ErrorFailedToCreateDatabase",$dolibarr_main_db_name).' '; print $newdb->lasterror().' '; print $langs->trans("IfDatabaseExistsGoBackAndCheckCreate"); print ' '; print '
'; print $langs->trans("DatabaseCreation")." (".$langs->trans("User")." ".$userroot.") : "; print $dolibarr_main_db_name; print '
'; print $langs->trans("YouAskDatabaseCreationSoDolibarrNeedToConnect",$dolibarr_main_db_user,$dolibarr_main_db_host,$userroot); print ' '; print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").' '; print $langs->trans("ErrorGoBackAndCorrectParameters").' '; print '
"; print $langs->trans("ServerConnection")." (".$langs->trans("User")." ".$conf->db->user.") : "; print $dolibarr_main_db_host; print "	"; print ''; print "
"; print $langs->trans("DatabaseConnection")." (".$langs->trans("User")." ".$conf->db->user.") : "; print $dolibarr_main_db_name; print "	"; print ''; print "
"; print $langs->trans("DatabaseConnection")." (".$langs->trans("User")." ".$conf->db->user.") : "; print $dolibarr_main_db_name; print '	'; print ''; print "
'; print $langs->trans('CheckThatDatabasenameIsCorrect',$dolibarr_main_db_name).' '; print $langs->trans('IfAlreadyExistsCheckOption').' '; print $langs->trans("ErrorGoBackAndCorrectParameters").' '; print '
"; print $langs->trans("ServerConnection")." (".$langs->trans("User")." ".$conf->db->user.") : "; print $dolibarr_main_db_host; print '	'; print ''; print "
'; print $langs->trans("ErrorConnection",$conf->db->host,$conf->db->name,$conf->db->user); print $langs->trans('IfLoginDoesNotExistsCheckCreateUser').' '; print $langs->trans("ErrorGoBackAndCorrectParameters").' '; print '

'; } ?> "; print $langs->trans("SaveConfigurationFile"); print ' '.$conffile.''; print ""; print '

'; print ""; } else { $error++; } } return $error; }