Rev 79 | Rev 98 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// +------------------------------------------------------------------------------------------------------+// | PHP version 4.1 |// +------------------------------------------------------------------------------------------------------+// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) |// +------------------------------------------------------------------------------------------------------+// | Copyright (c) 2002, Hendrik Mans <hendrik@mans.de> |// | Copyright 2002, 2003 David DELON |// | Copyright 2002 Patrick PAUL |// | Copyright 2003 Eric FELDSTEIN |// | All rights reserved. |// | Redistribution and use in source and binary forms, with or without |// | modification, are permitted provided that the following conditions |// | are met: |// | 1. Redistributions of source code must retain the above copyright |// | notice, this list of conditions and the following disclaimer. |// | 2. Redistributions in binary form must reproduce the above copyright |// | notice, this list of conditions and the following disclaimer in the |// | documentation and/or other materials provided with the distribution. |// | 3. The name of the author may not be used to endorse or promote products |// | derived from this software without specific prior written permission. |// | |// | THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR |// | IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES |// | OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED. |// | IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, |// | INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT |// | NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, |// | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY |// | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT |// | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF |// | THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. |// +------------------------------------------------------------------------------------------------------+// CVS : $Id: instal_base_de_donnees.inc.php,v 1.4 2004-10-22 17:23:04 jpm Exp $/*** Page de création de la base de données de Papyrus.** Page permettant de créer la base de données de Papyrus.**@package Installateur//Auteur original :*@author Hendrik MANS <hendrik@mans.de>//Autres auteurs :*@author David DELON*@author Patrick PAUL*@author Eric FELDSTEIN*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>*@copyright Tela-Botanica 2000-2004*@version $Revision: 1.4 $ $Date: 2004-10-22 17:23:04 $// +------------------------------------------------------------------------------------------------------+**/// +------------------------------------------------------------------------------------------------------+// | ENTÊTE du PROGRAMME |// +------------------------------------------------------------------------------------------------------+// Numéro de l'étape d'installation :$num_etape = 2;// Initialisation du tableau contenant les valeurs de configuration de la base de données$tableau = array('PAP_BDD_SERVEUR' => '', 'PAP_BDD_NOM' => '', 'PAP_BDD_UTILISATEUR' => '', 'PAP_BDD_MOT_DE_PASSE' => '');foreach ($tableau as $cle => $val) {if (!empty($_POST['bdd'][$cle])) {$bdd[$cle] = $_POST['bdd'][$cle];} else if (defined($cle)) {$bdd[$cle] = constant($cle);} else {$bdd[$cle] = '';}}// Récupération des paramêtres de configuration du formulaire précédentif (isset($_POST['pref'])) {$pref = $_POST['pref'];} else if (isset($_POST['pref_serial'])) {$pref = unserialize(stripslashes($_POST['pref_serial']));}// +------------------------------------------------------------------------------------------------------+// | CORPS du PROGRAMME |// +------------------------------------------------------------------------------------------------------+// Affichage d'informations...$sortie .= '<p><strong>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</strong></p>'."\n";// Nous vérifions si nous sommes en phase de test du formulaire de config de la base de données$erreur = 0;$sortie_verif = '';if ($_GET['installation'] == 'verif_bdd') {// Test de la configuration à la base de données$sortie_verif = ' <h2>Test de la configuration de la base de données</h2>'."\n";$dblink = @mysql_connect($bdd['PAP_BDD_SERVEUR'], $bdd['PAP_BDD_UTILISATEUR'], $bdd['PAP_BDD_MOT_DE_PASSE']);$erreur = testerConfig( $sortie_verif, 'Test connexion MySQL ...', $dblink,'Le nom du serveur, le nom d\'utilisateur ou le mot de passe sont érronés!', 1, $erreur);$erreur = testerConfig($sortie_verif, 'Recherche base de données ...', @mysql_select_db($bdd['PAP_BDD_NOM'], $dblink),'La base de données que vous avez choisie n\'existe pas, vous devez la créer avant d\'installer Papyrus !', 1, $erreur);$sortie_verif .= '<br />'."\n";// L'exécution du SQL peut commencer...if (!$version = GEN_VERSION) $version = '0.1';switch ($version) {case '0.1':// Nouvelle installation de Papyrus 0.1//Insertion des requêtes présentes dans le fichier sql$sortie_verif .= '<h2>Insertion des données du fichier sql dans la base</h2>';$sortie_verif .= '<div class="zone_requete">';$sql_contenu = PMA_readFile(INSTAL_CHEMIN_SQL.'papyrus_v'.$version.'.sql');$tab_requete_sql = array();PMA_splitSqlFile($tab_requete_sql, $sql_contenu, '');foreach ($tab_requete_sql as $value) {$table_nom = '';if (!empty($value['table_nom'])) {$table_nom = $value['table_nom'];}$requete_type = '';if (!empty($value['type'])) {$requete_type = $value['type'];}if ($requete_type == 'create') {$erreur = testerConfig($sortie_verif, 'Creation table '.$table_nom.'...', @mysql_query($value['query'], $dblink),'Déjà créée ?', 0, $erreur);} else if ($requete_type == 'insert') {$erreur = testerConfig($sortie_verif, 'Insertion table '.$table_nom.'...', @mysql_query($value['query'], $dblink),'Données déjà présente ?', 0, $erreur);}}$sortie_verif .= '</div>';//Insertion des requêtes dépendant du formulaire d'installation$sortie_verif .= '<h2>Insertion des données dépendant du formulaire précédent</h2>';$requete_admin = 'INSERT INTO gen_annuaire VALUES (1, "'.$bdd['ADMIN_I18N'].'", "'.$bdd['ADMIN_NOM'].'", "'.$bdd['ADMIN_PRENOM'].'", "'.md5($bdd['ADMIN_MDP_01']).'", "'.$bdd['ADMIN_MAIL'].'");';$erreur = testerConfig($sortie_verif, 'Insertion de l\'administrateur...', @mysql_query($requete_admin, $dblink),'Données déjà présente ?', 0, $erreur);$requete_auth = 'INSERT INTO gen_site_auth_bdd VALUES ("mysql://'.$config['PAP_BDD_UTILISATEUR'].':'.$config['PAP_BDD_MOT_DE_PASSE'].'@'.$config['PAP_BDD_SERVEUR'].'/'.$config['PAP_BDD_NOM'].'", "gen_annuaire", "ga_mail", '.'"ga_mot_de_passe", "md5");';$erreur = testerConfig($sortie_verif, 'Insertion de l\'authentification...', @mysql_query($requete_auth, $dblink),'Données déjà présente ?', 0, $erreur);break;case '0.2':// Installation de Papyrus 0.2break;}}// Gestion de l'affichage de sortieif ($erreur == 0 && empty($sortie_verif)) {// Premier appel du fichier...$sortie .= creerFormulaire($bdd);$sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";$sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";$sortie .= ' </ul>'."\n";$sortie .= ' </form>';} else if ($erreur == 2 && !empty($sortie_verif)) {// Vérification du fichier avec interuption...$sortie .= creerFormulaire($bdd);$sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";$sortie .= '<li><input type="submit" value="Tester à nouveau" /></li>'."\n";$sortie .= ' </ul>'."\n";$sortie .= ' </form>';$sortie .= $sortie_verif;} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) {// Vérification du fichier sans interuption... passage à l'étape suivante$sortie .= creerFormulaire($bdd, true);$sortie .= ' </ul>'."\n";$sortie .= ' </form>';$sortie .= $sortie_verif;$sortie .= ' <p>A l\'étape suivante, le programme d\'installation va essayer d\'écrire le fichier de '.'configuration <tt>'.INSTAL_FICHIER_CONFIG.'</tt>.<br />Assurez vous que le serveur web a bien le '.'droit d\'écrire dans ce fichier, sinon vous devrez le modifier manuellement.</p>'."\n";$sortie .= ' <form action="'.donnerUrlCourante().'?installation=form_fichier" method="POST" />'."\n";$sortie .= ' <input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" />'."\n";$sortie .= ' <input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" />'."\n";$sortie .= ' <input type="submit" value="Continuer" />'."\n";$sortie .= ' </form>'."\n";}// +------------------------------------------------------------------------------------------------------+// | LISTE DES FONCTIONS |// +------------------------------------------------------------------------------------------------------+// Création du formulaire de configuration de la base de donneésfunction creerFormulaire($bdd, $bln_lecture = false) {$disabled = '';if ($bln_lecture) {$disabled = ' disabled="disabled" ';}$sortie_form .= ' <form action="'.donnerUrlCourante().'?installation=verif_bdd" method="post">';$sortie_form .= ' <ul>'."\n";$sortie_form .= '<li><h2>Configuration de la base de données</h2></li>'."\n";$sortie_form .= '<li>La machine sur laquelle se trouve votre serveur MySQL. En général c\'est "localhost" (ie, la même machine que celle où se trouve les pages de Papyrus.).</li>'."\n";$sortie_form .= '<li>'."\n".'<label for="mysql_serveur">Nom du serveur MySQL :</label>'.'<input id="mysql_serveur"'.$disabled.'type="text" size="30" name="bdd[PAP_BDD_SERVEUR]" value="'.$bdd['PAP_BDD_SERVEUR'].'" />'.'</li>'."\n";$sortie_form .= '<li>La base de données MySQL à utiliser pour Papyrus. Cette base de données doit déjà '.'exister avant de pouvoir continuer.</li>'."\n";$sortie_form .= '<li>'."\n".'<label for="mysql_database">Base de données MySQL :</label>'.'<input id="mysql_database"'.$disabled.'type="text" size="30" name="bdd[PAP_BDD_NOM]" value="'.$bdd['PAP_BDD_NOM'].'" />'.'</li>'."\n";$sortie_form .= '<li>Nom et mot de passe de l\'utilisateur MySQL qui sera utilisé pour se connecter à votre base de données.</li>'."\n";$sortie_form .= '<li>'."\n".'<label for="mysql_user">Non de l\'utilisateur MySQL :</label>'.'<input id="mysql_user"'.$disabled.'type="text" size="30" name="bdd[PAP_BDD_UTILISATEUR]" value="'.$bdd['PAP_BDD_UTILISATEUR'].'" />'.'</li>'."\n";$sortie_form .= '<li>'."\n".'<label for="mysql_password">Mot de passe MySQL :</label>'.'<input id="mysql_password"'.$disabled.'type="password" size="30" name="bdd[PAP_BDD_MOT_DE_PASSE]" value="'.$bdd['PAP_BDD_MOT_DE_PASSE'].'" />'.'</li>'."\n";return $sortie_form;}// +------------------------------------------------------------------------------------------------------+// | PIED du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* Revision 1.3 2004/10/19 16:47:28 jpm* Transformation en fonction de l'appel de l'application.** Revision 1.2 2004/10/19 15:59:18 jpm* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.* Ajout des constantes FTP.** Revision 1.1 2004/10/15 18:28:59 jpm* Début appli installateur de Papyrus.*** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>