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.19 2006-11-30 15:50:25 ddelon Exp $
+// CVS : $Id: instal_fichier.inc.php,v 1.20 2006-11-30 16:41:42 alexandre_tb 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.19 $ $Date: 2006-11-30 15:50:25 $
+*@version       $Revision: 1.20 $ $Date: 2006-11-30 16:41:42 $
 // +------------------------------------------------------------------------------------------------------+
 **/
 // +------------------------------------------------------------------------------------------------------+
+	    }
 	    // Nous écrivons le fichier de config sur le disque
 	    $fp = @fopen($url_ftp, 'w');
 	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
-	    $txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
+	    $txt_ecriture_conf_erreur = '<span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
 			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
 			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
 			'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.</p>';
+			'correctement.';
 	    $txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($configCode).'</code></div>'."\n";
 	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $fp, $txt_ecriture_conf_erreur, 1, $erreur);
 			$sortie_verif .='<p>Attention: Un fichier .htaccess est déjà présent sur le serveur.'.
 							'<br />Veillez à le configurer correctement<br /><br />'.
 							'Contenu par défaut: <br /><br /> ErrorDocument 404 /erreur_404.php';
 		} else {
 			$prefixe = parse_url($_SERVER['REQUEST_URI'], PHP_URL_PATH);
-			$host = parse_url($_SERVER['REQUEST_URI'], PHP_URL_HOST);
-			$prot = parse_url($_SERVER['REQUEST_URI'], PHP_URL_SCHEME);
-			$url = $prot.'://'.$host.$prefixe;
+			$url = 'http://'.$_SERVER['HTTP_HOST'].$prefixe;
 			$handle =fopen ($url_ftp_htaccess, 'w');
+			$txt_ecriture_conf = '&Eacute;criture sur le serveur du fichier .htaccess...';
-			$txt_ecriture_conf_erreur = '<p><span class="failed">AVERTISSEMENT:</span> Le fichier .htaccess <tt>'.$url_ftp_htaccess.
+			$txt_ecriture_conf_erreur = 'AVERTISSEMENT: Le fichier .htaccess <tt>'.$url_ftp_htaccess.
 			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
 			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
 			'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>.htaccess</tt> directement &agrave la racine de '.
-			'<tt>papyrus</tt> de Papyrus.</p>';
+			'<tt>papyrus</tt> de Papyrus.';
-			 $contenu_htaccess = '# Raccourci pour les menus et sites de Papyrus
+			 $contenu_htaccess = '# Raccourci pour les menus et sites de Papyrus'."\n".
-RewriteEngine on
+								'RewriteEngine on'."\n".
-# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement
+								'# si le fichier ou le dossier existe dans le système de fichier on l\'utilise directement'."\n".
-RewriteCond %{REQUEST_FILENAME} !-d
+								'RewriteCond %{REQUEST_FILENAME} !-d'."\n".
-RewriteCond %{REQUEST_FILENAME} !-f
+								'RewriteCond %{REQUEST_FILENAME} !-f'."\n\n".
-# ATTENTION : remplace localhoste par votre nom de domaine !
+								'# ATTENTION : remplace localhoste par votre nom de domaine !'."\n".
-# Réecriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL
+								'# Réecriture d\'url pour les applications de Papyrus n\'utilisant pas correctement Pap_URL'."\n".
-# ATTENTION : ne marche pas pour les formulaires en mode POST !
+								'# ATTENTION : ne marche pas pour les formulaires en mode POST !'."\n".
-RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]
+								'RewriteRule ^([^\/]+)&(.*)$ '.$url.'/$1?$2 [QSA,L,R=301]'."\n".
-# Réecriture d\'url pour les vieux permaliens
+								'# Réecriture d\'url pour les vieux permaliens'."\n".
-RewriteCond %{REQUEST_FILENAME}/ !-d
+								'RewriteCond %{REQUEST_FILENAME}/ !-d'."\n".
-RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]
+								'RewriteRule ^([^\/\?:.]+)$ '.$url.'/page:$1 [QSA,L,R=301]'."\n".
-# Redirection d\'url pour le sélecteur de site
+								'# 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 concacténée à l\'url et cela plante...
+								'# Le point d\'interrogation sans rien après, vide la QUERY_STRING sinon elle est concacténée à l\'url et cela plante...'."_n".
-# Le "/" initial dans la RewriteCond est obligatoire!
+								'# Le "/" initial dans la RewriteCond est obligatoire!'."\n".
-RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$
+								'RewriteCond %{REQUEST_URI}?%{QUERY_STRING} ^/papyrus\.php\?site=([^&]+)$'."\n".
-RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]
+								'RewriteRule ^papyrus.php$ '.$url.'/site:%1? [L,R=301]'."\n\n".
-# Réecriture d\'url pour les sites de Papyrus : à modifier si les valeurs par défaut ont été changées
+								'# Réecriture 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]
+								'RewriteRule ^site:.+$ papyrus.php [QSA,L]'."\n".
-# Réecriture d\'url pour les menus de Papyrus : à modifier si les valeurs par défaut ont été changées
+								'# Réecriture 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]
+								'RewriteRule ^page:.+$ papyrus.php [QSA,L]'."\n\n".
-# Gestion des erreurs 404
+								'# Gestion des erreurs 404'."\n".
-ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';
+								'ErrorDocument 404 '.$prefixe.'/erreur_http.php?erreur=404';
+			$txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($contenu_htaccess).'</pre></code></div>'."\n";
-			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $handle, $txt_ecriture_conf_erreur, 1, $erreur);
+			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf, $handle, $txt_ecriture_conf_erreur, 1, 0);
 			if ($handle) {
 				fwrite ($handle, $contenu_htaccess);
 				fclose($handle);
-			} else {
+			} else {
 				$txt_ecriture_conf_erreur .= '<div class="code"><code>'.htmlentities($contenu_htaccess).'</code></div>'."\n";
+			}
+		}
+	}
 /* +--Fin du code ----------------------------------------------------------------------------------------+
+*
+* $Log: not supported by cvs2svn $
+* Revision 1.19  2006/11/30 15:50:25  ddelon
 * installation fichier
 * $Log: not supported by cvs2svn $
 * Revision 1.18  2006/11/30 15:34:51  alexandre_tb
 * ecriture htaccess
+*

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applications/installateur/instal_fichier.inc.php @ 1564 – Rev 1068 → 1069