Subversion Repositories Applications.papyrus

Rev

Rev 1349 | Rev 1358 | Go to most recent revision | Show entire file | Regard whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1349 Rev 1354
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.30 2007-04-20 09:18:09 alexandre_tb Exp $
35
// CVS : $Id: instal_fichier.inc.php,v 1.31 2007-04-20 10:15:15 alexandre_tb 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
*
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.30 $ $Date: 2007-04-20 09:18:09 $
49
*@version       $Revision: 1.31 $ $Date: 2007-04-20 10:15:15 $
50
// +------------------------------------------------------------------------------------------------------+
50
// +------------------------------------------------------------------------------------------------------+
51
**/
51
**/
Line 52... Line 52...
52
 
52
 
53
// +------------------------------------------------------------------------------------------------------+
53
// +------------------------------------------------------------------------------------------------------+
Line 136... Line 136...
136
			'@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
136
			'@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu;
Line 137... Line 137...
137
	    
137
	    
138
	    // Dans le cas, ou nous mettons a jour Papyrus, il faut supprimer l'ancien fichier de config
138
	    // Dans le cas, ou nous mettons a jour Papyrus, il faut supprimer l'ancien fichier de config
139
	    if (INSTAL_VERSION_ANCIENNE != '') {
139
	    if (INSTAL_VERSION_ANCIENNE != '') {
140
		$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
140
		$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...';
141
		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '.
141
		$txt_suppression_erreur =   '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut &ecirc;tre supprimer automatiquement. '.
142
					    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
142
					    'Veuillez utiliser un logiciel de transfert de fichier par FTP pour le supprimer.</p>';
143
		$erreur = testerConfig($sortie_verif, $txt_suppression, unlink($url_ftp), $txt_suppression_erreur, 1, $erreur);
143
		$erreur = testerConfig($sortie_verif, $txt_suppression, unlink($url_ftp), $txt_suppression_erreur, 1, $erreur);
Line 144... Line 144...
144
	    }
144
	    }
Line 152... Line 152...
152
    	$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/papyrus/configuration/pap_config.inc.php", 1) ;
152
    	$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/papyrus/configuration/pap_config.inc.php", 1) ;
Line 153... Line 153...
153
    		
153
    		
Line 154... Line 154...
154
    		
154
    		
155
	    // Nous ecrivons le fichier de config sur le disque
155
	    // Nous ecrivons le fichier de config sur le disque
156
 
156
 
157
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...';
157
	    $txt_ecriture_conf = '&Eacute;criture sur le serveur de <tt>'.$fichier_config_cible.'</tt>...';
158
	    $txt_ecriture_conf_erreur = '<span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu.
158
	    $txt_ecriture_conf_erreur = '<span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$fichier_config_cible.
159
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
159
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
160
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
160
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
161
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
161
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
162
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
162
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
163
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
163
			'<tt>pap_config.inc.php</tt> directement dans le r&eacute;pertoire <tt>configuration</tt> du répertoire '.
-
 
164
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
164
			'<tt>papyrus</tt> de Papyrus. Une fois que vous aurez fait cela, votre site Papyrus devrait fonctionner '.
165
			'correctement.';	    
-
 
166
	    $txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($configCode).'</pre></code></div>'."\n";	    
Line 165... Line 167...
165
			'correctement.';	    
167
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, 
166
	    $txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($configCode).'</pre></code></div>'."\n";	    
168
	    						ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII), 
167
	    $erreur = testerConfig($sortie_verif, $txt_ecriture_conf, ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII), $txt_ecriture_conf_erreur, 1, $erreur);
169
	    						$txt_ecriture_conf_erreur, 1, $erreur);
Line 207... Line 209...
207
			$sortie_verif .='<p>Attention: Un fichier .htaccess est d&eacute;j&agrave; pr&eacute;sent sur le serveur.'.
209
			$sortie_verif .='<p>Attention: Un fichier .htaccess est d&eacute;j&agrave; pr&eacute;sent sur le serveur.'.
208
							'<br />'.$fichier['PAP_FTP_RACINE'].'/.htaccess'.
210
							'<br />'.$fichier['PAP_FTP_RACINE'].'/.htaccess'.
209
							'<br />Veillez &agrave; le configurer correctement<br /><br />'.
211
							'<br />Veillez &agrave; le configurer correctement<br /><br />'.
210
							'Contenu par d&eacute;faut: <br /><br /> ErrorDocument 404 /erreur_404.php';
212
							'Contenu par d&eacute;faut: <br /><br /> ErrorDocument 404 /erreur_404.php';
211
		} else {
213
		} else {
212
			
-
 
213
			
-
 
214
			$tempfn = tempnam("","");
214
			$tempfn = tempnam("","");
215
			$temp = fopen($tempfn, "w");
215
			$temp = fopen($tempfn, "w");
216
 
-
 
217
			fwrite($temp, $contenu_htaccess);
216
			fwrite($temp, $contenu_htaccess);
218
				fclose($temp);
217
			fclose($temp);
219
			$fichier_config_source = $tempfn;
218
			$fichier_config_source = $tempfn;
220
    		$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/.htaccess", 1) ;
219
    		$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/.htaccess", 1) ;
221
    		
-
 
222
    		
-
 
223
    		$txt_ecriture_conf_erreur = 'AVERTISSEMENT: Le fichier .htaccess <tt>'.$fichier_config_cible.
220
    		$txt_ecriture_conf_erreur = 'AVERTISSEMENT: Le fichier .htaccess <tt>'.$fichier_config_cible.
224
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
221
			'</tt> n\'a pu &ecirc;tre cr&eacute;&eacute;. Veuillez vous assurez que votre serveur a les droits '.
225
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
222
			'd\'acc&egrave;s en &eacute;criture pour ce fichier. Si pour une raison quelconque vous ne pouvez pas '.
226
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
223
			'faire &ccedil;a vous devez copier les informations suivantes dans un fichier et les transf&eacute;rer '.
227
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
224
			'au moyen d\'un logiciel de transfert de fichier (ftp) sur le serveur dans un fichier '.
228
			'<tt>.htaccess</tt> directement &agrave la racine de '.
225
			'<tt>.htaccess</tt> directement &agrave la racine de '.
229
			'<tt>papyrus</tt> de Papyrus.';
226
			'<tt>papyrus</tt> de Papyrus.';
230
			$txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($contenu_htaccess).'</pre></code></div>'."\n";
227
			$txt_ecriture_conf_erreur .= '<div class="code"><code><pre>'.htmlentities($contenu_htaccess).'</pre></code></div>'."\n";
231
			$txt_ecriture_conf = '&Eacute;criture sur le serveur du fichier .htaccess... <tt>'.$fichier_config_cible.'</tt>'."\n";	
228
			$txt_ecriture_conf = '&Eacute;criture sur le serveur du fichier .htaccess... <tt>'.$fichier_config_cible.'</tt>'."\n";	
-
 
229
			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf, 
232
			$erreur = testerConfig($sortie_verif, $txt_ecriture_conf, ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII), $txt_ecriture_conf_erreur, 1, 0);
230
									ftp_put($ftp, $fichier_config_cible,$fichier_config_source, FTP_ASCII), 
233
			
-
 
-
 
231
									$txt_ecriture_conf_erreur, 1, 0);
234
		}
232
		}
235
	}
233
	}
236
}
234
}
Line 354... Line 352...
354
 
352
 
355
 
353
 
356
/* +--Fin du code ----------------------------------------------------------------------------------------+
354
/* +--Fin du code ----------------------------------------------------------------------------------------+
-
 
355
*
-
 
356
* $Log: not supported by cvs2svn $
-
 
357
* Revision 1.30  2007/04/20 09:18:09  alexandre_tb
357
*
358
* correction pb encodage
358
* $Log: not supported by cvs2svn $
359
*
359
* Revision 1.29  2007/04/20 09:13:37  alexandre_tb
360
* Revision 1.29  2007/04/20 09:13:37  alexandre_tb
360
* correction pb encodage
361
* correction pb encodage
361
*
362
*