Subversion Repositories Applications.papyrus

Rev

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

Rev 1022 Rev 1023
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.14 2006-10-06 15:34:30 florian Exp $
 35 
// CVS : $Id: instal_fichier.inc.php,v 1.15 2006-10-09 14:35:27 ddelon Exp $
36 
/**
 36 
/**
37 
* Page de création des fichiers nécessaire à l'installation de Papyrus.
 37 
* Page de création des fichiers nécessaire à l'installation de Papyrus.
38 
*
 38 
*
39 
* Page permettant de créer le fichier de configuration de Papyrus.
 39 
* Page permettant de créer 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.14 $ $Date: 2006-10-06 15:34:30 $
 49 
*@version       $Revision: 1.15 $ $Date: 2006-10-09 14:35:27 $
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°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</h1>'."\n";
 92 
$sortie .= '<br /><h1>Etape n°'.$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êtres FTP saisies ne permettent pas l\'identification !', 1, $erreur);
 108 
                            $fichier['PAP_FTP_MOT_DE_PASSE']), 'Les paramê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 récupérons uniquement les constantes à stocker dans le fichier de config (leur nom commence par PAP_)
 121 
        // Nous récupérons uniquement les constantes à stocker dans le fichier de config (leur nom commence par PAP_)
122 
        if (preg_match('/^PAP_/', $cle)) {
 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'écriture du fichier de config
 132 
	    // Tentative d'écriture 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, où nous mettons à jour Papyrus, il faut supprimer l'ancien fichier de config
 138 
	    // Dans le cas, où nous mettons à 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 être supprimer automatiquement. '.
 141 
		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '.
142 
					    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
 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 
	    // Nous écrivons le fichier de config sur le disque
 146 
	    // Nous écrivons le fichier de config sur le disque
147 
	    $fp = @fopen($url_ftp, 'w');
 147 
	    $fp = @fopen($url_ftp, 'w');
148 
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
 148 
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
149 
	    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
 149 
	    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
150 
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
 150 
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
151 
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
 151 
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
152 
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
 152 
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
153 
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
 153 
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
154 
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
 154 
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
155 
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
 155 
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
156 
			'correctement.</p>';
156 
			'correctement.</p>';
157 
	    $txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($configCode).'</code></div>'."\n";
157 
	    $txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($configCode).'</code></div>'."\n";
158 
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
 158 
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
159
159
160 
	    // tentative d ecriture du fichier .htaccess
 160 
	    // tentative d ecriture du fichier .htaccess
161 
	    $url_ftp_htaccess = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
 161 
	    $url_ftp_htaccess = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
162 
			'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].'/.htaccess';
 162 
			'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].'/.htaccess';
- 
 
 163
163 
		if (file_exists($pref['PAP_CHEMIN_RACINE'].'/.htaccess')) {
 164 
		if (file_exists($pref['PAP_CHEMIN_RACINE'].'/.htaccess')) {
164 
			$sortie_verif .'<p>Attention: Un fichier .htaccess est déjà présent sur le serveur.'.
 165 
			$sortie_verif .'<p>Attention: Un fichier .htaccess est déjà présent sur le serveur.'.
165 
							'<br />Veillez à le configurer correctement<br /><br />'.
 166 
							'<br />Veillez à le configurer correctement<br /><br />'.
166 
							'Contenu par défaut: <br /><br /> ErrorDocument 404 /erreur_404.php';
 167 
							'Contenu par défaut: <br /><br /> ErrorDocument 404 /erreur_404.php';
167 
		} /*else {
 - 
 
168 
			preg_match('/^(\/.*?)([^\/]+?)(?:\?(.*)|)$/', $_SERVER['REQUEST_URI'], $tab_prefixe);
 - 
 
169 
			$prefixe = $tab_prefixe[2];
 - 
 
170 
			$handle =fopen ($url_ftp_htaccess, 'w');
- 
 
171 
			fwrite ($handle, 'ErrorDocument 404 /'.$prefixe.'erreur_404.php');
 - 
 
172 
			fclose($handle);
 - 
 
173 
		}*/
 168 
		}
174 
	}
 169 
	}
175 
}
 170 
}
176 
 
 171 
 
177 
 
 172 
 
178 
 
 173 
 
179 
// Mise à jour des fichiers de configuration de chaque application :
 174 
// Mise à jour des fichiers de configuration de chaque application :
180 
 
 175 
 
- 
 
 176 
function maj_fichier_config_appli($fichier, $fichierconfig, $elements) {
181 
function maj_fichier_config_appli($fichier, $elements) {
 177 
 
182 
 
 178
183 
	$url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
 179 
	$url_ftp =  'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].
184 
	'@'.$fichier['PAP_FTP_SERVEUR'].$fichier;
 180 
	'@'.$fichier['PAP_FTP_SERVEUR'].$fichier['PAP_FTP_RACINE'].GEN_SEP.$fichierconfig;
185
181
186
182
187 
	 $fp = @fopen($url_ftp, 'w');
 183 
	 $fp = @fopen($url_ftp, 'w');
188
184
189 
	 while (!feof($fp)) {
 185 
	 while (!feof($fp)) {
190 
           $cont .= fread($fp, 500);
 186 
           $cont .= fread($fp, 500);
191 
     }
187 
     }
192
188
193 
 	 foreach ($elements as $element) {
 189 
 	 foreach ($elements as $element) {
194 
		list($expr,$rempl)=$elements;
 190 
		list($expr,$rempl)=$elements;
195 
		preg_replace('/'.$expr.'/',$rempl,$cont);
 191 
		preg_replace('/'.$expr.'/',$rempl,$cont);
196 
	 }
 192 
	 }
197
193
198 
	fwrite($fp, $cont);
 194 
	fwrite($fp, $cont);
199 
    fclose($fp);
195 
    fclose($fp);
200 
 
 196 
 
201
197
202
198
203
199
204 
}
 200 
}
205 
 
 201 
 
206 
// Configuration Fckeditor ...
202 
// Maj Fckeditor
- 
 
 203 
 
- 
 
 204 
maj_fichier_config_appli($fichier,'api/fckeditor/editor/filemanager/browser/default/connectors/php/config.php',array("test"=>"test"));
207
205 
 
208 
 
 206 
 
209 
 
 207 
 
210
208
211 
 
 209 
 
212 
// Gestion de l'affichage
 210 
// Gestion de l'affichage
213 
if ($erreur == 0 && empty($sortie_verif)) {
 211 
if ($erreur == 0 && empty($sortie_verif)) {
214 
    // Premier appel du fichier...
 212 
    // Premier appel du fichier...
215 
    $sortie .= creerFormulaire($fichier);
 213 
    $sortie .= creerFormulaire($fichier);
216 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
 214 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
217 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
 215 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
218 
    $sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";
 216 
    $sortie .= '<li><input type="submit" value="Tester" /></li>'."\n";
219 
    $sortie .= '      </ul>'."\n";
 217 
    $sortie .= '      </ul>'."\n";
220 
    $sortie .= '    </form>';
 218 
    $sortie .= '    </form>';
221 
} else if ($erreur == 2 && !empty($sortie_verif)) {
 219 
} else if ($erreur == 2 && !empty($sortie_verif)) {
222 
    // Vérification du fichier avec interuption...
 220 
    // Vérification du fichier avec interuption...
223 
    $sortie .= creerFormulaire($fichier);
 221 
    $sortie .= creerFormulaire($fichier);
224 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
 222 
    $sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n";
225 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
 223 
    $sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n";
226 
    $sortie .= '<li><input type="submit" value="Tester à nouveau" /></li>'."\n";
 224 
    $sortie .= '<li><input type="submit" value="Tester à nouveau" /></li>'."\n";
227 
    $sortie .= '      </ul>'."\n";
 225 
    $sortie .= '      </ul>'."\n";
228 
    $sortie .= '    </form>';
 226 
    $sortie .= '    </form>';
229 
    $sortie .= $sortie_verif;
 227 
    $sortie .= $sortie_verif;
230 
} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) {
 228 
} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) {
231 
    // Vérification du fichier sans interuption... passage à l'étape suivante
 229 
    // Vérification du fichier sans interuption... passage à l'étape suivante
232 
    $sortie .= creerFormulaire($fichier, true);
 230 
    $sortie .= creerFormulaire($fichier, true);
233 
    $sortie .= '      </ul>'."\n";
 231 
    $sortie .= '      </ul>'."\n";
234 
    $sortie .= '    </form>';
 232 
    $sortie .= '    </form>';
235 
    $sortie .= $sortie_verif;
 233 
    $sortie .= $sortie_verif;
236 
    // Ecriture du fichier...
 234 
    // Ecriture du fichier...
237 
    fwrite($fp, $configCode);
 235 
    fwrite($fp, $configCode);
238 
    fclose($fp);
 236 
    fclose($fp);
239 
    $sortie .= '    <br /><p class="etape_info">Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
 237 
    $sortie .= '    <br /><p class="etape_info">Voila c\'est termin&eacute; ! Vous pouvez <a href="'.donnerUrlCourante().'">retourner sur votre site '.
240 
                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
 238 
                'Papyrus</a>. Il est conseill&eacute; de retirer l\'acc&egrave;s en &eacute;criture au fichier '.
241 
                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>'."\n";
 239 
                '<tt>pap_config.inc.php</tt>. Ceci peut &ecirc;tre une faille dans la s&eacute;curit&eacute;.</p>'."\n";
242 
}
 240 
}
243 
 
 241 
 
244 
// +------------------------------------------------------------------------------------------------------+
 242 
// +------------------------------------------------------------------------------------------------------+
245 
// |                                            LISTE DES FONCTIONS                                       |
 243 
// |                                            LISTE DES FONCTIONS                                       |
246 
// +------------------------------------------------------------------------------------------------------+
 244 
// +------------------------------------------------------------------------------------------------------+
247 
 
 245 
 
248 
// Création du formulaire de configuration de la base de donneés
 246 
// Création du formulaire de configuration de la base de donneés
249 
function creerFormulaire($fichier, $bln_lecture = false) {
 247 
function creerFormulaire($fichier, $bln_lecture = false) {
250 
    $disabled = '';
 248 
    $disabled = '';
251 
    if ($bln_lecture) {
 249 
    if ($bln_lecture) {
252 
        $disabled = ' disabled="disabled" ';
 250 
        $disabled = ' disabled="disabled" ';
253 
    }
 251 
    }
254 
    $sortie_form .= '    <form action="'.donnerUrlCourante().'?installation=verif_fichier" method="post">';
 252 
    $sortie_form .= '    <form action="'.donnerUrlCourante().'?installation=verif_fichier" method="post">';
255 
    $sortie_form .= '      <ul>'."\n";
 253 
    $sortie_form .= '      <ul>'."\n";
256 
    $sortie_form .=  '<li><br /><h2>Configuration du FTP et des chemins d\'accès</h2></li>'."\n";
 254 
    $sortie_form .=  '<li><br /><h2>Configuration du FTP et des chemins d\'accès</h2></li>'."\n";
257 
    $sortie_form .= '<li>Entrer le nom de dommaine pour accéder à votre dépôt FTP</li>'."\n";
 255 
    $sortie_form .= '<li>Entrer le nom de dommaine pour accéder à votre dépôt FTP</li>'."\n";
258 
    $sortie_form .=  '<li>'."\n".
 256 
    $sortie_form .=  '<li>'."\n".
259 
                '<label for="ftp_serveur">Nom du serveur FTP :</label>'.
 257 
                '<label for="ftp_serveur">Nom du serveur FTP :</label>'.
260 
                '<input id="ftp_serveur"'.$disabled.'type="text" size="30" name="fichier[PAP_FTP_SERVEUR]" value="'.$fichier['PAP_FTP_SERVEUR'].'" />'.
 258 
                '<input id="ftp_serveur"'.$disabled.'type="text" size="30" name="fichier[PAP_FTP_SERVEUR]" value="'.$fichier['PAP_FTP_SERVEUR'].'" />'.
261 
                '</li>'."\n";
 259 
                '</li>'."\n";
262 
    $sortie_form .= '<li>Le numéro du port pour le service FTP sur la machine hébergeant Papyrus. '.
 260 
    $sortie_form .= '<li>Le numéro du port pour le service FTP sur la machine hébergeant Papyrus. '.
263 
                    'En g&eacute;n&eacute;ral c\'est 21.</li>'."\n";
 261 
                    'En g&eacute;n&eacute;ral c\'est 21.</li>'."\n";
264 
    $sortie_form .=  '<li>'."\n".
 262 
    $sortie_form .=  '<li>'."\n".
265 
                '<label for="ftp_port">N° du port d\'accès au serveur FTP :</label>'.
 263 
                '<label for="ftp_port">N° du port d\'accès au serveur FTP :</label>'.
266 
                '<input id="ftp_port"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_PORT]" value="'.$fichier['PAP_FTP_PORT'].'" />'.
 264 
                '<input id="ftp_port"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_PORT]" value="'.$fichier['PAP_FTP_PORT'].'" />'.
267 
                '</li>'."\n";
 265 
                '</li>'."\n";
268 
    $sortie_form .=  '<li>Nom et mot de passe FTP qui sera utilis&eacute; pour se connecter &agrave; au dépôt FTP.</li>'."\n";
 266 
    $sortie_form .=  '<li>Nom et mot de passe FTP qui sera utilis&eacute; pour se connecter &agrave; au dépôt FTP.</li>'."\n";
269 
    $sortie_form .=  '<li>'."\n".
 267 
    $sortie_form .=  '<li>'."\n".
270 
                '<label for="ftp_utilisateur">Nom d\'utilisateur pour le serveur FTP :</label>'.
 268 
                '<label for="ftp_utilisateur">Nom d\'utilisateur pour le serveur FTP :</label>'.
271 
                '<input id="ftp_utilisateur"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_UTILISATEUR]" value="'.$fichier['PAP_FTP_UTILISATEUR'].'" />'.
 269 
                '<input id="ftp_utilisateur"'.$disabled.'type="text" size="20" name="fichier[PAP_FTP_UTILISATEUR]" value="'.$fichier['PAP_FTP_UTILISATEUR'].'" />'.
272 
                '</li>'."\n";
 270 
                '</li>'."\n";
273 
    $sortie_form .=  '<li>'."\n".
 271 
    $sortie_form .=  '<li>'."\n".
274 
                '<label for="ftp_mot_de_passe">Mot de passe pour le serveur FTP :</label>'.
 272 
                '<label for="ftp_mot_de_passe">Mot de passe pour le serveur FTP :</label>'.
275 
                '<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'].'" />'.
 273 
                '<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'].'" />'.
276 
                '</li>'."\n";
 274 
                '</li>'."\n";
277 
    $sortie_form .=  '<li>Lorsque vous vous connectez par FTP sur le serveur où vous avez déposé les fichiers de Papyrus, le '.
 275 
    $sortie_form .=  '<li>Lorsque vous vous connectez par FTP sur le serveur où vous avez déposé les fichiers de Papyrus, le '.
278 
                'dossier le plus haut auquel vous pouvez accéder dans l\'arborescence est la racine. Il vous faut donc '.
 276 
                'dossier le plus haut auquel vous pouvez accéder dans l\'arborescence est la racine. Il vous faut donc '.
279 
                'indiquez dans le champ ci-dessous le chemin absolu depuis cette racine jusqu\'au dossier contenant le fichier '.
 277 
                'indiquez dans le champ ci-dessous le chemin absolu depuis cette racine jusqu\'au dossier contenant le fichier '.
280 
                '<tt>papyrus.php</tt>. Exemple : <i>/www/</i></li>'."\n";
 278 
                '<tt>papyrus.php</tt>. Exemple : <i>/www/</i></li>'."\n";
281 
    $sortie_form .=  '<li>'."\n".
 279 
    $sortie_form .=  '<li>'."\n".
282 
                '<label for="ftp_racine">Racine dépôt FTP :</label>'.
 280 
                '<label for="ftp_racine">Racine dépôt FTP :</label>'.
283 
                '<input id="ftp_racine"'.$disabled.'type="text" size="60" name="fichier[PAP_FTP_RACINE]" value="'.$fichier['PAP_FTP_RACINE'].'" />'.
 281 
                '<input id="ftp_racine"'.$disabled.'type="text" size="60" name="fichier[PAP_FTP_RACINE]" value="'.$fichier['PAP_FTP_RACINE'].'" />'.
284 
                '</li>'."\n";
 282 
                '</li>'."\n";
285 
    return $sortie_form;
 283 
    return $sortie_form;
286 
}
 284 
}
287 
 
 285 
 
288 
// +------------------------------------------------------------------------------------------------------+
 286 
// +------------------------------------------------------------------------------------------------------+
289 
// |                                            PIED du PROGRAMME                                         |
 287 
// |                                            PIED du PROGRAMME                                         |
290 
// +------------------------------------------------------------------------------------------------------+
 288 
// +------------------------------------------------------------------------------------------------------+
291 
 
 289 
 
292 
 
 290 
 
293 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 291 
/* +--Fin du code ----------------------------------------------------------------------------------------+
294 
*
 292 
*
295 
* $Log: not supported by cvs2svn $
 293 
* $Log: not supported by cvs2svn $
- 
 
 294 
* Revision 1.14  2006/10/06 15:34:30  florian
- 
 
 295 
* mise en commentaire .htaccess
- 
 
 296 
*
296 
* Revision 1.13  2006/10/06 15:23:00  florian
 297 
* Revision 1.13  2006/10/06 15:23:00  florian
297 
* amelioration graphique de l'installateur
 298 
* amelioration graphique de l'installateur
298 
*
 299 
*
299 
* Revision 1.12  2006/10/06 14:49:45  ddelon
 300 
* Revision 1.12  2006/10/06 14:49:45  ddelon
300 
* ecriture htaccess a l'installation
 301 
* ecriture htaccess a l'installation
301 
*
 302 
*
302 
* Revision 1.11  2006/10/06 14:46:15  alexandre_tb
 303 
* Revision 1.11  2006/10/06 14:46:15  alexandre_tb
303 
* ecriture du fichier .htaccess
 304 
* ecriture du fichier .htaccess
304 
*
 305 
*
305 
* Revision 1.10  2005/09/23 14:20:23  florian
 306 
* Revision 1.10  2005/09/23 14:20:23  florian
306 
* nouvel habillage installateur, plus correction de quelques bugs
 307 
* nouvel habillage installateur, plus correction de quelques bugs
307 
*
 308 
*
308 
* Revision 1.9  2005/04/12 16:09:45  jpm
 309 
* Revision 1.9  2005/04/12 16:09:45  jpm
309 
* Amélioration de la gestion de la constante de redirection des urls et de la gestion des constantes de type entier et booléen.
 310 
* Amélioration de la gestion de la constante de redirection des urls et de la gestion des constantes de type entier et booléen.
310 
*
 311 
*
311 
* Revision 1.8  2004/10/25 16:26:35  jpm
 312 
* Revision 1.8  2004/10/25 16:26:35  jpm
312 
* Début gestion des mises à jours.
 313 
* Début gestion des mises à jours.
313 
*
 314 
*
314 
* Revision 1.7  2004/10/25 10:22:48  jpm
 315 
* Revision 1.7  2004/10/25 10:22:48  jpm
315 
* Correction de quelques bogues, ajouts d'explications pour l'utilisateur et modification des styles CSS.
 316 
* Correction de quelques bogues, ajouts d'explications pour l'utilisateur et modification des styles CSS.
316 
*
 317 
*
317 
* Revision 1.6  2004/10/22 17:39:14  jpm
 318 
* Revision 1.6  2004/10/22 17:39:14  jpm
318 
* Correction gestion du slash devant le chemin racine ftp.
 319 
* Correction gestion du slash devant le chemin racine ftp.
319 
*
 320 
*
320 
* Revision 1.5  2004/10/22 17:23:04  jpm
 321 
* Revision 1.5  2004/10/22 17:23:04  jpm
321 
* Simplification del'installation de Papyrus.
 322 
* Simplification del'installation de Papyrus.
322 
*
 323 
*
323 
* Revision 1.4  2004/10/19 17:01:12  jpm
 324 
* Revision 1.4  2004/10/19 17:01:12  jpm
324 
* Correction bogues.
 325 
* Correction bogues.
325 
*
 326 
*
326 
* Revision 1.3  2004/10/19 15:59:18  jpm
 327 
* Revision 1.3  2004/10/19 15:59:18  jpm
327 
* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.
 328 
* Ajout de la gestion des valeurs propre à Papyrus à insérer dans la base de données.
328 
* Ajout des constantes FTP.
 329 
* Ajout des constantes FTP.
329 
*
 330 
*
330 
* Revision 1.2  2004/10/18 09:12:09  jpm
 331 
* Revision 1.2  2004/10/18 09:12:09  jpm
331 
* Changement de nom d'un fichier.
 332 
* Changement de nom d'un fichier.
332 
*
 333 
*
333 
* Revision 1.1  2004/10/18 09:11:05  jpm
 334 
* Revision 1.1  2004/10/18 09:11:05  jpm
334 
* Changement de nom du fichier.
 335 
* Changement de nom du fichier.
335 
*
 336 
*
336 
* Revision 1.1  2004/10/15 18:28:59  jpm
 337 
* Revision 1.1  2004/10/15 18:28:59  jpm
337 
* Début appli installateur de Papyrus.
 338 
* Début appli installateur de Papyrus.
338 
*
 339 
*
339 
*
 340 
*
340 
* +-- Fin du code ----------------------------------------------------------------------------------------+
 341 
* +-- Fin du code ----------------------------------------------------------------------------------------+
341 
*/
 342 
*/
342 
?>
 343 
?>