32,7 → 32,7 |
// | (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.5 2004-10-22 17:23:04 jpm Exp $ |
// CVS : $Id: instal_fichier.inc.php,v 1.6 2004-10-22 17:39:14 jpm Exp $ |
/** |
* Page de création des fichiers nécessaire à l'installation de Papyrus. |
* |
46,7 → 46,7 |
*@author Patrick PAUL |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.5 $ $Date: 2004-10-22 17:23:04 $ |
*@version $Revision: 1.6 $ $Date: 2004-10-22 17:39:14 $ |
// +------------------------------------------------------------------------------------------------------+ |
**/ |
|
86,9 → 86,9 |
$sortie .= '<p><strong>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</strong></p>'."\n"; |
|
// Correction éventuelle des informations saisies par l'utilisateur |
if (preg_match('/^\/(.*)$/', $fichier['PAP_FTP_RACINE'], $instal_tab_txt)) { |
if (preg_match('/^(?:\/|\\)(.*)$/', $fichier['PAP_FTP_RACINE']) == 1) { |
// le chemin FTP ne doit pas commencer par un slash, nous le supprimons |
$fichier['PAP_FTP_RACINE'] = $instal_tab_txt[1]; |
$fichier['PAP_FTP_RACINE'] = GEN_SEP.$fichier['PAP_FTP_RACINE']; |
} |
|
// Nous vérifions si nous sommes en phase de test du formulaire de config de l'écriture de fichier |
121,7 → 121,7 |
|
// Tentative d'écriture du fichier de config |
$sortie_verif .= ' <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n"; |
$chemin_fpt_absolu = GEN_SEP.$fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG; |
$chemin_fpt_absolu = $fichier['PAP_FTP_RACINE'].INSTAL_CHEMIN_CONFIG; |
$url_ftp = 'ftp://'.$fichier['PAP_FTP_UTILISATEUR'].':'.$fichier['PAP_FTP_MOT_DE_PASSE']. |
'@'.$fichier['PAP_FTP_SERVEUR'].$chemin_fpt_absolu; |
$fp = @fopen($url_ftp, 'w'); |
222,6 → 222,9 |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.5 2004/10/22 17:23:04 jpm |
* Simplification del'installation de Papyrus. |
* |
* Revision 1.4 2004/10/19 17:01:12 jpm |
* Correction bogues. |
* |