Subversion Repositories eFlore/Applications.bibliobota

<?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 = '&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.'&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 ----------------------------------------------------------------------------------------+

*/

?>