Subversion Repositories eFlore/Archives.eflore-consultation-v2

Rev

Rev 154 | Rev 156 | Go to most recent revision | Details | Compare with Previous | Last modification | View Log | RSS feed

Rev Author Line No. Line
59 jpm 1 
<?php
2 
/*vim: set expandtab tabstop=4 shiftwidth=4: */
3 
// +------------------------------------------------------------------------------------------------------+
4 
// | PHP version 4.3                                                                                      |
5 
// +------------------------------------------------------------------------------------------------------+
6 
// | Copyright (C) 2004 Tela Botanica (accueil@tela-botanica.org)                                         |
7 
// +------------------------------------------------------------------------------------------------------+
8 
// | This file is part of eFlore-consultation.                                                            |
9 
// |                                                                                                      |
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                                 |
12 
// | the Free Software Foundation; either version 2 of the License, or                                    |
13 
// | (at your option) any later version.                                                                  |
14 
// |                                                                                                      |
15 
// | Foobar is distributed in the hope that it will be useful,                                            |
16 
// | but WITHOUT ANY WARRANTY; without even the implied warranty of                                       |
17 
// | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the                                        |
18 
// | GNU General Public License for more details.                                                         |
19 
// |                                                                                                      |
20 
// | You should have received a copy of the GNU General Public License                                    |
21 
// | along with Foobar; if not, write to the Free Software                                                |
22 
// | Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                            |
23 
// +------------------------------------------------------------------------------------------------------+
155 jpm 24 
// CVS : $Id: eflore_recherche_nomenclature.inc.php,v 1.6 2005-02-22 19:27:10 jpm Exp $
59 jpm 25 
/**
26 
* Affichage du moteur de recherche nomenclatural et de ses résultats.
27 
*
28 
* Ce script fournit le code html correspondant aux moteurs de recherche nomenclatural et ses résultats.
29 
*
30 
*@package eFlore
31 
//Auteur original :
32 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
33 
//Autres auteurs :
34 
*@author        Aucun
35 
*@copyright     Tela-Botanica 2000-2004
155 jpm 36 
*@version       $Revision: 1.6 $ $Date: 2005-02-22 19:27:10 $
59 jpm 37 
// +------------------------------------------------------------------------------------------------------+
38 
*/
39 
 
40 
// +------------------------------------------------------------------------------------------------------+
41 
// |                                            ENTÊTE du PROGRAMME                                       |
42 
// +------------------------------------------------------------------------------------------------------+
43 
 
127 jpm 44 
function remplacerUrlFicheNom($arguments) {
45 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_FICHE);
46 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ONGLET, EFLORE_LG_URL_ONGLET_SYNTHESE);
47 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NN, $arguments[0]);
48 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NVP, $arguments[1]);
49 
    return $GLOBALS['_EFLORE_']['url']->getURL();
50 
}
59 jpm 51 
 
52 
// +------------------------------------------------------------------------------------------------------+
53 
// |                                            CORPS du PROGRAMME                                        |
54 
// +------------------------------------------------------------------------------------------------------+
55 
$sortie .= '<h2>'.EFLORE_LG_RECH_NOM_TITRE.'</h2>';
56 
 
57 
// --------------------------------------------------------------------------------------------------------
58 
// Création du formulaire
59 
$sortie .= '<ul>';
60 jpm 60 
// Ajout du paramêtre action à l'url courante.
61 
$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_RECH_NOM);
59 jpm 62 
// Notes : Quickform semble remplacer les & des &amp; à nouveau par des &amp; solution utiliser str_replace()...
155 jpm 63 
$eflore_form = new HTML_QuickForm('eflore_form_nomenclature', 'post', str_replace('&amp;', '&', $GLOBALS['_EFLORE_']['url']->getUrl()));
60 jpm 64 
$tab_index = EFLORE_RECH_NOM_FORM_TAB;
155 jpm 65 
$eflore_squelette = $eflore_form->defaultRenderer();
66 
$eflore_squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>');
67 
$eflore_squelette->setElementTemplate( '<li>'."\n".
59 jpm 68 
                                '{label}'."\n".
69 
                                '{element}'."\n".
127 jpm 70 
                                '<!-- BEGIN required --><span class="symbole_obligatoire">'.EFLORE_LG_FORM_SYMBOLE_OBLIGATOIRE.'</span><!-- END required -->'."\n".
60 jpm 71 
                                '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n".
59 jpm 72 
                                '</li>'."\n");
155 jpm 73 
$eflore_form->accept($eflore_squelette);
74 
$eflore_form->removeAttribute('name');
59 jpm 75 
 
76 
$partie_menu_debut = '<fieldset>'."\n".'<legend>'.EFLORE_LG_RECH_NOM_FORM_TITRE.'</legend>'."\n";
155 jpm 77 
$eflore_form->addElement('html', $partie_menu_debut);
59 jpm 78 
 
79 
$id = 'eflore_nom';
80 
$aso_attributs = array( 'id'=>$id, 'class' => 'champ', 'tabindex' => $tab_index++,
81 
                        'size' => EFLORE_RECH_NOM_FORM_NOM_SIZE,
82 
                        'maxlength' => EFLORE_RECH_NOM_FORM_NOM_MAXLENGTH,
83 
                        'onclick' => "javascript: this.value='';");
84 
$label = '<label for="'.$id.'">'.EFLORE_LG_RECH_NOM_FORM_NOM.'</label>';
155 jpm 85 
$eflore_form->addElement('text', $id, $label, $aso_attributs);
59 jpm 86 
 
87 
$liste_type_nom_debut = '<ul>'."\n";
155 jpm 88 
$eflore_form->addElement('html', $liste_type_nom_debut);
59 jpm 89 
 
90 
$id = 'eflore_type_nom';
91 
$valeur = 'nom_scientifique';
92 
$aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++);
60 jpm 93 
$label = '';
155 jpm 94 
$eflore_form->addElement('radio', $id, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_SCI, $valeur, $aso_attributs);
95 
 
59 jpm 96 
$valeur = 'nom_vernaculaire';
97 
$aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++);
60 jpm 98 
$label = '';
155 jpm 99 
$eflore_form->addElement('radio', $id, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_VER, $valeur, $aso_attributs);
60 jpm 100 
if (isset($_REQUEST[$id])) {
101 
    switch ($_REQUEST[$id]) {
102 
        case 'nom_scientifique':
103 
            $form->setDefaults(array($id => 'nom_scientifique'));
104 
            break;
105 
        case 'nom_vernaculaire':
106 
            $form->setDefaults(array($id => 'nom_vernaculaire'));
107 
            break;
108 
    }
109 
} else {
155 jpm 110 
    $eflore_form->setDefaults(array($id => 'nom_scientifique'));
60 jpm 111 
}
59 jpm 112 
 
113 
$liste_type_nom_fin = '</ul>'."\n";
155 jpm 114 
$eflore_form->addElement('html', $liste_type_nom_fin);
59 jpm 115 
 
127 jpm 116 
$id = 'eflore_valider_nom';
59 jpm 117 
$aso_attributs = array('id'=> $id, 'class' => 'champ', 'tabindex' => $tab_index++);
155 jpm 118 
$eflore_form->addElement('submit', $id, EFLORE_LG_RECH_NOM_FORM_VALIDER, $aso_attributs);
59 jpm 119 
 
120 
$partie_entete_fin = "\n".'</fieldset>';
155 jpm 121 
$eflore_form->addElement('html', $partie_entete_fin);
59 jpm 122 
 
123 
// Instanciation avec les valeur par défaut
149 jpm 124 
if (isset($_SESSION['_EFLORE_']['rechercher'])) {
155 jpm 125 
    $eflore_form->setDefaults($_SESSION['_EFLORE_']['rechercher']);
149 jpm 126 
}
59 jpm 127 
 
128 
// Transformation en XHTML du formulaire
155 jpm 129 
$sortie .= $eflore_form->toHTML()."\n";
127 jpm 130 
$sortie .= '</ul>'."\n";
59 jpm 131 
 
60 jpm 132 
// --------------------------------------------------------------------------------------------------------
133 
// Lancement de la recherche
127 jpm 134 
if (isset($_REQUEST['eflore_nom']) && $_REQUEST['eflore_nom'] != '' && !eregi("^%{1,}$", $_REQUEST['eflore_nom']) ) {
135 
    // Formatage de la chaine à rechercher
136 
    $_REQUEST['eflore_nom'] = '%'.str_replace(' ', '%', $_REQUEST['eflore_nom']).'%';
60 jpm 137 
    if ($_REQUEST['eflore_type_nom'] == 'nom_scientifique') {
138 
        // Recherche sur les noms scientifiques
127 jpm 139 
        $contenu = file_get_contents(sprintf(EFLORE_URL_LISTE_NOM_LATIN, rawurlencode($_REQUEST['eflore_nom'])));
60 jpm 140 
 
141 
        //Analyse du squelette
142 
        require_once 'HTML/Template/IT.php';
143 
        $squelette = new HTML_Template_IT();
127 jpm 144 
        $squelette->setTemplate($contenu, FALSE, FALSE);
60 jpm 145 
 
146 
        // Indique l'url pour obtenir fiche d'un nom
147 
        $squelette->setCurrentBlock('corps');
148 
        // Ajout du paramêtre action à l'url courante.
149 
        $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_FICHE);
150 
        $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ONGLET, EFLORE_LG_URL_ONGLET_SYNTHESE);
151 
        $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NN, '');
152 
        $squelette->setVariable('UrlFicheNom', $GLOBALS['_EFLORE_']['url']->getURL());
153 
        $squelette->parseCurrentBlock('corps');
154 
 
155 
        // Récupère le bloc "corps"
127 jpm 156 
        $sortie .= $squelette->get('corps');
60 jpm 157 
    } else if ($_REQUEST['eflore_type_nom'] == 'nom_vernaculaire') {
158 
        // Recherche sur les noms vernaculaires
127 jpm 159 
        $contenu = file_get_contents(sprintf(EFLORE_URL_LISTE_NOM_VERNA, rawurlencode($_REQUEST['eflore_nom'])));
60 jpm 160 
 
127 jpm 161 
        //Analyse du squelette
162 
        require_once 'HTML/Template/ITX.php';
163 
        $squelette = new HTML_Template_ITX();
164 
        $squelette->setTemplate($contenu, FALSE, FALSE);
165 
 
166 
        // Indique l'url pour obtenir fiche d'un nom
167 
        $squelette->setCurrentBlock('corps');
168 
        $squelette->setCallbackFunction('UrlFicheNom', 'remplacerUrlFicheNom');
169 
        $squelette->performCallback();
170 
        $squelette->parseCurrentBlock('corps');
171 
 
172 
        // Récupère le bloc "corps"
173 
        $sortie .= $squelette->get('corps');
174 
 
60 jpm 175 
    }
176 
}
177 
 
59 jpm 178 
/* +--Fin du code ----------------------------------------------------------------------------------------+
179 
*
180 
* $Log: not supported by cvs2svn $
155 jpm 181 
* Revision 1.5  2005/02/22 17:43:53  jpm
182 
* Suppression de référence posant problème.
183 
*
154 jpm 184 
* Revision 1.4  2005/02/15 13:00:23  jpm
185 
* Ajout d'un test pour initialiser une variable.
186 
*
149 jpm 187 
* Revision 1.3  2005/01/28 19:47:55  jpm
188 
* Ajout de la recherche pour les taxons.
189 
*
127 jpm 190 
* Revision 1.2  2005/01/03 19:44:40  jpm
191 
* Ajout de la gestion de l'action "fiche".
192 
*
60 jpm 193 
* Revision 1.1  2004/12/23 20:05:17  jpm
194 
* Début prise en maine eflore-consultation.
59 jpm 195 
*
60 jpm 196 
*
59 jpm 197 
* +-- Fin du code ----------------------------------------------------------------------------------------+
198 
*/
199 
?>