WebSVN – Applications.papyrus – Diff – /trunk/papyrus/applications/installateur/instal_fichier.inc.php

 <?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  Jean-Pascal MILCENT                                                                 |
 // | 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_fichier.inc.php,v 1.4 2004-10-19 17:01:12 jpm Exp $
+// CVS : $Id: instal_fichier.inc.php,v 1.5 2004-10-22 17:23:04 jpm Exp $
 /**
 * Page de création des fichiers nécessaire à l'installation de Papyrus.
+*
 * Page permettant de créer le fichier de configuration de Papyrus.
+*
 *@package Installateur
 //Auteur original :
 *@author        Hendrik MANS <hendrik@mans.de>
 //Autres auteurs :
 *@author        David DELON
 *@author        Patrick PAUL
 *@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 *@copyright     Tela-Botanica 2000-2004
-*@version       $Revision: 1.4 $ $Date: 2004-10-19 17:01:12 $
+*@version       $Revision: 1.5 $ $Date: 2004-10-22 17:23:04 $
 // +------------------------------------------------------------------------------------------------------+
 **/
 // +------------------------------------------------------------------------------------------------------+
 // |                                            ENTÊTE du PROGRAMME                                       |
 // +------------------------------------------------------------------------------------------------------+
+// Numéro de l'étape d'installation :
+$num_etape = 3;
+// Initialisation du tableau contenant les valeurs de configuration de la base de données
+$tableau = array(   'PAP_FTP_SERVEUR' => '', 'PAP_FTP_PORT' => '', 'PAP_FTP_UTILISATEUR' => '',
+                    'PAP_FTP_MOT_DE_PASSE' => '', 'PAP_FTP_RACINE' => '');
+foreach ($tableau as $cle => $val) {
+    if (!empty($_POST['fichier'][$cle])) {
+        $fichier[$cle] = $_POST['fichier'][$cle];
+    } else if (defined($cle)) {
+        $fichier[$cle] = constant($cle);
+    } else {
+        $fichier[$cle] = '';
+    }
+}
 // Récupération des paramêtres de configuration du formulaire précédent
-if (isset($_POST['config'])) {
+if (isset($_POST['pref_serial'])) {
-    $config = unserialize(stripslashes($_POST['config']));
+    $pref = unserialize(stripslashes($_POST['pref_serial']));
+}
+if (isset($_POST['bdd'])) {
+    $bdd = $_POST['bdd'];
-} else if (isset($_POST['config_serial'])) {
+} else if (isset($_POST['bdd_serial'])) {
-    $config = unserialize(stripslashes($_POST['config_serial']));
+    $bdd = unserialize(stripslashes($_POST['bdd_serial']));
+}
 // +------------------------------------------------------------------------------------------------------+
 // |                                          CORPS du PROGRAMME                                          |
 // +------------------------------------------------------------------------------------------------------+
+// Affichage d'informations...
+$sortie .= '<p><strong>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</strong></p>'."\n";
+// Correction éventuelle des informations saisies par l'utilisateur
+if (preg_match('/^\/(.*)$/', $fichier['PAP_FTP_RACINE'], $instal_tab_txt)) {
+    // le chemin FTP ne doit pas commencer par un slash, nous le supprimons
+    $fichier['PAP_FTP_RACINE'] = $instal_tab_txt[1];
+}
+// Nous vérifions si nous sommes en phase de test du formulaire de config de l'écriture de fichier
+$erreur = 0;
+$sortie_verif = '';
+if ($_GET['installation'] == 'verif_fichier') {
+    // Test de la configuration du FTP
+    $sortie_verif .= '    <h2>Test de la connexion FTP</h2>'."\n";
+    $erreur = testerConfig($sortie_verif, 'Test connexion FTP ...', $ftp = @ftp_connect($fichier['PAP_FTP_SERVEUR'], $fichier['PAP_FTP_PORT']), '', 1, $erreur);
+    $erreur = testerConfig($sortie_verif, 'Test identification sur le serveur FTP ...', @ftp_login($ftp, $fichier['PAP_FTP_UTILISATEUR'],
+                            $fichier['PAP_FTP_MOT_DE_PASSE']), 'Les paramêtres FTP saisies ne permettent pas l\'identification !', 1, $erreur);
+    $sortie_verif .= '<br />'."\n";
-$configCode = "<?php\n// pap_config.inc.php construit le ".strftime("%c")."\n// ne changez pas la version de Papyrus manuellement!\n\n";
+    $configCode = "<?php\n// pap_config.inc.php construit le ".strftime("%c")."\n// ne changez pas la version de Papyrus manuellement!\n\n";
-$entries[] = 'define(\''.INSTAL_VERSION_NOUVELLE_NOM.'\',\''.INSTAL_VERSION_NOUVELLE.'\');'."\n";
+    $entries[] = 'define(\''.INSTAL_VERSION_NOUVELLE_NOM.'\',\''.INSTAL_VERSION_NOUVELLE.'\');'."\n";
-foreach ($config as $k => $v) {
+    foreach ($bdd as $cle => $val) {
-    $entries[] = 'define(\''.$k.'\',\''.$v.'\');'."\n";
+        $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
-}
+    }
-$entries[] = "define('PAP_DSN', 'mysql://'.PAP_BDD_UTILISATEUR.':'.PAP_BDD_MOT_DE_PASSE.'@'.PAP_BDD_SERVEUR.'/'.PAP_BDD_NOM);"."\n";
+    $entries[] = "define('PAP_DSN', 'mysql://'.PAP_BDD_UTILISATEUR.':'.PAP_BDD_MOT_DE_PASSE.'@'.PAP_BDD_SERVEUR.'/'.PAP_BDD_NOM);"."\n";
-$configCode .= implode("\n", $entries)."\n\n?>";
+    foreach ($fichier as $cle => $val) {
-$sortie .= '    <h1>Installation de Papyrus</h1></h1>'."\n";
+        $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
+    }
-// Tentative d'écriture du fichier de config
+    foreach ($pref as $cle => $val) {
-$sortie .= "<b>Cr&eacute;ation du fichier de configuration en cours...</b><br>\n";
+        // Nous récupérons uniquement les constantes à stocker dans le fichier de config (leur nom commence par PAP_)
-$erreur = testerConfig($sortie, '&Eacute;criture du fichier de configuration <tt>'.INSTAL_CHEMIN_CONFIG.'</tt>...',
+        if (preg_match('/^PAP_/', $cle)) {
-                        $fp = @fopen(INSTAL_CHEMIN_CONFIG, 'w'), '', 0, 0);
+            $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
-if ($fp) {
+        }
-    // Ecriture du fichier...
+    }
-    fwrite($fp, $configCode);
+    $configCode .= implode("\n", $entries)."\n\n?>";
-    fclose($fp);
+    // Tentative d'écriture du fichier de config
-    $sortie .=  '<p>Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
+    $sortie_verif .= '    <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n";
+    $chemin_fpt_absolu = GEN_SEP.$fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG;
-                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
+    $url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
-                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>';
+                '@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
-} else {
-    // Problème...
+    $fp = @fopen($url_ftp, 'w');
+    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
-    $sortie .=  '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.INSTAL_CHEMIN_CONFIG.
+    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
                 '</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
                 'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
                 'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
                 'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
-                '<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire'.
+                '<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
                 '<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
-                'correctement.</p>'."\n";
+                'correctement.</p>';
+    $txt_ecriture_conf_erreur .= '<div id="fichier_config">'."\n";
+    $txt_ecriture_conf_erreur .= '<xmp>'.$configCode.'</xmp>'."\n";
+    $txt_ecriture_conf_erreur .= '</div>'."\n";
+    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
+}
+// Gestion de l'affichage
+if ($erreur == 0 && empty($sortie_verif)) {
+    // Premier appel du fichier...
+    $sortie .= creerFormulaire($fichier);
-    $sortie .= '    <form action="'.donnerUrlCourante().'?installation=config" method="POST" />'."\n";
+    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
-    $sortie .= '      <input type="hidden" name="config_serial" value="'.htmlentities(serialize($config)).'" />'."\n";
+    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
-    $sortie .= '      <input type="submit" value="Essayer &agrave; nouveau" />'."\n";
+    $sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";
+    $sortie .= '      </ul>'."\n";
-    $sortie .= '    </form>'."\n";
+    $sortie .= '    </form>';
+} else if ($erreur == 2 && !empty($sortie_verif)) {
+    // Vérification du fichier avec interuption...
+    $sortie .= creerFormulaire($fichier);
+    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
+    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
-    $sortie .= '<div style="background-color: #EEEEEE; padding: 10px 10px;">'."\n";
+    $sortie .= '<li><input type="submit" value="Tester à nouveau" /></li>'."\n";
-    $sortie .= '<xmp>'.$configCode.'</xmp>'."\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($fichier, true);
-    $sortie .= '</div>'."\n";
+    $sortie .= '      </ul>'."\n";
+    $sortie .= '    </form>';
+    $sortie .= $sortie_verif;
+    // Ecriture du fichier...
+    fwrite($fp, $configCode);
+    fclose($fp);
+    $sortie .= '    <p>Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
+                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
+                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>'."\n";
+}
+// +------------------------------------------------------------------------------------------------------+
+// |                                            LISTE DES FONCTIONS                                       |
+// +------------------------------------------------------------------------------------------------------+
+// Création du formulaire de configuration de la base de donneés
+function creerFormulaire($fichier, $bln_lecture = false) {
+    $disabled = '';
+    if ($bln_lecture) {
+        $disabled = ' disabled="disabled" ';
+    }
+    $sortie_form .= '    <form action="'.donnerUrlCourante().'?installation=verif_fichier" method="post">';
+    $sortie_form .= '      <ul>'."\n";
+    $sortie_form .=  '<li><h2>Configuration du FTP et des chemins d\'accès</h2></li>'."\n";
+    $sortie_form .=  '<li>'."\n".
+                '<label for="ftp_serveur">Nom du serveur FTP :</label>'.
+                '<input id="ftp_serveur"'.$disabled.'type="text" size="30" name="fichier[PAP_FTP_SERVEUR]" value="'.$fichier['PAP_FTP_SERVEUR'].'" />'.
+                '</li>'."\n";
+    $sortie_form .=  '<li>'."\n".
+                '<label for="ftp_port">N° du port d\'accès au serveur FTP :</label>'.
+                '<input id="ftp_port"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_PORT]" value="'.$fichier['PAP_FTP_PORT'].'" />'.
+                '</li>'."\n";
+    $sortie_form .=  '<li>'."\n".
+                '<label for="ftp_utilisateur">Nom d\'utilisateur pour le serveur FTP :</label>'.
+                '<input id="ftp_utilisateur"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_UTILISATEUR]" value="'.$fichier['PAP_FTP_UTILISATEUR'].'" />'.
+                '</li>'."\n";
+    $sortie_form .=  '<li>'."\n".
+                '<label for="ftp_mot_de_passe">Mot de passe de l\'utilisateur pour le serveur FTP :</label>'.
+                '<input id="ftp_mot_de_passe"'.$disabled.'type="password" size="20" name="fichier[PAP_FTP_MOT_DE_PASSE]" value="'.$fichier['PAP_FTP_MOT_DE_PASSE'].'" />'.
+                '</li>'."\n";
+    $sortie_form .=  '<li>Lorsque vous vous connecter par FTP sur le serveur où vous avez déposé les fichiers de Papyrus, le '.
+                'dossier le plus haut auquel vous pouvez accéder dans l\'arborescence est la racine. Il vous faut donc '.
+                'indiquez dans le champ ci-dessous le chemin depuis cette racine jusqu\'au dossier contenant le fichier '.
+                '<tt>papyrus.php</tt>. Exemple : <i>www/</i><br /> Notes : Le chemin doit commmencer directement par le nom'.
+                ' du premier dossier et se terminer par un slash (/) ou un anti-slash (\\) suivant le système d\''.
+                'exploitation de votre serveur.</li>'."\n";
+    $sortie_form .=  '<li>'."\n".
+                '<label for="ftp_racine">Racine dépôt FTP :</label>'.
+                '<input id="ftp_racine"'.$disabled.'type="text" size="60" name="fichier[PAP_FTP_RACINE]" value="'.$fichier['PAP_FTP_RACINE'].'" />'.
+                '</li>'."\n";
+    return $sortie_form;
+}
 // +------------------------------------------------------------------------------------------------------+
 // |                                            PIED du PROGRAMME                                         |
 // +------------------------------------------------------------------------------------------------------+
 /* +--Fin du code ----------------------------------------------------------------------------------------+
+*
 * $Log: not supported by cvs2svn $
+* Revision 1.4  2004/10/19 17:01:12  jpm
+* Correction bogues.
+*
 * Revision 1.3  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.2  2004/10/18 09:12:09  jpm
 * Changement de nom d'un fichier.
+*
 * Revision 1.1  2004/10/18 09:11:05  jpm
 * Changement de nom du fichier.
+*
 * Revision 1.1  2004/10/15 18:28:59  jpm
 * Début appli installateur de Papyrus.
+*
+*
 * +-- Fin du code ----------------------------------------------------------------------------------------+
 */
 ?>

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/installateur/instal_fichier.inc.php – Rev 80 → 91