WebSVN – Applications.papyrus – Diff – /trunk/papyrus/applications/installateur/instal_fichier.inc.php



// | DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY                                |
// | THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT                                  |
// | (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF                             |
// | THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.                                    |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: instal_fichier.inc.php,v 1.26 2007-04-19 15:34:35 neiluj Exp $
/**
* Page de création des fichiers nécessaire à l'installation de Papyrus.
*
* Page permettant de créer le fichier de configuration de Papyrus.
*

//Autres auteurs :
*@author        David DELON
*@author        Patrick PAUL
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.26 $ $Date: 2007-04-19 15:34:35 $
// +------------------------------------------------------------------------------------------------------+
**/

 
// +------------------------------------------------------------------------------------------------------+

            $fichier[$cle] = '';
        }
    }
}

 
// Récupération des paramètres de configuration du formulaire précédent
if (isset($_POST['pref_serial'])) {
    $pref = unserialize(stripslashes($_POST['pref_serial']));
}
if (isset($_POST['bdd'])) {

if ($_GET['installation'] == 'verif_fichier') {
    // Test de la configuration du FTP
    $sortie_verif .= '    <br /><h2>Test de la connexion FTP</h2>'."\n";
    $erreur = testerConfig($sortie_verif, 'Test connexion FTP ...', $ftp = @ftp_connect($fichier['PAP_FTP_SERVEUR'], $fichier['PAP_FTP_PORT']), '', 1, $erreur);
    $erreur = testerConfig($sortie_verif, 'Test identification sur le serveur FTP ...', @ftp_login($ftp, $fichier['PAP_FTP_UTILISATEUR'],
                            $fichier['PAP_FTP_MOT_DE_PASSE']), 'Les paramètres FTP saisies ne permettent pas l\'identification !', 1, $erreur);
    $sortie_verif .= '<br />'."\n";

    
    $configCode = "<?php\n// pap_config.inc.php construit le ".strftime("%c")."\n// ne changez pas la version de Papyrus manuellement!\n\n";
    $entries[] = 'define(\''.INSTAL_VERSION_NOUVELLE_NOM.'\',\''.INSTAL_VERSION_NOUVELLE.'\');'."\n";

			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
			'correctement.';	    
	    $txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($configCode).'</pre></code></div>'."\n";	    
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);

	    
	    // tentative d ecriture du fichier .htaccess
	    $url_ftp_htaccess = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE'].

								'RewriteEngine '.$on_off."\n".
								'# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement'."\n".
								'RewriteCond %{REQUEST_FILENAME} !-d'."\n".
								'RewriteCond %{REQUEST_FILENAME} !-f'."\n\n".
								'# ATTENTION : remplace localhoste par votre nom de domaine !'."\n".
								'# Réécriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL'."\n".
								'# ATTENTION : ne marche pas pour les formulaires en mode POST !'."\n".
								'RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]'."\n".
								'# Réécriture d\'url pour les vieux permaliens'."\n".
								'RewriteCond %{REQUEST_FILENAME}/ !-d'."\n".
								'RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]'."\n".
								'# Redirection d\'url pour le sélecteur de site'."\n".
								'# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concaténée à l\'url et cela plante...'."_n".
								'# Le "/" initial dans la RewriteCond est obligatoire!'."\n".
								'RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$'."\n".
								'RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]'."\n\n".
								'# Réécriture d\'url pour les sites de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".
								'RewriteRule ^site:.+$ papyrus.php [QSA,L]'."\n".
								'# Réécriture d\'url pour les menus de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".
								'RewriteRule ^page:.+$ papyrus.php [QSA,L]'."\n\n".
								'# Gestion des erreurs 404'."\n".
								'ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';

								

 
// +------------------------------------------------------------------------------------------------------+
// |                                            LISTE DES FONCTIONS                                       |

// +------------------------------------------------------------------------------------------------------+
 
// Création du formulaire de configuration de la base de données
function creerFormulaire($fichier, $bln_lecture = false) {
    $disabled = '';
    if ($bln_lecture) {

 
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.25  2006/12/01 15:43:01  alexandre_tb
* prise en compte dans le rewriteengine de l'activation ou non de la reecriture
*
* Revision 1.24  2006/12/01 11:47:10  alexandre_tb
* suppression de var_dump
*

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/installateur/instal_fichier.inc.php – Rev 1084 → 1336

Rev 1084		Rev 1336
Line 30...		Line 30...
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.25 2006-12-01 15:43:01 alexandre_tb Exp $`	35	`// CVS : $Id: instal_fichier.inc.php,v 1.26 2007-04-19 15:34:35 neiluj 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	`*`
Line 44...		Line 44...
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.25 $ $Date: 2006-12-01 15:43:01 $`	49	`*@version $Revision: 1.26 $ $Date: 2007-04-19 15:34:35 $`
50	`// +------------------------------------------------------------------------------------------------------+`	50	`// +------------------------------------------------------------------------------------------------------+`
51	`**/`	51	`**/`
Line 52...		Line 52...
52		52
53	`// +------------------------------------------------------------------------------------------------------+`	53	`// +------------------------------------------------------------------------------------------------------+`
Line 73...		Line 73...
73	`$fichier[$cle] = '';`	73	`$fichier[$cle] = '';`
74	`}`	74	`}`
75	`}`	75	`}`
76	`}`	76	`}`
Line 77...		Line 77...
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'])) {`
Line 103...		Line 103...
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";`
Line 110...		Line 110...
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";`
Line 152...		Line 152...
152	`'faire ça vous devez copier les informations suivantes dans un fichier et les transférer '.`	152	`'faire ça vous devez copier les informations suivantes dans un fichier et les transfé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épertoire <tt>configuration</tt> du répertoire '.`	154	`'<tt>pap_config.inc.php</tt> directement dans le ré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.';`	156	`'correctement.';`
157	`$txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($configCode).'</code></div>'."\n";`	157	`$txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($configCode).'</pre></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);`
Line 159...		Line 159...
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'].`
Line 174...		Line 174...
174	`'RewriteEngine '.$on_off."\n".`	174	`'RewriteEngine '.$on_off."\n".`
175	`'# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement'."\n".`	175	`'# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement'."\n".`
176	`'RewriteCond %{REQUEST_FILENAME} !-d'."\n".`	176	`'RewriteCond %{REQUEST_FILENAME} !-d'."\n".`
177	`'RewriteCond %{REQUEST_FILENAME} !-f'."\n\n".`	177	`'RewriteCond %{REQUEST_FILENAME} !-f'."\n\n".`
178	`'# ATTENTION : remplace localhoste par votre nom de domaine !'."\n".`	178	`'# ATTENTION : remplace localhoste par votre nom de domaine !'."\n".`
179	`'# Réecriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL'."\n".`	179	`'# Réécriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL'."\n".`
180	`'# ATTENTION : ne marche pas pour les formulaires en mode POST !'."\n".`	180	`'# ATTENTION : ne marche pas pour les formulaires en mode POST !'."\n".`
181	`'RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]'."\n".`	181	`'RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]'."\n".`
182	`'# Réecriture d\'url pour les vieux permaliens'."\n".`	182	`'# Réécriture d\'url pour les vieux permaliens'."\n".`
183	`'RewriteCond %{REQUEST_FILENAME}/ !-d'."\n".`	183	`'RewriteCond %{REQUEST_FILENAME}/ !-d'."\n".`
184	`'RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]'."\n".`	184	`'RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]'."\n".`
185	`'# Redirection d\'url pour le sélecteur de site'."\n".`	185	`'# Redirection d\'url pour le sélecteur de site'."\n".`
186	`'# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concacténée à l\'url et cela plante...'."_n".`	186	`'# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concaténée à l\'url et cela plante...'."_n".`
187	`'# Le "/" initial dans la RewriteCond est obligatoire!'."\n".`	187	`'# Le "/" initial dans la RewriteCond est obligatoire!'."\n".`
188	`'RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$'."\n".`	188	`'RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$'."\n".`
189	`'RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]'."\n\n".`	189	`'RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]'."\n\n".`
190	`'# Réecriture d\'url pour les sites de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".`	190	`'# Réécriture d\'url pour les sites de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".`
191	`'RewriteRule ^site:.+$ papyrus.php [QSA,L]'."\n".`	191	`'RewriteRule ^site:.+$ papyrus.php [QSA,L]'."\n".`
192	`'# Réecriture d\'url pour les menus de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".`	192	`'# Réécriture d\'url pour les menus de Papyrus : à modifier si les valeurs par défaut ont été changées'."\n".`
193	`'RewriteRule ^page:.+$ papyrus.php [QSA,L]'."\n\n".`	193	`'RewriteRule ^page:.+$ papyrus.php [QSA,L]'."\n\n".`
194	`'# Gestion des erreurs 404'."\n".`	194	`'# Gestion des erreurs 404'."\n".`
195	`'ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';`	195	`'ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';`
Line 196...		Line 196...
196		196
Line 296...		Line 296...
296		296
297	`// +------------------------------------------------------------------------------------------------------+`	297	`// +------------------------------------------------------------------------------------------------------+`
298	`// \| LISTE DES FONCTIONS \|`	298	`// \| LISTE DES FONCTIONS \|`
Line 299...		Line 299...
299	`// +------------------------------------------------------------------------------------------------------+`	299	`// +------------------------------------------------------------------------------------------------------+`
300		300
301	`// Création du formulaire de configuration de la base de donneés`	301	`// Création du formulaire de configuration de la base de données`
302	`function creerFormulaire($fichier, $bln_lecture = false) {`	302	`function creerFormulaire($fichier, $bln_lecture = false) {`
303	`$disabled = '';`	303	`$disabled = '';`
304	`if ($bln_lecture) {`	304	`if ($bln_lecture) {`
Line 344...		Line 344...
344		344
345		345
346	`/* +--Fin du code ----------------------------------------------------------------------------------------+`	346	`/* +--Fin du code ----------------------------------------------------------------------------------------+`
-		347	`*`
-		348	`* $Log: not supported by cvs2svn $`
-		349	`* Revision 1.25 2006/12/01 15:43:01 alexandre_tb`
347	`*`	350	`* prise en compte dans le rewriteengine de l'activation ou non de la reecriture`
348	`* $Log: not supported by cvs2svn $`	351	`*`
349	`* Revision 1.24 2006/12/01 11:47:10 alexandre_tb`	352	`* Revision 1.24 2006/12/01 11:47:10 alexandre_tb`
350	`* suppression de var_dump`	353	`* suppression de var_dump`
351	`*`	354	`*`