WebSVN – eFlore/Applications.bibliobota – Diff – /trunk/biblio_bota.php


<?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.2 2006/09/22 08:36:12 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.2 $ $Date: 2006/09/22 08:36:12 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+
/** Inclusion du fichier de configuration de la base de données de BiblioBota.*/
require_once GEN_CHEMIN_CLIENT.'biblio_bota/configuration/bb_config_bdd.inc.php';
/** Inclusion du fichier de configuration général de BiblioBota.*/
require_once GEN_CHEMIN_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 BB_CHEMIN_API_PEAR.'DB.php';
/** Inclusion de la classe PEAR de gestion des URL. */
require_once BB_CHEMIN_API_PEAR.'Net/URL.php';
/** Inclusion du fichier de configuration des url de BiblioBota.*/
require_once BB_CHEMIN_CONFIG.'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 = '&amp;consultation=avancee&amp;arg_0='.$arg_0.'&amp;arg_1='.$arg_1.'&amp;arg_2='.$arg_2.'&amp;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.'&amp;str='.$structure.$morceau_url_commun.'">'.
                        'Organisme'.
                        '</a>'."\n".
                    '  </li>'."\n";
        $sortie .=  '  <li class="'.$class_onglet_coll.'">'.
                        '<a href="'.BB_URL_COURANTE_CONSULTATION.'&amp;coll='.$structure.$morceau_url_commun.'">'.
                        'Périodique'.
                        '</a>'."\n".
                    '  </li>'."\n";
        $sortie .=  '  <li class="'.$class_onglet_livre.'">'.
                        '<a href="'.BB_URL_COURANTE_CONSULTATION.'&amp;book='.$structure.$morceau_url_commun.'">'.
                        'Livres'.
                        '</a>'."\n".
                    '  </li>'."\n";
        $sortie .= '  <li class="'.$class_onglet_media.'">'.
                        '<a href="'.BB_URL_COURANTE_CONSULTATION.'&amp;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()
{
 
 
    $bdd_id = mysql_connect(BB_BDD_SERVEUR, BB_BDD_UTILISATEUR, BB_BDD_MOT_DE_PASSE, true) or die("Impossible de se connecter à la base de données: " . mysql_error());
    mysql_select_db(BB_BDD_NOM, $bdd_id);
    
 
 
    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>';
    }
    
 
 
    mysql_close($bdd_id);
    
    return remplaceEntiteHTLM($sortie);
}
 
// +------------------------------------------------------------------------------------------------------+
// |                                            PIED du PROGRAMME                                         |
// +------------------------------------------------------------------------------------------------------+
 
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: biblio_bota.php,v $
* Revision 1.2  2006/09/22 08:36:12  jp_milcent
* Utilisation de mysql_connect et mysql_select_db suite à disfonctionnement.
* Amélioration de la gestion des chemins des fichiers inclus.
*
* Revision 1.1  2005/11/23 10:22:25  jp_milcent
* Ajout au dépot de l'application BiblioBota.
* Elle doit à terme migrer dans eFlore.
*
* 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 ----------------------------------------------------------------------------------------+
*/
?>

Subversion Repositories eFlore/Applications.bibliobota

(root)/trunk/biblio_bota.php – Rev 16 → 30

Rev 16		Rev 30
1	`<?php`	1	`<?php`
2	`/vim: set expandtab tabstop=4 shiftwidth=4: /`	2	`/vim: set expandtab tabstop=4 shiftwidth=4: /`
3	`// +------------------------------------------------------------------------------------------------------+`	3	`// +------------------------------------------------------------------------------------------------------+`
4	`// \| PHP version 4.1 \|`	4	`// \| PHP version 4.1 \|`
5	`// +------------------------------------------------------------------------------------------------------+`	5	`// +------------------------------------------------------------------------------------------------------+`
6	`// \| Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) \|`	6	`// \| Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org) \|`
7	`// +------------------------------------------------------------------------------------------------------+`	7	`// +------------------------------------------------------------------------------------------------------+`
8	`// \| This file is part of Biblio Bota. \|`	8	`// \| This file is part of Biblio Bota. \|`
9	`// \| \|`	9	`// \| \|`
10	`// \| Foobar is free software; you can redistribute it and/or modify \|`	10	`// \| Foobar is free software; you can redistribute it and/or modify \|`
11	`// \| it under the terms of the GNU General Public License as published by \|`	11	`// \| it under the terms of the GNU General Public License as published by \|`
12	`// \| the Free Software Foundation; either version 2 of the License, or \|`	12	`// \| the Free Software Foundation; either version 2 of the License, or \|`
13	`// \| (at your option) any later version. \|`	13	`// \| (at your option) any later version. \|`
14	`// \| \|`	14	`// \| \|`
15	`// \| Foobar is distributed in the hope that it will be useful, \|`	15	`// \| Foobar is distributed in the hope that it will be useful, \|`
16	`// \| but WITHOUT ANY WARRANTY; without even the implied warranty of \|`	16	`// \| but WITHOUT ANY WARRANTY; without even the implied warranty of \|`
17	`// \| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the \|`	17	`// \| MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the \|`
18	`// \| GNU General Public License for more details. \|`	18	`// \| GNU General Public License for more details. \|`
19	`// \| \|`	19	`// \| \|`
20	`// \| You should have received a copy of the GNU General Public License \|`	20	`// \| You should have received a copy of the GNU General Public License \|`
21	`// \| along with Foobar; if not, write to the Free Software \|`	21	`// \| along with Foobar; if not, write to the Free Software \|`
22	`// \| Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA \|`	22	`// \| Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA \|`
23	`// +------------------------------------------------------------------------------------------------------+`	23	`// +------------------------------------------------------------------------------------------------------+`
24	`// CVS : $Id: biblio_bota.php,v 1.3 2006-09-22 09:18:56 jp_milcent Exp $`	24	`// CVS : $Id: biblio_bota.php,v 1.2 2006/09/22 08:36:12 jp_milcent Exp $`
25	`/**`	25	`/**`
26	`* Appli Biblio Bota`	26	`* Appli Biblio Bota`
27	`*`	27	`*`
28	`* Cette application permet de consulter et d'administrer l'ensemble des données comprise dans le modèle`	28	`* Cette application permet de consulter et d'administrer l'ensemble des données comprise dans le modèle`
29	`* de Biblio Bota :`	29	`* de Biblio Bota :`
30	`* - articles botaniques`	30	`* - articles botaniques`
31	`* - livres et média botaniques`	31	`* - livres et média botaniques`
32	`* - sites web`	32	`* - sites web`
33	`* - organismes liés à la botanique`	33	`* - organismes liés à la botanique`
34	`* Ce fichier permet d'appeler les fichiers partagés par l'ensemble des applications de BiblioBota.`	34	`* Ce fichier permet d'appeler les fichiers partagés par l'ensemble des applications de BiblioBota.`
35	`* Il permet aussi d'appeler les fichiers de chaque application spécifique et de vérifier s'il y a besoin`	35	`* Il permet aussi d'appeler les fichiers de chaque application spécifique et de vérifier s'il y a besoin`
36	`* que l'utilisateur soit identifié ou pas.`	36	`* que l'utilisateur soit identifié ou pas.`
37	`* Il joue le role de controlleur.`	37	`* Il joue le role de controlleur.`
38	`*`	38	`*`
39	`*@package BiblioBota`	39	`*@package BiblioBota`
40	`//Auteur original :`	40	`//Auteur original :`