/*
* TESTS SUR LES REPERTOIRES
*/
echo "<br /><hr/><h4>Vérification des répertoires</h4>";
$dirs = array(URLCACHE, URLDOCS, URLLOCAL . 'hprim/', URLLOCAL . 'hprim/ok/', URLLOCAL . 'hprim/xml/', URLLOCAL . 'rpu/', URLLOCAL . 'rpu/ok/', URLLOCAL . 'rpu/logs/', URLLOCAL . 'var/', URLLOCAL . 'var/maj/', URLLOCAL . 'temp/', URLLOCAL . 'var/dist/');
foreach ($dirs as $dir) {
affichage("Test du droit d'écriture sur le dossier " . $dir, clUpdater::testEcritureDossier($dir), true, false, true);
}
/*
* TESTS DES FICHIERS .cfg
*/
echo "<br /><hr/><h4>Création des fichiers de configuration MySQL</h4>";
affichage("Creation du fichier " . URLLOCAL . "queries_int/config_xham.cfg", clUpdater::genResultQueryConfigFile(URLLOCAL . "queries_int/config_xham.cfg", MYSQL_HOST, BASEXHAM, MYSQL_USER, MYSQL_PASS));
affichage("Creation du fichier " . URLLOCAL . "queries_int/config_ccam.cfg", clUpdater::genResultQueryConfigFile(URLLOCAL . "queries_int/config_ccam.cfg", MYSQL_HOST, CCAM_BDD, MYSQL_USER, MYSQL_PASS));
affichage("Creation du fichier " . URLLOCAL . "queries_int/config_terminal.cfg", clUpdater::genResultQueryConfigFile(URLLOCAL . "queries_int/config_terminal.cfg", MYSQL_HOST, BDD, MYSQL_USER, MYSQL_PASS));
affichage("Creation du fichier " . URLLOCAL . "queries_int/config_formx.cfg", clUpdater::genResultQueryConfigFile(URLLOCAL . "queries_int/config_formx.cfg", MYSQL_HOST, defined('FX_BDD') ? FX_BDD : BDD, MYSQL_USER, MYSQL_PASS));
/*
* TEST DE CONNEXION AUX BASES
*/
echo "<br /><hr /><h4>Connexions aux bases</h4>";
affichage("Connexion au serveur MySQL '" . MYSQL_USER . "@" . MYSQL_HOST . " (using password: "******")'", mysql_pconnect(MYSQL_HOST, MYSQL_USER, MYSQL_PASS), false, false, true);
$bases = array(BASEXHAM, BDD, CCAM_BDD);
foreach ($bases as $base) {
affichage("Connexion à la base '" . $base . "'", mysql_select_db($base), false, false, true);
affichage("Test des privilèges CREATE ALTER DROP", clUpdater::testGrantOnBase(MYSQL_HOST, MYSQL_USER, MYSQL_PASS, $base), false, false, true);
}
//Installation des bases si vides
clUpdater::installBase(BASEXHAM, URLLOCAL . 'meta/install/tuv2_xham.sql', 'logs', MYSQL_USER, MYSQL_PASS, MYSQL_HOST);
ob_flush();
flush();
clUpdater::installBase(BDD, URLLOCAL . 'meta/install/tuv2_tuv2.sql', 'patients_presents', MYSQL_USER, MYSQL_PASS, MYSQL_HOST);
