Subversion Repositories Applications.papyrus

Rev

Rev 1354 | Rev 1360 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

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