Subversion Repositories Applications.papyrus

Rev

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

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