/trunk/papyrus/applettes/selecteur_sites/selecteur_sites.php |
---|
1,101 → 1,101 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: selecteur_sites.php,v 1.10 2006-10-11 17:20:19 jp_milcent Exp $ |
/** |
* Applette : selecteur sites |
* |
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles. |
* Nécessite : |
* - Constantes et globales de Papyrus. |
* - Base de données de Papyrus |
* - Pear Net_URL |
* - Pear DB |
* - API Débogage 1.0 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: selecteur_sites.php,v 1.11 2006-12-01 16:33:40 florian Exp $ |
/** |
* Applette : selecteur sites |
* |
* Génère un formulaire contenant un menu déroulant permettant de choisir un site parmis les disponibles. |
* Nécessite : |
* - Constantes et globales de Papyrus. |
* - Base de données de Papyrus |
* - Pear Net_URL |
* - Pear DB |
* - API Débogage 1.0 |
* Le nom de l'applette est "SELECTEUR_SITES" pour afficher un formulaire HTML et "SELECTEUR_SITES_XHTML" |
* pour afficher un formulaire XHTML strict. |
* |
*@package Applette |
*@subpackage Selecteur_sites |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.10 $ $Date: 2006-10-11 17:20:19 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
$_GEN_commun['info_applette_nom_fonction'] = 'afficherSelecteurSite'; |
$_GEN_commun['info_applette_balise'] = 'SELECTEUR_SITES_?(XHTML)?_?(SANS_(?:\d+_?)+)?'; |
/** Inclusion du fichier de configuration de cette applette.*/ |
require_once GEN_CHEMIN_APPLETTE.'selecteur_sites/configuration/sesi_config.inc.php'; |
// Inclusion des fichiers de traduction de l'applette. |
if (file_exists(SESI_CHEMIN_LANGUE.'sesi_langue_'.$_GEN_commun['i18n'].'.inc.php')) { |
/** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
require_once SESI_CHEMIN_LANGUE.'sesi_langue_'.$_GEN_commun['i18n'].'.inc.php'; |
} else { |
/** Inclusion du fichier de traduction par défaut.*/ |
require_once SESI_CHEMIN_LANGUE.'sesi_langue_'.SESI_I18N_DEFAUT.'.inc.php'; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonnction GEN_afficherContenuApplette() - Fournit un formulaire de sélection des sites. |
* |
* Renvoie un formulaire permettant de passer de site en site pour une langue donnée. |
* Le formulaire affiche les noms des sites en fonctions de la langue passée dans l'url. |
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction. |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @return string formulaire XHTML contenant les sites disponibles. |
*/ |
function afficherSelecteurSite($tab_applette_arguments, $_GEN_commun) |
{ |
* |
*@package Applette |
*@subpackage Selecteur_sites |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.11 $ $Date: 2006-12-01 16:33:40 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherSelecteurSite'; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(SELECTEUR_SITES_?(XHTML)?_?(SANS_(?:\d+_?)+)?) -->'; |
/** Inclusion du fichier de configuration de cette applette.*/ |
require_once GEN_CHEMIN_APPLETTE.'selecteur_sites'.GEN_SEP.'configuration'.GEN_SEP.'sesi_config.inc.php'; |
// Inclusion des fichiers de traduction de l'applette. |
if (file_exists(SESI_CHEMIN_LANGUE.'sesi_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) { |
/** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
require_once SESI_CHEMIN_LANGUE.'sesi_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php'; |
} else { |
/** Inclusion du fichier de traduction par défaut.*/ |
require_once SESI_CHEMIN_LANGUE.'sesi_langue_'.SESI_I18N_DEFAUT.'.inc.php'; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonnction GEN_afficherContenuApplette() - Fournit un formulaire de sélection des sites. |
* |
* Renvoie un formulaire permettant de passer de site en site pour une langue donnée. |
* Le formulaire affiche les noms des sites en fonctions de la langue passée dans l'url. |
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction. |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @return string formulaire XHTML contenant les sites disponibles. |
*/ |
function afficherSelecteurSite($tab_applette_arguments, $_GEN_commun) |
{ |
// Initialisation de variable de configuration. |
$liste_type_site = '102, 103';// Les id des types des sites pouvant apparaître dans le sélecteur |
$objet_pear_db = $_GEN_commun['pear_db'];//objet Pear créé par DB contenant la connexion à la base de données. |
$code_site = $_GEN_commun['url_site'];//identifiant du site courant. |
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie |
$liste_type_site = '102, 103';// Les id des types des sites pouvant apparaître dans le sélecteur |
$objet_pear_db = $_GEN_commun['pear_db'];//objet Pear créé par DB contenant la connexion à la base de données. |
$code_site = $_GEN_commun['url_site'];//identifiant du site courant. |
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie |
$url_base = PAP_URL; |
$url_cle_site = GEN_URL_CLE_SITE; |
$url_cle_i18n = GEN_URL_CLE_I18N; |
$url_id_type_site = GEN_URL_ID_TYPE_SITE; |
$indent_origine = 12;// Indentation de départ en nombre d'espace |
$indent_pas = 4;// Pas d'indentation en nombre d'espace |
$url_cle_site = GEN_URL_CLE_SITE; |
$url_cle_i18n = GEN_URL_CLE_I18N; |
$url_id_type_site = GEN_URL_ID_TYPE_SITE; |
$indent_origine = 12;// Indentation de départ en nombre d'espace |
$indent_pas = 4;// Pas d'indentation en nombre d'espace |
// Récupérations des arguments passés dans la balise. |
// Nous vérifions si on veut du XHTML strict ou pas |
$bln_xhtml_strict = 0; |
103,7 → 103,7 |
$bln_xhtml_strict = 1; |
} |
// Nous vérifions s'il y a des sites que nous ne voulons pas afficher: |
$morceau_requete_id_suppr = ''; |
$morceau_requete_id_suppr = ''; |
$tab_id_suppr_groupe = ''; |
if (isset($tab_applette_arguments[3]) && ereg('SANS_(.+)', $tab_applette_arguments[3], $tab_id_suppr_groupe)) { |
if (preg_match('/^\d+$/', $tab_id_suppr_groupe[1])) { |
115,130 → 115,130 |
} |
$morceau_requete_id_suppr = 'AND gs_id_site NOT IN ('.$liste_id_suppr.') '; |
} |
// Recherche de tous les sites langue en cours |
// On recherche l'ensemble des site en excluant le site admin ? (administration de Papyrus). |
if (isset($id_langue) && ($id_langue != '')) { |
$langue_test = $id_langue; |
} else { |
$langue_test = GEN_I18N_ID_DEFAUT; |
} |
$requete = 'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '. |
'FROM gen_site, gen_site_relation '. |
'WHERE gsr_id_site_01 = gsr_id_site_02 '. |
'AND gs_id_site = gsr_id_site_01 '. |
'AND gsr_id_valeur IN ('.$liste_type_site.') '. |
'AND gs_ce_i18n = "'.$langue_test.'" '. |
$morceau_requete_id_suppr.// Liste des sites ne devant pas figurer |
'ORDER BY gs_code_num ASC';// 102 = site "principal" et 103 = site "externe" |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
$liste_site = array(); |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) { |
// Si le site trouvé est une traduction vers la langue principale, on ne le selectionne pas |
if ($langue_test == GEN_I18N_ID_DEFAUT) { |
$requete_est_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_02 ' . |
'AND gsr_id_site_01 <> gsr_id_site_02 ' . |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$liste_site[] = $ligne; |
} |
} |
else { |
$liste_site[] = $ligne; |
} |
} |
$resultat->free(); |
// Si la langue en cours n'est pas la langue par défaut, recherche des sites ayant comme langue |
// la langue par defaut et non traduits dans la langue en cours. |
// On recherche l'ensemble des site en excluant le site admin (administration de Papyrus). |
if ($langue_test != GEN_I18N_ID_DEFAUT) { |
// Site ayant commme langue, la langue par defaut |
$requete = 'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '. |
'FROM gen_site, gen_site_relation '. |
'WHERE gsr_id_site_01 = gsr_id_site_02 '. |
'AND gs_id_site = gsr_id_site_01 '. |
'AND gsr_id_valeur IN ('.$liste_type_site.') '. |
'AND gs_ce_i18n = "'.GEN_I18N_ID_DEFAUT.'" '. |
$morceau_requete_id_suppr.// Liste des sites ne devant pas figurer |
'ORDER BY gs_code_num ASC';// 102 = site "principal" et 103 = site "externe" |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
// Est il traduit ? Non, alors affichage |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) { |
if (isset($id_langue) && ($id_langue != '')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$requete_est_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_02 ' . |
'AND gsr_id_site_01 <> gsr_id_site_02 ' . |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$requete_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation, gen_site '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_01 ' . |
'AND gsr_id_site_02 = gs_id_site '. |
'AND gs_ce_i18n = "'.$langue_test.'" '. |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_traduction = $objet_pear_db->query($requete_traduction); |
(DB::isError($resultat_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ( $resultat_traduction->numRows() == 0 ) { |
$liste_site[] = $ligne; |
} |
$resultat_traduction->free(); |
} |
} |
$resultat->free(); |
} |
if (count($liste_site) == 0 ) { |
$retour = str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
'<!-- '.SESI_LG_ETIQUETTE_VALIDER.' -->'; |
} else { |
// Préparation de l'url de retour du formulaire |
$objet_pear_url = & new Net_URL($url_base); |
// Préparation du code du sites |
$champs_code_site = ($url_id_type_site == 'int') ? 'gs_code_num' : 'gs_code_alpha'; |
// Préparation du formulaire |
$retour = str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
// Recherche de tous les sites langue en cours |
// On recherche l'ensemble des site en excluant le site admin ? (administration de Papyrus). |
if (isset($id_langue) && ($id_langue != '')) { |
$langue_test = $id_langue; |
} else { |
$langue_test = GEN_I18N_ID_DEFAUT; |
} |
$requete = 'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '. |
'FROM gen_site, gen_site_relation '. |
'WHERE gsr_id_site_01 = gsr_id_site_02 '. |
'AND gs_id_site = gsr_id_site_01 '. |
'AND gsr_id_valeur IN ('.$liste_type_site.') '. |
'AND gs_ce_i18n = "'.$langue_test.'" '. |
$morceau_requete_id_suppr.// Liste des sites ne devant pas figurer |
'ORDER BY gs_code_num ASC';// 102 = site "principal" et 103 = site "externe" |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
$liste_site = array(); |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) { |
// Si le site trouvé est une traduction vers la langue principale, on ne le selectionne pas |
if ($langue_test == GEN_I18N_ID_DEFAUT) { |
$requete_est_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_02 ' . |
'AND gsr_id_site_01 <> gsr_id_site_02 ' . |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$liste_site[] = $ligne; |
} |
} |
else { |
$liste_site[] = $ligne; |
} |
} |
$resultat->free(); |
// Si la langue en cours n'est pas la langue par défaut, recherche des sites ayant comme langue |
// la langue par defaut et non traduits dans la langue en cours. |
// On recherche l'ensemble des site en excluant le site admin (administration de Papyrus). |
if ($langue_test != GEN_I18N_ID_DEFAUT) { |
// Site ayant commme langue, la langue par defaut |
$requete = 'SELECT gs_id_site, gs_code_num, gs_code_alpha, gs_nom, gs_ce_i18n '. |
'FROM gen_site, gen_site_relation '. |
'WHERE gsr_id_site_01 = gsr_id_site_02 '. |
'AND gs_id_site = gsr_id_site_01 '. |
'AND gsr_id_valeur IN ('.$liste_type_site.') '. |
'AND gs_ce_i18n = "'.GEN_I18N_ID_DEFAUT.'" '. |
$morceau_requete_id_suppr.// Liste des sites ne devant pas figurer |
'ORDER BY gs_code_num ASC';// 102 = site "principal" et 103 = site "externe" |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
// Est il traduit ? Non, alors affichage |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_ASSOC)) { |
if (isset($id_langue) && ($id_langue != '')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$requete_est_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_02 ' . |
'AND gsr_id_site_01 <> gsr_id_site_02 ' . |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$requete_traduction = 'SELECT gsr_id_site_01 '. |
'FROM gen_site_relation, gen_site '. |
'WHERE '.$ligne['gs_id_site'].' = gsr_id_site_01 ' . |
'AND gsr_id_site_02 = gs_id_site '. |
'AND gs_ce_i18n = "'.$langue_test.'" '. |
'AND gsr_id_valeur = 1 ';// 1 = "avoir traduction" |
$resultat_traduction = $objet_pear_db->query($requete_traduction); |
(DB::isError($resultat_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ( $resultat_traduction->numRows() == 0 ) { |
$liste_site[] = $ligne; |
} |
$resultat_traduction->free(); |
} |
} |
$resultat->free(); |
} |
if (count($liste_site) == 0 ) { |
$retour = str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
'<!-- '.SESI_LG_ETIQUETTE_VALIDER.' -->'; |
} else { |
// Préparation de l'url de retour du formulaire |
$objet_pear_url = & new Net_URL($url_base); |
// Préparation du code du sites |
$champs_code_site = ($url_id_type_site == 'int') ? 'gs_code_num' : 'gs_code_alpha'; |
// Préparation du formulaire |
$retour = str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
'<form id="sesi_selecteur" '; |
// Test sur XHTML strict |
if ($bln_xhtml_strict == 0) { |
245,49 → 245,52 |
$retour .= 'name="sesi_selecteur" '; |
} |
$retour .= 'action="'.$objet_pear_url->getURL().'" method="get">'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'<fieldset>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'<fieldset>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'<legend>'.SESI_LG_LEGENDE.'</legend>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'<select id="sesi_'.$url_cle_site.'" name="'.$url_cle_site.'" onchange="javascript:this.form.submit();">'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 3)). |
'<option value="'.$code_site.'" selected="selected">'.SESI_LG_DEFAUT.'</option>'."\n"; |
foreach ($liste_site as $ligne ) { |
// Initialisation des variables |
$nom = $ligne['gs_nom']; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 3)). |
'<option value="'.$ligne[$champs_code_site].'">'.$nom.'</option>'."\n"; |
} |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'</select>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'<input id="sesi_ok" name="sesi_ok" type="submit" value="'.SESI_LG__VALIDER.'"/>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'</fieldset>'."\n"; |
if ($langue_test != GEN_I18N_ID_DEFAUT) { |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'<input name="'.$url_cle_i18n.'" type="hidden" value="'.$id_langue.'"/>'."\n"; |
} |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
'</form>'."\n"; |
} |
return $retour; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'<select id="sesi_'.$url_cle_site.'" name="'.$url_cle_site.'" onchange="javascript:this.form.submit();">'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 3)). |
'<option value="'.$code_site.'" selected="selected">'.SESI_LG_DEFAUT.'</option>'."\n"; |
foreach ($liste_site as $ligne ) { |
// Initialisation des variables |
$nom = $ligne['gs_nom']; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 3)). |
'<option value="'.$ligne[$champs_code_site].'">'.$nom.'</option>'."\n"; |
} |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'</select>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 2)). |
'<input id="sesi_ok" name="sesi_ok" type="submit" value="'.SESI_LG__VALIDER.'"/>'."\n"; |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'</fieldset>'."\n"; |
if ($langue_test != GEN_I18N_ID_DEFAUT) { |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 1)). |
'<input name="'.$url_cle_i18n.'" type="hidden" value="'.$id_langue.'"/>'."\n"; |
} |
$retour .= str_repeat(' ', $indent_origine + ($indent_pas * 0)). |
'</form>'."\n"; |
} |
return $retour; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.10 2006/10/11 17:20:19 jp_milcent |
* Formatage du code. |
* |
* Revision 1.9 2006/04/28 12:41:49 florian |
* corrections erreurs chemin |
* |
330,20 → 333,20 |
* |
* Revision 1.5 2004/05/05 08:27:12 jpm |
* Ajout du paramétrage de l'indentation et l'utilisation de variable pour contenir les textes de l'appli. |
* |
* Revision 1.4 2004/05/05 06:44:28 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.3 2004/05/03 11:19:10 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.2 2004/05/01 16:13:11 jpm |
* Ajout du nom de la balise de l'applette dans le code de l'applette. |
* |
* Revision 1.1 2004/05/01 10:30:59 jpm |
* Ajout de l'applette selecteur de sites. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
* |
* Revision 1.4 2004/05/05 06:44:28 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.3 2004/05/03 11:19:10 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.2 2004/05/01 16:13:11 jpm |
* Ajout du nom de la balise de l'applette dans le code de l'applette. |
* |
* Revision 1.1 2004/05/01 10:30:59 jpm |
* Ajout de l'applette selecteur de sites. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |
/trunk/papyrus/applettes/moteur_recherche/moteur_recherche.php |
---|
21,7 → 21,7 |
// | along with Foobar; if not, write to the Free Software | |
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA | |
// +------------------------------------------------------------------------------------------------------+ |
// CVS : $Id: moteur_recherche.php,v 1.16 2006-11-20 09:36:59 jp_milcent Exp $ |
// CVS : $Id: moteur_recherche.php,v 1.17 2006-12-01 16:33:40 florian Exp $ |
/** |
* Applette : moteur de recherche |
* |
38,7 → 38,7 |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.16 $ $Date: 2006-11-20 09:36:59 $ |
*@version $Revision: 1.17 $ $Date: 2006-12-01 16:33:40 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
46,7 → 46,7 |
// | ENTETE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherMoteurRecherche'; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = 'MOTEUR_RECHERCHE'; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(MOTEUR_RECHERCHE) -->'; |
// -------------------------------------------------------------------------------------------------------- |
//Utilisation de la bibliothèque Papyrus pap_meta.fonct.php inclue par Papyrus |
55,10 → 55,8 |
require_once GEN_CHEMIN_APPLETTE.'moteur_recherche/configuration/more_configuration.inc.php'; |
/** Inclusion du fichier de configuration des Spip.*/ |
require_once GEN_CHEMIN_APPLETTE.'moteur_recherche/configuration/more_config_spip.inc.php'; |
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/ |
require_once MORE_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm.php'; |
// Inclusion des fichiers de traduction de l'appli ADME dePapyrus |
// Inclusion des fichiers de traduction de l'appli ADME de Papyrus |
if (file_exists(MORE_CHEMIN_LANGUE.'more_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) { |
/** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
require_once MORE_CHEMIN_LANGUE.'more_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php'; |
209,6 → 207,9 |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.16 2006/11/20 09:36:59 jp_milcent |
* Correction bogue zéro résultat et ajout d'url simple pour indiquer la page de l'article. |
* |
* Revision 1.15 2006/11/14 16:10:13 jp_milcent |
* Extraction du XHTML et utilisation de squelettes à la place. |
* Possibilité de configurer le squlette voulu via le fichier de conf. |
/trunk/papyrus/applettes/menu/menu.php |
---|
1,94 → 1,94 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: menu.php,v 1.30 2006-11-27 13:47:23 florian Exp $ |
/** |
* Applette : menu |
* |
* Génère une liste de listes comportant tous les niveaux des menus "classiques" d'un site. |
* Nécessite : |
* - Variable de Papyrus. |
* - Base de données de Papyrus |
* - Pear DB |
* - Pear Net_URL |
* - API Débogage 1.0 |
* |
*@package Applette |
*@subpackage Menu |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.30 $ $Date: 2006-11-27 13:47:23 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: menu.php,v 1.31 2006-12-01 16:33:40 florian Exp $ |
/** |
* Applette : menu |
* |
* Génère une liste de listes comportant tous les niveaux des menus "classiques" d'un site. |
* Nécessite : |
* - Variable de Papyrus. |
* - Base de données de Papyrus |
* - Pear DB |
* - Pear Net_URL |
* - API Débogage 1.0 |
* |
*@package Applette |
*@subpackage Menu |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.31 $ $Date: 2006-12-01 16:33:40 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// Inclusion de la bibliothèque defonction sur les menu : inutile car inclue par Papyrus |
require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php'; |
$GLOBALS['_MENU_']['nom_fonction'] = 'afficherMenuNiveauMultiple'; |
$_GEN_commun['info_applette_nom_fonction'] = $GLOBALS['_MENU_']['nom_fonction']; |
$_GEN_commun['info_applette_balise'] = 'MENU_?(?:(|CLASSIQUE|COMMUN|DEROULANT)_([0-9]+)_([0-9]+)(|_ID_([0-9]+))|(UNIQUE)_([0-9]+))(?:|_NUMID_([0-9]+))'; |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction GEN_afficherMenuNiveauMultiple() - Retourne la liste des listes de menus. |
* |
* Cette fonction retourne ne fait qu'encapsuler une fonction récursive |
* retournant les listes de menus de l'arborescence d'un site dans une |
* langue donnée. |
* |
* @param array contient les arguments de la fonction en 1 le niveau de départ et en 2 le niveau d'arrivée (profondeur max demandée). |
* @param array tableau global de Papyrus. |
* @return string HTML la liste des listes de menus. |
*/ |
function afficherMenuNiveauMultiple($tab_applette_arguments, $_GEN_commun) |
{ |
// Initialisation de variable. |
$objet_pear_db = $_GEN_commun['pear_db']; |
$id_site = $_GEN_commun['info_site']->gs_id_site; |
if (isset($_GEN_commun['info_menu'])) { |
$id_menu = $_GEN_commun['info_menu']->gm_id_menu; |
$GLOBALS['_MENU_']['nom_fonction'] = 'afficherMenuNiveauMultiple'; |
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = $GLOBALS['_MENU_']['nom_fonction']; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(MENU_?(?:(|CLASSIQUE|COMMUN|DEROULANT)_([0-9]+)_([0-9]+)(|_ID_([0-9]+))|(UNIQUE)_([0-9]+))(?:|_NUMID_([0-9]+))) -->'; |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction GEN_afficherMenuNiveauMultiple() - Retourne la liste des listes de menus. |
* |
* Cette fonction retourne ne fait qu'encapsuler une fonction récursive |
* retournant les listes de menus de l'arborescence d'un site dans une |
* langue donnée. |
* |
* @param array contient les arguments de la fonction en 1 le niveau de départ et en 2 le niveau d'arrivée (profondeur max demandée). |
* @param array tableau global de Papyrus. |
* @return string HTML la liste des listes de menus. |
*/ |
function afficherMenuNiveauMultiple($tab_applette_arguments, $_GEN_commun) |
{ |
// Initialisation de variable. |
$objet_pear_db = $_GEN_commun['pear_db']; |
$id_site = $_GEN_commun['info_site']->gs_id_site; |
if (isset($_GEN_commun['info_menu'])) { |
$id_menu = $_GEN_commun['info_menu']->gm_id_menu; |
} |
$num_menu = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_MENU_']['nom_fonction']]; |
$indent_origine = 12;// Indentation de départ en nombre d'espace |
$indent_pas = 4;// Pas d'indentation en nombre d'espace |
$num_menu = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_MENU_']['nom_fonction']]; |
$indent_origine = 12;// Indentation de départ en nombre d'espace |
$indent_pas = 4;// Pas d'indentation en nombre d'espace |
$niveau_depart = 1; |
// Récupérations des arguments passés dans la balise. |
// Récupérations des arguments passés dans la balise. |
// Pour les menus CLASSIQUE et COMMUN |
$balise = $tab_applette_arguments[1]; |
$menu_type = $tab_applette_arguments[2]; |
$niveau_depart = $tab_applette_arguments[3]; |
$niveau_depart = $tab_applette_arguments[3]; |
$profondeur = $tab_applette_arguments[4]; |
if (isset($tab_applette_arguments[5]) && !empty($tab_applette_arguments[5])) { |
$menu_depart = $tab_applette_arguments[6]; |
126,11 → 126,11 |
default: |
$menu_type = 'classique'; |
} |
//Construction du menu |
//Construction du menu |
$xhtml_menu = afficherListeNiveauMultiple( $objet_pear_db, $id_site,$niveau_depart, |
$profondeur, $menu_depart, 1, $menu_type, $indent_origine, |
$indent_pas, $_GEN_commun, $num_menu); |
$indent_pas, $_GEN_commun, $num_menu); |
// Si le menu est déroulant il faut stocker un peu de javascript pour IE |
if ($menu_type == 'deroulant') { |
146,67 → 146,67 |
} |
} |
if (window.attachEvent) window.attachEvent("onload", sfHover);') ; |
} |
//Si nous avons un |
if (! empty($xhtml_menu)) { |
$retour = $xhtml_menu; |
} else { |
$retour = '<!-- '.$balise.' : aucun menu trouvé ! -->'; |
} |
return $retour; |
} |
/** Fonction afficherListeNiveauMultiple() - Affiche une arborescence des menu classiques d'un site. |
* |
* Créé et retourne une liste pour chaque niveau de menu classique trouvé dans l'arborescence |
* des menus d'un site dans une langue donnée. |
* C'est une fonction récursive. |
* |
* @param mixed objet Pear DB de connexion à la base de données. |
* @param integer identifiant d'un site. |
* @param integer identifiant de la langue demandée. |
* @param integer niveau de départ. |
* @param integer niveau d'arrivée (profondeur max demandée). |
* @param integer identifiant d'un menu pére. |
* @return string les listes de menus au format XHTML. |
*/ |
} |
//Si nous avons un |
if (! empty($xhtml_menu)) { |
$retour = $xhtml_menu; |
} else { |
$retour = '<!-- '.$balise.' : aucun menu trouvé ! -->'; |
} |
return $retour; |
} |
/** Fonction afficherListeNiveauMultiple() - Affiche une arborescence des menu classiques d'un site. |
* |
* Créé et retourne une liste pour chaque niveau de menu classique trouvé dans l'arborescence |
* des menus d'un site dans une langue donnée. |
* C'est une fonction récursive. |
* |
* @param mixed objet Pear DB de connexion à la base de données. |
* @param integer identifiant d'un site. |
* @param integer identifiant de la langue demandée. |
* @param integer niveau de départ. |
* @param integer niveau d'arrivée (profondeur max demandée). |
* @param integer identifiant d'un menu pére. |
* @return string les listes de menus au format XHTML. |
*/ |
function afficherListeNiveauMultiple( &$objet_pear_db, $id_site, $niveau_depart, $profondeur, |
$id_pere_menu_a_deployer, $position, $menu_type, $indent_origine = 12, |
$indent_pas = 4, $_GEN_commun, $num_menu) |
{ |
// Initialisation des variables |
static $niveau_actuel = 1; |
$indent_pas = 4, $_GEN_commun, $num_menu) |
{ |
// Initialisation des variables |
static $niveau_actuel = 1; |
$retour = ''; |
$tete = ''; |
$corps = ''; |
$pied = ''; |
$i18n_url = '' ; |
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie |
if ($id_langue != GEN_I18N_ID_DEFAUT) { |
$i18n_url=$id_langue; |
} |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$pied = ''; |
$i18n_url = '' ; |
$id_langue = $_GEN_commun['i18n'];//identifiant de la langue choisie |
if ($id_langue != GEN_I18N_ID_DEFAUT) { |
$i18n_url=$id_langue; |
} |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
// Récupération des infos sur sur l'entrée du menu à afficher |
$menu_info = GEN_lireInfoMenu($objet_pear_db, $id_pere_menu_a_deployer, DB_FETCHMODE_ASSOC); |
// Gestion des menus uniques |
// Gestion des menus uniques |
if ($menu_type == 'unique' && ($menu_info['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($menu_info['gm_date_fin_validite']) > time() )) { |
$retour .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url, |
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu); |
// Dans le cas, d'un menu unique, on retourne directement le résultat ici. |
return $retour; |
} |
// On affiche un menu que si $profondeur <= $niveau_actuel <= $depart |
if ($niveau_actuel > $profondeur) { |
return null; |
} |
// On affiche un menu que si $profondeur <= $niveau_actuel <= $depart |
if ($niveau_actuel > $profondeur) { |
return null; |
} |
// Nous regardons si nous devons afficher un menu racine |
218,32 → 218,32 |
$classe = 'menu_actif'; |
} else { |
$classe = 'menu_inactif'; |
} |
} |
// Pour un menu dont on spécifie l'identifiant du menu départ, on affiche ce menu. |
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))). |
'<li id="menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="'.$classe.'">'."\n"; |
$corps .= afficherEntreeListeMenu( $objet_pear_db, $id_pere_menu_a_deployer, $i18n_url, |
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu); |
$niveau_actuel, 1, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu); |
} |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
$tete .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))). |
'<ul id="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n"; |
'<ul id="groupe_menu_'.$num_menu.'_'.$id_pere_menu_a_deployer.'" class="menu_'.$menu_type.'_'.'n'.$niveau_actuel.'">'."\n"; |
} |
$requete = 'SELECT gm_id_menu, gm_date_fin_validite, GMR01.gmr_ordre, gm_nom '. |
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '. |
'WHERE GMR01.gmr_id_menu_01 = gm_id_menu '. |
'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père" |
'AND GMR02.gmr_id_menu_02 = gm_id_menu '. |
'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '. |
$requete = 'SELECT gm_id_menu, gm_date_fin_validite, GMR01.gmr_ordre, gm_nom '. |
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '. |
'WHERE GMR01.gmr_id_menu_01 = gm_id_menu '. |
'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père" |
'AND GMR02.gmr_id_menu_02 = gm_id_menu '. |
'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 '. |
'AND gm_ce_i18n = "'.GEN_I18N_ID_DEFAUT.'" '; |
$requete .= 'AND GMR01.gmr_id_menu_02 = '.$id_pere_menu_a_deployer.' '; |
if ($menu_type == 'classique' || $menu_type == 'deroulant') { |
if ($menu_type == 'classique' || $menu_type == 'deroulant') { |
$requete .= 'AND gm_ce_site = '.$id_site.' '. |
'AND GMR02.gmr_id_valeur = 100 '.// 100 = type "menu classique" |
'ORDER BY GMR01.gmr_ordre ASC'; |
252,62 → 252,62 |
'AND GMR02.gmr_id_valeur = 102 '.// 102 = type "menu commun" |
'ORDER BY GMR01.gmr_ordre ASC'; |
} |
//$GLOBALS['_GEN_commun']['debogage_info'] .= $requete; |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
$liste_menu=array(); |
// On ne retient pas les menus qui sont des traductions ... |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) { |
if ($langue_test == GEN_I18N_ID_DEFAUT) { |
// Le menu n'est pas une traduction : on le traite |
$requete_est_traduction = 'SELECT gmr_id_menu_01 '. |
'FROM gen_menu_relation '. |
'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_02 ' . |
'AND gmr_id_menu_01 <> gmr_id_menu_02 '. |
'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$liste_menu[]=$ligne; |
} |
} |
// Par defaut, on traite tous les menus trouvés |
else { |
$liste_menu[]=$ligne; |
} |
} |
if (!function_exists('cmp')) { |
function cmp($a, $b) { |
if ($a->gmr_ordre == $b->gmr_ordre) { |
return 0; |
} |
return ($a->gmr_ordre < $b->gmr_ordre) ? -1 : 1; |
} |
} |
usort ($liste_menu,"cmp"); |
foreach ($liste_menu as $ligne) { |
//$GLOBALS['_GEN_commun']['debogage_info'] .= $requete; |
$resultat = $objet_pear_db->query($requete); |
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : ''; |
$liste_menu=array(); |
// On ne retient pas les menus qui sont des traductions ... |
while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) { |
if ($langue_test == GEN_I18N_ID_DEFAUT) { |
// Le menu n'est pas une traduction : on le traite |
$requete_est_traduction = 'SELECT gmr_id_menu_01 '. |
'FROM gen_menu_relation '. |
'WHERE '.$ligne->gm_id_menu.' = gmr_id_menu_02 ' . |
'AND gmr_id_menu_01 <> gmr_id_menu_02 '. |
'AND gmr_id_valeur = 2 ';// 2 = "avoir traduction" |
$resultat_est_traduction = $objet_pear_db->query($requete_est_traduction); |
(DB::isError($resultat_est_traduction)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_est_traduction->getMessage(), $requete_est_traduction)) |
: ''; |
if ( $resultat_est_traduction->numRows() == 0 ) { |
$liste_menu[]=$ligne; |
} |
} |
// Par defaut, on traite tous les menus trouvés |
else { |
$liste_menu[]=$ligne; |
} |
} |
if (!function_exists('cmp')) { |
function cmp($a, $b) { |
if ($a->gmr_ordre == $b->gmr_ordre) { |
return 0; |
} |
return ($a->gmr_ordre < $b->gmr_ordre) ? -1 : 1; |
} |
} |
usort ($liste_menu,"cmp"); |
foreach ($liste_menu as $ligne) { |
//while ($ligne = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) { |
if ($ligne->gm_date_fin_validite == '' || $ligne->gm_date_fin_validite == '0000-00-00 00:00:00' || strtotime($ligne->gm_date_fin_validite) > time()) { |
// On commence par regarder si le menu existe dans la langue demandée |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
if ($ligne->gm_date_fin_validite == '' || $ligne->gm_date_fin_validite == '0000-00-00 00:00:00' || strtotime($ligne->gm_date_fin_validite) > time()) { |
// On commence par regarder si le menu existe dans la langue demandée |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
$id_menu_inf = $ligne->gm_id_menu; |
$id_menu_inf = $ligne->gm_id_menu; |
$id_menu_selectionne = ''; |
if (isset($GLOBALS['_GEN_commun']['info_menu']->gm_id_menu)) { |
$id_menu_selectionne = $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu; |
317,29 → 317,29 |
$classe = 'menu_actif'; |
} else { |
$classe = 'menu_inactif'; |
} |
} |
$tmp= afficherEntreeListeMenu( $objet_pear_db, $id_menu_inf, $niveau_actuel, |
$ligne->gmr_ordre, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu); |
// Affichage du menu |
$ligne->gmr_ordre, $position, $menu_type, $indent_origine, $indent_pas, $_GEN_commun, $num_menu); |
// Affichage du menu |
if ($tmp!='') { |
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))). |
'<li id="menu_'.$num_menu.'_'.$id_menu_inf.'" class="'.$classe.'">'."\n"; |
$corps .= $tmp; |
$corps .= $tmp; |
} |
} |
// Pour chaque menu on regarde s'il y a des fils. Si oui, on les déploie. |
$requete_fils = 'SELECT gm_id_menu '. |
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '. |
'WHERE GMR01.gmr_id_menu_02 = '.$ligne->gm_id_menu.' '. |
'AND GMR01.gmr_id_menu_01 = gm_id_menu '. |
'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père" |
'AND GMR02.gmr_id_menu_02 = gm_id_menu '. |
'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 ' ; |
} |
// Pour chaque menu on regarde s'il y a des fils. Si oui, on les déploie. |
$requete_fils = 'SELECT gm_id_menu '. |
'FROM gen_menu, gen_menu_relation AS GMR01, gen_menu_relation AS GMR02 '. |
'WHERE GMR01.gmr_id_menu_02 = '.$ligne->gm_id_menu.' '. |
'AND GMR01.gmr_id_menu_01 = gm_id_menu '. |
'AND GMR01.gmr_id_valeur = 1 '.// 1 = "avoir père" |
'AND GMR02.gmr_id_menu_02 = gm_id_menu '. |
'AND GMR02.gmr_id_menu_01 = GMR02.gmr_id_menu_02 ' ; |
if ($menu_type == 'classique') { |
$requete_fils .='AND GMR02.gmr_id_valeur = 100 ' ;// 100 = type "menu classique" |
} |
346,21 → 346,21 |
if ($menu_type == 'commun') { |
$requete_fils .='AND GMR02.gmr_id_valeur = 102 '; // 102 = type "menu commun" |
} |
$requete_fils .= 'ORDER BY GMR01.gmr_ordre ASC LIMIT 0,1'; |
$resultat_fils = $objet_pear_db->query($requete_fils); |
(DB::isError($resultat_fils)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils)) |
: ''; |
if (isset($_GEN_commun['info_menu'])) { |
$requete_fils .= 'ORDER BY GMR01.gmr_ordre ASC LIMIT 0,1'; |
$resultat_fils = $objet_pear_db->query($requete_fils); |
(DB::isError($resultat_fils)) |
? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_fils->getMessage(), $requete_fils)) |
: ''; |
if (isset($_GEN_commun['info_menu'])) { |
if ($resultat_fils->numRows() != 0 && $ligne->gm_id_menu == $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu |
|| GEN_etreAncetre($ligne->gm_id_menu, $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu) || $menu_type == 'deroulant') { |
$niveau_actuel++; |
|| GEN_etreAncetre($ligne->gm_id_menu, $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu) || $menu_type == 'deroulant') { |
$niveau_actuel++; |
$corps .= afficherListeNiveauMultiple( $objet_pear_db, $id_site, $niveau_depart, |
$profondeur, $ligne->gm_id_menu, ($position + 3), $menu_type, |
null, null, $_GEN_commun, $num_menu); |
// On ramène $niveau_actuel un cran plus bas |
null, null, $_GEN_commun, $num_menu); |
// On ramène $niveau_actuel un cran plus bas |
$niveau_actuel--; |
} |
} |
368,15 → 368,15 |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))).'</li>'."\n"; |
} |
$resultat_fils->free(); |
} |
} |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position+ 1)).'</ul>'."\n"; |
} |
} |
if ($niveau_actuel >= $niveau_depart && $niveau_actuel <= $profondeur) { |
$pied .= str_repeat(' ', $indent_origine + ($indent_pas * $position+ 1)).'</ul>'."\n"; |
} |
// Nous regardons si nous avons affiché le menu racine |
if ($id_pere_menu_a_deployer != 0 && $niveau_actuel == 1) { |
$corps .= str_repeat(' ', $indent_origine + ($indent_pas * ($position + 1))).'</li>'."\n"; |
388,89 → 388,89 |
} else { |
$retour = $tete.$corps.$pied; |
return $retour; |
} |
} |
/** Fonction afficherEntreeListeMenu() - Contruit une entrée dans une liste du menu d'un site. |
* |
* Cette fonction retourne une entrée dans la liste du menu d'un site (<a></a>). |
* Le menu est un lien. |
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction. |
* |
* @param mixed objet Pear DB de connexion à la base de données. |
* @param integer niveau du menu. |
* @param integer ordre du menu dans le niveau. |
* @return string liste représentant le menu duHTML |
* |
* $menu_id : identifiant du menu (!= code menu) |
*/ |
function afficherEntreeListeMenu($db, $menu_id, $niveau, $ordre, $position, $menu_type, $indent_origine = 12, $indent_pas = 4, $_GEN_commun, $num_menu) |
{ |
$id_langue = $GLOBALS['_GEN_commun']['i18n']; |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '. |
'FROM gen_menu_relation, gen_menu '. |
'WHERE '.$menu_id.' = gmr_id_menu_01 ' . |
'AND gmr_id_menu_02 = gm_id_menu '. |
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction" |
'AND gm_ce_i18n = "'.$langue_test.'" '; |
$resultat_traduction = $db->query($requete_traduction); |
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ($resultat_traduction->numRows() > 0) { |
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_id=$ligne_resultat_traduction['gmr_id_menu_02']; |
} |
else { |
// Ne sont affichés que les traductions par defaut des menus |
// non traduits |
// Ici : pas de traduction |
if ($langue_test!=GEN_I18N_ID_DEFAUT) { |
$requete_defaut = 'SELECT gmr_id_menu_02 '. |
'FROM gen_menu_relation '. |
'WHERE '.$menu_id. ' = gmr_id_menu_01 ' . |
'AND gmr_id_valeur = 105 ';// 105 Traduction par defaut |
$resultat_defaut = $db->query($requete_defaut); |
(DB::isError($resultat_defaut)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_defaut->getMessage(), $requete_defaut)) |
: ''; |
if ($resultat_defaut->numRows() > 0) { |
$ligne_resultat_defaut=$resultat_defaut->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_id=$ligne_resultat_defaut['gmr_id_menu_02']; |
} |
} |
} |
} |
} |
/** Fonction afficherEntreeListeMenu() - Contruit une entrée dans une liste du menu d'un site. |
* |
* Cette fonction retourne une entrée dans la liste du menu d'un site (<a></a>). |
* Le menu est un lien. |
* Necessite l'utilisation de Pear Net_URL par le programme appelant cette fonction. |
* |
* @param mixed objet Pear DB de connexion à la base de données. |
* @param integer niveau du menu. |
* @param integer ordre du menu dans le niveau. |
* @return string liste représentant le menu duHTML |
* |
* $menu_id : identifiant du menu (!= code menu) |
*/ |
function afficherEntreeListeMenu($db, $menu_id, $niveau, $ordre, $position, $menu_type, $indent_origine = 12, $indent_pas = 4, $_GEN_commun, $num_menu) |
{ |
$id_langue = $GLOBALS['_GEN_commun']['i18n']; |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '. |
'FROM gen_menu_relation, gen_menu '. |
'WHERE '.$menu_id.' = gmr_id_menu_01 ' . |
'AND gmr_id_menu_02 = gm_id_menu '. |
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction" |
'AND gm_ce_i18n = "'.$langue_test.'" '; |
$resultat_traduction = $db->query($requete_traduction); |
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ($resultat_traduction->numRows() > 0) { |
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_id=$ligne_resultat_traduction['gmr_id_menu_02']; |
} |
else { |
// Ne sont affichés que les traductions par defaut des menus |
// non traduits |
// Ici : pas de traduction |
if ($langue_test!=GEN_I18N_ID_DEFAUT) { |
$requete_defaut = 'SELECT gmr_id_menu_02 '. |
'FROM gen_menu_relation '. |
'WHERE '.$menu_id. ' = gmr_id_menu_01 ' . |
'AND gmr_id_valeur = 105 ';// 105 Traduction par defaut |
$resultat_defaut = $db->query($requete_defaut); |
(DB::isError($resultat_defaut)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_defaut->getMessage(), $requete_defaut)) |
: ''; |
if ($resultat_defaut->numRows() > 0) { |
$ligne_resultat_defaut=$resultat_defaut->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_id=$ligne_resultat_defaut['gmr_id_menu_02']; |
} |
} |
} |
// Récupération des infos sur sur l'entrée du menu à afficher |
$menu_info = GEN_lireInfoMenu($db, $menu_id, DB_FETCHMODE_ASSOC); |
// Préparation d'une entrée dans la liste du menu |
$menu_nom = htmlentities($menu_info['gm_nom']); |
if (trim($menu_nom)=='') return ''; |
// Préparation d'une entrée dans la liste du menu |
$menu_nom = htmlentities($menu_info['gm_nom']); |
if (trim($menu_nom)=='') return ''; |
$menu_accesskey = ''; |
$raccourci_txt = ''; |
if (($menu_accesskey = htmlentities($menu_info['gm_raccourci_clavier'])) != '') { |
481,27 → 481,30 |
if (($menu_texte_title = htmlentities($menu_info['gm_description_resume'])) != '') { |
$menu_texte_title = 'title="'.$raccourci_txt.$menu_texte_title.'" ';; |
} |
$une_url =& new Pap_URL(PAP_URL); |
$une_url->setId($menu_id); |
if (isset($i18n) && ($i18n!='')) { |
$une_url->addQuerystring(GEN_URL_CLE_I18N,$i18n); |
} |
$une_url->setId($menu_id); |
if (isset($i18n) && ($i18n!='')) { |
$une_url->addQuerystring(GEN_URL_CLE_I18N,$i18n); |
} |
//Création d'une entrée dans la liste du menu |
$espaces = str_repeat(' ', $indent_origine + ($indent_pas * ($position + 2))); |
$retour = $espaces.'<a id="menu_lien_'.$num_menu.'_'.$menu_id.'" href="'.$une_url->getURL().'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a>'."\n"; |
return $retour; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.30 2006/11/27 13:47:23 florian |
* ajout de la touche alt pour les raccourcis |
* |
* Revision 1.29 2006/10/16 15:49:46 ddelon |
* Refactorisation code mulitlinguisme et gestion menu invisibles |
* |
600,32 → 603,32 |
* Revision 1.10 2004/05/05 14:33:04 jpm |
* Gestion de l'indication de langue dans l'url. |
* Utile que si on veut forcer la langue. |
* |
* Revision 1.8 2004/05/05 06:44:19 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.7 2004/05/04 14:19:37 jpm |
* Mise entre guillemet simple d'un texte. |
* |
* Revision 1.6 2004/05/03 14:11:01 jpm |
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia INUTILE! |
* |
* Revision 1.5 2004/05/03 14:09:32 jpm |
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia. |
* |
* Revision 1.4 2004/05/03 11:19:00 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.3 2004/05/03 08:52:44 jpm |
* Modification pour intégrer les sous listes (ul) de menus à l'intèrieur de l'entrée (li) du menu supérieur. |
* |
* Revision 1.2 2004/05/01 17:22:23 jpm |
* Changement de nom de l'applette dans les commentaires. |
* |
* Revision 1.1 2004/05/01 16:12:39 jpm |
* Ajout de l'applette gérant les menus multi niveaux ou niveau unique. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
* |
* Revision 1.8 2004/05/05 06:44:19 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.7 2004/05/04 14:19:37 jpm |
* Mise entre guillemet simple d'un texte. |
* |
* Revision 1.6 2004/05/03 14:11:01 jpm |
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia INUTILE! |
* |
* Revision 1.5 2004/05/03 14:09:32 jpm |
* Intégration du fichier bibliothèquie de fonctions sur gen_menu provenant de la bibliothèque de Génésia. |
* |
* Revision 1.4 2004/05/03 11:19:00 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.3 2004/05/03 08:52:44 jpm |
* Modification pour intégrer les sous listes (ul) de menus à l'intèrieur de l'entrée (li) du menu supérieur. |
* |
* Revision 1.2 2004/05/01 17:22:23 jpm |
* Changement de nom de l'applette dans les commentaires. |
* |
* Revision 1.1 2004/05/01 16:12:39 jpm |
* Ajout de l'applette gérant les menus multi niveaux ou niveau unique. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |
/trunk/papyrus/applettes/identification/identification.php |
---|
1,182 → 1,182 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: identification.php,v 1.25 2006-11-20 18:40:33 jp_milcent Exp $ |
/** |
* Applette : identification |
* |
* Génère un formulaire les champs nécessaires pour s'identifier. |
* Nécessite : |
* - Variable globale de Génésia. |
* - Pear Auth |
* - Pear Net_URL |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: identification.php,v 1.26 2006-12-01 16:33:40 florian Exp $ |
/** |
* Applette : identification |
* |
* Génère un formulaire les champs nécessaires pour s'identifier. |
* Nécessite : |
* - Variable globale de Génésia. |
* - Pear Auth |
* - Pear Net_URL |
* |
* A faire : remplacer le formulaire par un QuickForm |
* |
*@package Applette |
*@subpackage Identification |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.25 $ $Date: 2006-11-20 18:40:33 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
$_GEN_commun['info_applette_nom_fonction'] = 'afficherFormIdentification'; |
$_GEN_commun['info_applette_balise'] = 'IDENTIFICATION'; |
* |
*@package Applette |
*@subpackage Identification |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.26 $ $Date: 2006-12-01 16:33:40 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherFormIdentification'; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(IDENTIFICATION) -->'; |
/** Inclusion du fichier de configuration de cette applette.*/ |
require_once GEN_CHEMIN_APPLETTE.'identification/configuration/iden_config.inc.php'; |
require_once GEN_CHEMIN_APPLETTE.'identification'.GEN_SEP.'configuration'.GEN_SEP.'iden_config.inc.php'; |
// Inclusion des fichiers de traduction de l'applette. |
if (file_exists(IDEN_CHEMIN_LANGUE.'iden_langue_'.$_GEN_commun['i18n'].'.inc.php')) { |
if (file_exists(IDEN_CHEMIN_LANGUE.'iden_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) { |
/** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/ |
require_once IDEN_CHEMIN_LANGUE.'iden_langue_'.$_GEN_commun['i18n'].'.inc.php'; |
require_once IDEN_CHEMIN_LANGUE.'iden_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php'; |
} else { |
/** Inclusion du fichier de traduction par défaut.*/ |
require_once IDEN_CHEMIN_LANGUE.'iden_langue_'.IDEN_I18N_DEFAUT.'.inc.php'; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// Si le site utilise une authentification. |
if ($GLOBALS['_GEN_commun']['info_auth']->gsa_ce_type_auth == 1) { |
// Si un formulaire nous renvoie en POST une variable "deconnexion", nous délogons l'utilisateur. |
if (isset($_REQUEST['deconnexion']) || isset($_REQUEST['logout'])) { |
$GLOBALS['_GEN_commun']['pear_auth']->logout(); |
// Destruction du cookie de Papyrus |
setcookie(session_name(), session_id(), time()-3600, '/'); |
} |
// Si un formulaire nous renvoie en POST une variable "connexion", nous logons l'utilisateur. |
if (isset($_REQUEST['connexion'])) { |
// Nous vérifions que l'utilisateur est coché "Mémoriser mon compte" |
if (isset($_POST['persistant']) && $_POST['persistant'] == 'o' && IDEN_AUTH_SESSION_DUREE != 0) { |
//echo '<pre>'.print_r($_POST, true).'</pre>'; |
// Expiration si l'utilisateur ne referme pas son navigateur |
$GLOBALS['_GEN_commun']['pear_auth']->setExpire((int)IDEN_AUTH_SESSION_DUREE); |
// Pour que la session dure même après avoir refermer son navigateur |
setcookie(session_name(), session_id(), (int)IDEN_AUTH_SESSION_DUREE, '/'); |
} |
$GLOBALS['_GEN_commun']['pear_auth']->login(); |
$_SESSION['username'] = $username; |
} |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction afficherFormIdentification() - Retourne une formulaire pour s'identifier. |
* |
* Retourne un formulaire d'identificatin ou de déconnexion suivant que l'utilisateur est |
* identifié ou pas. |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @return string formulaire de connexion ou de déconnexion. |
*/ |
function afficherFormIdentification($tab_arguments, &$_GEN_commun) |
{ |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// Si le site utilise une authentification. |
if ($GLOBALS['_GEN_commun']['info_auth']->gsa_ce_type_auth == 1) { |
// Si un formulaire nous renvoie en POST une variable "deconnexion", nous délogons l'utilisateur. |
if (isset($_REQUEST['deconnexion']) || isset($_REQUEST['logout'])) { |
$GLOBALS['_GEN_commun']['pear_auth']->logout(); |
// Destruction du cookie de Papyrus |
setcookie(session_name(), session_id(), time()-3600, '/'); |
} |
// Si un formulaire nous renvoie en POST une variable "connexion", nous logons l'utilisateur. |
if (isset($_REQUEST['connexion'])) { |
// Nous vérifions que l'utilisateur est coché "Mémoriser mon compte" |
if (isset($_POST['persistant']) && $_POST['persistant'] == 'o' && IDEN_AUTH_SESSION_DUREE != 0) { |
//echo '<pre>'.print_r($_POST, true).'</pre>'; |
// Expiration si l'utilisateur ne referme pas son navigateur |
$GLOBALS['_GEN_commun']['pear_auth']->setExpire((int)IDEN_AUTH_SESSION_DUREE); |
// Pour que la session dure même après avoir refermer son navigateur |
setcookie(session_name(), session_id(), (int)IDEN_AUTH_SESSION_DUREE, '/'); |
} |
$GLOBALS['_GEN_commun']['pear_auth']->login(); |
$_SESSION['username'] = $username; |
} |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction afficherFormIdentification() - Retourne une formulaire pour s'identifier. |
* |
* Retourne un formulaire d'identificatin ou de déconnexion suivant que l'utilisateur est |
* identifié ou pas. |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @return string formulaire de connexion ou de déconnexion. |
*/ |
function afficherFormIdentification($tab_arguments, $_GEN_commun) |
{ |
// Initialisation de variable. |
$retour = ''; |
$objet_pear_auth =& $GLOBALS['_GEN_commun']['pear_auth']; |
$objet_pear_db =& $GLOBALS['_GEN_commun']['pear_db']; |
$InfoAuthBdd =& $GLOBALS['_GEN_commun']['info_auth_bdd']; |
$objet_url =& $GLOBALS['_GEN_commun']['url']; |
$url = $objet_url->getURL(); |
// Récupération des valeurs pour le login et le mot de passe |
$mot_de_passe = (! isset($_POST['password'])) ? '' : $_POST['password']; |
$login = (! isset($_POST['username'])) ? '' : $_POST['username']; |
// ATTENTION : Partie à supprimer une fois les mise à jour effectué dans l'annuaire de Tela Botanica |
// Devrait être déplacer dans l'appli inscription de Tela. |
if (isset($InfoAuthBdd->gsab_nom_table) && $InfoAuthBdd->gsab_nom_table == 'annuaire_tela') { |
$retour = ''; |
$objet_pear_auth =& $_GEN_commun['pear_auth']; |
$objet_pear_db =& $_GEN_commun['pear_db']; |
$InfoAuthBdd =& $_GEN_commun['info_auth_bdd']; |
$objet_url =& $_GEN_commun['url']; |
$url = $objet_url->getURL(); |
// Récupération des valeurs pour le login et le mot de passe |
$mot_de_passe = (! isset($_POST['password'])) ? '' : $_POST['password']; |
$login = (! isset($_POST['username'])) ? '' : $_POST['username']; |
// ATTENTION : Partie à supprimer une fois les mise à jour effectué dans l'annuaire de Tela Botanica |
// Devrait être déplacer dans l'appli inscription de Tela. |
if (isset($InfoAuthBdd->gsab_nom_table) && $InfoAuthBdd->gsab_nom_table == 'annuaire_tela') { |
verification_mot_de_passe($objet_pear_db, $mot_de_passe, $login); |
if (isset($_POST['connexion'])) { |
$objet_pear_auth->login(); |
} |
} |
if (! $objet_pear_auth->getAuth()) { |
// L'utilisateur a essayé de s'identifier mais a échoué |
if ($login != '') { |
$retour .= '<span class="erreur">'.IDEN_ECHEC_AUTH ; |
if (isset($InfoAuthBdd->url_inscription)) { |
$retour .= '<a id="lien_inscription" href="'.$InfoAuthBdd->url_inscription.'">' ; |
$retour .= IDEN_ICI.'</a>' ; |
} |
$retour .= '</span>'."\n"; |
} |
// L'utilisateur n'est pas identifié: |
$retour .= str_repeat(' ', 16).'<form id="form_connexion" class="form_identification" action="'.$url.'" method="post">'."\n"; |
$retour .= str_repeat(' ', 16).'<fieldset>'."\n"; |
$retour .= str_repeat(' ', 20).'<legend>'.IDEN_LG_FORM_LEGEND.'</legend>'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<label for="username">'.IDEN_LG_FORM_LABEL_COURRIEL.'</label>'."\n"; |
$retour .= str_repeat(' ', 24).'<input type="text" id="username" name="username" maxlength="80" tabindex="1" value="'.IDEN_LG_FORM_VALUE_COURRIEL.'" />'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<label for="password">'.IDEN_LG_FORM_LABEL_MDP.'</label>'."\n"; |
$retour .= str_repeat(' ', 24).'<input type="password" id="password" name="password" maxlength="80" tabindex="2" value="'.IDEN_LG_FORM_VALUE_MDP.'" />'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
if (IDEN_AUTH_SESSION_DUREE != 0) { |
$retour .= str_repeat(' ', 24).'<input type="checkbox" id="persistant" name="persistant" tabindex="3" value="o" />'."\n"; |
$retour .= str_repeat(' ', 24).'<label id="persistant_label" for="persistant">'.'Mémoriser mon compte'.'</label>'."\n"; |
} |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<input type="submit" id="connexion" name="connexion" tabindex="4" value="'.IDEN_LG_FORM_VALUE_SUBMIT.'" />'."\n"; |
} |
} |
if (! $objet_pear_auth->getAuth()) { |
// L'utilisateur a essayé de s'identifier mais a échoué |
if ($login != '') { |
$retour .= '<span class="erreur">'.IDEN_ECHEC_AUTH ; |
if (isset($InfoAuthBdd->url_inscription)) { |
$retour .= '<a id="lien_inscription" href="'.$InfoAuthBdd->url_inscription.'">' ; |
$retour .= IDEN_ICI.'</a>' ; |
} |
$retour .= '</span>'."\n"; |
} |
// L'utilisateur n'est pas identifié: |
$retour .= str_repeat(' ', 16).'<form id="form_connexion" class="form_identification" action="'.$url.'" method="post">'."\n"; |
$retour .= str_repeat(' ', 16).'<fieldset>'."\n"; |
$retour .= str_repeat(' ', 20).'<legend>'.IDEN_LG_FORM_LEGEND.'</legend>'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<label for="username">'.IDEN_LG_FORM_LABEL_COURRIEL.'</label>'."\n"; |
$retour .= str_repeat(' ', 24).'<input type="text" id="username" name="username" maxlength="80" tabindex="1" value="'.IDEN_LG_FORM_VALUE_COURRIEL.'" />'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<label for="password">'.IDEN_LG_FORM_LABEL_MDP.'</label>'."\n"; |
$retour .= str_repeat(' ', 24).'<input type="password" id="password" name="password" maxlength="80" tabindex="2" value="'.IDEN_LG_FORM_VALUE_MDP.'" />'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
if (IDEN_AUTH_SESSION_DUREE != 0) { |
$retour .= str_repeat(' ', 24).'<input type="checkbox" id="persistant" name="persistant" tabindex="3" value="o" />'."\n"; |
$retour .= str_repeat(' ', 24).'<label id="persistant_label" for="persistant">'.'Mémoriser mon compte'.'</label>'."\n"; |
} |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
$retour .= str_repeat(' ', 24).'<input type="submit" id="connexion" name="connexion" tabindex="4" value="'.IDEN_LG_FORM_VALUE_SUBMIT.'" />'."\n"; |
$retour .= str_repeat(' ', 20).''."\n"; |
// Si l'url de la page d'inscription est stockée dans les paramêtres, nous l'affichons |
if (isset($InfoAuthBdd->url_inscription) || isset($InfoAuthBdd->url_inscription_aide)) { |
$retour .= '<p id="inscription_info">'; |
if (isset($InfoAuthBdd->url_inscription) || isset($InfoAuthBdd->url_inscription_aide)) { |
$retour .= '<p id="inscription_info">'; |
if (isset($InfoAuthBdd->url_inscription)) { |
$retour .= '<a id="lien_inscription" href="'.$InfoAuthBdd->url_inscription.'">'. |
IDEN_LG_INSCRIPTION_URL. |
'</a>'; |
} |
if (isset($InfoAuthBdd->url_inscription_aide)) { |
$retour .= '<a id="inscription_aide" href="'.$InfoAuthBdd->url_inscription_aide.'">'. |
IDEN_LG_INSCRIPTION_AIDE. |
'</a>'; |
} |
$retour .= '</p>'."\n"; |
} |
$retour .= str_repeat(' ', 16).'</fieldset>'."\n"; |
$retour .= str_repeat(' ', 16).'</form>'; |
} else { |
} |
if (isset($InfoAuthBdd->url_inscription_aide)) { |
$retour .= '<a id="inscription_aide" href="'.$InfoAuthBdd->url_inscription_aide.'">'. |
IDEN_LG_INSCRIPTION_AIDE. |
'</a>'; |
} |
$retour .= '</p>'."\n"; |
} |
$retour .= str_repeat(' ', 16).'</fieldset>'."\n"; |
$retour .= str_repeat(' ', 16).'</form>'; |
} else { |
// L'utilisateur est identifié. Nous affichons ses informations. |
// Affichage du prénom et nom d'une personne ou du nom de la structure en fonction des paramêtres |
// de l'annuaire utilisé |
$retour .= str_repeat(' ', 16).'<p id="identification_info"><span id="identification_message">'.IDEN_LG_MESSAGE.'</span> '; |
// Si les intitulés des champs nom et prénoms d'une personne ou le nom d'une structure sont indiqués nous les affichons |
// Si les intitulés des champs nom et prénoms d'une personne ou le nom d'une structure sont indiqués nous les affichons |
if (isset($InfoAuthBdd->chp_personne_prenom) && isset($InfoAuthBdd->chp_personne_nom)) { |
$retour .= '<span id="identification_prenom">'. |
$objet_pear_auth->getAuthData($InfoAuthBdd->chp_personne_prenom). |
198,24 → 198,28 |
IDEN_LG_INSCRIPTION_URL_MODIF. |
'</a>'."\n"; |
} |
// Affichage du bouton de déconnexion |
$objet_url->addQueryString('logout', 1); |
$retour .= str_repeat(' ', 20).'<a id="deconnexion" href="'.$objet_url->getURL().'">'.IDEN_LG_DECONNEXION.'</a>'."\n"; |
$objet_url->removeQueryString('logout'); |
$retour .= str_repeat(' ', 16).'</p>'."\n"; |
} |
return $retour; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
// Affichage du bouton de déconnexion |
$objet_url->addQueryString('logout', 1); |
$retour .= str_repeat(' ', 20).'<a id="deconnexion" href="'.$objet_url->getURL().'">'.IDEN_LG_DECONNEXION.'</a>'."\n"; |
$objet_url->removeQueryString('logout'); |
$retour .= str_repeat(' ', 16).'</p>'."\n"; |
} |
return $retour; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.25 2006/11/20 18:40:33 jp_milcent |
* Amélioration de la gestion des infos sur l'inscription. |
* Ajout du paramêtre url_inscription_aide permettant d'indiquer l'url vers une page d'aide sur l'inscription. |
* |
* Revision 1.24 2006/11/20 17:42:40 jp_milcent |
* Ajout d'un test activant ou pas la mémorisation de l'identification. |
* |
299,20 → 303,20 |
* |
* Revision 1.5 2004/05/05 06:44:15 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.4 2004/05/03 11:18:55 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.3 2004/05/01 17:21:16 jpm |
* Ajout d'un fieldset et d'une légende au formulaire. |
* |
* Revision 1.2 2004/05/01 16:13:07 jpm |
* Ajout du nom de la balise de l'applette dans le code de l'applette. |
* |
* Revision 1.1 2004/05/01 11:42:01 jpm |
* Ajout de l'applette identification. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
* |
* Revision 1.4 2004/05/03 11:18:55 jpm |
* Intégration de la variable globale de Génésia dans les arguments de la fonction de l'applette. |
* |
* Revision 1.3 2004/05/01 17:21:16 jpm |
* Ajout d'un fieldset et d'une légende au formulaire. |
* |
* Revision 1.2 2004/05/01 16:13:07 jpm |
* Ajout du nom de la balise de l'applette dans le code de l'applette. |
* |
* Revision 1.1 2004/05/01 11:42:01 jpm |
* Ajout de l'applette identification. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |
/trunk/papyrus/applettes/vous_etes_ici/vous_etes_ici.php |
---|
1,91 → 1,91 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: vous_etes_ici.php,v 1.10 2006-04-28 12:41:49 florian Exp $ |
/** |
* Applette : Vous Etes Ici |
* |
* Affiche les liens contenant la suite des menus visités pour arriver |
* au menu courant visioné par l'utilisateur. |
* Nécessite : |
* - Constantes et variable de Papyrus. |
* - Base de données de Papyrus |
* - Pear Net_URL |
* - Pear DB |
* - API Débogage 1.0 |
* |
*@package Applette |
*@subpackage Vous_Etes_Ici |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.10 $ $Date: 2006-04-28 12:41:49 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 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: vous_etes_ici.php,v 1.11 2006-12-01 16:33:40 florian Exp $ |
/** |
* Applette : Vous Etes Ici |
* |
* Affiche les liens contenant la suite des menus visités pour arriver |
* au menu courant visioné par l'utilisateur. |
* Nécessite : |
* - Constantes et variable de Papyrus. |
* - Base de données de Papyrus |
* - Pear Net_URL |
* - Pear DB |
* - API Débogage 1.0 |
* |
*@package Applette |
*@subpackage Vous_Etes_Ici |
//Auteur original : |
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org> |
//Autres auteurs : |
*@author Aucun |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.11 $ $Date: 2006-12-01 16:33:40 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
// +------------------------------------------------------------------------------------------------------+ |
// | ENTÊTE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// Inclusion de la bibliothèque defonction sur les menu : inutile car inclue par Papyrus |
// require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php'; |
$GLOBALS['_VEI_']['nom_fonction'] = 'afficherVousEtesIci'; |
$_GEN_commun['info_applette_nom_fonction'] = $GLOBALS['_VEI_']['nom_fonction']; |
$_GEN_commun['info_applette_balise'] = 'VOUS_ETES_ICI'; |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction afficherVousEtesIci() - Déploie le "vous êtes ici" d'un menu. |
* |
* Affiche la suite des menus visité, sous forme de lien, pour arriver |
* au menu courant visioné par l'utilisateur. |
* Necessite : |
* - Constantes et variable de Papyrus. |
* - Pear Net_URL |
* - Pear DB |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @param int identifiant du menu courant qui représentent la fin du "vous êtes ici". |
* @param boolean indique que nous avons à faire au premier appel de cette fonction récursive. |
* @return string une liste de listes XHTML représentant le plan du site. |
*/ |
function afficherVousEtesIci($tab_arguments, $_GEN_commun, $menu_courant_id = '', $premier_appel = true) |
{ |
// Initialisation de variable. |
$objet_pear_db =& $GLOBALS['_GEN_commun']['pear_db']; |
$vei_numero = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_VEI_']['nom_fonction']]; |
if (isset( $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu)) { |
(empty($menu_courant_id)) ? $menu_courant_id = $GLOBALS['_GEN_commun']['info_menu']->gm_id_menu : ''; |
} |
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = $GLOBALS['_VEI_']['nom_fonction']; |
$GLOBALS['_GEN_commun']['info_applette_balise'] = '<!-- '.$GLOBALS['_GEN_commun']['balise_prefixe'].'(VOUS_ETES_ICI) -->'; |
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
// +------------------------------------------------------------------------------------------------------+ |
// | LISTE de FONCTIONS | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction afficherVousEtesIci() - Déploie le "vous êtes ici" d'un menu. |
* |
* Affiche la suite des menus visité, sous forme de lien, pour arriver |
* au menu courant visioné par l'utilisateur. |
* Necessite : |
* - Constantes et variable de Papyrus. |
* - Pear Net_URL |
* - Pear DB |
* |
* @param array tableau d'éventuel arguments présent dans la balise transmis à la fonction. |
* @param array tableau global de Papyrus. |
* @param int identifiant du menu courant qui représentent la fin du "vous êtes ici". |
* @param boolean indique que nous avons à faire au premier appel de cette fonction récursive. |
* @return string une liste de listes XHTML représentant le plan du site. |
*/ |
function afficherVousEtesIci($tab_arguments, $_GEN_commun, $menu_courant_id = '', $premier_appel = true) |
{ |
// Initialisation de variable. |
$objet_pear_db =& $_GEN_commun['pear_db']; |
$vei_numero = $GLOBALS['_PAPYRUS_']['applette']['comptage'][$GLOBALS['_VEI_']['nom_fonction']]; |
if (isset($_GEN_commun['info_menu']->gm_id_menu)) { |
(empty($menu_courant_id)) ? $menu_courant_id = $_GEN_commun['info_menu']->gm_id_menu : ''; |
} |
$vei = ''; |
// Gestion des erreurs |
98,34 → 98,34 |
// Début contruction du vei |
$menu_pere_id = GEN_lireIdentifiantMenuPere($menu_courant_id, $objet_pear_db); |
// Récupération des infos sur sur l'entrée du menu à afficher |
// GEN_I18N_ID_DEFAUT; |
$id_langue = $GLOBALS['_GEN_commun']['i18n']; |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test=GEN_I18N_ID_DEFAUT; |
} |
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '. |
'FROM gen_menu_relation, gen_menu '. |
'WHERE '.$menu_courant_id.' = gmr_id_menu_01 ' . |
'AND gmr_id_menu_02 = gm_id_menu '. |
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction" |
'AND gm_ce_i18n = "'.$langue_test.'" '; |
$resultat_traduction = $objet_pear_db->query($requete_traduction); |
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ($resultat_traduction->numRows() > 0) { |
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_courant_id=$ligne_resultat_traduction['gmr_id_menu_02']; |
} |
// Récupération des infos sur sur l'entrée du menu à afficher |
// GEN_I18N_ID_DEFAUT; |
$id_langue = $_GEN_commun['i18n']; |
if (isset($id_langue) && ($id_langue!='')) { |
$langue_test=$id_langue; |
} else { |
$langue_test = GEN_I18N_ID_DEFAUT; |
} |
$requete_traduction = 'SELECT gmr_id_menu_02, gm_ce_i18n '. |
'FROM gen_menu_relation, gen_menu '. |
'WHERE '.$menu_courant_id.' = gmr_id_menu_01 ' . |
'AND gmr_id_menu_02 = gm_id_menu '. |
'AND gmr_id_valeur = 2 '.// 2 = "avoir traduction" |
'AND gm_ce_i18n = "'.$langue_test.'" '; |
$resultat_traduction = $objet_pear_db->query($requete_traduction); |
(DB::isError($resultat_traduction)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat_traduction->getMessage(), $requete_traduction)) |
: ''; |
if ($resultat_traduction->numRows() > 0) { |
$ligne_resultat_traduction=$resultat_traduction->fetchRow(DB_FETCHMODE_ASSOC); |
$menu_courant_id=$ligne_resultat_traduction['gmr_id_menu_02']; |
} |
$menu_info = GEN_lireInfoMenu($objet_pear_db, $menu_courant_id, DB_FETCHMODE_ASSOC); |
// Préparation d'une entrée dans la liste du menu |
$menu_nom = htmlentities($menu_info['gm_nom']); |
140,56 → 140,59 |
if (($menu_texte_title = htmlentities($menu_info['gm_description_resume'])) != '') { |
$menu_texte_title = 'title="'.$raccourci_txt.$menu_texte_title.'" ';; |
} |
// Création de l'url du menu courant |
// Création de l'url du menu courant |
$une_url =& new Pap_URL('http://'.$_SERVER['HTTP_HOST'].$_SERVER['PHP_SELF']); |
$une_url->setId($menu_courant_id); |
$menu_url = $une_url->getURL(); |
$une_url->setId($menu_courant_id); |
$menu_url = $une_url->getURL(); |
if ($menu_pere_id != 0) { |
// Ce n'est pas le menu racine : nous continuons |
// Ce n'est pas le menu racine : nous continuons |
$vei .= '<a id="vei_menu_'.$vei_numero.'_'.$menu_courant_id.'" href="'.$menu_url.'" '; |
$vei .= 'hreflang="'.$menu_hreflang.'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a> >>> '."\n"; |
$vei .= afficherVousEtesIci($tab_arguments, $_GEN_commun, $menu_pere_id, false); |
$vei .= 'hreflang="'.$menu_hreflang.'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a> >>> '."\n"; |
$vei .= afficherVousEtesIci($tab_arguments, $_GEN_commun, $menu_pere_id, false); |
} else { |
// C'est le menu racine : nous nous arrêtons |
// C'est le menu racine : nous nous arrêtons |
$vei .= '<a id="vei_menu_'.$vei_numero.'_'.$menu_courant_id.'" href="'.$menu_url.'" '; |
$vei .= 'hreflang="'.$menu_hreflang.'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a>'."\n"; |
} |
$vei .= 'hreflang="'.$menu_hreflang.'" '.$menu_texte_title.$menu_accesskey.'>'.$menu_nom.'</a>'."\n"; |
} |
// Retour du VEI après la recherche récursive des liens |
if ($premier_appel) { |
$tab_vei = explode(' >>> ', $vei); |
// Retour du VEI après la recherche récursive des liens |
if ($premier_appel) { |
$tab_vei = explode(' >>> ', $vei); |
// Récupération des liens pour les inverser et créer le VEI |
$retour = ''; |
$retour = ''; |
for ($i = (count($tab_vei) - 1); $i >= 0 ;$i--) { |
if ($i == 0) { |
// Supprime le lien pour le nom du menu courant |
// Supprime le lien pour le nom du menu courant |
$tab_txt_capture=''; |
preg_match("/>(.*)<\/a>/", $tab_vei[$i], $tab_txt_capture); |
$retour .= $tab_txt_capture[1]; |
} else { |
} else { |
$retour .= $tab_vei[$i]; |
} |
// Ajout du séparateur |
$retour .= ($i != 0) ? "\n".'<span class="separateur_vei"> > </span>'."\n" : '' ; |
// Ajout du séparateur |
$retour .= ($i != 0) ? "\n".'<span class="separateur_vei"> > </span>'."\n" : '' ; |
} |
// Retour de la chaine de liens et de textes du VEI |
return $retour; |
} |
return $vei; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
// Retour de la chaine de liens et de textes du VEI |
return $retour; |
} |
return $vei; |
} |
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.10 2006/04/28 12:41:49 florian |
* corrections erreurs chemin |
* |
* Revision 1.9 2006/03/02 10:49:49 ddelon |
* Fusion branche multilinguisme dans branche principale |
* |
223,14 → 226,14 |
* Revision 1.4 2004/05/05 14:33:19 jpm |
* Gestion de l'indication de langue dans l'url. |
* Utile que si on veut forcer la langue. |
* |
* Revision 1.2 2004/05/05 06:44:33 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.1 2004/05/05 06:39:18 jpm |
* Transformation en applette de la fonction générant le "vous êtes ici". |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
* |
* Revision 1.2 2004/05/05 06:44:33 jpm |
* Complément des commentaires indiquant les paquetages nécessaire à l'applette. |
* |
* Revision 1.1 2004/05/05 06:39:18 jpm |
* Transformation en applette de la fonction générant le "vous êtes ici". |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |