32,11 → 32,11 |
// | (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.27 2007-04-19 16:53:57 neiluj Exp $ |
// CVS : $Id: instal_fichier.inc.php,v 1.28 2007-04-20 09:05:46 alexandre_tb Exp $ |
/** |
* Page de création des fichiers nécessaire à l'installation de Papyrus. |
* Page de creation des fichiers necessaire a l'installation de Papyrus. |
* |
* Page permettant de créer le fichier de configuration de Papyrus. |
* Page permettant de creer le fichier de configuration de Papyrus. |
* |
*@package Installateur |
//Auteur original : |
46,7 → 46,7 |
*@author Patrick PAUL |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.27 $ $Date: 2007-04-19 16:53:57 $ |
*@version $Revision: 1.28 $ $Date: 2007-04-20 09:05:46 $ |
// +------------------------------------------------------------------------------------------------------+ |
**/ |
|
89,7 → 89,7 |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// Affichage d'informations... |
$sortie .= '<br /><h1>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</h1>'."\n"; |
$sortie .= '<br /><h1>Etape n°'.$num_etape.' sur '.INSTAL_NBRE_ETAPE.'.</h1>'."\n"; |
|
// Correction éventuelle des informations saisies par l'utilisateur |
if (ereg('^[\/\\]', $fichier['PAP_FTP_RACINE']) == false) { |
105,7 → 105,7 |
$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); |
$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"; |
118,7 → 118,7 |
$entries[] = 'define(\''.$cle.'\',\''.$val.'\');'."\n"; |
} |
foreach ($pref as $cle => $val) { |
// Nous récupérons uniquement les constantes à stocker dans le fichier de config (leur nom commence par PAP_) |
// Nous recuperons uniquement les constantes a stocker dans le fichier de config (leur nom commence par PAP_) |
if (preg_match('/^PAP_/', $cle)) { |
if (preg_match('/^[0-9]+|(?i:true|false)$/', $val)) { |
$entries[] = 'define(\''.$cle.'\','.$val.');'."\n"; |
129,13 → 129,13 |
} |
$configCode .= implode("\n", $entries)."\n\n?>"; |
if ($erreur==0) { |
// Tentative d'écriture du fichier de config |
// Tentative d'ecriture du fichier de config |
$sortie_verif .= ' <h2>Ecriture des fichiers sur le serveur par FTP</h2>'."\n"; |
$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; |
|
// Dans le cas, où nous mettons à jour Papyrus, il faut supprimer l'ancien fichier de config |
// Dans le cas, ou nous mettons a jour Papyrus, il faut supprimer l'ancien fichier de config |
if (INSTAL_VERSION_ANCIENNE != '') { |
$txt_suppression = 'Suppression de <tt>'.$chemin_fpt_absolu.'</tt>...'; |
$txt_suppression_erreur = '<p>Le fichier <tt>'.$chemin_fpt_absolu.'</tt> ne peut être supprimer automatiquement. '. |
152,8 → 152,8 |
$fichier_config_cible = substr($fichier['PAP_FTP_RACINE']."/papyrus/configuration/pap_config.inc.php", 1) ; |
|
|
// Nous écrivons le fichier de config sur le disque |
// $fp = @fopen($url_ftp, 'w'); |
// Nous ecrivons le fichier de config sur le disque |
|
$txt_ecriture_conf = 'Écriture sur le serveur de <tt>'.$chemin_fpt_absolu.'</tt>...'; |
$txt_ecriture_conf_erreur = '<span class="failed">AVERTISSEMENT:</span> Le fichier de configuration <tt>'.$chemin_fpt_absolu. |
'</tt> n\'a pu être créé. Veuillez vous assurez que votre serveur a les droits '. |
282,7 → 282,7 |
$sortie .= ' </ul>'."\n"; |
$sortie .= ' </form>'; |
} else if ($erreur == 2 && !empty($sortie_verif)) { |
// Vérification du fichier avec interuption... |
// Verification du fichier avec interuption... |
$sortie .= creerFormulaire($fichier); |
$sortie .= '<li><input type="hidden" name="pref_serial" value="'.htmlentities(serialize($pref)).'" /></li>'."\n"; |
$sortie .= '<li><input type="hidden" name="bdd_serial" value="'.htmlentities(serialize($bdd)).'" /></li>'."\n"; |
291,7 → 291,7 |
$sortie .= ' </form>'; |
$sortie .= $sortie_verif; |
} else if (($erreur == 0 || $erreur == 1) && !empty($sortie_verif)) { |
// Vérification du fichier sans interuption... passage à l'étape suivante |
// Verification du fichier sans interuption... passage a l'etape suivante |
$sortie .= creerFormulaire($fichier, true); |
$sortie .= ' </ul>'."\n"; |
$sortie .= ' </form>'; |
308,7 → 308,7 |
// | LISTE DES FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
|
// Création du formulaire de configuration de la base de données |
// Creation du formulaire de configuration de la base de donnees |
function creerFormulaire($fichier, $bln_lecture = false) { |
$disabled = ''; |
if ($bln_lecture) { |
356,6 → 356,9 |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.27 2007/04/19 16:53:57 neiluj |
* fix de l'upload des fichiers de conf (ftp_put) |
* |
* Revision 1.26 2007/04/19 15:34:35 neiluj |
* préparration release (livraison) "Narmer" - v0.25 |
* |