Rev 23 | Rev 50 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php
//vim: set expandtab tabstop=4 shiftwidth=4:
// +------------------------------------------------------------------------------------------------------+
// | PHP version 4.1 |
// +------------------------------------------------------------------------------------------------------+
// | Copyright (C) 2001 COUDOUNEAU Laurent (lc@gsite.org) |
// | Copyright (C) 2003 Tela Botanica (accueil@tela-botanica.org) |
// +------------------------------------------------------------------------------------------------------+
// | |
// | This library is free software; you can redistribute it and/or |
// | modify it under the terms of the GNU Lesser General Public |
// | License as published by the Free Software Foundation; either |
// | version 2.1 of the License, or (at your option) any later version. |
// | |
// | This library is distributed in the hope that it will be useful, |
// | but WITHOUT ANY WARRANTY; without even the implied warranty of |
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
// | Lesser General Public License for more details. |
// | |
// | You should have received a copy of the GNU Lesser General Public |
// | License along with this library; if not, write to the Free Software |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |
// | |
// +------------------------------------------------------------------------------------------------------+
// CVS : $Id: pap_initialise_info.inc.php,v 1.6 2004-09-10 16:38:34 jpm Exp $
/**
*Initialisation de Papyrus : vérification et récupération de paramètres généraux.
*
* La page contient le code initialisant l'éxecution du rendu d'une page par Papyrus.
* Nous y trouvons la recherche des informations disponibles sur :
* - le site présent sur le serveur demandé,
* - l'identification,
* - la langue,
* - le menu,
* - la page
* - l'application
*
*@package Papyrus
//Auteur original :
*@author Laurent COUDOUNEAU <laurent.coudouneau@ema.fr>
//Autres auteurs :
*@author Alexandre GRANIER <alex@tela-botanica.org>
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
*@copyright Tela-Botanica 2000-2004
*@version $Revision: 1.6 $ $Date: 2004-09-10 16:38:34 $
// +------------------------------------------------------------------------------------------------------+
*/
// +------------------------------------------------------------------------------------------------------+
// | ENTÊTE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
/** <br> Inclusion de la bibliothèque de fonctions servant à l'initialisation des variables globales de Papyrus. */
require_once GEN_CHEMIN_PAP.'bibliotheque/fonctions/pap_initialisation.fonct.php';
/** <br> Inclusion de l'objet PEAR servant à négocier le language avec le navigateur client. */
require_once 'HTTP.php';
/** <br> Inclusion de la classe PEAR gérant les URL.
* Utilisé pour l'url demandée par le client.
*/
require_once 'Net/URL.php';
//Initialisation de la variable stockant les infos de débogage.
if (GEN_DEBOGAGE) {
$_GEN_commun['debogage_info'] = '';
}
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
// +------------------------------------------------------------------------------------------------------+
// Gestion des sites : disponiblent sur le serveur courant.
/** Nous recherchons la valeur de l'abréviation du site passée dans l'url.
* Si nous trouvons pas l'abréviation d'un site dans l'url, nous recherchons cette valeur
* grâce aux variables d'Apache : $serverName et $serverPort.
*/
if ( (! isset($_GET[GEN_URL_CLE_SITE])) || (empty($_GET[GEN_URL_CLE_SITE])) ) {
$requete = 'SELECT gen_site.* '.
'FROM gen_site, gen_site_relation '.
'WHERE gsr_id_site_01 = gsr_id_site_02 '.
'AND gsr_id_valeur = 101 '.// 101 = site défaut
'AND gsr_id_site_01 = gs_id_site';
$resultat = $db->query($requete);
if (DB::isError($resultat)) {
die( BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete) );
}
// Aucun site trouvé
if ($resultat->numRows() == 0) {
die( 'ERREUR Génésia : impossible de trouver de sites.<br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier n° : '. __FILE__ .'<br />');
}
// Nous avons trouvé un site.
$_GEN_commun['info_site'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
if (GEN_URL_ID_TYPE_SITE == 'int') {
$_GEN_commun['url_site'] = $_GEN_commun['info_site']->gs_code_num;
} else {
$_GEN_commun['url_site'] = $_GEN_commun['info_site']->gs_code_alpha;
}
} else {
// Récupération de la valeur identifiant le site depuis l'url
$_GEN_commun['url_site'] = $_GET[GEN_URL_CLE_SITE];
// Récupération des informations sur le site
$requete = 'SELECT * '.
'FROM gen_site, gen_site_relation '.
'WHERE gsr_id_site_01 = gsr_id_site_02 '.
'AND gsr_id_valeur = 102 '.// 102 = site principal
'AND gsr_id_site_01 = gs_id_site '.
'AND ';
$requete .= (GEN_URL_ID_TYPE_SITE == 'int')
? 'gs_code_num = '.$_GEN_commun['url_site']
: 'gs_code_alpha = "'.$_GEN_commun['url_site'].'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$_GEN_commun['info_site'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
}
//Gestion de l'erreur aucun site trouvable.
if (! isset($_GEN_commun['info_site'])) {
die('ERREUR Génésia : impossible de trouver les informations du site.<br />'.
'Site : '.$_GEN_commun['url_site'].'<br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier n° : '. __FILE__ .'<br />');
}
// +------------------------------------------------------------------------------------------------------+
// Récupération des informations d'identification pour le site
if ($_GEN_commun['info_site']->gs_ce_auth != 0) {
// Récupération des informations sur le site
$requete_auth = 'SELECT * '.
'FROM gen_site_auth '.
'WHERE gsa_id_auth = '.$_GEN_commun['info_site']->gs_ce_auth;
$resultat_auth = $db->query($requete_auth);
(DB::isError($resultat_auth))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_auth->getMessage(), $requete_auth))
: '';
$_GEN_commun['info_auth'] = $resultat_auth->fetchRow(DB_FETCHMODE_OBJECT);
$resultat_auth->free();
if ($_GEN_commun['info_auth']->gsa_ce_auth_bdd != 0) {
//Identification via une base de donnée :
$requete_auth_bdd = 'SELECT * '.
'FROM gen_site_auth_bdd '.
'WHERE gsab_id_auth_bdd = '.$_GEN_commun['info_auth']->gsa_ce_auth_bdd;
$resultat_auth_bdd = $db->query($requete_auth_bdd);
(DB::isError($resultat_auth_bdd))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_auth_bdd->getMessage(), $requete_auth_bdd))
: '';
$_GEN_commun['info_auth_bdd'] = $resultat_auth_bdd->fetchRow(DB_FETCHMODE_OBJECT);
$resultat_auth_bdd->free();
} else if ($_GEN_commun['info_auth']->gsa_ce_auth_ldap != 0) {
//Identification via LDAP :
$requete_auth_ldap = 'SELECT * '.
'FROM gen_site_auth_ldap '.
'WHERE gsal_id_auth_ldap = '.$_GEN_commun['info_auth']->gsa_ce_auth_ldap;
$resultat_auth_ldap = $db->query($requete_auth_ldap);
(DB::isError($resultat_auth_ldap))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_auth_ldap->getMessage(), $requete_auth_ldap))
: '';
$_GEN_commun['info_auth_ldap'] = $resultat_auth_ldap->fetchRow(DB_FETCHMODE_OBJECT);
$resultat_auth_ldap->free();
} else {
die('ERREUR Génésia : impossible de trouver les information authentification. <br />'.
'Identifiant auth : '.$_GEN_commun['info_site']->gs_ce_auth.'<br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier : '. __FILE__ );
}
}
// +------------------------------------------------------------------------------------------------------+
// Gestion de l'internationalisation du site
// Nous recherchons la valeur de l'internationalisation du site passée dans l'url ou présente
// dans le navigateur du client. Si nous trouvons pas la langue dans l'url, récupération depuis
// le navigateur et comparaison aux langues disponibles pour le site demandé.
// Initialisation de variable :
$i18n = '';
// Nous recherchons les internationalisations disponibles pour le site demandé.
// Si un site possède une traduction, il peut alors posséder des menus traduits.
$requete = 'SELECT gs_ce_i18n '.
'FROM gen_site, gen_site_relation '.
'WHERE gsr_id_site_01 = '.$_GEN_commun['info_site']->gs_id_site.' '.
'AND gsr_id_site_02 = gs_id_site '.
'AND gsr_id_valeur = 1 '.
'ORDER BY gsr_ordre';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
// Récupération de la première valeur de langue d'un site.
$ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
if (! $ligne) {
// Pas de traduction pour le site: nous regardons si le site possede une valeur d'i18n.
if (! empty($_GEN_commun['info_site']->gs_ce_i18n) ) {
$i18n_possible = array($_GEN_commun['info_site']->gs_ce_i18n => true);
} else {
// Sinon utilisation de la valeur par défaut définit dans le fichier de config.
$i18n_possible = array(GEN_I18N_ID_DEFAUT => true);
}
// Utilisation de la fonction statique de Pear HTTP pour négocier cette i18n.
$i18n = HTTP::negotiateLanguage($i18n_possible, GEN_I18N_ID_DEFAUT);
} else {
// La première traduction du site
// peut être utilisé comme valeur par défaut.
$i18n_site_url = $ligne->gs_ce_i18n;
// Stockage des valeurs de l'i18n dans un tableau
$aso_i18n_site = array();
$aso_i18n_site[$_GEN_commun['info_site']->gs_ce_i18n] = true;
$aso_i18n_site[$ligne->gs_ce_i18n] = true;
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
$aso_i18n_site[$ligne->gs_ce_i18n] = true;
}
$resultat->free();
// Utilisation de la fonction statique de Pear HTTP pour négocier cette i18n.
$i18n = HTTP::negotiateLanguage($aso_i18n_site, $i18n_site_url);
}
// Nous stockons la valeur trouvé pour l'url demandée dans la variable globale de Génésia.
$_GEN_commun['i18n'] = $i18n;
// Recherche de la présence de la valeur d'i18n dans l'url
if ( (! isset($_GET[GEN_URL_CLE_I18N])) || (empty($_GET[GEN_URL_CLE_I18N])) ) {
$_GEN_commun['url_i18n'] = '';
} else {
// L'i18n est trouvé dans l'url, nous écrasons donc la valeur i18n.
$_GEN_commun['url_i18n'] = $_GET[GEN_URL_CLE_I18N];
$_GEN_commun['i18n'] = $_GEN_commun['url_i18n'];
}
// Nous récupérons des informations sur l'internationalisation
$requete = 'SELECT * '.
'FROM gen_i18n '.
'WHERE gi_id_i18n = "'.$_GEN_commun['i18n'].'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$_GEN_commun['info_i18n'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
//Gestion de l'erreur aucune internationalisation trouvable.
if (empty($_GEN_commun['i18n'])) {
die('ERREUR Génésia : valeur internationalisation introuvable. <br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier : '. __FILE__ );
}
// Récupération des informations sur la langue
$requete = 'SELECT * '.
'FROM gen_i18n_langue '.
'WHERE gil_id_langue = "'.$_GEN_commun['info_i18n']->gi_ce_langue.'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$_GEN_commun['info_i18n_langue'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
// Récupération des informations sur le pays
$requete = 'SELECT * '.
'FROM gen_i18n_pays '.
'WHERE gip_id_pays = "'.$_GEN_commun['info_i18n']->gi_ce_pays.'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$_GEN_commun['info_i18n_pays'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
// +------------------------------------------------------------------------------------------------------+
// Gestion des menus
// Nous vérifions le cas où le code du menu est introuvable dans l'url.
if ( (! isset($_GET[GEN_URL_CLE_MENU])) || (empty($_GET[GEN_URL_CLE_MENU])) ) {
// Recherche du premier menu du site courant:
$requete = 'SELECT gen_menu.* '.
'FROM gen_menu, gen_menu_relation '.
'WHERE gm_ce_site = '.$_GEN_commun['info_site']->gs_id_site.' '.
'AND gmr_id_menu_01 = gm_id_menu '.
'AND gmr_id_menu_01 = gmr_id_menu_02 '.
'AND gmr_id_valeur = 101 ';// 101 = menu par "defaut"
$resultat = $db->query($requete);
(DB::isError($resultat))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete))
: '';
// Nous avons trouvé un menu "défaut" pour le site courant.
$_GEN_commun['info_menu'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
// Stockage du code du menu demandée dans la variable globale de Papyrus.
if (GEN_URL_ID_TYPE_MENU == 'int') {
$_GEN_commun['url_menu'] = $_GEN_commun['info_menu']->gm_code_num;
} else {
$_GEN_commun['url_menu'] = $_GEN_commun['info_menu']->gm_code_alpha;
}
} else {
// Le code du menu est présent dans l'url nous la récupérons dans la variable globale de Papyrus.
$_GEN_commun['url_menu'] = $_GET[GEN_URL_CLE_MENU];
// Récupération des informations sur le menu demandé
$requete = 'SELECT * '.
'FROM gen_menu '.
'WHERE gm_ce_site = '.$_GEN_commun['info_site']->gs_id_site.' '.
'AND ';
$requete .= (GEN_URL_ID_TYPE_MENU == 'int')
? 'gm_code_num = '.$_GEN_commun['url_menu']
: 'gm_code_alpha = "'.$_GEN_commun['url_menu'].'"';
$resultat = $db->query($requete);
(DB::isError($resultat))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete))
: '';
$_GEN_commun['info_menu'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
}
if (empty($_GEN_commun['url_menu'])) {
die('ERREUR Génésia : identifiant de menu introuvable. <br />'.
'Ligne n° : '. __LINE__ .'<br />'.
'Fichier : '. __FILE__ );
}
// +------------------------------------------------------------------------------------------------------+
// Gestion des traductions
// Si le résultat de la négociation de l'internationalisation donne une langue différente
// de celle du site principal, nous récupérons les éventuelles valeurs traduite pour le site.
if ($_GEN_commun['i18n'] != $_GEN_commun['info_site']->gs_ce_i18n) {
// Récupération des informations sur la traduction du site
$requete = 'SELECT * '.
'FROM gen_site '.
'WHERE gs_ce_i18n = "'.$_GEN_commun['i18n'].'" '.
'AND gs_code_alpha = "'.$_GEN_commun['info_site']->gs_code_alpha.'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
// Nous crééons l'entrée 'traduction_info_site' dans _GEN_commun que si nous avons bien trouvé une
// traduction pour le site. Il faut donc tester l'existence de cette entrée avant de l'utiliser.
if ($resultat->numRows() > 0) {
$_GEN_commun['traduction_info_site'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
}
$resultat->free();
}
// Si le résultat de la négociation de l'internationalisation donne une langue différente
// de celle du menu, nous récupérons les éventuelles valeurs traduite pour le menu.
if ($_GEN_commun['i18n'] != $_GEN_commun['info_menu']->gm_ce_i18n) {
// Récupération des informations sur la traduction du menu
$requete = 'SELECT * '.
'FROM gen_menu '.
'WHERE gm_ce_i18n = "'.$_GEN_commun['i18n'].'" '.
'AND gm_code_alpha = "'.$_GEN_commun['info_menu']->gm_code_alpha.'"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
// Nous crééons l'entrée 'traduction_info_menu' dans _GEN_commun que si nous avons bien trouvé une
// traduction pour le menu. Il faut donc tester l'existence de cette entrée avant de l'utiliser.
if ($resultat->numRows() > 0) {
$_GEN_commun['traduction_info_menu'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
}
$resultat->free();
}
// +------------------------------------------------------------------------------------------------------+
// Gestion de l'application du menu demandé.
// Recherche de la première application liée
$info_appli_menu = GEN_donnerIdPremiereApplicationLiee($_GEN_commun['info_menu']->gm_id_menu);
$id_application = $info_appli_menu['gm_ce_application'];
$id_menu_actif = $info_appli_menu['gm_id_menu'];
// Si le menu n'a pas d'application lié, on recalcule l'objet $_GEN_commun['info_menu']
if ($id_menu_actif != $_GEN_commun['info_menu']->gm_id_menu) {
$requete = 'SELECT gen_menu.* '.
'FROM gen_menu '.
'WHERE gm_id_menu = '.$id_menu_actif;
$resultat = $db->query($requete);
(DB::isError($resultat))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete))
: '';
// Nous avons trouvé un menu "défaut" pour le site courant.
$_GEN_commun['info_menu'] = $resultat->fetchRow(DB_FETCHMODE_OBJECT);
$resultat->free();
}
// Recherche des informations sur l'application liée
$requete_applicaton = 'SELECT * '.
'FROM gen_application '.
'WHERE gap_id_application = '.$id_application;
$resultat_applicaton = $db->query($requete_applicaton);
(DB::isError($resultat_applicaton))
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_applicaton->getMessage(), $requete_applicaton))
: '';
$_GEN_commun['info_application'] = $resultat_applicaton->fetchRow(DB_FETCHMODE_OBJECT) ;
$resultat_applicaton->free() ;
// Gestion des erreurs sur la recherche de l'application liée.
if ( empty($_GEN_commun['info_application']) ) {
die('ERREUR Génésia : application de la page demandée introuvable. <br />'.
'Page : '.$page_id.'<br />'.
'Ligne n° : '. __LINE__ . '<br />'.
'Fichier : '. __FILE__ . '<br />');
}
// +------------------------------------------------------------------------------------------------------+
// Gestion des arguments de l'application
$arguments = explode(' ', $_GEN_commun['info_menu']->gm_application_arguments);
// Initialisaton de la variable globale $GS_ARGUMENTS
$_GEN_commun['info_application']->cache = false;
$_GEN_commun['info_application']->cache_duree = 0;
for ($i = 0; $i < count($arguments); $i++) {
$attr = explode('=', $arguments[$i]);
if ($attr[0] == 'cache_duree') {
$_GEN_commun['info_application']->cache_duree = $attr[1];
if ($_GEN_commun['info_application']->cache_duree > 0) {
$_GEN_commun['info_application']->cache = true;
}
} else if ($attr[0] != '') {
$_GEN_commun['info_application']->$attr[0] = (isset($attr[1]) ? $attr[1] : '');
}
}
// +------------------------------------------------------------------------------------------------------+
// Gestion des applettes
$requete = 'SELECT * '.
'FROM gen_application '.
'WHERE gap_bool_applette = 1 ';
$resultat = $_GEN_commun['pear_db']->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
$_GEN_commun['info_applette'] = array();
$i = 0;
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
$_GEN_commun['info_applette'][$i] = $ligne;
$i++;
}
$resultat->free();
// +------------------------------------------------------------------------------------------------------+
// Gestion de l'objet URL
$_GEN_commun['url'] = & new Net_URL('http://'.$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']);
$_GEN_commun['url']->addQueryString(GEN_URL_CLE_SITE, $_GEN_commun['url_site']);
$_GEN_commun['url']->addQueryString(GEN_URL_CLE_MENU, $_GEN_commun['url_menu']);
if ( (isset($_GEN_commun['url_i18n'])) && (!empty($_GEN_commun['url_i18n'])) ) {
$_GEN_commun['url']->addQueryString(GEN_URL_CLE_I18N, $_GEN_commun['url_i18n']);
}
if ( (isset($_GET[GEN_URL_CLE_DATE])) && (!empty($_GET[GEN_URL_CLE_DATE])) ) {
$_GEN_commun['url_date'] = $_GET[GEN_URL_CLE_DATE];
$_GEN_commun['url']->addQueryString(GEN_URL_CLE_DATE, $_GEN_commun['url_date']);
}
if ( (isset($_GET[GEN_URL_CLE_FORMAT])) && (!empty($_GET[GEN_URL_CLE_FORMAT])) ) {
$_GEN_commun['url_format'] = $_GET[GEN_URL_CLE_FORMAT];
$_GEN_commun['url']->addQueryString(GEN_URL_CLE_DATE, $_GEN_commun['url_format']);
}
/* +--Fin du code ---------------------------------------------------------------------------------------+
* $Log: not supported by cvs2svn $
* Revision 1.5 2004/06/30 07:35:16 jpm
* Correction d'un bogue du à une mauvaise gestion de la résolution des conflits entre fichier CVS.
*
* Revision 1.4 2004/06/30 07:25:37 jpm
* Ajout d'un commentaire.
*
* Revision 1.3 2004/06/18 15:52:45 alex
* Actualisation de la variable $_GEN_commun['info_menu'] lorsque un menu n'a pas d'application lié
*
* Revision 1.2 2004/06/17 07:03:01 jpm
* Correction d'un bogue concernant l'internationalisation par défaut quand la langue du navigateur ne correspond pas à celle du site.
*
* Revision 1.1 2004/06/16 08:13:20 jpm
* Changement de nom de Génésia en Papyrus.
* Changement de l'arborescence.
*
* Revision 1.24 2004/05/05 14:33:37 jpm
* Gestion de l'indication de langue dans l'url.
* Utile que si on veut forcer la langue.
*
* Revision 1.23 2004/05/05 10:42:35 jpm
* Amélioration de la gestion de l'internationalisation.
*
* Revision 1.22 2004/05/04 16:17:05 jpm
* Légère amélioration du code (libération de ressource).
de ressource).
*
* Revision 1.21 2004/05/03 11:21:58 jpm
* Fin de la gestion des applettes et suppression de l'info_menu_hierarchie de _GEN_commun.
* Ajout de la récupération d'une info sur la hiérarchie.
* Surement à supprimer car inutile.
* Ajout de la récupération d'une info sur la hiérarchie.
* Surement à supprimer car inutile.
* Changement du modèle de la base de données.
* Revision 1.19 2004/04/28 12:04:31 jpm
* Changement du modèle de la base de données.
*
* Revision 1.18 2004/04/22 08:28:12 jpm
* Transformation de $GS_GLOBAL en $_GEN_commun.
*
* Revision 1.17 2004/04/09 16:43:32 jpm
* Suppression d'un blanc.
* Récupération de la création de l'objet URL.
* Revision 1.16 2004/04/09 16:20:11 jpm
* Récupération de la création de l'objet URL.
* Gestion des tables i18n.
* Utilisation de la classe Pear HTTP pour la négociation du langage à utiliser pour le site.
* Revision 1.15 2004/04/05 16:37:43 jpm
* Utilisation de la classe Pear HTTP pour la négociation du langage à utiliser pour le site.
* Déplacement dans le fichier gen_initialisation_pear.inc.php de la création des objets Pear Net_URL et Auth.
* Revision 1.14 2004/04/02 16:29:30 jpm
* Déplacement dans le fichier gen_initialisation_pear.inc.php de la création des objets Pear Net_URL et Auth.
*
* Revision 1.13 2004/04/01 11:27:13 jpm
* Ajout et modification de commentaires pour PhpDocumentor.
* Prise en compte du nouveau modèle de Génésia révision 1.9.
* Revision 1.12 2004/03/31 16:50:04 jpm
* Prise en compte du nouveau modèle de Papyrus révision 1.9.
* Déplacement des fonctions de gestion d'erreur dans la bibliotheque de l'application Installateur.
* Modification des commentaires vis à vis du nouveau modèle.
* Déplacement des fonctions de gestion d'erreur dans la bibliotheque de l'application Installateur.
* Suppression de l'attribution d'une configuration par défaut.
* Changement et simplification des noms des variables globales.
* Traduction en français de certaines variables et partie de code.
* Remplacement de variable par des constante provenant du fichier de configuration.
* Traduction en français de certaines variables et partie de code.
* Mise en forme requête sql.
* Revision 1.10 2004/03/24 07:20:03 jpm
* Mise en forme requête sql.
* Ajout de commentaire dans l'entête.
* Mise en conformité avec la convention de codage.
* Ajout de commentaire dans l'entête.
* Mise en conformité avec la convention de codage.
*
* Revision 1.8 2004/03/23 16:31:54 jpm
* Ajout du code provenant de gen_noyau.inc.php.
* Ajout, formatage et traduction des commentaires.
*
* Amélioration de la conformité avec la convention de codage.
* Changement requête sql pour le nouveau modèle de Génésia.
* Amélioration de la conformité avec la convention de codage.
* Changement requête sql pour le nouveau modèle de Papyrus.
*
* Correction des requêtes sql pour mise en conformité avec le nouveau modèle de Génésia et la convention de codage.
* Ajout de commentaires et mise en forme.
* Correction des requêtes sql pour mise en conformité avec le nouveau modèle de Papyrus et la convention de codage.
*
* Revision 1.5 2003/12/16 16:57:59 alex
* mise à jour pour compatibilité avec genesia
* Ajout de commentaires et début de mise en conformité
* Revision 1.4 2003/11/24 16:05:02 jpm
* Ajout de commentaires et début de mise en conformité
* avec la convention de codage.
*
*
* +--Fin du code ----------------------------------------------------------------------------------------+
*/
?>