New file |
0,0 → 1,253 |
<?php |
/*vim: set expandtab tabstop=4 shiftwidth=4: */ |
// +------------------------------------------------------------------------------------------------------+ |
// | PHP version 4.1 | |
// +------------------------------------------------------------------------------------------------------+ |
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) | |
// +------------------------------------------------------------------------------------------------------+ |
// | This file is part of Biblio Bota. | |
// | | |
// | 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: biblio_bota.php,v 1.1 2005-11-23 10:22:25 jp_milcent Exp $ |
/** |
* Appli Biblio Bota |
* |
* Cette application permet de consulter et d'administrer l'ensemble des données comprise dans le modèle |
* de Biblio Bota : |
* - articles botaniques |
* - livres et média botaniques |
* - sites web |
* - organismes liés à la botanique |
* Ce fichier permet d'appeler les fichiers partagés par l'ensemble des applications de BiblioBota. |
* 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 BiblioBota |
//Auteur original : |
*@author Jean-Charles GRANGER <tela@vecteur.org> |
//Autres auteurs : |
*@author Jean-Pascal MILCENT <jpm@clapas.org> |
*@copyright Tela-Botanica 2000-2004 |
*@version $Revision: 1.1 $ $Date: 2005-11-23 10:22:25 $ |
// +------------------------------------------------------------------------------------------------------+ |
*/ |
|
// +------------------------------------------------------------------------------------------------------+ |
// | ENTETE du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/** Inclusion du fichier de configuration de la base de données de BiblioBota.*/ |
require_once 'client/biblio_bota/configuration/bb_config_bdd.inc.php'; |
/** Inclusion du fichier de configuration général de BiblioBota.*/ |
require_once 'client/biblio_bota/configuration/bb_config.inc.php'; |
|
/** Inclusion de l'API Fragmenteur */ |
require_once BB_CHEMIN_API.'fragmenteur/FRAG_fragmenteur.fonct.php'; |
/** Inclusion de l'API Date */ |
require_once BB_CHEMIN_API.'date/DAT_date.fonct.php'; |
/** Inclusion de l'API VoirAussi */ |
require_once BB_CHEMIN_API.'voiraussi/VA_VoirAussi.class.php'; |
/** Inclusion de l'API Débogage */ |
require_once BB_CHEMIN_API.'debogage/BOG_sql.fonct.php'; |
/** Inclusion de la bibliothèque de fonctions communes aux applications de BiblioBota */ |
require_once BB_CHEMIN_BIBLIO.'bb_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 'client/biblio_bota/configuration/bb_config_url.inc.php'; |
|
/** Definition de la variable globale stokant la connexion à la base de données. */ |
$GLOBALS['db_bb']= DB::connect(BB_DSN); |
|
// Stockage des styles de l'application |
GEN_stockerStyleExterne('biblio_bota_consultation', BB_CHEMIN_STYLES.'bb_standard.css'); |
|
// Appel du fichier de traduction des textes de l'application Biblio Bota |
if (file_exists(BB_CHEMIN_LANGUES.'bb_langue_'.BB_URL_I18N.'.inc.php')) { |
/** Inclusion du fichier de traduction de l'application Biblio Bota. */ |
include_once BB_CHEMIN_LANGUES.'bb_langue_'.BB_URL_I18N.'.inc.php'; |
} else { |
/** Inclusion du fichier de traduction fr par défaut. */ |
include_once BB_CHEMIN_LANGUES.'bb_langue_fr.inc.php'; |
} |
|
// +------------------------------------------------------------------------------------------------------+ |
// | CORPS du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
/** Fonction afficherContenuNavigation() - Fonction appelé par le gestionnaire Papyrus. |
* |
* Elle retourne les onglets de l'application Biblio Bota. |
* 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 de navigation de l'application. |
*/ |
function afficherContenuNavigation() |
{ |
$sortie = ''; |
|
// Dans le cas où nous sommes passé en consultation avancée... |
if (isset($_GET['consultation']) && $_GET['consultation'] == 'avancee') { |
global $str, $art, $fasc, $coll, $book, $media; |
global $arg_0, $arg_1, $arg_2, $arg_3; |
$morceau_url_commun = '&consultation=avancee&arg_0='.$arg_0.'&arg_1='.$arg_1.'&arg_2='.$arg_2.'&arg_3='.$arg_3; |
$class_onglet_str = 'onglet_inactif'; |
$class_onglet_coll = 'onglet_inactif'; |
$class_onglet_livre = 'onglet_inactif'; |
$class_onglet_media = 'onglet_inactif'; |
$class_onglet_retour = 'onglet_inactif'; |
|
if ($str != '') { |
$structure = $str; |
$class_onglet_str = 'onglet_actif'; |
} else if ($coll != '') { |
$structure = $coll; |
$class_onglet_coll = 'onglet_actif'; |
}else if ($book != '') { |
$structure = $book; |
$class_onglet_livre = 'onglet_actif'; |
} else if ($media != '') { |
$structure = $media; |
$class_onglet_media = 'onglet_actif'; |
} else { |
$decoupage_arg = explode('=', $arg_0); |
$structure = $decoupage_arg[1]; |
if (!empty($art) || !empty($fasc) ) { |
$class_onglet_coll = 'onglet_actif'; |
} |
} |
$sortie = '<ul>'."\n"; |
$sortie .= ' <li class="'.$class_onglet_str.'">'. |
'<a href="'.BB_URL_COURANTE_CONSULTATION.'&str='.$structure.$morceau_url_commun.'">'. |
'Organisme'. |
'</a>'."\n". |
' </li>'."\n"; |
$sortie .= ' <li class="'.$class_onglet_coll.'">'. |
'<a href="'.BB_URL_COURANTE_CONSULTATION.'&coll='.$structure.$morceau_url_commun.'">'. |
'Périodique'. |
'</a>'."\n". |
' </li>'."\n"; |
$sortie .= ' <li class="'.$class_onglet_livre.'">'. |
'<a href="'.BB_URL_COURANTE_CONSULTATION.'&book='.$structure.$morceau_url_commun.'">'. |
'Livres'. |
'</a>'."\n". |
' </li>'."\n"; |
$sortie .= ' <li class="'.$class_onglet_media.'">'. |
'<a href="'.BB_URL_COURANTE_CONSULTATION.'&media='.$structure.$morceau_url_commun.'">'. |
'Média'. |
'</a>'."\n". |
' </li>'."\n"; |
$sortie .= ' <li class="'.$class_onglet_retour.'"><a href="'.BB_URL_COURANTE.'">'.'Retour à la recherche'.'</a></li>'."\n"; |
$sortie .= '</ul>'."\n"; |
} |
|
return $sortie; |
} |
|
/** Fonction afficherContenuCorps() - Fonction appelé par le gestionnaire Papyrus. |
* |
* Elle retourne le contenu de l'application. |
* |
* @return string du code XHTML correspondant au contenu renvoyé par l'application. |
*/ |
function afficherContenuCorps() |
{ |
global $_GEN_commun; |
$sortie = ''; |
if (!defined('BB_ARGUMENT_AUTH') || BB_ARGUMENT_AUTH == 0 || (BB_ARGUMENT_AUTH == 1 && $GLOBALS['_GEN_commun']['pear_auth']->getAuth())) { |
// Nous recherchons quelle type d'objet le moteur BiblioBota doit rechercher: |
switch (BB_ARGUMENT_OBJET) { |
case 'lien': |
// Liens de sites web |
$GLOBALS['moteur_biblio']['id_field'] = 'B_L_IDLINK'; |
$GLOBALS['moteur_biblio']['defaut_sort'] = 'B_L_TITRE'; |
break; |
case 'structure': |
// Organismes ou structures botaniques |
$GLOBALS['moteur_biblio']['id_field'] = 'B_S_IDSTR'; |
$GLOBALS['moteur_biblio']['defaut_sort'] = 'B_S_NOM'; |
break; |
case 'media': |
// Articles, livres et média |
$GLOBALS['moteur_biblio']['id_field'] = 'B_I_IDITEM'; |
$GLOBALS['moteur_biblio']['defaut_sort'] = 'B_I_AUTEURS'; |
break; |
default: |
// Par défaut : Articles, livres et média |
$GLOBALS['moteur_biblio']['id_field'] = 'B_I_IDITEM'; |
$GLOBALS['moteur_biblio']['defaut_sort'] = 'B_I_AUTEURS'; |
} |
|
// Nous incluons l'application demandée : |
$chemin_application = BB_CHEMIN_APPLI.BB_ARGUMENT_APPLI.GEN_SEP.BB_ARGUMENT_APPLI.'.php'; |
if (file_exists($chemin_application)) { |
include_once $chemin_application; |
} else { |
$sortie = '<p class="pap_erreur">'.'Application inexistantes!'.'</p>'; |
} |
} elseif (BB_ARGUMENT_AUTH == 1) { |
return GEN_afficherInfoIdentification($baseURL); |
} else { |
$sortie = '<p class="pap_erreur">'. |
'ERREUR : problème!'.'<br />'. |
'LIGNE : '.__LINE__.'<br />'. |
'FICHIER : '.__FILE__. |
'</p>'; |
} |
return remplaceEntiteHTLM($sortie); |
} |
|
// +------------------------------------------------------------------------------------------------------+ |
// | PIED du PROGRAMME | |
// +------------------------------------------------------------------------------------------------------+ |
|
|
/* +--Fin du code ----------------------------------------------------------------------------------------+ |
* |
* $Log: not supported by cvs2svn $ |
* Revision 1.9 2005/05/17 10:10:08 jpm |
* Correction des bogues avant mise en ligne du site v4. |
* |
* Revision 1.8 2005/03/02 17:48:48 jpm |
* Changement d'un commentaire. |
* |
* Revision 1.7 2005/03/02 10:32:12 jpm |
* Modification commentaires et inclusion fichier config url. |
* |
* Revision 1.6 2005/03/01 15:18:10 jpm |
* Modification de l'utilisation d'une variable globale. |
* |
* Revision 1.5 2004/09/16 12:09:44 jpm |
* Modification de l'affichage des onglets. |
* |
* Revision 1.4 2004/09/15 12:16:02 jpm |
* Suppresion du code spécifique au moteur annuaire. |
* |
* Revision 1.3 2004/09/11 11:59:18 jpm |
* Transfert du contenu du fichierbb_aiguillage.inc.php directement dans ce fichier. |
* |
* Revision 1.2 2004/09/10 18:39:44 jpm |
* Gestion des onglets. |
* |
* Revision 1.1 2004/09/10 09:45:09 jpm |
* Ajout des fichiers BiblioBota configurer pour Papyrus. |
* |
* |
* +-- Fin du code ----------------------------------------------------------------------------------------+ |
*/ |
?> |