Subversion Repositories Applications.papyrus

Rev

Rev 1065 | Rev 1067 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
68 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.1                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | Copyright (c) 2002, Hendrik Mans <hendrik@mans.de>                                                   |
9 
// | Copyright 2002, 2003 David DELON                                                                     |
10 
// | Copyright 2002 Patrick PAUL                                                                          |
11 
// | Copyright  2003  Jean-Pascal MILCENT                                                                 |
12 
// | All rights reserved.                                                                                 |
13 
// | Redistribution and use in source and binary forms, with or without                                   |
14 
// | modification, are permitted provided that the following conditions                                   |
15 
// | are met:                                                                                             |
16 
// | 1. Redistributions of source code must retain the above copyright                                    |
17 
// | notice, this list of conditions and the following disclaimer.                                        |
18 
// | 2. Redistributions in binary form must reproduce the above copyright                                 |
19 
// | notice, this list of conditions and the following disclaimer in the                                  |
20 
// | documentation and/or other materials provided with the distribution.                                 |
21 
// | 3. The name of the author may not be used to endorse or promote products                             |
22 
// | derived from this software without specific prior written permission.                                |
23 
// |                                                                                                      |
24 
// | THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR                                 |
25 
// | IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES                            |
26 
// | OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.                              |
27 
// | IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,                                     |
28 
// | INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT                             |
29 
// | NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,                            |
30 
// | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY                                |
31 
// | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT                                  |
32 
// | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF                             |
33 
// | THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.                                    |
34 
// +------------------------------------------------------------------------------------------------------+
1066 alexandre_ 35 
// CVS : $Id: instal_fichier.inc.php,v 1.17 2006-11-30 15:27:31 alexandre_tb Exp $
68 jpm 36 
/**
69 jpm 37 
* Page de création des fichiers nécessaire à l'installation de Papyrus.
68 jpm 38 
*
39 
* Page permettant de créer le fichier de configuration de Papyrus.
40 
*
41 
*@package Installateur
42 
//Auteur original :
43 
*@author        Hendrik MANS <hendrik@mans.de>
44 
//Autres auteurs :
45 
*@author        David DELON
46 
*@author        Patrick PAUL
47 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
48 
*@copyright     Tela-Botanica 2000-2004
1066 alexandre_ 49 
*@version       $Revision: 1.17 $ $Date: 2006-11-30 15:27:31 $
68 jpm 50 
// +------------------------------------------------------------------------------------------------------+
51 
**/
52 
 
53 
// +------------------------------------------------------------------------------------------------------+
54 
// |                                            ENTÊTE du PROGRAMME                                       |
55 
// +------------------------------------------------------------------------------------------------------+
91 jpm 56 
// Numéro de l'étape d'installation :
57 
$num_etape = 3;
58 
 
59 
// Initialisation du tableau contenant les valeurs de configuration de la base de données
60 
$tableau = array(   'PAP_FTP_SERVEUR' => '', 'PAP_FTP_PORT' => '', 'PAP_FTP_UTILISATEUR' => '',
61 
                    'PAP_FTP_MOT_DE_PASSE' => '', 'PAP_FTP_RACINE' => '');
62 
foreach ($tableau as $cle => $val) {
63 
    if (!empty($_POST['fichier'][$cle])) {
64 
        $fichier[$cle] = $_POST['fichier'][$cle];
65 
    } else if (defined($cle)) {
66 
        $fichier[$cle] = constant($cle);
67 
    } else {
100 jpm 68 
        if ($cle == 'PAP_FTP_SERVEUR') {
69 
            $fichier[$cle] = $_SERVER['HTTP_HOST'];
70 
        } else if ($cle == 'PAP_FTP_PORT') {
71 
            $fichier[$cle] = 21;
72 
        } else {
73 
            $fichier[$cle] = '';
74 
        }
91 jpm 75 
    }
76 
}
77 
 
68 jpm 78 
// Récupération des paramêtres de configuration du formulaire précédent
91 jpm 79 
if (isset($_POST['pref_serial'])) {
80 
    $pref = unserialize(stripslashes($_POST['pref_serial']));
68 jpm 81 
}
91 jpm 82 
if (isset($_POST['bdd'])) {
83 
    $bdd = $_POST['bdd'];
84 
} else if (isset($_POST['bdd_serial'])) {
85 
    $bdd = unserialize(stripslashes($_POST['bdd_serial']));
86 
}
76 jpm 87 
 
68 jpm 88 
// +------------------------------------------------------------------------------------------------------+
89 
// |                                          CORPS du PROGRAMME                                          |
90 
// +------------------------------------------------------------------------------------------------------+
91 jpm 91 
// Affichage d'informations...
458 florian 92 
$sortie .= '<br /><h1>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</h1>'."\n";
91 jpm 93 
 
94 
// Correction éventuelle des informations saisies par l'utilisateur
100 jpm 95 
if (ereg('^[\/\\]', $fichier['PAP_FTP_RACINE']) == false) {
91 jpm 96 
    // le chemin FTP ne doit pas commencer par un slash, nous le supprimons
97 jpm 97 
    $fichier['PAP_FTP_RACINE'] = GEN_SEP.$fichier['PAP_FTP_RACINE'];
68 jpm 98 
}
99 
 
91 jpm 100 
// Nous vérifions si nous sommes en phase de test du formulaire de config de l'écriture de fichier
101 
$erreur = 0;
102 
$sortie_verif = '';
103 
if ($_GET['installation'] == 'verif_fichier') {
104 
    // Test de la configuration du FTP
458 florian 105 
    $sortie_verif .= '    <br /><h2>Test de la connexion FTP</h2>'."\n";
91 jpm 106 
    $erreur = testerConfig($sortie_verif, 'Test connexion FTP ...', $ftp = @ftp_connect($fichier['PAP_FTP_SERVEUR'], $fichier['PAP_FTP_PORT']), '', 1, $erreur);
107 
    $erreur = testerConfig($sortie_verif, 'Test identification sur le serveur FTP ...', @ftp_login($ftp, $fichier['PAP_FTP_UTILISATEUR'],
108 
                            $fichier['PAP_FTP_MOT_DE_PASSE']), 'Les paramêtres FTP saisies ne permettent pas l\'identification !', 1, $erreur);
109 
    $sortie_verif .= '<br />'."\n";
110 
 
111 
    $configCode = "<?php\n// pap_config.inc.php construit le ".strftime("%c")."\n// ne changez pas la version de Papyrus manuellement!\n\n";
112 
    $entries[] = 'define(\''.INSTAL_VERSION_NOUVELLE_NOM.'\',\''.INSTAL_VERSION_NOUVELLE.'\');'."\n";
113 
    foreach ($bdd as $cle => $val) {
114 
        $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
115 
    }
116 
    $entries[] = "define('PAP_DSN', 'mysql://'.PAP_BDD_UTILISATEUR.':'.PAP_BDD_MOT_DE_PASSE.'@'.PAP_BDD_SERVEUR.'/'.PAP_BDD_NOM);"."\n";
117 
    foreach ($fichier as $cle => $val) {
118 
        $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
119 
    }
120 
    foreach ($pref as $cle => $val) {
121 
        // Nous récupérons uniquement les constantes à stocker dans le fichier de config (leur nom commence par PAP_)
122 
        if (preg_match('/^PAP_/', $cle)) {
328 jpm 123 
            if (preg_match('/^[0-9]+|(?i:true|false)$/', $val)) {
124 
                $entries[] = 'define(\''.$cle.'\','.$val.');'."\n";
125 
            } else {
126 
                $entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n";
127 
            }
91 jpm 128 
        }
129 
    }
130 
    $configCode .= implode("\n", $entries)."\n\n?>";
458 florian 131 
    if ($erreur==0) {
132 
	    // Tentative d'écriture du fichier de config
133 
	    $sortie_verif .= '    <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n";
134 
	    $chemin_fpt_absolu = $fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG;
135 
	    $url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
136 
			'@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
137 
 
138 
	    // Dans le cas, où nous mettons à jour Papyrus, il faut supprimer l'ancien fichier de config
139 
	    if (INSTAL_VERSION_ANCIENNE != '') {
140 
		$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
141 
		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '.
142 
					    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
143 
		$erreur = testerConfig($sortie_verif, $txt_suppression, unlink($url_ftp), $txt_suppression_erreur, 1, $erreur);
144 
	    }
145 
 
146 
	    // Nous écrivons le fichier de config sur le disque
147 
	    $fp = @fopen($url_ftp, 'w');
148 
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
149 
	    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
150 
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
151 
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
152 
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
153 
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
154 
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
155 
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
1021 florian 156 
			'correctement.</p>';
157 
	    $txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($configCode).'</code></div>'."\n";
458 florian 158 
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
1019 alexandre_ 159 
 
160 
	    // tentative d ecriture du fichier .htaccess
161 
	    $url_ftp_htaccess = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
162 
			'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].'/.htaccess';
1023 ddelon 163 
 
1019 alexandre_ 164 
		if (file_exists($pref['PAP_CHEMIN_RACINE'].'/.htaccess')) {
1066 alexandre_ 165 
			$sortie_verif .='<p>Attention: Un fichier .htaccess est déjà présent sur le serveur.'.
1019 alexandre_ 166 
							'<br />Veillez à le configurer correctement<br /><br />'.
167 
							'Contenu par défaut: <br /><br /> ErrorDocument 404 /erreur_404.php';
1065 alexandre_ 168 
		} else {
169 
			$prefixe = parse_url($_SERVER['REQUEST_URI'], PHP_URL_PATH);
170 
			$host = parse_url($_SERVER['REQUEST_URI'], PHP_URL_HOST);
171 
			$prot = parse_url($_SERVER['REQUEST_URI'], PHP_URL_SCHEME);
172 
			$url = $prot.'://'.$host.$prefixe;
173 
			$handle =fopen ($url_ftp_htaccess, 'w');
1066 alexandre_ 174 
 
175 
			$txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier .htaccess <tt>'.$url_ftp_htaccess.
176 
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
177 
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
178 
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
179 
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
180 
			'<tt>.htaccess</tt> directement &agrave la racine de '.
181 
			'<tt>papyrus</tt> de Papyrus.</p>';
182 
 
183 
			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $handle, $txt_ecriture_conf_erreur, 1, $erreur);
184 
			if ($handle) {
185 
				$contenu_htaccess = '# Raccourci pour les menus et sites de Papyrus
1065 alexandre_ 186 
RewriteEngine on
187 
# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement
188 
RewriteCond %{REQUEST_FILENAME} !-d
189 
RewriteCond %{REQUEST_FILENAME} !-f
190 
 
191 
# ATTENTION : remplace localhoste par votre nom de domaine !
192 
# Réecriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL
193 
# ATTENTION : ne marche pas pour les formulaires en mode POST !
194 
RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]
195 
# Réecriture d\'url pour les vieux permaliens
196 
RewriteCond %{REQUEST_FILENAME}/ !-d
197 
RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]
198 
# Redirection d\'url pour le sélecteur de site
199 
# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concacténée à l\'url et cela plante...
200 
# Le "/" initial dans la RewriteCond est obligatoire!
201 
RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$
202 
RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]
203 
 
204 
# Réecriture d\'url pour les sites de Papyrus : à modifier si les valeurs par défaut ont été changées
205 
RewriteRule ^site:.+$ papyrus.php [QSA,L]
206 
# Réecriture d\'url pour les menus de Papyrus : à modifier si les valeurs par défaut ont été changées
207 
RewriteRule ^page:.+$ papyrus.php [QSA,L]
208 
 
209 
# Gestion des erreurs 404
210 
ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';
1066 alexandre_ 211 
				fwrite ($handle, $contenu_htaccess);
212 
				fclose($handle);
213 
			}
1023 ddelon 214 
		}
458 florian 215 
	}
68 jpm 216 
}
217 
 
1020 ddelon 218 
 
219 
 
220 
// Mise à jour des fichiers de configuration de chaque application :
221 
 
1023 ddelon 222 
function maj_fichier_config_appli($fichier, $fichierconfig, $elements) {
1020 ddelon 223 
 
1023 ddelon 224 
 
1020 ddelon 225 
	$url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
1023 ddelon 226 
	'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].GEN_SEP.$fichierconfig;
1020 ddelon 227 
 
1023 ddelon 228 
 
1020 ddelon 229 
	 $fp = @fopen($url_ftp, 'w');
230 
 
231 
	 while (!feof($fp)) {
232 
           $cont .= fread($fp, 500);
233 
     }
234 
 
235 
 	 foreach ($elements as $element) {
236 
		list($expr,$rempl)=$elements;
237 
		preg_replace('/'.$expr.'/',$rempl,$cont);
238 
	 }
239 
 
240 
	fwrite($fp, $cont);
241 
    fclose($fp);
242 
 
243 
 
244 
 
245 
 
246 
}
247 
 
1023 ddelon 248 
// Maj Fckeditor
1020 ddelon 249 
 
1023 ddelon 250 
maj_fichier_config_appli($fichier,'api/fckeditor/editor/filemanager/browser/default/connectors/php/config.php',array("test"=>"test"));
1020 ddelon 251 
 
1023 ddelon 252 
 
253 
 
1020 ddelon 254 
 
255 
 
91 jpm 256 
// Gestion de l'affichage
257 
if ($erreur == 0 && empty($sortie_verif)) {
258 
    // Premier appel du fichier...
259 
    $sortie .= creerFormulaire($fichier);
260 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
261 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
262 
    $sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";
263 
    $sortie .= '      </ul>'."\n";
264 
    $sortie .= '    </form>';
265 
} else if ($erreur == 2 && !empty($sortie_verif)) {
266 
    // Vérification du fichier avec interuption...
267 
    $sortie .= creerFormulaire($fichier);
268 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
269 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
270 
    $sortie .= '<li><input type="submit" value="Tester à nouveau" /></li>'."\n";
271 
    $sortie .= '      </ul>'."\n";
272 
    $sortie .= '    </form>';
273 
    $sortie .= $sortie_verif;
274 
} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) {
275 
    // Vérification du fichier sans interuption... passage à l'étape suivante
276 
    $sortie .= creerFormulaire($fichier, true);
277 
    $sortie .= '      </ul>'."\n";
278 
    $sortie .= '    </form>';
279 
    $sortie .= $sortie_verif;
280 
    // Ecriture du fichier...
281 
    fwrite($fp, $configCode);
282 
    fclose($fp);
1021 florian 283 
    $sortie .= '    <br /><p class="etape_info">Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
91 jpm 284 
                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
285 
                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>'."\n";
286 
}
287 
 
68 jpm 288 
// +------------------------------------------------------------------------------------------------------+
91 jpm 289 
// |                                            LISTE DES FONCTIONS                                       |
290 
// +------------------------------------------------------------------------------------------------------+
291 
 
292 
// Création du formulaire de configuration de la base de donneés
293 
function creerFormulaire($fichier, $bln_lecture = false) {
294 
    $disabled = '';
295 
    if ($bln_lecture) {
296 
        $disabled = ' disabled="disabled" ';
297 
    }
298 
    $sortie_form .= '    <form action="'.donnerUrlCourante().'?installation=verif_fichier" method="post">';
299 
    $sortie_form .= '      <ul>'."\n";
458 florian 300 
    $sortie_form .=  '<li><br /><h2>Configuration du FTP et des chemins d\'accès</h2></li>'."\n";
301 
    $sortie_form .= '<li>Entrer le nom de dommaine pour accéder à votre dépôt FTP</li>'."\n";
91 jpm 302 
    $sortie_form .=  '<li>'."\n".
303 
                '<label for="ftp_serveur">Nom du serveur FTP :</label>'.
304 
                '<input id="ftp_serveur"'.$disabled.'type="text" size="30" name="fichier[PAP_FTP_SERVEUR]" value="'.$fichier['PAP_FTP_SERVEUR'].'" />'.
305 
                '</li>'."\n";
100 jpm 306 
    $sortie_form .= '<li>Le numéro du port pour le service FTP sur la machine hébergeant Papyrus. '.
307 
                    'En g&eacute;n&eacute;ral c\'est 21.</li>'."\n";
91 jpm 308 
    $sortie_form .=  '<li>'."\n".
309 
                '<label for="ftp_port">N° du port d\'accès au serveur FTP :</label>'.
310 
                '<input id="ftp_port"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_PORT]" value="'.$fichier['PAP_FTP_PORT'].'" />'.
311 
                '</li>'."\n";
100 jpm 312 
    $sortie_form .=  '<li>Nom et mot de passe FTP qui sera utilis&eacute; pour se connecter &agrave; au dépôt FTP.</li>'."\n";
91 jpm 313 
    $sortie_form .=  '<li>'."\n".
314 
                '<label for="ftp_utilisateur">Nom d\'utilisateur pour le serveur FTP :</label>'.
315 
                '<input id="ftp_utilisateur"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_UTILISATEUR]" value="'.$fichier['PAP_FTP_UTILISATEUR'].'" />'.
316 
                '</li>'."\n";
317 
    $sortie_form .=  '<li>'."\n".
458 florian 318 
                '<label for="ftp_mot_de_passe">Mot de passe pour le serveur FTP :</label>'.
91 jpm 319 
                '<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'].'" />'.
320 
                '</li>'."\n";
458 florian 321 
    $sortie_form .=  '<li>Lorsque vous vous connectez par FTP sur le serveur où vous avez déposé les fichiers de Papyrus, le '.
91 jpm 322 
                'dossier le plus haut auquel vous pouvez accéder dans l\'arborescence est la racine. Il vous faut donc '.
100 jpm 323 
                'indiquez dans le champ ci-dessous le chemin absolu depuis cette racine jusqu\'au dossier contenant le fichier '.
324 
                '<tt>papyrus.php</tt>. Exemple : <i>/www/</i></li>'."\n";
91 jpm 325 
    $sortie_form .=  '<li>'."\n".
326 
                '<label for="ftp_racine">Racine dépôt FTP :</label>'.
327 
                '<input id="ftp_racine"'.$disabled.'type="text" size="60" name="fichier[PAP_FTP_RACINE]" value="'.$fichier['PAP_FTP_RACINE'].'" />'.
328 
                '</li>'."\n";
329 
    return $sortie_form;
330 
}
331 
 
332 
// +------------------------------------------------------------------------------------------------------+
68 jpm 333 
// |                                            PIED du PROGRAMME                                         |
334 
// +------------------------------------------------------------------------------------------------------+
335 
 
336 
 
337 
/* +--Fin du code ----------------------------------------------------------------------------------------+
338 
*
339 
* $Log: not supported by cvs2svn $
1066 alexandre_ 340 
* Revision 1.16  2006/11/30 14:52:42  alexandre_tb
341 
* Ecriture du fichier htaccess lors de l installation
342 
*
1065 alexandre_ 343 
* Revision 1.15  2006/10/09 14:35:27  ddelon
344 
* bug caractere invalie trainant dans fichier
345 
*
1023 ddelon 346 
* Revision 1.14  2006/10/06 15:34:30  florian
347 
* mise en commentaire .htaccess
348 
*
1022 florian 349 
* Revision 1.13  2006/10/06 15:23:00  florian
350 
* amelioration graphique de l'installateur
351 
*
1021 florian 352 
* Revision 1.12  2006/10/06 14:49:45  ddelon
353 
* ecriture htaccess a l'installation
354 
*
1020 ddelon 355 
* Revision 1.11  2006/10/06 14:46:15  alexandre_tb
356 
* ecriture du fichier .htaccess
357 
*
1019 alexandre_ 358 
* Revision 1.10  2005/09/23 14:20:23  florian
359 
* nouvel habillage installateur, plus correction de quelques bugs
360 
*
458 florian 361 
* Revision 1.9  2005/04/12 16:09:45  jpm
362 
* Amélioration de la gestion de la constante de redirection des urls et de la gestion des constantes de type entier et booléen.
363 
*
328 jpm 364 
* Revision 1.8  2004/10/25 16:26:35  jpm
365 
* Début gestion des mises à jours.
366 
*
108 jpm 367 
* Revision 1.7  2004/10/25 10:22:48  jpm
368 
* Correction de quelques bogues, ajouts d'explications pour l'utilisateur et modification des styles CSS.
369 
*
100 jpm 370 
* Revision 1.6  2004/10/22 17:39:14  jpm
371 
* Correction gestion du slash devant le chemin racine ftp.
372 
*
97 jpm 373 
* Revision 1.5  2004/10/22 17:23:04  jpm
374 
* Simplification del'installation de Papyrus.
375 
*
91 jpm 376 
* Revision 1.4  2004/10/19 17:01:12  jpm
377 
* Correction bogues.
378 
*
80 jpm 379 
* Revision 1.3  2004/10/19 15:59:18  jpm
380 
* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.
381 
* Ajout des constantes FTP.
382 
*
76 jpm 383 
* Revision 1.2  2004/10/18 09:12:09  jpm
384 
* Changement de nom d'un fichier.
385 
*
69 jpm 386 
* Revision 1.1  2004/10/18 09:11:05  jpm
387 
* Changement de nom du fichier.
388 
*
68 jpm 389 
* Revision 1.1  2004/10/15 18:28:59  jpm
390 
* Début appli installateur de Papyrus.
391 
*
392 
*
393 
* +-- Fin du code ----------------------------------------------------------------------------------------+
394 
*/
395 
?>