* Copyright (C) 2004-2009 Laurent Destailleur * Copyright (C) 2005 Marc Barilley / Océbo * Copyright (C) 2005-2009 Regis Houssin * * 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/check.php * \ingroup install * \brief Test si le fichier conf est modifiable et si il n'existe pas, test la possibilité de le créer * \version $Id$ */ include_once("./inc.php"); $err = 0; $allowinstall = 0; $allowupgrade = 0; $checksok = 1; $setuplang=isset($_POST["selectlang"])?$_POST["selectlang"]:(isset($_GET["selectlang"])?$_GET["selectlang"]:$langs->getDefaultLang()); $langs->setDefaultLang($setuplang); $langs->load("install"); // Init "forced values" to nothing. "forced values" are used after an doliwamp install wizard. if (! isset($force_install_dolibarrlogin)) $force_install_dolibarrlogin=''; if (file_exists("./install.forced.php")) include_once("./install.forced.php"); dolibarr_install_syslog("check: Dolibarr install/upgrade process started"); /* * View */ pHeader($langs->trans("DolibarrWelcome"),""); // Etape suivante = license print ''; print '
'; print DOL_VERSION.'

'; print ''; print "
\n"; print $langs->trans("InstallEasy")."

\n"; print ''.$langs->trans("MiscellanousChecks").":
\n"; // Check PHP version if (versioncompare(versionphparray(),array(4,1)) < 0) { print ' '.$langs->trans("ErrorPHPVersionTooLow",'4.1'); $checksok=0; } else { print ' '.$langs->trans("PHPVersion")." ".versiontostring(versionphparray()); } if (empty($force_install_nophpinfo)) print ' ('.$langs->trans("MoreInformation").')'; print "
\n"; // Check PHP support for $_POST if (! isset($_GET["testget"]) && ! isset($_POST["testpost"])) { print ' '.$langs->trans("PHPSupportPOSTGETKo"); print ' ('.$langs->trans("Recheck").')'; print "
\n"; $checksok=0; } else { print ' '.$langs->trans("PHPSupportPOSTGETOk")."
\n"; } // Check if sessions enabled if (! function_exists("session_id")) { print ' '.$langs->trans("ErrorPHPDoesNotSupportSessions")."
\n"; $checksok=0; } else { print ' '.$langs->trans("PHPSupportSessions")."
\n"; } // Check if GD supported if (! function_exists("imagecreate")) { $langs->load("errors"); print ' '.$langs->trans("ErrorPHPDoesNotSupportGD")."
\n"; // $checksok=0; // If image ko, just warning. So check must still be 1 (otherwise no way to install) } else { print ' '.$langs->trans("PHPSupportGD")."
\n"; } // Check if UTF8 supported if (! function_exists("utf8_encode")) { $langs->load("errors"); print ' '.$langs->trans("ErrorPHPDoesNotSupportUTF8")."
\n"; // $checksok=0; // If image ko, just warning. So check must still be 1 (otherwise no way to install) } else { print ' '.$langs->trans("PHPSupportUTF8")."
\n"; } // Check memory $memrequiredorig='24M'; $memrequired=24*1024*1024; $memmaxorig=@ini_get("memory_limit"); $memmax=@ini_get("memory_limit"); if ($memmaxorig != '') { eregi('([0-9]+)([a-zA-Z]*)',$memmax,$reg); if ($reg[2]) { if (strtoupper($reg[2]) == 'M') $memmax=$reg[1]*1024*1024; if (strtoupper($reg[2]) == 'K') $memmax=$reg[1]*1024; } if ($memmax >= $memrequired) { print ' '.$langs->trans("PHPMemoryOK",$memmaxorig,$memrequiredorig)."
\n"; } else { print ' '.$langs->trans("PHPMemoryTooLow",$memmaxorig,$memrequiredorig)."
\n"; } } // Si fichier présent et lisible et renseigné clearstatcache(); if (is_readable($conffile) && filesize($conffile) > 8) { dolibarr_install_syslog("check: conf file '$conffile' already exists"); $confexists=1; include_once($conffile); // Deja installé, on peut upgrader // \todo Test if database ok $allowupgrade=1; } else { // Si non on le crée dolibarr_install_syslog("check: we try to creat conf file '$conffile'"); $confexists=0; # First we try by copying example if (@copy($conffile.".example", $conffile)) { # Success dolibarr_install_syslog("check: copied file ".$conffile.".example into ".$conffile." done successfully."); } else { # If failed, we try to create an empty file dolibarr_install_syslog("check: failed to copy file ".$conffile.".example into ".$conffile.". We try to create it."); $fp = @fopen($conffile, "w"); if ($fp) { @fwrite($fp, '"); fclose($fp); } } // First install, on ne peut pas upgrader $allowupgrade=0; } // Si fichier absent et n'a pu etre créé if (! file_exists($conffile)) { //print ' '.$langs->trans("ConfFileDoesNotExistsAndCouldNotBeCreated",$conffile); print ' '.$langs->trans("ConfFileDoesNotExistsAndCouldNotBeCreated",'conf.php'); print "

"; print $langs->trans("YouMustCreateWithPermission",'htdocs/conf/conf.php'); print "

"; print $langs->trans("CorrectProblemAndReloadPage",$_SERVER['PHP_SELF'].'?testget=ok'); $err++; } else { // Si fichier présent mais ne peut etre modifié if (!is_writable($conffile)) { if ($confexists) { print ' '.$langs->trans("ConfFileExists",'conf.php'); } else { print ' '.$langs->trans("ConfFileCouldBeCreated",'conf.php'); } print "
"; print ' '.$langs->trans("ConfFileIsNotWritable",'htdocs/conf/conf.php'); print "
\n"; $allowinstall=0; } // Si fichier présent et peut etre modifié else { if ($confexists) { print ' '.$langs->trans("ConfFileExists",'conf.php'); } else { print ' '.$langs->trans("ConfFileCouldBeCreated",'conf.php'); } print "
"; print ' '.$langs->trans("ConfFileIsWritable",'conf.php'); print "
\n"; $allowinstall=1; } print "
\n"; print "
\n"; // Si prerequis ok, on affiche le bouton pour passer à l'étape suivante if ($checksok) { $ok=0; print $langs->trans("ChooseYourSetupMode"); print ''; print ''; print ''; print ''."\n"; $migrationscript=array(array('from'=>'2.0.0', 'to'=>'2.1.0'), array('from'=>'2.1.0', 'to'=>'2.2.0'), array('from'=>'2.2.0', 'to'=>'2.4.0'), array('from'=>'2.4.0', 'to'=>'2.5.0'), array('from'=>'2.5.0', 'to'=>'2.6.0'), array('from'=>'2.6.0', 'to'=>'2.7.0') ); // Try to create db connexion if (file_exists($conffile)) { include_once($conffile); if (! empty($dolibarr_main_db_type)) { require_once($dolibarr_main_document_root."/lib/databases/".$dolibarr_main_db_type.".lib.php"); require_once($dolibarr_main_document_root."/lib/admin.lib.php"); // $conf is already instancied inside inc.php $conf->db->type = $dolibarr_main_db_type; $conf->db->host = $dolibarr_main_db_host; $conf->db->port = $dolibarr_main_db_port; $conf->db->name = $dolibarr_main_db_name; $conf->db->user = $dolibarr_main_db_user; $conf->db->pass = $dolibarr_main_db_pass; $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 && $db->database_selected == 1) { $ok=1; } } } # If a database access is available, we set more variable if ($ok) { $conf->setValues($db); // Current version is $conf->global->MAIN_VERSION_LAST_UPGRADE // Version to install is DOL_VERSION $dolibarrcurrentversionarray=split('[\.-]',$conf->global->MAIN_VERSION_LAST_UPGRADE); $dolibarrversiontoinstallarray=versiondolibarrarray(); } # Show upgrade lines $foundrecommandedchoice=0; foreach ($migrationscript as $migarray) { $versionfrom=$migarray['from']; $versionto=$migarray['to']; $newversionfrom=eregi_replace('\.[0-9]+$','.*',$versionfrom); $newversionto=eregi_replace('\.[0-9]+$','.*',$versionto); print ''; print ''; print ''; print ''."\n"; } print '

'.$langs->trans("FreshInstall").'	'; print $langs->trans("FreshInstallDesc").'	'; if ($allowinstall) { print ''.$langs->trans("Start").''; } else { print $langs->trans("InstallNotAllowed"); } print '
'.$langs->trans("Upgrade").' '.$newversionfrom.' -> '.$newversionto.'	'; print $langs->trans("UpgradeDesc"); if ($ok && sizeof($dolibarrcurrentversionarray) > 0) // If a database access is available and a version already available { $dolibarrversionfromarray=split('[\.-]',$versionfrom); $dolibarrversiontoarray=split('[\.-]',$versionto); if (empty($foundrecommandedchoice) && versioncompare($dolibarrversiontoarray,$dolibarrcurrentversionarray) >= 0) { print ' '; print $langs->trans("InstallChoiceRecommanded",DOL_VERSION,$conf->global->MAIN_VERSION_LAST_UPGRADE); // '; $foundrecommandedchoice=1; // To show only once } } print '	'; if ($allowupgrade) { print ''.$langs->trans("Start").''; } else { print $langs->trans("NotAvailable"); } print '

'; print "\n"; } } pFooter(1); // 1 car ne doit jamais afficher bouton Suivant ?>