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

 // | 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.9 2005-04-12 16:09:45 jpm Exp $
+// CVS : $Id: instal_fichier.inc.php,v 1.10 2005-09-23 14:20:23 florian Exp $
 /**
 * Page de création des fichiers nécessaire à l'installation de Papyrus.
+*
 * Page permettant de créer le fichier de configuration de Papyrus.
+*
 //Autres auteurs :
 *@author        David DELON
 *@author        Patrick PAUL
 *@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 *@copyright     Tela-Botanica 2000-2004
-*@version       $Revision: 1.9 $ $Date: 2005-04-12 16:09:45 $
+*@version       $Revision: 1.10 $ $Date: 2005-09-23 14:20:23 $
 // +------------------------------------------------------------------------------------------------------+
 **/
 // +------------------------------------------------------------------------------------------------------+
 // +------------------------------------------------------------------------------------------------------+
 // |                                          CORPS du PROGRAMME                                          |
 // +------------------------------------------------------------------------------------------------------+
 // Affichage d'informations...
-$sortie .= '<p class="etape_numero"><strong>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</strong></p>'."\n";
+$sortie .= '<br /><h1>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</h1>'."\n";
 // Correction éventuelle des informations saisies par l'utilisateur
 if (ereg('^[\/\\]', $fichier['PAP_FTP_RACINE']) == false) {
 // 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";
+    $sortie_verif .= '    <br /><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";
                 $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
+            }
+        }
+    }
     $configCode .= implode("\n", $entries)."\n\n?>";
+    if ($erreur==0) {
-    // Tentative d'écriture du fichier de config
+	    // Tentative d'écriture du fichier de config
-    $sortie_verif .= '    <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n";
+	    $sortie_verif .= '    <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n";
-    $chemin_fpt_absolu = $fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG;
+	    $chemin_fpt_absolu = $fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG;
-    $url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
+	    $url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
-                '@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
+			'@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
-    // Dans le cas, où nous mettons à jour Papyrus, il faut supprimer l'ancien fichier de config
+	    // Dans le cas, où nous mettons à jour Papyrus, il faut supprimer l'ancien fichier de config
-    if (INSTAL_VERSION_ANCIENNE != '') {
+	    if (INSTAL_VERSION_ANCIENNE != '') {
-        $txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
+		$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
-        $txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '.
+		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '.
-                                    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
+					    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
-        $erreur = testerConfig($sortie_verif, $txt_suppression, unlink($url_ftp), $txt_suppression_erreur, 1, $erreur);
+		$erreur = testerConfig($sortie_verif, $txt_suppression, unlink($url_ftp), $txt_suppression_erreur, 1, $erreur);
-    }
+	    }
-    // Nous écrivons le fichier de config sur le disque
+	    // Nous écrivons le fichier de config sur le disque
-    $fp = @fopen($url_ftp, 'w');
+	    $fp = @fopen($url_ftp, 'w');
-    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
+	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
-    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
+	    $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 '.
+			'</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 '.
+			'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 '.
+			'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 '.
+			'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 '.
+			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
-                'correctement.</p>';
+			'correctement.</p>';
-    $txt_ecriture_conf_erreur .= '<div id="fichier_config">'."\n";
+	    $txt_ecriture_conf_erreur .= '<div id="fichier_config">'."\n";
-    $txt_ecriture_conf_erreur .= '<xmp>'.$configCode.'</xmp>'."\n";
+	    $txt_ecriture_conf_erreur .= '<xmp>'.$configCode.'</xmp>'."\n";
-    $txt_ecriture_conf_erreur .= '</div>'."\n";
+	    $txt_ecriture_conf_erreur .= '</div>'."\n";
-    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
+	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
+	}
+}
 // Gestion de l'affichage
 if ($erreur == 0 && empty($sortie_verif)) {
     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><br /><h2>Configuration du FTP et des chemins d\'accès</h2></li>'."\n";
-    $sortie_form .= '<li>Le nom de la machine à laquelle vous vous connectez pour accéder à votre dépôt FTP. En '.
+    $sortie_form .= '<li>Entrer le nom de dommaine pour accéder à votre dépôt FTP</li>'."\n";
-                    'g&eacute;n&eacute;ral c\'est le nom de domaine du site où vous voulez installer Papyrus.</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>Le numéro du port pour le service FTP sur la machine hébergeant Papyrus. '.
     $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>'.
+                '<label for="ftp_mot_de_passe">Mot de passe 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 '.
+    $sortie_form .=  '<li>Lorsque vous vous connectez 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 absolu depuis cette racine jusqu\'au dossier contenant le fichier '.
                 '<tt>papyrus.php</tt>. Exemple : <i>/www/</i></li>'."\n";
     $sortie_form .=  '<li>'."\n".
                 '<label for="ftp_racine">Racine dépôt FTP :</label>'.
 /* +--Fin du code ----------------------------------------------------------------------------------------+
+*
+* $Log: not supported by cvs2svn $
+* Revision 1.9  2005/04/12 16:09:45  jpm
 * Amélioration de la gestion de la constante de redirection des urls et de la gestion des constantes de type entier et booléen.
 * $Log: not supported by cvs2svn $
 * Revision 1.8  2004/10/25 16:26:35  jpm
 * Début gestion des mises à jours.
+*

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/installateur/instal_fichier.inc.php – Rev 328 → 458