Rev 4 | Go to most recent revision | Blame | Compare with Previous | Last modification | View Log | RSS feed
<?php/*vim: set expandtab tabstop=4 shiftwidth=4: */// +------------------------------------------------------------------------------------------------------+// | PHP version 4.1 |// +------------------------------------------------------------------------------------------------------+// | Copyright (C) 2005 Tela Botanica (accueil@tela-botanica.org) |// +------------------------------------------------------------------------------------------------------+// | This file is part of Herbier. |// | |// | Foobar is free software; you can redistribute it and/or modify |// | it under the terms of the GNU General Public License as published by |// | the Free Software Foundation; either version 2 of the License, or |// | (at your option) any later version. |// | |// | Foobar 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 General Public License for more details. |// | |// | You should have received a copy of the GNU General Public License |// | along with Foobar; if not, write to the Free Software |// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA |// +------------------------------------------------------------------------------------------------------+// CVS : $Id: herbier.php,v 1.1 2005-11-23 10:32:32 jp_milcent Exp $/*** Application Herbier** Cette application permet de consulter et d'administrer des collection botanique comprise dans le modèle* d'Herbier.* Ce fichier permet d'appeler les fichiers partagés par l'ensemble des applications d'Hebier.* Il permet aussi d'appeler les fichiers de chaque application spécifique et de vérifier s'il y a besoin* que l'utilisateur soit identifié ou pas.* Il joue le role de controlleur.**@package Herbier//Auteur original :*@author Alexandre GRANIER <alexandre@tela-botanica.org>//Autres auteurs :*@author Jean-Pascal MILCENT <jpm@clapas.org>*@copyright Tela-Botanica 2000-2005*@version $Revision: 1.1 $ $Date: 2005-11-23 10:32:32 $// +------------------------------------------------------------------------------------------------------+*/// +------------------------------------------------------------------------------------------------------+// | ENTETE du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/** Inclusion du fichier de configuration de la base de données de BiblioBota.*/require_once 'client'.GEN_SEP.'herbier'.GEN_SEP.'configuration'.GEN_SEP.'hb_config_bdd.inc.php';/** Inclusion du fichier de configuration général de BiblioBota.*/require_once 'client'.GEN_SEP.'herbier'.GEN_SEP.'configuration'.GEN_SEP.'hb_config.inc.php';/** Inclusion de l'API Débogage */require_once HB_CHEMIN_API_DEBOGAGE.'BOG_sql.fonct.php';/** Inclusion de la bibliothèque de fonctions communes aux applications de Herbier */require_once HB_CHEMIN_BIBLIO.'hb_commun.fonct.php';/** Inclusion de la classe PEAR d'abstraction de base de donnée. */require_once 'DB.php';/** Inclusion de la classe PEAR de gestion des URL. */require_once 'Net/URL.php';/** Inclusion du fichier de configuration des url de BiblioBota.*/require_once HB_CHEMIN_CONFIG.'hb_config_url.inc.php';/** Definition de la variable globale stokant la connexion à la base de données. */$GLOBALS['_HERBIER_']['bdd'] =& DB::connect(HB_DSN);if (DB::isError($GLOBALS['_HERBIER_']['bdd'])) {die (BOG_afficherErreurSql(__FILE__, __LINE__, mysql_error(), null, $GLOBALS['_HERBIER_']['bdd']->getMessage()));}// Stockage des styles de l'applicationGEN_stockerStyleExterne('herbier', HB_CHEMIN_STYLES.'herbier.css');// Appel du fichier de traduction des textes de l'application Herbierif (file_exists(HB_CHEMIN_LANGUES.'hb_langue_'.HB_I18N.'.inc.php')) {/** Inclusion du fichier de traduction de l'application Herbier. */include_once HB_CHEMIN_LANGUES.'hb_langue_'.HB_I18N.'.inc.php';} else {/** Inclusion du fichier de traduction fr par défaut. */include_once HB_CHEMIN_LANGUES.'hb_langue_fr.inc.php';}// +------------------------------------------------------------------------------------------------------+// | CORPS du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/** Fonction afficherContenuNavigation() - Fonction appelé par le gestionnaire Papyrus.** Elle retourne les onglets de l'application Herbier.* Todo : Il serait nécessaire de revoir les arguments passés dans les liens. Il y a* surement moyen de simplifier les choses.** @return string du code XHTML correspondant à la zone d'onglets de l'application.*/function afficherContenuNavigation(){$sortie = '';// Dans le cas où nous sommes passé en consultation avancée...$class_onglet_herbier = 'menu_inactif';$class_onglet_collection = 'menu_inactif';if (isset($_GET['consultation'])) {if ($_GET['consultation'] == 'herbier') {$class_onglet_herbier = 'menu_actif';} else if ($_GET['consultation'] == 'collection') {$class_onglet_collection = 'menu_actif';}$sortie .= '<ul class="onglets">'."\n";$sortie .= '<li class="'.$class_onglet_herbier.'" >'."\n";$sortie .= ' <a '.'href="'.HB_URL_COURANTE_CONSULTATION_FICHE_HERBIER.'&id_org='.$_GET['id_org'].'">'.'Herbier'.'</a> '."\n";$sortie .= '</li>'."\n";$sortie .= '<li class="'.$class_onglet_collection.'">'."\n";$sortie .= ' <a '.'href="'.HB_URL_COURANTE_CONSULTATION_FICHE_COLECTION.'&id_org='.$_GET['id_org'].'">'.'Collection'.'</a> '."\n";$sortie .= '</li>'."\n";$sortie .= '</ul>'."\n";}return $sortie;}/** Fonction afficherContenuNavigation() - Fonction appelé par le gestionnaire Papyrus.** Elle retourne les onglets de l'application Herbier.* Todo : Il serait nécessaire de revoir les arguments passés dans les liens. Il y a* surement moyen de simplifier les choses.** @return string du code XHTML correspondant à la zone d'onglets de l'application.*/function afficherContenuMenu(){// +------------------------------------------------------------------------------------------------------+// Initialisation des variables$sortie = '';if (!defined('HB_ARGUMENT_AUTH') || HB_ARGUMENT_AUTH == 0 || (HB_ARGUMENT_AUTH == 1 && $GLOBALS['_HERBIER_']['auth']->getAuth())) {// Nous incluons l'application demandée :$chemin_application = HB_CHEMIN_APPLI.HB_ARGUMENT_APPLI.GEN_SEP.HB_ARGUMENT_APPLI.'.menu.php';if (file_exists($chemin_application)) {include_once $chemin_application;}}return $sortie;}/** Fonction afficherContenuTete() - Fonction appelé par le gestionnaire Papyrus.** Elle retourne l'entête de l'application Herbier.* Todo : Il serait nécessaire de revoir les arguments passés dans les liens. Il y a* surement moyen de simplifier les choses.** @return string du code XHTML correspondant à la zone d'entête de l'application.*/function afficherContenuTete(){$sortie = '';if (isset($_GET['consultation'])) {$sortie .= '<p>'."\n";$sortie .= ' <a href="'.HB_URL_COURANTE.'">'.'Retour'.'</a>'."\n";$sortie .= '</p>'."\n";}return $sortie;}/** Fonction afficherContenuCorps() - Fonction appelé par le gestionnaire Papyrus.** Elle retourne le contenu de l'application Herbier.** @return string du code XHTML correspondant au contenu renvoyé par l'application.*/function afficherContenuCorps(){// +------------------------------------------------------------------------------------------------------+// Initialisation des variables$sortie = '';if (!defined('HB_ARGUMENT_AUTH') || HB_ARGUMENT_AUTH == 0 || (HB_ARGUMENT_AUTH == 1 && $GLOBALS['_HERBIER_']['auth']->getAuth())) {// Nous incluons l'application demandée :$chemin_application = HB_CHEMIN_APPLI.HB_ARGUMENT_APPLI.GEN_SEP.HB_ARGUMENT_APPLI.'.php';if (file_exists($chemin_application)) {include_once $chemin_application;} else {$sortie = '<p class="pap_erreur">'.'Application inexistantes!'.'</p>';}} elseif (HB_ARGUMENT_AUTH == 1) {return GEN_afficherInfoIdentification($GLOBALS['_HERBIER_']['url']->getURL());} else {$sortie = '<p class="pap_erreur">'.'ERREUR : problème!'.'<br />'.'LIGNE : '. __LINE__ .'<br />'.'FICHIER : '. __FILE__ .'</p>';}return $sortie;}// +------------------------------------------------------------------------------------------------------+// | PIED du PROGRAMME |// +------------------------------------------------------------------------------------------------------+/* +--Fin du code ----------------------------------------------------------------------------------------+** $Log: not supported by cvs2svn $* Revision 1.3 2005/05/18 07:30:13 jpm* Correction des bogues et derniers réglages avant mise en ligne du site v4.** Revision 1.2 2005/04/06 13:35:04 jpm* Modification vis à vis de l'application Administration.** Revision 1.1 2005/03/08 14:17:19 jpm* Ajout des fichiers principaux.*** +-- Fin du code ----------------------------------------------------------------------------------------+*/?>