forked from Wavyzz/dolibarr
521 lines
16 KiB
PHP
521 lines
16 KiB
PHP
<?php
|
|
/* Copyright (C) 2004-2007 Rodolphe Quiedeville <rodolphe@quiedeville.org>
|
|
* Copyright (C) 2004-2008 Laurent Destailleur <eldy@users.sourceforge.net>
|
|
* Copyright (C) 2004 Benoit Mortier <benoit.mortier@opensides.be>
|
|
* Copyright (C) 2004 Sebastien Di Cintio <sdicintio@ressource-toi.org>
|
|
*
|
|
* 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 2 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, write to the Free Software
|
|
* Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
|
|
*/
|
|
|
|
/**
|
|
\file htdocs/install/etape1.php
|
|
\ingroup install
|
|
\brief Génère le fichier conf.php avec les informations issues de l'étape précédente
|
|
\version $Id$
|
|
*/
|
|
|
|
define('DONOTLOADCONF',1); // To avoid loading conf by file inc..php
|
|
|
|
include("./inc.php");
|
|
$setuplang=isset($_POST["selectlang"])?$_POST["selectlang"]:(isset($_GET["selectlang"])?$_GET["selectlang"]:'auto');
|
|
$langs->setDefaultLang($setuplang);
|
|
|
|
$langs->load("admin");
|
|
$langs->load("install");
|
|
|
|
// Init "forced values" to nothing. "forced values" are used after an doliwamp install wizard.
|
|
if (file_exists("./install.forced.php")) include_once("./install.forced.php");
|
|
|
|
dolibarr_install_syslog("etape1: Entering etape1.php page");
|
|
|
|
|
|
/*
|
|
* View
|
|
*/
|
|
|
|
pHeader($langs->trans("ConfigurationFile"),"etape2");
|
|
|
|
$error = 0;
|
|
|
|
// Répertoire des pages dolibarr
|
|
$main_dir=isset($_POST["main_dir"])?trim($_POST["main_dir"]):'';
|
|
|
|
// On supprime / de fin dans main_dir
|
|
if (substr($main_dir, strlen($main_dir) -1) == "/")
|
|
{
|
|
$main_dir = substr($main_dir, 0, strlen($main_dir)-1);
|
|
}
|
|
|
|
// On supprime / de fin dans main_url
|
|
if (substr($_POST["main_url"], strlen($_POST["main_url"]) -1) == "/")
|
|
{
|
|
$_POST["main_url"] = substr($_POST["main_url"], 0, strlen($_POST["main_url"])-1);
|
|
}
|
|
|
|
// Répertoire des documents générés (factures, etc...)
|
|
$main_data_dir=isset($_POST["main_data_dir"])?$_POST["main_data_dir"]:'';
|
|
if (! $main_data_dir) { $main_data_dir="$main_dir/documents"; }
|
|
|
|
/*
|
|
* Actions
|
|
*/
|
|
|
|
|
|
|
|
if ($_POST["action"] == "set")
|
|
{
|
|
umask(0);
|
|
print '<h3>'.$langs->trans("ConfigurationFile").'</h3>';
|
|
print '<table cellspacing="0" width="100%" cellpadding="1" border="0">';
|
|
|
|
// Verification validite parametre main_dir
|
|
if (! $error)
|
|
{
|
|
if (! is_dir($main_dir))
|
|
{
|
|
dolibarr_install_syslog("etape1: Repertoire '".$main_dir."' inexistant ou non accessible");
|
|
|
|
print "<tr><td>";
|
|
print $langs->trans("ErrorDirDoesNotExists",$main_dir).'<br>';
|
|
print $langs->trans("ErrorWrongValueForParameter",$langs->trans("WebPagesDirectory")).'<br>';
|
|
print $langs->trans("ErrorGoBackAndCorrectParameters").'<br><br>';
|
|
print '</td><td>';
|
|
print $langs->trans("Error");
|
|
print "</td></tr>";
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
// Sauvegarde fichier configuration
|
|
if (! $error)
|
|
{
|
|
$fp = fopen("$conffile", "w");
|
|
|
|
if($fp)
|
|
{
|
|
clearstatcache();
|
|
|
|
fputs($fp, '<?php');
|
|
fputs($fp,"\n");
|
|
fputs($fp,"#\n");
|
|
fputs($fp,"# File generated by Dolibarr installer on ".dolibarr_print_date(gmmktime(),''));
|
|
fputs($fp,"\n");
|
|
fputs($fp,"#\n");
|
|
fputs($fp,"# Take a look at conf.php.example file for an example of conf.php file\n");
|
|
fputs($fp,"# and explanations for all possibles parameters.\n");
|
|
fputs($fp,"#\n");
|
|
|
|
fputs($fp, '$dolibarr_main_url_root="'.$_POST["main_url"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_document_root="'.$main_dir.'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_data_root="'.$main_data_dir.'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_host="'.$_POST["db_host"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_port="'.$_POST["db_port"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_name="'.$_POST["db_name"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_user="'.$_POST["db_user"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_pass="'.$_POST["db_pass"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_type="'.$_POST["db_type"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_character_set="'.$_POST["character_set_database"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
/* Choix des charsets*/
|
|
fputs($fp, '$character_set_client="'.$_POST["character_set_client"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_main_db_collation="'.$_POST["dolibarr_main_db_collation"].'";');
|
|
fputs($fp,"\n");
|
|
|
|
/* Authentication */
|
|
if ($_POST["db_type"] == 'mssql')
|
|
{
|
|
fputs($fp, '$dolibarr_main_authentication="dolibarr_mdb2";');
|
|
}
|
|
else
|
|
{
|
|
fputs($fp, '$dolibarr_main_authentication="dolibarr";');
|
|
}
|
|
fputs($fp,"\n");
|
|
|
|
/* Preparation integration SMARTY */
|
|
fputs($fp, '$dolibarr_smarty_libs_dir="";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_smarty_compile="";');
|
|
fputs($fp,"\n");
|
|
|
|
fputs($fp, '$dolibarr_smarty_cache="";');
|
|
fputs($fp,"\n");
|
|
/* Fin Smarty*/
|
|
|
|
fputs($fp, '?>');
|
|
fclose($fp);
|
|
|
|
if (file_exists("$conffile"))
|
|
{
|
|
include("$conffile"); // On force rechargement. Ne pas mettre include_once !
|
|
conf($dolibarr_main_document_root);
|
|
|
|
print "<tr><td>";
|
|
print $langs->trans("SaveConfigurationFile");
|
|
print "</td><td>";
|
|
print $langs->trans("OK");
|
|
print "</td></tr>";
|
|
}
|
|
else
|
|
{
|
|
$error++;
|
|
}
|
|
}
|
|
|
|
// Chargement driver acces bases
|
|
require_once($dolibarr_main_document_root."/lib/databases/".$dolibarr_main_db_type.".lib.php");
|
|
|
|
}
|
|
|
|
|
|
/***************************************************************************
|
|
* Creation des répertoires
|
|
***************************************************************************/
|
|
|
|
// Creation des sous-répertoires main_data_dir
|
|
if (! $error)
|
|
{
|
|
dolibarr_install_syslog("etape1: Directory '".$main_dir."' exists");
|
|
|
|
// Répertoire des documents
|
|
if (! is_dir($main_data_dir))
|
|
{
|
|
create_exdir($main_data_dir);
|
|
}
|
|
|
|
if (! is_dir($main_data_dir))
|
|
{
|
|
print "<tr><td>".$langs->trans("ErrorDirDoesNotExists",$main_data_dir);
|
|
print $langs->trans("YouMustCreateItAndAllowServerToWrite");
|
|
print '</td><td>';
|
|
print '<font class="error">'.$langs->trans("Error").'</font>';
|
|
print "</td></tr>";
|
|
print '<tr><td colspan="2"><br>'.$langs->trans("CorrectProblemAndReloadPage",$_SERVER['PHP_SELF'].'?testget=ok').'</td></tr>';
|
|
$error++;
|
|
}
|
|
else
|
|
{
|
|
// Les documents sont en dehors de htdocs car ne doivent pas pouvoir etre téléchargés en passant outre l'authentification
|
|
$dir[0] = "$main_data_dir/facture";
|
|
$dir[1] = "$main_data_dir/users";
|
|
$dir[2] = "$main_data_dir/propale";
|
|
$dir[3] = "$main_data_dir/societe";
|
|
$dir[4] = "$main_data_dir/ficheinter";
|
|
$dir[5] = "$main_data_dir/produit";
|
|
$dir[6] = "$main_data_dir/rapport";
|
|
$dir[7] = "$main_data_dir/rss";
|
|
$dir[8] = "$main_data_dir/logo";
|
|
|
|
// Boucle sur chaque répertoire de dir[] pour les créer s'ils nexistent pas
|
|
for ($i = 0 ; $i < sizeof($dir) ; $i++)
|
|
{
|
|
if (is_dir($dir[$i]))
|
|
{
|
|
dolibarr_install_syslog("etape1: Directory '".$dir[$i]."' exists");
|
|
}
|
|
else
|
|
{
|
|
if (create_exdir($dir[$i]) < 0)
|
|
{
|
|
print "<tr><td>";
|
|
print "Failed to create directory: ".$dir[$i];
|
|
print '</td><td>';
|
|
print $langs->trans("Error");
|
|
print "</td></tr>";
|
|
$error++;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_install_syslog("etape1: Directory '".$dir[$i]."' created");
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Création des Bases de données
|
|
*/
|
|
if (! $error)
|
|
{
|
|
conf($dolibarr_main_document_root );
|
|
|
|
$userroot=isset($_POST["db_user_root"])?$_POST["db_user_root"]:"";
|
|
$passroot=isset($_POST["db_pass_root"])?$_POST["db_pass_root"]:"";
|
|
|
|
|
|
/**
|
|
* Si creation utilisateur admin demandée, on le crée
|
|
*/
|
|
if (isset($_POST["db_create_user"]) && $_POST["db_create_user"] == "on")
|
|
{
|
|
dolibarr_install_syslog("etape1: Creation de l'utilisateur: ".$dolibarr_main_db_user);
|
|
|
|
//print $conf->db->host." , ".$conf->db->name." , ".$conf->db->user." , ".$conf->db->pass." , ".$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='mssql';
|
|
}
|
|
|
|
// Creation handler de base, verification du support et connexion
|
|
|
|
$db = new DoliDb($conf->db->type,$conf->db->host,$userroot,$passroot,$databasefortest,$conf->db->port);
|
|
if ($db->error)
|
|
{
|
|
print '<div class="error">'.$db->error.'</div>';
|
|
$error++;
|
|
}
|
|
|
|
if (! $error)
|
|
{
|
|
if ($db->connected)
|
|
{
|
|
$result=$db->DDLCreateUser($dolibarr_main_db_host,$dolibarr_main_db_user,$dolibarr_main_db_pass);
|
|
|
|
if ($result > 0)
|
|
{
|
|
|
|
print '<tr><td>';
|
|
print $langs->trans("UserCreation").' : ';
|
|
print $dolibarr_main_db_user;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("OK").'</td></tr>';
|
|
}
|
|
else
|
|
{
|
|
if ($db->errno() == 'DB_ERROR_RECORD_ALREADY_EXISTS')
|
|
{
|
|
dolibarr_install_syslog("etape1: User already exists");
|
|
print '<tr><td>';
|
|
print $langs->trans("UserCreation").' : ';
|
|
print $dolibarr_main_db_user;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("LoginAlreadyExists").'</td></tr>';
|
|
}
|
|
else
|
|
{
|
|
dolibarr_install_syslog("etape1: Failed to create user");
|
|
print '<tr><td>';
|
|
print $langs->trans("UserCreation").' : ';
|
|
print $dolibarr_main_db_user;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("Error").' '.$db->error()."</td></tr>";
|
|
}
|
|
}
|
|
|
|
$db->close();
|
|
}
|
|
else
|
|
{
|
|
print '<tr><td>';
|
|
print $langs->trans("UserCreation").' : ';
|
|
print $dolibarr_main_db_user;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("Error").'</td>';
|
|
print '</tr>';
|
|
|
|
// Affiche aide diagnostique
|
|
print '<tr><td colspan="2"><br>';
|
|
print $langs->trans("YouAskDatabaseCreationSoDolibarrNeedToConnect",$dolibarr_main_db_user,$dolibarr_main_db_host,$userroot);
|
|
print '<br>';
|
|
print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'<br><br>';
|
|
print $langs->trans("ErrorGoBackAndCorrectParameters").'<br><br>';
|
|
print '</td></tr>';
|
|
|
|
$error++;
|
|
}
|
|
}
|
|
} // Fin si "creation utilisateur"
|
|
|
|
|
|
/*
|
|
* Si creation database demandée, on la crée
|
|
*/
|
|
if (! $error && (isset($_POST["db_create_database"]) && $_POST["db_create_database"] == "on"))
|
|
{
|
|
dolibarr_install_syslog("etape1: Creation de la base : ".$dolibarr_main_db_name);
|
|
|
|
$db = new DoliDb($conf->db->type,$conf->db->host,$userroot,$passroot,'',$conf->db->port);
|
|
|
|
if ($db->connected)
|
|
{
|
|
|
|
if ($db->DDLCreateDb($dolibarr_main_db_name))
|
|
{
|
|
print '<tr><td>';
|
|
print $langs->trans("DatabaseCreation").' : ';
|
|
print $dolibarr_main_db_name;
|
|
print '</td>';
|
|
print "<td>".$langs->trans("OK")."</td></tr>";
|
|
}
|
|
else
|
|
{
|
|
print '<tr><td>';
|
|
print $langs->trans("DatabaseCreation").' : ';
|
|
print $dolibarr_main_db_name;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("Error").' '.$db->errno().'</td></tr>';
|
|
|
|
// Affiche aide diagnostique
|
|
print '<tr><td colspan="2"><br>';
|
|
print $langs->trans("ErrorFailedToCreateDatabase",$dolibarr_main_db_name).'<br>';
|
|
print $langs->trans("IfDatabaseExistsGoBackAndCheckCreate");
|
|
print '<br>';
|
|
print '</td></tr>';
|
|
|
|
$error++;
|
|
}
|
|
$db->close();
|
|
}
|
|
else {
|
|
print '<tr><td>';
|
|
print $langs->trans("DatabaseCreation").' : ';
|
|
print $dolibarr_main_db_name;
|
|
print '</td>';
|
|
print '<td>'.$langs->trans("Error").'</td>';
|
|
print '</tr>';
|
|
|
|
// Affiche aide diagnostique
|
|
print '<tr><td colspan="2"><br>';
|
|
print $langs->trans("YouAskDatabaseCreationSoDolibarrNeedToConnect",$dolibarr_main_db_user,$dolibarr_main_db_host,$userroot);
|
|
print '<br>';
|
|
print $langs->trans("BecauseConnectionFailedParametersMayBeWrong").'<br><br>';
|
|
print $langs->trans("ErrorGoBackAndCorrectParameters").'<br><br>';
|
|
print '</td></tr>';
|
|
|
|
$error++;
|
|
}
|
|
} // Fin si "creation database"
|
|
|
|
|
|
/*
|
|
* On test maintenant l'accès par le user admin dolibarr
|
|
*/
|
|
if (! $error)
|
|
{
|
|
dolibarr_install_syslog("etape1: connexion de type=".$conf->db->type." sur 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 = new DoliDb($conf->db->type,$conf->db->host,$conf->db->user,$conf->db->pass,$conf->db->name,$conf->db->port);
|
|
|
|
if ($db->connected == 1)
|
|
{
|
|
// si accès serveur ok et accès base ok, tout est ok, on ne va pas plus loin, on a même pas utilisé le compte root.
|
|
if ($db->database_selected == 1)
|
|
{
|
|
dolibarr_install_syslog("etape1: la connexion au serveur par le user ".$conf->db->user." est reussie");
|
|
print "<tr><td>";
|
|
print $langs->trans("ServerConnection")." : ";
|
|
print $dolibarr_main_db_host;
|
|
print "</td><td>";
|
|
print $langs->trans("OK");
|
|
print "</td></tr>";
|
|
|
|
dolibarr_install_syslog("etape1: la connexion a la base : ".$conf->db->name.",par le user : ".$conf->db->user." est reussie");
|
|
print "<tr><td>";
|
|
print $langs->trans("DatabaseConnection")." : ";
|
|
print $dolibarr_main_db_name;
|
|
print "</td><td>";
|
|
print $langs->trans("OK");
|
|
print "</td></tr>";
|
|
|
|
$error = 0;
|
|
}
|
|
else
|
|
{
|
|
dolibarr_install_syslog("etape1: la connexion au serveur par le user ".$conf->db->user." est reussie");
|
|
print "<tr><td>";
|
|
print $langs->trans("ServerConnection")." : ";
|
|
print $dolibarr_main_db_host;
|
|
print "</td><td>";
|
|
print $langs->trans("OK");
|
|
print "</td></tr>";
|
|
|
|
dolibarr_install_syslog("etape1: la connexion a la base ".$conf->db->name.",par le user ".$conf->db->user." a échoué");
|
|
print "<tr><td>";
|
|
print $langs->trans("DatabaseConnection")." : ";
|
|
print $dolibarr_main_db_name;
|
|
print '</td><td>';
|
|
print $langs->trans("Error");
|
|
print "</td></tr>";
|
|
|
|
// Affiche aide diagnostique
|
|
print '<tr><td colspan="2"><br>Vérifier que le nom de base "<b>'.$dolibarr_main_db_name.'</b>" est correct.<br>';
|
|
print 'Si ce nom est correct et que cette base n\'existe pas déjà, vous devez cocher l\'option "Créer la base de donnée".<br>';
|
|
print $langs->trans("ErrorGoBackAndCorrectParameters").'<br><br>';
|
|
print '</td></tr>';
|
|
|
|
$error++;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
dolibarr_install_syslog("etape1: la connexion au serveur par le user ".$conf->db->user." est rate");
|
|
print "<tr><td>";
|
|
print $langs->trans("ServerConnection")." : ";
|
|
print $dolibarr_main_db_host;
|
|
print '</td><td>';
|
|
print '<font class="error">'.$db->error.'</div>';
|
|
print "</td></tr>";
|
|
|
|
// Affiche aide diagnostique
|
|
print '<tr><td colspan="2"><br>Le serveur "<b>'.$conf->db->host.'</b>", nom de base "<b>'.$conf->db->name.'</b>", login "<b>'.$conf->db->user.'</b>", ou mot de passe <b>"'.$conf->db->pass.'</b>" de la base de donnée est peut-être incorrect ou la version du client PHP trop ancienne par rapport à la version de la base de donnée.<br>';
|
|
print 'Si le login n\'existe pas encore, vous devez cocher l\'option "Créer l\'utilisateur".<br>';
|
|
print $langs->trans("ErrorGoBackAndCorrectParameters").'<br><br>';
|
|
print '</td></tr>';
|
|
|
|
$error++;
|
|
}
|
|
}
|
|
}
|
|
|
|
print '</table>';
|
|
}
|
|
|
|
pFooter($error,$setuplang);
|
|
|
|
?>
|