Rev 162 | 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 | // +------------------------------------------------------------------------------------------------------+ |
||
| 168 | jpm | 24 | // CVS : $Id: eflore_recherche_nomenclature.inc.php,v 1.10 2005-05-19 07:40:06 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 |
||
| 168 | jpm | 36 | *@version $Revision: 1.10 $ $Date: 2005-05-19 07:40:06 $ |
| 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 |
||
| 60 | jpm | 59 | // Ajout du paramêtre action à l'url courante. |
| 60 | $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_RECH_NOM); |
||
| 59 | jpm | 61 | // Notes : Quickform semble remplacer les & des & à nouveau par des & solution utiliser str_replace()... |
| 155 | jpm | 62 | $eflore_form = new HTML_QuickForm('eflore_form_nomenclature', 'post', str_replace('&', '&', $GLOBALS['_EFLORE_']['url']->getUrl())); |
| 60 | jpm | 63 | $tab_index = EFLORE_RECH_NOM_FORM_TAB; |
| 156 | jpm | 64 | $eflore_squelette =& $eflore_form->defaultRenderer(); |
| 155 | jpm | 65 | $eflore_squelette->setFormTemplate("\n".'<form{attributes}>'."\n".'{content}'."\n".'</form>'); |
| 66 | $eflore_squelette->setElementTemplate( '<li>'."\n". |
||
| 59 | jpm | 67 | '{label}'."\n". |
| 68 | '{element}'."\n". |
||
| 127 | jpm | 69 | '<!-- BEGIN required --><span class="symbole_obligatoire">'.EFLORE_LG_FORM_SYMBOLE_OBLIGATOIRE.'</span><!-- END required -->'."\n". |
| 60 | jpm | 70 | '<!-- BEGIN error --><span class="erreur">{error}</span><!-- END error -->'."\n". |
| 59 | jpm | 71 | '</li>'."\n"); |
| 155 | jpm | 72 | $eflore_form->accept($eflore_squelette); |
| 73 | $eflore_form->removeAttribute('name'); |
||
| 59 | jpm | 74 | |
| 162 | jpm | 75 | $partie_menu_debut = '<fieldset>'."\n".'<legend>'.EFLORE_LG_RECH_NOM_FORM_TITRE.'</legend><ul>'."\n"; |
| 155 | jpm | 76 | $eflore_form->addElement('html', $partie_menu_debut); |
| 59 | jpm | 77 | |
| 78 | $id = 'eflore_nom'; |
||
| 168 | jpm | 79 | $aso_attributs = array( 'id'=> $id, 'class' => 'champ', 'tabindex' => $tab_index++, |
| 59 | jpm | 80 | 'size' => EFLORE_RECH_NOM_FORM_NOM_SIZE, |
| 81 | 'maxlength' => EFLORE_RECH_NOM_FORM_NOM_MAXLENGTH, |
||
| 82 | 'onclick' => "javascript: this.value='';"); |
||
| 83 | $label = '<label for="'.$id.'">'.EFLORE_LG_RECH_NOM_FORM_NOM.'</label>'; |
||
| 155 | jpm | 84 | $eflore_form->addElement('text', $id, $label, $aso_attributs); |
| 59 | jpm | 85 | |
| 162 | jpm | 86 | $liste_type_nom_debut = '<li><ul>'."\n"; |
| 155 | jpm | 87 | $eflore_form->addElement('html', $liste_type_nom_debut); |
| 59 | jpm | 88 | |
| 162 | jpm | 89 | $id = 'eflore_type_nom_scientifique'; |
| 90 | $name = 'eflore_type_nom'; |
||
| 59 | jpm | 91 | $valeur = 'nom_scientifique'; |
| 92 | $aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++); |
||
| 60 | jpm | 93 | $label = ''; |
| 162 | jpm | 94 | $eflore_form->addElement('radio', $name, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_SCI, $valeur, $aso_attributs); |
| 155 | jpm | 95 | |
| 162 | jpm | 96 | $id = 'eflore_type_nom_vernaculaire'; |
| 97 | $name = 'eflore_type_nom'; |
||
| 59 | jpm | 98 | $valeur = 'nom_vernaculaire'; |
| 99 | $aso_attributs = array( 'id'=> $id, 'tabindex' => $tab_index++); |
||
| 60 | jpm | 100 | $label = ''; |
| 162 | jpm | 101 | $eflore_form->addElement('radio', $name, $label, EFLORE_LG_RECH_NOM_FORM_TYPE_NOM_VER, $valeur, $aso_attributs); |
| 102 | |||
| 103 | if (isset($_REQUEST[$name])) { |
||
| 104 | switch ($_REQUEST[$name]) { |
||
| 105 | case 'nom_scientifique' : |
||
| 106 | $eflore_form->setDefaults(array($name => 'nom_scientifique')); |
||
| 60 | jpm | 107 | break; |
| 162 | jpm | 108 | case 'nom_vernaculaire' : |
| 109 | $eflore_form->setDefaults(array($name => 'nom_vernaculaire')); |
||
| 60 | jpm | 110 | break; |
| 111 | } |
||
| 112 | } else { |
||
| 162 | jpm | 113 | $eflore_form->setDefaults(array($name => 'nom_scientifique')); |
| 60 | jpm | 114 | } |
| 59 | jpm | 115 | |
| 162 | jpm | 116 | $liste_type_nom_fin = '</ul></li>'."\n"; |
| 155 | jpm | 117 | $eflore_form->addElement('html', $liste_type_nom_fin); |
| 59 | jpm | 118 | |
| 127 | jpm | 119 | $id = 'eflore_valider_nom'; |
| 59 | jpm | 120 | $aso_attributs = array('id'=> $id, 'class' => 'champ', 'tabindex' => $tab_index++); |
| 155 | jpm | 121 | $eflore_form->addElement('submit', $id, EFLORE_LG_RECH_NOM_FORM_VALIDER, $aso_attributs); |
| 59 | jpm | 122 | |
| 162 | jpm | 123 | $partie_entete_fin = "\n".'</ul></fieldset>'; |
| 155 | jpm | 124 | $eflore_form->addElement('html', $partie_entete_fin); |
| 59 | jpm | 125 | |
| 126 | // Instanciation avec les valeur par défaut |
||
| 149 | jpm | 127 | if (isset($_SESSION['_EFLORE_']['rechercher'])) { |
| 155 | jpm | 128 | $eflore_form->setDefaults($_SESSION['_EFLORE_']['rechercher']); |
| 149 | jpm | 129 | } |
| 59 | jpm | 130 | |
| 131 | // Transformation en XHTML du formulaire |
||
| 155 | jpm | 132 | $sortie .= $eflore_form->toHTML()."\n"; |
| 59 | jpm | 133 | |
| 60 | jpm | 134 | // -------------------------------------------------------------------------------------------------------- |
| 135 | // Lancement de la recherche |
||
| 127 | jpm | 136 | if (isset($_REQUEST['eflore_nom']) && $_REQUEST['eflore_nom'] != '' && !eregi("^%{1,}$", $_REQUEST['eflore_nom']) ) { |
| 137 | // Formatage de la chaine à rechercher |
||
| 138 | $_REQUEST['eflore_nom'] = '%'.str_replace(' ', '%', $_REQUEST['eflore_nom']).'%'; |
||
| 60 | jpm | 139 | if ($_REQUEST['eflore_type_nom'] == 'nom_scientifique') { |
| 140 | // Recherche sur les noms scientifiques |
||
| 127 | jpm | 141 | $contenu = file_get_contents(sprintf(EFLORE_URL_LISTE_NOM_LATIN, rawurlencode($_REQUEST['eflore_nom']))); |
| 60 | jpm | 142 | |
| 143 | //Analyse du squelette |
||
| 144 | require_once 'HTML/Template/IT.php'; |
||
| 145 | $squelette = new HTML_Template_IT(); |
||
| 127 | jpm | 146 | $squelette->setTemplate($contenu, FALSE, FALSE); |
| 60 | jpm | 147 | |
| 148 | // Indique l'url pour obtenir fiche d'un nom |
||
| 149 | $squelette->setCurrentBlock('corps'); |
||
| 150 | // Ajout du paramêtre action à l'url courante. |
||
| 151 | $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_FICHE); |
||
| 152 | $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ONGLET, EFLORE_LG_URL_ONGLET_SYNTHESE); |
||
| 153 | $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NN, ''); |
||
| 154 | $squelette->setVariable('UrlFicheNom', $GLOBALS['_EFLORE_']['url']->getURL()); |
||
| 155 | $squelette->parseCurrentBlock('corps'); |
||
| 156 | |||
| 157 | // Récupère le bloc "corps" |
||
| 127 | jpm | 158 | $sortie .= $squelette->get('corps'); |
| 60 | jpm | 159 | } else if ($_REQUEST['eflore_type_nom'] == 'nom_vernaculaire') { |
| 160 | // Recherche sur les noms vernaculaires |
||
| 127 | jpm | 161 | $contenu = file_get_contents(sprintf(EFLORE_URL_LISTE_NOM_VERNA, rawurlencode($_REQUEST['eflore_nom']))); |
| 60 | jpm | 162 | |
| 127 | jpm | 163 | //Analyse du squelette |
| 164 | require_once 'HTML/Template/ITX.php'; |
||
| 165 | $squelette = new HTML_Template_ITX(); |
||
| 166 | $squelette->setTemplate($contenu, FALSE, FALSE); |
||
| 167 | |||
| 168 | // Indique l'url pour obtenir fiche d'un nom |
||
| 169 | $squelette->setCurrentBlock('corps'); |
||
| 170 | $squelette->setCallbackFunction('UrlFicheNom', 'remplacerUrlFicheNom'); |
||
| 171 | $squelette->performCallback(); |
||
| 172 | $squelette->parseCurrentBlock('corps'); |
||
| 173 | |||
| 174 | // Récupère le bloc "corps" |
||
| 175 | $sortie .= $squelette->get('corps'); |
||
| 176 | |||
| 60 | jpm | 177 | } |
| 178 | } |
||
| 179 | |||
| 59 | jpm | 180 | /* +--Fin du code ----------------------------------------------------------------------------------------+ |
| 181 | * |
||
| 182 | * $Log: not supported by cvs2svn $ |
||
| 168 | jpm | 183 | * Revision 1.9 2005/03/15 12:57:16 jpm |
| 184 | * Modification du code XHTML. |
||
| 185 | * |
||
| 162 | jpm | 186 | * Revision 1.8 2005/02/28 15:38:47 jpm |
| 187 | * Correction erreur due à un changement de nom. |
||
| 188 | * |
||
| 159 | jpm | 189 | * Revision 1.7 2005/02/23 12:39:27 jpm |
| 190 | * Correction bogue lié à QuickForm. |
||
| 191 | * |
||
| 156 | jpm | 192 | * Revision 1.6 2005/02/22 19:27:10 jpm |
| 193 | * Changement de nom de variables. |
||
| 194 | * Suppression de l'attribut nam de la balise form via une méthode de HTML_Common. |
||
| 195 | * |
||
| 155 | jpm | 196 | * Revision 1.5 2005/02/22 17:43:53 jpm |
| 197 | * Suppression de référence posant problème. |
||
| 198 | * |
||
| 154 | jpm | 199 | * Revision 1.4 2005/02/15 13:00:23 jpm |
| 200 | * Ajout d'un test pour initialiser une variable. |
||
| 201 | * |
||
| 149 | jpm | 202 | * Revision 1.3 2005/01/28 19:47:55 jpm |
| 203 | * Ajout de la recherche pour les taxons. |
||
| 204 | * |
||
| 127 | jpm | 205 | * Revision 1.2 2005/01/03 19:44:40 jpm |
| 206 | * Ajout de la gestion de l'action "fiche". |
||
| 207 | * |
||
| 60 | jpm | 208 | * Revision 1.1 2004/12/23 20:05:17 jpm |
| 209 | * Début prise en maine eflore-consultation. |
||
| 59 | jpm | 210 | * |
| 60 | jpm | 211 | * |
| 59 | jpm | 212 | * +-- Fin du code ----------------------------------------------------------------------------------------+ |
| 213 | */ |
||
| 214 | ?> |