Subversion Repositories Applications.papyrus

Rev

Rev 1349 | Rev 1358 | 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
// +------------------------------------------------------------------------------------------------------+
1354 alexandre_ 35
// CVS : $Id: instal_fichier.inc.php,v 1.31 2007-04-20 10:15:15 alexandre_tb Exp $
68 jpm 36
/**
1347 alexandre_ 37
* Page de creation des fichiers necessaire a l'installation de Papyrus.
68 jpm 38
*
1347 alexandre_ 39
* Page permettant de creer le fichier de configuration de Papyrus.
68 jpm 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
1354 alexandre_ 49
*@version       $Revision: 1.31 $ $Date: 2007-04-20 10:15:15 $
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
 
1336 neiluj 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...
1347 alexandre_ 92
$sortie .= '<br /><h1>Etape n&deg;'.$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'],
1347 alexandre_ 108
                            $fichier['PAP_FTP_MOT_DE_PASSE']), 'Les param&ecirc;tres FTP saisies ne permettent pas l\'identification !', 1, $erreur);
91 jpm 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) {
1347 alexandre_ 121
        // Nous recuperons uniquement les constantes a stocker dans le fichier de config (leur nom commence par PAP_)
91 jpm 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) {
1347 alexandre_ 132
	    // Tentative d'ecriture du fichier de config
458 florian 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
 
1347 alexandre_ 138
	    // Dans le cas, ou nous mettons a jour Papyrus, il faut supprimer l'ancien fichier de config
458 florian 139
	    if (INSTAL_VERSION_ANCIENNE != '') {
140
		$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
1354 alexandre_ 141
		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut &ecirc;tre supprimer automatiquement. '.
458 florian 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
 
1340 neiluj 146
	    $tempfn = tempnam("","");
147
		$temp = fopen($tempfn, "w");
148
 
149
		fwrite($temp, $configCode);
150
		fclose($temp);
151
		$fichier_config_source = $tempfn;
152
    	$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/papyrus/configuration/pap_config.inc.php", 1) ;
153
 
154
 
1347 alexandre_ 155
	    // Nous ecrivons le fichier de config sur le disque
156
 
1354 alexandre_ 157
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$fichier_config_cible.'</tt>...';
158
	    $txt_ecriture_conf_erreur = '<span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$fichier_config_cible.
458 florian 159
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
160
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
161
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
162
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
163
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
164
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
1069 alexandre_ 165
			'correctement.';
1336 neiluj 166
	    $txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($configCode).'</pre></code></div>'."\n";
1354 alexandre_ 167
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf,
168
	    						ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII),
169
	    						$txt_ecriture_conf_erreur, 1, $erreur);
1019 alexandre_ 170
 
171
	    // tentative d ecriture du fichier .htaccess
172
	    $url_ftp_htaccess = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
173
			'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].'/.htaccess';
1023 ddelon 174
 
1354 alexandre_ 175
		$url_parse = parse_url('http://'.$_SERVER['HTTP_HOST'].$_SERVER['REQUEST_URI']);
176
		$prefixe = dirname($url_parse['path']);
1080 alexandre_ 177
 
1354 alexandre_ 178
		$url = 'http://'.$_SERVER['HTTP_HOST'].$prefixe;
179
		if (isset($pref['PAP_URL_REECRITURE']) && $pref['PAP_URL_RRECRITURE'] == 1) {
180
			$on_off = 'on';
181
		} else {
182
			$on_off = 'off';
183
		}
184
		$contenu_htaccess = '# Raccourci pour les menus et sites de Papyrus'."\n".
185
							'RewriteEngine '.$on_off."\n".
186
							'# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement'."\n".
187
							'RewriteCond %{REQUEST_FILENAME} !-d'."\n".
188
							'RewriteCond %{REQUEST_FILENAME} !-f'."\n\n".
189
							'# ATTENTION : remplace localhost par votre nom de domaine !'."\n".
190
							'# R&eacute;ecriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL'."\n".
191
							'# ATTENTION : ne marche pas pour les formulaires en mode POST !'."\n".
192
							'RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]'."\n".
193
							'# R&eacute;ecriture d\'url pour les vieux permaliens'."\n".
194
							'RewriteCond %{REQUEST_FILENAME}/ !-d'."\n".
195
							'RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]'."\n".
196
							'# Redirection d\'url pour le sélecteur de site'."\n".
197
							'# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concaténée à l\'url et cela plante...'."_n".
198
							'# Le "/" initial dans la RewriteCond est obligatoire!'."\n".
199
							'RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$'."\n".
200
							'RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]'."\n\n".
201
							'# R&eacute;ecriture d\'url pour les sites de Papyrus : &agrave; modifier si les valeurs par d&eacute;faut ont &eacute;t&eacute; chang&eacute;es'."\n".
202
							'RewriteRule ^site:.+$ papyrus.php [QSA,L]'."\n".
203
							'# R&eacute;ecriture d\'url pour les menus de Papyrus : &agrave; modifier si les valeurs par d&eacute;faut ont &eacute;t&eacute; chang&eacute;es'."\n".
204
							'RewriteRule ^page:.+$ papyrus.php [QSA,L]'."\n\n".
205
							'# Gestion des erreurs 404'."\n".
206
							'ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';
1079 alexandre_ 207
 
1340 neiluj 208
		if (file_exists($fichier['PAP_FTP_RACINE'].'/.htaccess')) {
1349 alexandre_ 209
			$sortie_verif .='<p>Attention: Un fichier .htaccess est d&eacute;j&agrave; pr&eacute;sent sur le serveur.'.
1340 neiluj 210
							'<br />'.$fichier['PAP_FTP_RACINE'].'/.htaccess'.
1349 alexandre_ 211
							'<br />Veillez &agrave; le configurer correctement<br /><br />'.
212
							'Contenu par d&eacute;faut: <br /><br /> ErrorDocument 404 /erreur_404.php';
1079 alexandre_ 213
		} else {
214
			$tempfn = tempnam("","");
215
			$temp = fopen($tempfn, "w");
1071 alexandre_ 216
			fwrite($temp, $contenu_htaccess);
1354 alexandre_ 217
			fclose($temp);
1071 alexandre_ 218
			$fichier_config_source = $tempfn;
1079 alexandre_ 219
    		$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/.htaccess", 1) ;
1071 alexandre_ 220
    		$txt_ecriture_conf_erreur = 'AVERTISSEMENT: Le fichier .htaccess <tt>'.$fichier_config_cible.
221
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
222
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
223
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
224
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
225
			'<tt>.htaccess</tt> directement &agrave la racine de '.
226
			'<tt>papyrus</tt> de Papyrus.';
1069 alexandre_ 227
			$txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($contenu_htaccess).'</pre></code></div>'."\n";
1072 alexandre_ 228
			$txt_ecriture_conf = '&Eacute;criture sur le serveur du fichier .htaccess... <tt>'.$fichier_config_cible.'</tt>'."\n";
1354 alexandre_ 229
			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf,
230
									ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII),
231
									$txt_ecriture_conf_erreur, 1, 0);
1023 ddelon 232
		}
458 florian 233
	}
68 jpm 234
}
235
 
1020 ddelon 236
 
237
 
238
// Mise à jour des fichiers de configuration de chaque application :
239
 
1023 ddelon 240
function maj_fichier_config_appli($fichier, $fichierconfig, $elements) {
1020 ddelon 241
 
1023 ddelon 242
 
1020 ddelon 243
	$url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
1023 ddelon 244
	'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].GEN_SEP.$fichierconfig;
1020 ddelon 245
 
1023 ddelon 246
 
1020 ddelon 247
	 $fp = @fopen($url_ftp, 'w');
248
 
1068 ddelon 249
     if ($fp) {
250
	 	while (!feof($fp)) {
1020 ddelon 251
           $cont .= fread($fp, 500);
1068 ddelon 252
     	}
253
 
254
	 	foreach ($elements as $element) {
255
			list($expr,$rempl)=$elements;
256
			preg_replace('/'.$expr.'/',$rempl,$cont);
257
		}
258
 
259
		fwrite($fp, $cont);
260
	    fclose($fp);
1020 ddelon 261
     }
262
 
263
}
264
 
1023 ddelon 265
// Maj Fckeditor
1020 ddelon 266
 
1023 ddelon 267
maj_fichier_config_appli($fichier,'api/fckeditor/editor/filemanager/browser/default/connectors/php/config.php',array("test"=>"test"));
1020 ddelon 268
 
1023 ddelon 269
 
270
 
1020 ddelon 271
 
272
 
91 jpm 273
// Gestion de l'affichage
274
if ($erreur == 0 && empty($sortie_verif)) {
275
    // Premier appel du fichier...
276
    $sortie .= creerFormulaire($fichier);
277
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
278
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
279
    $sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";
280
    $sortie .= '      </ul>'."\n";
281
    $sortie .= '    </form>';
282
} else if ($erreur == 2 && !empty($sortie_verif)) {
1347 alexandre_ 283
    // Verification du fichier avec interuption...
91 jpm 284
    $sortie .= creerFormulaire($fichier);
285
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
286
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
1348 alexandre_ 287
    $sortie .= '<li><input type="submit" value="Tester &agrave; nouveau" /></li>'."\n";
91 jpm 288
    $sortie .= '      </ul>'."\n";
289
    $sortie .= '    </form>';
290
    $sortie .= $sortie_verif;
291
} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) {
1347 alexandre_ 292
    // Verification du fichier sans interuption... passage a l'etape suivante
91 jpm 293
    $sortie .= creerFormulaire($fichier, true);
294
    $sortie .= '      </ul>'."\n";
295
    $sortie .= '    </form>';
296
    $sortie .= $sortie_verif;
297
    // Ecriture du fichier...
298
    fwrite($fp, $configCode);
299
    fclose($fp);
1021 florian 300
    $sortie .= '    <br /><p class="etape_info">Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
91 jpm 301
                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
302
                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>'."\n";
303
}
304
 
68 jpm 305
// +------------------------------------------------------------------------------------------------------+
91 jpm 306
// |                                            LISTE DES FONCTIONS                                       |
307
// +------------------------------------------------------------------------------------------------------+
308
 
1347 alexandre_ 309
// Creation du formulaire de configuration de la base de donnees
91 jpm 310
function creerFormulaire($fichier, $bln_lecture = false) {
311
    $disabled = '';
312
    if ($bln_lecture) {
313
        $disabled = ' disabled="disabled" ';
314
    }
315
    $sortie_form .= '    <form action="'.donnerUrlCourante().'?installation=verif_fichier" method="post">';
316
    $sortie_form .= '      <ul>'."\n";
1348 alexandre_ 317
    $sortie_form .=  '<li><br /><h2>Configuration du FTP et des chemins d\'acc&egrave;s</h2></li>'."\n";
318
    $sortie_form .= '<li>Entrer le nom de dommaine pour acc&eacute;der &agrave; votre d&eacute;p&ocirc;t FTP</li>'."\n";
91 jpm 319
    $sortie_form .=  '<li>'."\n".
320
                '<label for="ftp_serveur">Nom du serveur FTP :</label>'.
321
                '<input id="ftp_serveur"'.$disabled.'type="text" size="30" name="fichier[PAP_FTP_SERVEUR]" value="'.$fichier['PAP_FTP_SERVEUR'].'" />'.
322
                '</li>'."\n";
1348 alexandre_ 323
    $sortie_form .= '<li>Le num&eacute;ro du port pour le service FTP sur la machine h&eacute;bergeant Papyrus. '.
100 jpm 324
                    'En g&eacute;n&eacute;ral c\'est 21.</li>'."\n";
91 jpm 325
    $sortie_form .=  '<li>'."\n".
1348 alexandre_ 326
                '<label for="ftp_port">N&deg; du port d\'acc&egrave;s au serveur FTP :</label>'.
91 jpm 327
                '<input id="ftp_port"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_PORT]" value="'.$fichier['PAP_FTP_PORT'].'" />'.
328
                '</li>'."\n";
100 jpm 329
    $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 330
    $sortie_form .=  '<li>'."\n".
331
                '<label for="ftp_utilisateur">Nom d\'utilisateur pour le serveur FTP :</label>'.
332
                '<input id="ftp_utilisateur"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_UTILISATEUR]" value="'.$fichier['PAP_FTP_UTILISATEUR'].'" />'.
333
                '</li>'."\n";
334
    $sortie_form .=  '<li>'."\n".
458 florian 335
                '<label for="ftp_mot_de_passe">Mot de passe pour le serveur FTP :</label>'.
91 jpm 336
                '<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'].'" />'.
337
                '</li>'."\n";
1348 alexandre_ 338
    $sortie_form .=  '<li>Lorsque vous vous connectez par FTP sur le serveur o&ugrave; vous avez d&eacute;pos&eacute; les fichiers de Papyrus, le '.
339
                'dossier le plus haut auquel vous pouvez acc&eacute;der dans l\'arborescence est la racine. Il vous faut donc '.
100 jpm 340
                'indiquez dans le champ ci-dessous le chemin absolu depuis cette racine jusqu\'au dossier contenant le fichier '.
341
                '<tt>papyrus.php</tt>. Exemple : <i>/www/</i></li>'."\n";
91 jpm 342
    $sortie_form .=  '<li>'."\n".
1348 alexandre_ 343
                '<label for="ftp_racine">Racine d&eacute;p&ocirc;t FTP :</label>'.
91 jpm 344
                '<input id="ftp_racine"'.$disabled.'type="text" size="60" name="fichier[PAP_FTP_RACINE]" value="'.$fichier['PAP_FTP_RACINE'].'" />'.
345
                '</li>'."\n";
346
    return $sortie_form;
347
}
348
 
349
// +------------------------------------------------------------------------------------------------------+
68 jpm 350
// |                                            PIED du PROGRAMME                                         |
351
// +------------------------------------------------------------------------------------------------------+
352
 
353
 
354
/* +--Fin du code ----------------------------------------------------------------------------------------+
355
*
356
* $Log: not supported by cvs2svn $
1354 alexandre_ 357
* Revision 1.30  2007/04/20 09:18:09  alexandre_tb
358
* correction pb encodage
359
*
1349 alexandre_ 360
* Revision 1.29  2007/04/20 09:13:37  alexandre_tb
361
* correction pb encodage
362
*
1348 alexandre_ 363
* Revision 1.28  2007/04/20 09:05:46  alexandre_tb
364
* correction pb encodage
365
*
1347 alexandre_ 366
* Revision 1.27  2007/04/19 16:53:57  neiluj
367
* fix de l'upload des fichiers de conf (ftp_put)
368
*
1340 neiluj 369
* Revision 1.26  2007/04/19 15:34:35  neiluj
370
* préparration release (livraison) "Narmer" - v0.25
371
*
1336 neiluj 372
* Revision 1.25  2006/12/01 15:43:01  alexandre_tb
373
* prise en compte dans le rewriteengine de l'activation ou non de la reecriture
374
*
1084 alexandre_ 375
* Revision 1.24  2006/12/01 11:47:10  alexandre_tb
376
* suppression de var_dump
377
*
1080 alexandre_ 378
* Revision 1.23  2006/12/01 11:46:11  alexandre_tb
379
* correction creation .htaccess
380
*
1079 alexandre_ 381
* Revision 1.22  2006/11/30 17:41:30  alexandre_tb
382
* ecriture htaccess
383
*
1072 alexandre_ 384
* Revision 1.21  2006/11/30 17:36:29  alexandre_tb
385
* ecriture htaccess
386
*
1071 alexandre_ 387
* Revision 1.20  2006/11/30 16:41:42  alexandre_tb
388
* ecriture htaccess
389
*
1069 alexandre_ 390
* Revision 1.19  2006/11/30 15:50:25  ddelon
391
* installation fichier
392
*
1068 ddelon 393
* Revision 1.18  2006/11/30 15:34:51  alexandre_tb
394
* ecriture htaccess
395
*
1067 alexandre_ 396
* Revision 1.17  2006/11/30 15:27:31  alexandre_tb
397
* ecriture htaccess
398
*
1066 alexandre_ 399
* Revision 1.16  2006/11/30 14:52:42  alexandre_tb
400
* Ecriture du fichier htaccess lors de l installation
401
*
1065 alexandre_ 402
* Revision 1.15  2006/10/09 14:35:27  ddelon
403
* bug caractere invalie trainant dans fichier
404
*
1023 ddelon 405
* Revision 1.14  2006/10/06 15:34:30  florian
406
* mise en commentaire .htaccess
407
*
1022 florian 408
* Revision 1.13  2006/10/06 15:23:00  florian
409
* amelioration graphique de l'installateur
410
*
1021 florian 411
* Revision 1.12  2006/10/06 14:49:45  ddelon
412
* ecriture htaccess a l'installation
413
*
1020 ddelon 414
* Revision 1.11  2006/10/06 14:46:15  alexandre_tb
415
* ecriture du fichier .htaccess
416
*
1019 alexandre_ 417
* Revision 1.10  2005/09/23 14:20:23  florian
418
* nouvel habillage installateur, plus correction de quelques bugs
419
*
458 florian 420
* Revision 1.9  2005/04/12 16:09:45  jpm
421
* Amélioration de la gestion de la constante de redirection des urls et de la gestion des constantes de type entier et booléen.
422
*
328 jpm 423
* Revision 1.8  2004/10/25 16:26:35  jpm
424
* Début gestion des mises à jours.
425
*
108 jpm 426
* Revision 1.7  2004/10/25 10:22:48  jpm
427
* Correction de quelques bogues, ajouts d'explications pour l'utilisateur et modification des styles CSS.
428
*
100 jpm 429
* Revision 1.6  2004/10/22 17:39:14  jpm
430
* Correction gestion du slash devant le chemin racine ftp.
431
*
97 jpm 432
* Revision 1.5  2004/10/22 17:23:04  jpm
433
* Simplification del'installation de Papyrus.
434
*
91 jpm 435
* Revision 1.4  2004/10/19 17:01:12  jpm
436
* Correction bogues.
437
*
80 jpm 438
* Revision 1.3  2004/10/19 15:59:18  jpm
439
* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.
440
* Ajout des constantes FTP.
441
*
76 jpm 442
* Revision 1.2  2004/10/18 09:12:09  jpm
443
* Changement de nom d'un fichier.
444
*
69 jpm 445
* Revision 1.1  2004/10/18 09:11:05  jpm
446
* Changement de nom du fichier.
447
*
68 jpm 448
* Revision 1.1  2004/10/15 18:28:59  jpm
449
* Début appli installateur de Papyrus.
450
*
451
*
452
* +-- Fin du code ----------------------------------------------------------------------------------------+
453
*/
454
?>