Subversion Repositories eFlore/Archives.eflore-consultation-v2

Rev

Rev 59 | Rev 150 | Go to most recent revision | Only display areas with differences | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 59 Rev 127
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.3                                                                                      |
 4 
// | PHP version 4.3                                                                                      |
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 eFlore-consultation.                                                            |
 8 
// | This file is part of eFlore-consultation.                                                            |
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: eflore_recherche_taxonomie.inc.php,v 1.1 2004-12-23 20:05:17 jpm Exp $
 24 
// CVS : $Id: eflore_recherche_taxonomie.inc.php,v 1.2 2005-01-28 19:47:55 jpm Exp $
25 
/**
 25 
/**
26 
* Affichage du moteur de recherche taxonomique et de ses résultats.
 26 
* Affichage du moteur de recherche taxonomique et de ses résultats.
27 
*
 27 
*
28 
* Ce script fournit le code html correspondant aux moteurs de recherche taxonomique (par projet) et ses
28 
* Ce script fournit le code html correspondant aux moteurs de recherche taxonomique (par projet) et ses
29 
* résultats.
 29 
* résultats.
30 
*
 30 
*
31 
*@package eFlore
 31 
*@package eFlore
32 
//Auteur original :
 32 
//Auteur original :
33 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
 33 
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
34 
//Autres auteurs :
 34 
//Autres auteurs :
35 
*@author        Aucun
 35 
*@author        Aucun
36 
*@copyright     Tela-Botanica 2000-2004
 36 
*@copyright     Tela-Botanica 2000-2004
37 
*@version       $Revision: 1.1 $ $Date: 2004-12-23 20:05:17 $
 37 
*@version       $Revision: 1.2 $ $Date: 2005-01-28 19:47:55 $
38 
// +------------------------------------------------------------------------------------------------------+
 38 
// +------------------------------------------------------------------------------------------------------+
39 
*/
 39 
*/
40 
 
 40 
 
41 
// +------------------------------------------------------------------------------------------------------+
 41 
// +------------------------------------------------------------------------------------------------------+
42 
// |                                            ENTÊTE du PROGRAMME                                       |
 42 
// |                                            ENTÊTE du PROGRAMME                                       |
43 
// +------------------------------------------------------------------------------------------------------+
 43 
// +------------------------------------------------------------------------------------------------------+
44 
 
 44 
 
45 
 
 45 
 
46 
// +------------------------------------------------------------------------------------------------------+
 46 
// +------------------------------------------------------------------------------------------------------+
47 
// |                                            CORPS du PROGRAMME                                        |
 47 
// |                                            CORPS du PROGRAMME                                        |
48 
// +------------------------------------------------------------------------------------------------------+
 48 
// +------------------------------------------------------------------------------------------------------+
- 
 
 49 
// Recherche sur les noms scientifiques
- 
 
 50 
if (isset($_REQUEST['eflore_projet']) AND isset($_REQUEST['eflore_rang']) AND isset($_REQUEST['eflore_ordre'])) {
- 
 
 51 
    if (!isset($_REQUEST['eflore_lettre'])) {
- 
 
 52 
        $_REQUEST['eflore_lettre'] = 'A';
- 
 
 53 
    }
- 
 
 54 
    $url = sprintf(EFLORE_URL_FORM_TAXON_ALPHABET, rawurlencode($_REQUEST['eflore_projet']), rawurlencode($_REQUEST['eflore_rang']), rawurlencode($_REQUEST['eflore_ordre']), rawurlencode($_REQUEST['eflore_lettre']));
- 
 
 55 
} else {
- 
 
 56 
    $url = EFLORE_URL_FORM_TAXON;
49 
/*
 57 
}
- 
 
 58 
$contenu = file_get_contents($url);
- 
 
 59 
 
- 
 
 60 
//Analyse du squelette
- 
 
 61 
require_once 'HTML/Template/IT.php';
- 
 
 62 
$squelette = new HTML_Template_IT();
- 
 
 63 
$squelette->setTemplate($contenu, FALSE, FALSE);
- 
 
 64 
 
- 
 
 65 
// Indique l'url pour obtenir fiche d'un nom
- 
 
 66 
$squelette->setCurrentBlock('corps');
- 
 
 67 
// Ajout du paramêtre action à l'url courante.
- 
 
 68 
$GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_RECH_TAX);
- 
 
 69 
$squelette->setVariable('UrlProjetTaxon', $GLOBALS['_EFLORE_']['url']->getURL());
- 
 
 70 
$GLOBALS['_EFLORE_']['url']->removeQueryString(EFLORE_LG_URL_ACTION);
- 
 
 71 
$squelette->parseCurrentBlock('corps');
- 
 
 72 
 
- 
 
 73 
// Récupère le bloc "corps"
- 
 
 74 
$sortie .= $squelette->get('corps');
- 
 
 75 
 
- 
 
 76 
// --------------------------------------------------------------------------------------------------------
- 
 
 77 
// Lancement de la recherche
- 
 
 78 
if (isset($_REQUEST['eflore_lettre'])) {
50 
<h2> Rechercher par projet </h2>
 79 
    // Recherche sur les noms scientifiques
- 
 
 80 
    $url = sprintf(EFLORE_URL_LISTE_TAXON, rawurlencode($_REQUEST['eflore_projet']), rawurlencode($_REQUEST['eflore_rang']), rawurlencode($_REQUEST['eflore_ordre']), rawurlencode($_REQUEST['eflore_lettre']));
- 
 
 81 
    $contenu = file_get_contents($url);
- 
 
 82
- 
 
 83 
    //Analyse du squelette
- 
 
 84 
    require_once 'HTML/Template/IT.php';
- 
 
 85 
    $squelette = new HTML_Template_IT();
- 
 
 86 
    $squelette->setTemplate($contenu, FALSE, FALSE);
- 
 
 87
- 
 
 88 
    // Indique l'url pour obtenir fiche d'un nom
- 
 
 89 
    $squelette->setCurrentBlock('corps');
- 
 
 90 
    // Ajout du paramêtre action à l'url courante.
- 
 
 91 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ACTION, EFLORE_LG_URL_ACTION_FICHE);
- 
 
 92 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_ONGLET, EFLORE_LG_URL_ONGLET_SYNTHESE);
- 
 
 93 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NN, '');
- 
 
 94 
    $squelette->setVariable('UrlFicheNom', $GLOBALS['_EFLORE_']['url']->getURL());
- 
 
 95 
    $GLOBALS['_EFLORE_']['url']->removeQueryString(EFLORE_LG_URL_NN);
- 
 
 96 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_NVP, $_REQUEST['eflore_projet']);
- 
 
 97 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_RG, $_REQUEST['eflore_rang']);
- 
 
 98 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_OD, $_REQUEST['eflore_ordre']);
- 
 
 99 
    $GLOBALS['_EFLORE_']['url']->addQueryString(EFLORE_LG_URL_LE, '');
- 
 
 100 
    $squelette->setVariable('UrlRechercheTaxonAlphabet', $GLOBALS['_EFLORE_']['url']->getURL());
- 
 
 101 
    $squelette->parseCurrentBlock('corps');
- 
 
 102
- 
 
 103 
    // Récupère le bloc "corps"
- 
 
 104 
    $sortie .= $squelette->get('corps');
- 
 
 105 
}
51 
 
 - 
 
52 
<form method="post" action="/" name="eflore_form_taxonomie">
 - 
 
53 
  <fieldset>
 - 
 
54 
    <legend>Rechercher par projet</legend>
 - 
 
55 
    <ul>
 - 
 
56 
      <li>
 - 
 
57 
        <select name="Projets">
 - 
 
58 
          <option>BDNFF</option>
 - 
 
59 
          <option>Flore de la R&eacute;union</option>
 - 
 
60 
          <option>Flore de Guadeloupe et Martinique</option>
 - 
 
61 
          <option>Curcubitaceae du monde</option>
 - 
 
62 
        </select>
 - 
 
63 
        <select name="Rang d&eacute;part">
 - 
 
64 
          <option>R&eacute;gne</option>
 - 
 
65 
          <option>Famille</option>
 - 
 
66 
          <option>Genre</option>
 - 
 
67 
        </select>
 - 
 
68 
      </li>
 - 
 
69 
      <li>
 - 
 
70 
        <p>
 - 
 
71 
          <a href="/a">A</a> |
- 
 
72 
          <a href="/b">B</a> |
- 
 
73 
          <a href="/c">C</a> |
 - 
 
74 
          <a href="/d">D</a> |
 - 
 
75 
          <a href="/e">E</a> |
 - 
 
76 
          <a href="/f">F</a> |
 - 
 
77 
          <a href="g">G</a> |
- 
 
78 
          <a href="/h">H</a> |
- 
 
79 
          <a href="/i">I</a> |
- 
 
80 
          <a href="/j">J</a> |
- 
 
81 
          K |
 - 
 
82 
          L |
 - 
 
83 
          <a href="/m">M</a> |
 - 
 
84 
          N | O | P | Q | R | S | T | U | V | W | X | Y | Z | Tous
 - 
 
85 
        </p>
 - 
 
86 
      </li>
 - 
 
87 
    </ul>
 - 
 
88 
  </fieldset>
 - 
 
89 
</form>
 - 
 
90 
*/
 106 
 
91 
/* +--Fin du code ----------------------------------------------------------------------------------------+
 107 
/* +--Fin du code ----------------------------------------------------------------------------------------+
92 
*
 108 
*
93 
* $Log: not supported by cvs2svn $
 109 
* $Log: not supported by cvs2svn $
- 
 
 110 
* Revision 1.1  2004/12/23 20:05:17  jpm
- 
 
 111 
* Début prise en maine eflore-consultation.
- 
 
 112 
*
94 
*
 113 
*
95 
* +-- Fin du code ----------------------------------------------------------------------------------------+
 114 
* +-- Fin du code ----------------------------------------------------------------------------------------+
96 
*/
 115 
*/
97 
?>
 116 
?>