Subversion Repositories Applications.papyrus

Rev

Rev 123 | Rev 190 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 123 Rev 183
Line 18... Line 18...
18
// |                                                                                                      |
18
// |                                                                                                      |
19
// | You should have received a copy of the GNU Lesser General Public                                     |
19
// | You should have received a copy of the GNU Lesser General Public                                     |
20
// | License along with this library; if not, write to the Free Software                                  |
20
// | License along with this library; if not, write to the Free Software                                  |
21
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
21
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
22
// +------------------------------------------------------------------------------------------------------+
22
// +------------------------------------------------------------------------------------------------------+
23
// CVS : $Id: adsi_site.fonct.php,v 1.8 2004-11-03 17:59:59 jpm Exp $
23
// CVS : $Id: adsi_site.fonct.php,v 1.9 2004-11-26 13:13:51 jpm Exp $
24
/**
24
/**
25
* Bibliothèque de fonctions d'admininistration des projets
25
* Bibliothèque de fonctions d'admininistration des projets
26
*
26
*
27
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
27
* Contient un ensemble de fonctions permettant à l'application Administrateur de Papyrus, de modifier des informations
28
* sur les projets (=sites gérés par Papyrus).
28
* sur les projets (=sites gérés par Papyrus).
Line 33... Line 33...
33
*@author        Laurent COUDOUNEAU <lc@gsite.org>
33
*@author        Laurent COUDOUNEAU <lc@gsite.org>
34
//Autres auteurs :
34
//Autres auteurs :
35
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
35
*@author        Alexandre GRANIER <alexandre@tela-botanica.org>
36
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
36
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37
*@copyright     Tela-Botanica 2000-2004
37
*@copyright     Tela-Botanica 2000-2004
38
*@version       $Revision: 1.8 $ $Date: 2004-11-03 17:59:59 $
38
*@version       $Revision: 1.9 $ $Date: 2004-11-26 13:13:51 $
39
// +------------------------------------------------------------------------------------------------------+
39
// +------------------------------------------------------------------------------------------------------+
40
*/
40
*/
Line 41... Line 41...
41
 
41
 
42
// +------------------------------------------------------------------------------------------------------+
42
// +------------------------------------------------------------------------------------------------------+
Line 279... Line 279...
279
            if ((PEAR::isError($ftp_conn) || PEAR::isError($ftp_login_result))) {
279
            if ((PEAR::isError($ftp_conn) || PEAR::isError($ftp_login_result))) {
280
                die('ERREUR Génésia admin : impossible de se connecter par ftp.<br />'.
280
                die('ERREUR Génésia admin : impossible de se connecter par ftp.<br />'.
281
                    'Serveur : '. GEN_FTP_SERVEUR .'<br />'.
281
                    'Serveur : '. GEN_FTP_SERVEUR .'<br />'.
282
                    'Utilisateur : '. GEN_FTP_UTILISATEUR .'<br />'.
282
                    'Utilisateur : '. GEN_FTP_UTILISATEUR .'<br />'.
283
                    'Ligne n° : '. __LINE__ .'<br />'.
283
                    'Ligne n° : '. __LINE__ .'<br />'.
284
                    'Fichier n° : '. __FILE__ .'<br />'.
284
                    'Fichier n° : '. __FILE__ .'<br />');
285
                    'Message erreur de connection : '.$ftp_conn->getMessage().'<br />'.
285
                    //'Message erreur de connection : '.$ftp_conn->getMessage().'<br />'.
286
                    'Message erreur de login : '.$ftp_login_result->getMessage());
286
                    //'Message erreur de login : '.$ftp_login_result->getMessage());
287
            }
287
            }
288
            $chemin_squelettes =    PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'].GEN_SEP.
288
            $chemin_squelettes =    PAP_FTP_RACINE.GEN_CHEMIN_SITES.$aso_valeurs['gs_code_alpha'].GEN_SEP.
289
                                    $aso_valeurs['gs_ce_i18n'].GEN_SEP.GEN_DOSSIER_SQUELETTE.GEN_SEP;
289
                                    $aso_valeurs['gs_ce_i18n'].GEN_SEP.GEN_DOSSIER_SQUELETTE.GEN_SEP;
290
            $tab_squelettes = $objet_pear_ftp->ls($chemin_squelettes);
290
            $tab_squelettes = $objet_pear_ftp->ls($chemin_squelettes);
291
            $aso_options = array();
291
            $aso_options = array();
Line 1052... Line 1052...
1052
}
1052
}
Line 1053... Line 1053...
1053
 
1053
 
1054
// +- Fin du code source  --------------------------------------------------------------------------------+
1054
// +- Fin du code source  --------------------------------------------------------------------------------+
1055
/*
1055
/*
-
 
1056
* $Log: not supported by cvs2svn $
-
 
1057
* Revision 1.8  2004/11/03 17:59:59  jpm
-
 
1058
* Corrections bogues erreurs variable inconnue.
1056
* $Log: not supported by cvs2svn $
1059
*
1057
* Revision 1.7  2004/10/26 18:41:28  jpm
1060
* Revision 1.7  2004/10/26 18:41:28  jpm
1058
* Gestion des sites externes à Papyrus.
1061
* Gestion des sites externes à Papyrus.
1059
*
1062
*
1060
* Revision 1.6  2004/10/22 17:25:31  jpm
1063
* Revision 1.6  2004/10/22 17:25:31  jpm