Subversion Repositories Applications.papyrus

Rev

Rev 272 | Rev 368 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 272 Rev 339
Line 19... Line 19...
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: moteur_recherche.php,v 1.3 2005-02-22 19:27:21 jpm Exp $
24
// CVS : $Id: moteur_recherche.php,v 1.4 2005-04-14 17:39:34 jpm Exp $
25
/**
25
/**
26
* Applette : moteur de recherche
26
* Applette : moteur de recherche
27
*
27
*
28
* Génère un formulaire contenant une zone de saisie permettant de taper un texte à rechercher sur l'ensemble
28
* Génère un formulaire contenant une zone de saisie permettant de taper un texte à rechercher sur l'ensemble
29
* des sites gérés par Papyrus.
29
* des sites gérés par Papyrus.
-
 
30
* Utilisation des bibliothèques inclue par Papyrus :
-
 
31
* - Papyrus pap_meta.fonct.php
-
 
32
* - PEAR NET_URL
30
*
33
*
31
*@package Applette
34
*@package Applette
32
*@subpackage Moteur_recherche
35
*@subpackage Moteur_recherche
33
//Auteur original :
36
//Auteur original :
34
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
37
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
35
//Autres auteurs :
38
//Autres auteurs :
36
*@author        Aucun
39
*@author        Aucun
37
*@copyright     Tela-Botanica 2000-2004
40
*@copyright     Tela-Botanica 2000-2004
38
*@version       $Revision: 1.3 $ $Date: 2005-02-22 19:27:21 $
41
*@version       $Revision: 1.4 $ $Date: 2005-04-14 17:39:34 $
39
// +------------------------------------------------------------------------------------------------------+
42
// +------------------------------------------------------------------------------------------------------+
40
*/
43
*/
Line 41... Line 44...
41
 
44
 
42
// +------------------------------------------------------------------------------------------------------+
45
// +------------------------------------------------------------------------------------------------------+
43
// |                                            ENTETE du PROGRAMME                                       |
46
// |                                            ENTETE du PROGRAMME                                       |
44
// +------------------------------------------------------------------------------------------------------+
47
// +------------------------------------------------------------------------------------------------------+
45
$_GEN_commun['info_applette_nom_fonction'] = 'afficherMoteurRecherche';
48
$GLOBALS['_GEN_commun']['info_applette_nom_fonction'] = 'afficherMoteurRecherche';
Line 46... Line 49...
46
$_GEN_commun['info_applette_balise'] = 'MOTEUR_RECHERCHE';
49
$GLOBALS['_GEN_commun']['info_applette_balise'] = 'MOTEUR_RECHERCHE';
-
 
50
 
-
 
51
// --------------------------------------------------------------------------------------------------------
47
 
52
//Utilisation de la bibliothèque Papyrus pap_meta.fonct.php inclue par Papyrus
48
// --------------------------------------------------------------------------------------------------------
53
//Utilisation de la bibliothèque PEAR NET_URL inclue par Papyrus
49
/** Inclusion du fichier de configuration de cette application.*/
-
 
50
require_once GEN_CHEMIN_APPLETTE.'moteur_recherche/configuration/more_configuration.inc.php';
-
 
51
/** Inclusion de la bibliotheque permettant d'accéder aux fonctions sur les balises Meta.*/
-
 
52
//require_once GEN_CHEMIN_BIBLIO.'pap_meta.fonct.php';
54
/** Inclusion du fichier de configuration de cette application.*/
53
//Utilisation de la bibliothèque PEAR NET_URL
55
require_once GEN_CHEMIN_APPLETTE.'moteur_recherche/configuration/more_configuration.inc.php';
54
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
56
/** Inclusion de la bibliothèque PEAR de conception de formulaire.*/
55
require_once MORE_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm.php';
57
require_once MORE_CHEMIN_BIBLIOTHEQUE_PEAR.'HTML/QuickForm.php';
Line 56... Line 58...
56
/** Inclusion de la bibliothèque PEAR de modification des squelettes des formulaires QuickForm.*/
58
/** Inclusion de la bibliothèque PEAR de modification des squelettes des formulaires QuickForm.*/
57
require_once 'HTML/QuickForm/Renderer/Default.php';
59
require_once 'HTML/QuickForm/Renderer/Default.php';
58
 
60
 
59
// Inclusion des fichiers de traduction de l'appli ADME dePapyrus
61
// Inclusion des fichiers de traduction de l'appli ADME dePapyrus
60
if (file_exists(MORE_CHEMIN_LANGUE.'more_langue_'.$_GEN_commun['i18n'].'.inc.php')) {
62
if (file_exists(MORE_CHEMIN_LANGUE.'more_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php')) {
61
    /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/
63
    /** Inclusion du fichier de traduction suite à la transaction avec le navigateur.*/
62
    require_once MORE_CHEMIN_LANGUE.'more_langue_'.$_GEN_commun['i18n'].'.inc.php';
64
    require_once MORE_CHEMIN_LANGUE.'more_langue_'.$GLOBALS['_GEN_commun']['i18n'].'.inc.php';
63
} else {
65
} else {
Line 78... Line 80...
78
    $GLOBALS['_PAPYRUS_']['rendu']['TITRE_PAGE'] = 'Résultat de la recherche de '.$_POST['more_motif'];
80
    $GLOBALS['_PAPYRUS_']['rendu']['TITRE_PAGE'] = 'Résultat de la recherche de '.$_POST['more_motif'];
79
    // Modification des meta de l'entête de la page
81
    // Modification des meta de l'entête de la page
80
    GEN_modifierMetaHttpEquiv('Content-Type', 'text/html; charset=iso-8859-15');
82
    GEN_modifierMetaHttpEquiv('Content-Type', 'text/html; charset=iso-8859-15');
81
    GEN_modifierMetaHttpEquiv('Content-style-type', 'text/css');
83
    GEN_modifierMetaHttpEquiv('Content-style-type', 'text/css');
82
    GEN_modifierMetaHttpEquiv('Content-script-type', 'text/javascript');
84
    GEN_modifierMetaHttpEquiv('Content-script-type', 'text/javascript');
83
    GEN_modifierMetaHttpEquiv('Content-language', $_GEN_commun['i18n']);
85
    GEN_modifierMetaHttpEquiv('Content-language', $GLOBALS['_GEN_commun']['i18n']);
Line 84... Line 86...
84
    
86
    
85
    GEN_modifierMetaName('revisit-after', '15 days');
87
    GEN_modifierMetaName('revisit-after', '15 days');
86
    GEN_modifierMetaName('robots', 'index,follow');
88
    GEN_modifierMetaName('robots', 'index,follow');
87
    GEN_modifierMetaName('author', 'Tela Botanica');
89
    GEN_modifierMetaName('author', 'Tela Botanica');
Line 108... Line 110...
108
function afficherMoteurRecherche($tab_applette_arguments, $_GEN_commun)
110
function afficherMoteurRecherche($tab_applette_arguments, $_GEN_commun)
109
{
111
{
110
    // --------------------------------------------------------------------------------------------------------
112
    // --------------------------------------------------------------------------------------------------------
111
    // Initialisation de variable de configuration.
113
    // Initialisation de variable de configuration.
112
    $liste_type_site = '102, 103';// Les id des types des sites pouvant apparaître dans le sélecteur
114
    $liste_type_site = '102, 103';// Les id des types des sites pouvant apparaître dans le sélecteur
113
    $objet_pear_db = $_GEN_commun['pear_db'];//objet Pear créé par DB contenant la connexion à la base de données.
115
    $objet_pear_db =& $_GEN_commun['pear_db'];//objet Pear créé par DB contenant la connexion à la base de données.
-
 
116
    $GLOBALS['_MOTEUR_RECHERCHE_']['bd']['papyrus'] =& $_GEN_commun['pear_db'];// Connexion à la BD de Papyrus
114
    $code_site = $_GEN_commun['url_site'];//identifiant du site courant.
117
    $code_site = $_GEN_commun['url_site'];// identifiant du site courant.
115
    $id_langue = $_GEN_commun['url_i18n'];//identifiant de la langue principale du site courant.
118
    $id_langue = $_GEN_commun['url_i18n'];// identifiant de la langue principale du site courant.
116
    $GLOBALS['_MOTEUR_RECHERCHE_']['bd']['papyrus'] = $_GEN_commun['pear_db'];// Connexion à la BD de Papyrus
-
 
117
    $url = $_GEN_commun['url'];
119
    $url = $_GEN_commun['url'];
118
    $url_base = PAP_URL;
120
    $url_base = PAP_URL;
119
    $url_cle_site = GEN_URL_CLE_SITE;
121
    $url_cle_site = GEN_URL_CLE_SITE;
120
    $url_cle_i18n = GEN_URL_CLE_I18N;
122
    $url_cle_i18n = GEN_URL_CLE_I18N;
121
    $url_id_type_site = GEN_URL_ID_TYPE_SITE;
123
    $url_id_type_site = GEN_URL_ID_TYPE_SITE;
Line 144... Line 146...
144
        $retour_resultats .= '<h1>'.MORE_LG_RESULTAT_TITRE.'</h1>'."\n";
146
        $retour_resultats .= '<h1>'.MORE_LG_RESULTAT_TITRE.'</h1>'."\n";
145
        $retour_resultats .= '<ul>'."\n";
147
        $retour_resultats .= '<ul>'."\n";
146
        foreach ($aso_resultats as $val) {
148
        foreach ($aso_resultats as $val) {
147
            if (!empty($val['url'])) {
149
            if (!empty($val['url'])) {
148
                $retour_resultats .= '<li>'."\n";
150
                $retour_resultats .= '<li>'."\n";
-
 
151
                $retour_resultats .=    '<h2><a href="'.$val['url'].'" ';
-
 
152
                if ($val['hreflang'] != '') {
-
 
153
                    $retour_resultats .= 'hreflang="'.$val['hreflang'].'" ';
-
 
154
                }
-
 
155
                if ($val['accesskey'] != '') {
-
 
156
                    $retour_resultats .= 'accesskey="'.$val['accesskey'].'" ';
-
 
157
                }
-
 
158
                if ($val['title'] != '') {
-
 
159
                    $retour_resultats .= 'title="'.$val['title'].'" ';
-
 
160
                }
-
 
161
                $retour_resultats .= '>'.$val['titre'].'</a></h2>';
-
 
162
                $retour_resultats .= '<dl>'."\n";
-
 
163
                //if (trim($val['poids']) != '') {
-
 
164
                //    $retour_resultats .= '<dt>'.MORE_LG_RESULTAT_POIDS.'</dt>'."\n";
-
 
165
                //    $retour_resultats .= '<dd>'.$val['poids'].'</dd>'."\n";
-
 
166
                //}
-
 
167
                if (trim($val['score']) != '') {
-
 
168
                    $retour_resultats .= '<dt>'.MORE_LG_RESULTAT_SCORE.'</dt>'."\n";
149
                $retour_resultats .= '<a href="'.$val['url'].'">'.$val['titre'].'</a> '.MORE_LG_RESULTAT_SEPARATEUR.' ';
169
                    $retour_resultats .= '<dd>'.$val['score'].MORE_LG_RESULTAT_POURCENT.'</dd>'."\n";
-
 
170
                }
-
 
171
                if (trim($val['date_creation']) != '') {
-
 
172
                    $retour_resultats .= '<dt>'.MORE_LG_RESULTAT_DATE_CREATION.'</dt>'."\n";
-
 
173
                    $retour_resultats .= '<dd>'.$val['date_creation'].'</dd>'."\n";
-
 
174
                }
-
 
175
                if (trim($val['description']) != '') {
150
                $retour_resultats .= MORE_LG_RESULTAT_POIDS.$val['poids']."\n";
176
                    $retour_resultats .= '<dt>'.MORE_LG_RESULTAT_DESCRIPTION.'</dt>'."\n";
-
 
177
                    $retour_resultats .= '<dd>'.$val['description'].'</dd>'."\n";
-
 
178
                }
-
 
179
                $retour_resultats .= '</dl>'."\n";
151
                $retour_resultats .= '</li>'."\n";
180
                $retour_resultats .= '</li>'."\n";
152
            }
181
            }
153
        }
182
        }
154
        $retour_resultats .= '</ul>'."\n";
183
        $retour_resultats .= '</ul>'."\n";
155
        $GLOBALS['_PAPYRUS_']['rendu']['CONTENU_NAVIGATION'] = '';
184
        $GLOBALS['_PAPYRUS_']['rendu']['CONTENU_NAVIGATION'] = '';
Line 206... Line 235...
206
 
235
 
207
 
236
 
208
/* +--Fin du code ----------------------------------------------------------------------------------------+
237
/* +--Fin du code ----------------------------------------------------------------------------------------+
-
 
238
*
-
 
239
* $Log: not supported by cvs2svn $
-
 
240
* Revision 1.3  2005/02/22 19:27:21  jpm
-
 
241
* Changement de nom de variables.
209
*
242
* Suppression de l'attribut nam de la balise form via une méthode de HTML_Common.
210
* $Log: not supported by cvs2svn $
243
*
211
* Revision 1.2  2005/02/22 17:44:03  jpm
244
* Revision 1.2  2005/02/22 17:44:03  jpm
212
* Suppression de référence posant problème.
245
* Suppression de référence posant problème.
213
*
246
*