WebSVN – Applications.papyrus – Diff – /trunk/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche.class.php


<?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 Papyrus.                                                                        |
// |                                                                                                      |
// | 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: more_recherche.class.php,v 1.15 2008-11-04 17:34:37 aperonnet Exp $
/**
* Classe permettant d'effectuer des recherches sur les métas informations des menus.
*
* Permet de rechercher et classer les menus en fonction d'une chaine.
*
*@package Applette
*@subpackage Moteur_Recherche
//Auteur original :
*@author        Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author        aucun
*@copyright     Tela-Botanica 2000-2004
*@version       $Revision: 1.15 $ $Date: 2008-11-04 17:34:37 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// |                                            ENTETE du PROGRAMME                                       |
// +------------------------------------------------------------------------------------------------------+
 
 
// +------------------------------------------------------------------------------------------------------+
// |                                            CORPS du PROGRAMME                                        |
// +------------------------------------------------------------------------------------------------------+
 
class More_Recherche {
    var $motif = '';
    var $moteurs_recherches = array();
    var $resultats = array();
    
    // Constructeur
    function More_Recherche($motif) {
        $this->setMotif($motif);
    }
    
    // Accesseurs
    function getMotif() {
        return $this->motif;
    }
    function setMotif($motif) {
        $this->motif = $motif ;
    }
    function getMoteurs() {
        return $this->moteurs_recherches;
    }
    function getMoteur($id) {
        return $this->moteurs_recherches[$id];
    }
    function setMoteur($val) {
        $id_nouveau = count($this->moteurs_recherches);
        $this->moteurs_recherches[$id_nouveau] = $val;
    }
    function getResultats() {
        return $this->resultats;
    }
    function setResultats($val) {
        $this->resultats = $val;
    }
    function setResultat($aso_page) {
        $id_nouveau = count($this->resultats);
        $this->resultats[$id_nouveau] = $aso_page;
    }
    
    // Méthodes
    function eliminerAccents($motif)
    {
    	return strtr($motif,"ÀÁÂÃÄÅàáâãäåÒÓÔÕÖØòóôõöøÈÉÊËèéêëÌÍÎÏìíîïÙÚÛÜùúûüÿÑñÇç'",
                 "AAAAAAaaaaaaOOOOOOooooooEEEEeeeeIIIIiiiiUUUUuuuuyNnCc " ); 
    }
    
    function ajouterRecherche(&$objet_recherche) {
        return $this->setMoteur($objet_recherche);
    }
 
    function rechercherMotif() {
        foreach ($this->getMoteurs() as $cle => $val) {
            $this->setResultats(array_merge((array)$this->getResultats(),(array)$val->rechercherMotif($this->getMotif())));
        }
        $aso_resultats = $this->getResultats();
        
        // on teste l'existence de la fonction anonyme car sinon bug d'inclusion très pénible !
	    if (!function_exists('comparer')) {
	    	
	       	function comparer($a, $b) {
	            if ($a['poids'] > $b['poids']) {
	                return -1;
	            }
	            if ($a['poids'] < $b['poids']) {
	                return +1;
	            }
	            if ($a['poids'] = $b['poids']) {
	                return 0;
	            }
	        }
	    }
        usort($aso_resultats, 'comparer');
        $pds_max = 0;
        if (isset($aso_resultats[0]['poids'])) {
            $pds_max = $aso_resultats[0]['poids'];
        }
        for ($i = 0 ; $i < count($aso_resultats) ; $i++) {
            $aso_resultats[$i]['score'] = round((100 / $pds_max) * $aso_resultats[$i]['poids'], 1);
        }
        
        return $aso_resultats;
    }
    
    /** Renvoie le nombre d'occurences total de la présence de chaque mot.
	*
	* @param  string	le motif à rechercher.
	* @param  string	le texte dans lequel effectuer la recherche. 
	* @return integer	le nombre de fois où les mots sont trouvés.
	*/
	function retournerOccurenceMotif($motif, &$texte, $mode = MORE_MODE)
	{
		$nbre_correspondance = 0;
		$nbre_correspondance_total = 0;
		$motif = $this->traiterMotif($motif, 'simple');
		// Si demande de recherche d'expression complète
		if (preg_match('/^".+"$/', $motif)) {
			$mode = 2;
			
		}
		$motif = $this->traiterMotif($motif, 'recherche');
		switch ($mode) {
			case '1' :
				// Découpage en mot
				$tab_motif = explode(' ', $motif);
				break;
			case '2' :
				// La chaine saisie par l'utilisateur est recherchée tel quel
				$tab_motif[] = $motif;
				break;
			default:
				$e = 'Mode pour le moteur de recherche inconnu : '.$mode.
				trigger_error($e, E_USER_ERROR);
		}
		// Nous recherchons chaque mot
		$compteur_mot = 0;
		foreach ($tab_motif as $mot) {
			//$nbre_correspondance += preg_match_all('/'.$mot.'/i', $texte, $tab_morceaux);
			$nbre_correspondance = substr_count($this->eliminerAccents(strtolower($texte)), $this->eliminerAccents(strtolower($mot)));
			if ($nbre_correspondance > 0) {
				$compteur_mot++;
			}
			$nbre_correspondance_total += $nbre_correspondance; 
		}
		// Si tous les mots recherchés sont présents nous renvoyons le poids de la page.
		if ($compteur_mot == count($tab_motif)) {
			return $nbre_correspondance_total;
		} else {
			return 0;
		}
	}
	
	function traiterMotif($motif, $type = 0)
    { 	
    	switch ($type) {
			case 'simple' :
				return trim(stripslashes($motif));
				break;
			case 'recherche' :
				if (preg_match('/^"(.+)"$/', $motif, $match)) {
					$motif = $match[1];
				}
				return $motif;
				break;
			case 'url' :
				$motif = trim(stripslashes($motif));
				if (preg_match('/^"(.+)"$/', $motif, $match)) {
					$motif = $match[1];
				}
				return urlencode($motif);
				break;
			default:
				return $motif;
		}
    }
    
    function traduireMois($mois_numerique)
    {
        switch ($mois_numerique) {
            case '01' :
                return 'janvier';              
            case '02' :
                return 'février';              
            case '03' :
                return 'mars';
            case '04' :
                return 'avril';
            case '05' :
                return 'mai';
            case '06' :
                return 'juin';
            case '07' :
                return 'juillet';
            case '08' :
                return 'août';
            case '09' :
                return 'septembre';
            case '10' :
                return 'octobre';
            case '11' :
                return 'novembre';
            case '12' :
                return 'décembre';
            default:
                return '';
        }
    }
    
    /**
     * Coupe un texte suivant une taille donnée, pour éviter qu'il ne soit 
     * trop long lors de l'affichage
     * @param String texte à couper
     * @param int taille maximum du texte
     */
	function couperTexte($texte, $taille = 50)
	{
		$texte = substr($texte, 0, 400 + 2*$taille); /* eviter de travailler sur 10ko pour extraire 150 caracteres */
	
		// on utilise les \r pour passer entre les gouttes
		$texte = str_replace("\r\n", "\n", $texte);
		$texte = str_replace("\r", "\n", $texte);
	
		// sauts de ligne et paragraphes
		$texte = ereg_replace("\n\n+", "\r", $texte);
		$texte = ereg_replace("<(p|br)( [^>]*)?".">", "\r", $texte);
	
		// supprimer les traits, lignes etc
		$texte = ereg_replace("(^|\r|\n)(-[-#\*]*|_ )", "\r", $texte);
	
		// supprimer les tags
		$texte = $this->supprimerTags($texte);
		$texte = trim(str_replace("\n"," ", $texte));
		$texte .= "\n";	// marquer la fin
	
		// travailler en accents charset
		// On supprime dans Papyrus car cela tire trop de fonctions...
		//$texte = $this->filtrer_entites($texte);
	
		// supprimer les liens
		$texte = ereg_replace("\[->([^]]*)\]","\\1", $texte); // liens sans texte
		$texte = ereg_replace("\[([^\[]*)->([^]]*)\]","\\1", $texte);
	
		// supprimer les notes
		$texte = ereg_replace("\[\[([^]]|\][^]])*\]\]", "", $texte);
	
		// supprimer les codes typos
		$texte = ereg_replace("[}{]", "", $texte);
	
		// supprimer les tableaux
		$texte = ereg_replace("(^|\r)\|.*\|\r", "\r", $texte);
	
		// couper au mot precedent
		$long = $this->gererSubstr($texte, 0, max($taille-4,1));
		$court = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*\n?$", "\\1", $long);
		$points = MORE_LG_RESULTAT_ETC;
	
		// trop court ? ne pas faire de (...)
		if (strlen($court) < max(0.75 * $taille,2)) {
			$points = '';
			$long = $this->gererSubstr($texte, 0, $taille);
			$texte = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*$", "\\1", $long);
			// encore trop court ? couper au caractere
			if (strlen($texte) < 0.75 * $taille)
				$texte = $long;
		} else
			$texte = $court;
	
		if (strpos($texte, "\n"))	// la fin est encore la : c'est qu'on n'a pas de texte de suite
			$points = '';
	
		// remettre les paragraphes
		$texte = ereg_replace("\r+", "\n\n", $texte);
	
		// supprimer l'eventuelle entite finale mal coupee
		$texte = preg_replace('/&#?[a-z0-9]*$/', '', $texte);
	
		return trim($texte).$points;
	}
	
	// Gerer les outils mb_string
	// Fichier : inc_texte.php3	
	function gererSubstr($c, $start=0, $end='')
	{
		// methode substr normale
		if ($end) {
			return substr($c, $start, $end);
		} else {
			return substr($c, $start);
		}
	}
 
	// Suppression basique et brutale de tous les <...>
	// Fichier : inc_filtres.php3
	function supprimerTags($texte, $rempl = "")
	{
		$texte = preg_replace(",<[^>]*>,U", $rempl, $texte);
		// ne pas oublier un < final non ferme
		$texte = str_replace('<', ' ', $texte);
		return $texte;
	}
}
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.14  2008-10-21 16:54:18  aperonnet
* correction de bug de double inclusion de fichier quand une balise syndication est présente dans la page
*
* Revision 1.13  2008-10-21 15:24:50  aperonnet
* Ajout de résultats issus des fiches de bazar pour le moteur de recherche
*
* Revision 1.12  2007-10-29 18:29:30  jp_milcent
* Ajout d'un préfixe devant les classes de l'applette pour éviter les conflits avec d'autres classes provenant des applis clientes.
*
* Revision 1.11  2007-01-02 18:49:22  jp_milcent
* Amélioration de la gestion du motif.
* Ajout de la gestion des expressions complête via l'utilisation de guillemets.
*
* Revision 1.10  2006/12/12 13:54:41  jp_milcent
* Correction bogue : variable non initialisée.
*
* Revision 1.9  2006/10/17 09:21:40  jp_milcent
* Mise en commun des spécifications de la recherche.
*
* Revision 1.8  2006/05/23 14:18:19  jp_milcent
* Ajout de la gestion du mode de recherche au moteur de recherche de Papyrus.
* Soit on recherche chaque mot du motif, soit le motif entier.
*
* Revision 1.7  2006/05/19 10:04:55  jp_milcent
* Ajout d'un moteur de recherche analysant les articles des sites sous Spip.
*
* Revision 1.6  2006/04/28 12:41:49  florian
* corrections erreurs chemin
*
* Revision 1.5  2005/09/20 17:01:22  ddelon
* php5 et bugs divers
*
* Revision 1.4  2005/05/25 13:49:22  jpm
* Corection erreur pour la recherche dans le contenu.
*
* Revision 1.3  2005/05/19 12:46:12  jpm
* Correction bogue accesskey.
* Ajout d'un id à la liste.
* Arrondissement des score.
*
* Revision 1.2  2005/04/14 17:39:34  jpm
* Amélioration du moteur de rechercher :
*  - pourcentage
*  - ajout d'info
*
* Revision 1.1  2004/12/07 10:24:06  jpm
* Moteur de recherche version de départ.
*
* 
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>

Rev 1934	Rev 1964
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.1 \|`	4	`// \| PHP version 4.1 \|`
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 Papyrus. \|`	8	`// \| This file is part of Papyrus. \|`
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: more_recherche.class.php,v 1.14 2008-10-21 16:54:18 aperonnet Exp $`	24	`// CVS : $Id: more_recherche.class.php,v 1.15 2008-11-04 17:34:37 aperonnet Exp $`
25	`/**`	25	`/**`
26	`* Classe permettant d'effectuer des recherches sur les métas informations des menus.`	26	`* Classe permettant d'effectuer des recherches sur les métas informations des menus.`
27	`*`	27	`*`
28	`* Permet de rechercher et classer les menus en fonction d'une chaine.`	28	`* Permet de rechercher et classer les menus en fonction d'une chaine.`
29	`*`	29	`*`
30	`*@package Applette`	30	`*@package Applette`
31	`*@subpackage Moteur_Recherche`	31	`*@subpackage Moteur_Recherche`
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.14 $ $Date: 2008-10-21 16:54:18 $`	37	`*@version $Revision: 1.15 $ $Date: 2008-11-04 17:34:37 $`
38	`// +------------------------------------------------------------------------------------------------------+`	38	`// +------------------------------------------------------------------------------------------------------+`
39	`*/`	39	`*/`
40		40
41	`// +------------------------------------------------------------------------------------------------------+`	41	`// +------------------------------------------------------------------------------------------------------+`
42	`// \| ENTETE du PROGRAMME \|`	42	`// \| ENTETE du PROGRAMME \|`
43	`// +------------------------------------------------------------------------------------------------------+`	43	`// +------------------------------------------------------------------------------------------------------+`
44		44
45		45
46	`// +------------------------------------------------------------------------------------------------------+`	46	`// +------------------------------------------------------------------------------------------------------+`
47	`// \| CORPS du PROGRAMME \|`	47	`// \| CORPS du PROGRAMME \|`
48	`// +------------------------------------------------------------------------------------------------------+`	48	`// +------------------------------------------------------------------------------------------------------+`
49		49
50	`class More_Recherche {`	50	`class More_Recherche {`
51	`var $motif = '';`	51	`var $motif = '';`
52	`var $moteurs_recherches = array();`	52	`var $moteurs_recherches = array();`
53	`var $resultats = array();`	53	`var $resultats = array();`
54		54
55	`// Constructeur`	55	`// Constructeur`
56	`function More_Recherche($motif) {`	56	`function More_Recherche($motif) {`
57	`$this->setMotif($motif);`	57	`$this->setMotif($motif);`
58	`}`	58	`}`
59		59
60	`// Accesseurs`	60	`// Accesseurs`
61	`function getMotif() {`	61	`function getMotif() {`
62	`return $this->motif;`	62	`return $this->motif;`
63	`}`	63	`}`
64	`function setMotif($motif) {`	64	`function setMotif($motif) {`
65	`$this->motif = $motif;`	65	`$this->motif = $motif ;`
66	`}`	66	`}`
67	`function getMoteurs() {`	67	`function getMoteurs() {`
68	`return $this->moteurs_recherches;`	68	`return $this->moteurs_recherches;`
69	`}`	69	`}`
70	`function getMoteur($id) {`	70	`function getMoteur($id) {`
71	`return $this->moteurs_recherches[$id];`	71	`return $this->moteurs_recherches[$id];`
72	`}`	72	`}`
73	`function setMoteur($val) {`	73	`function setMoteur($val) {`
74	`$id_nouveau = count($this->moteurs_recherches);`	74	`$id_nouveau = count($this->moteurs_recherches);`
75	`$this->moteurs_recherches[$id_nouveau] = $val;`	75	`$this->moteurs_recherches[$id_nouveau] = $val;`
76	`}`	76	`}`
77	`function getResultats() {`	77	`function getResultats() {`
78	`return $this->resultats;`	78	`return $this->resultats;`
79	`}`	79	`}`
80	`function setResultats($val) {`	80	`function setResultats($val) {`
81	`$this->resultats = $val;`	81	`$this->resultats = $val;`
82	`}`	82	`}`
83	`function setResultat($aso_page) {`	83	`function setResultat($aso_page) {`
84	`$id_nouveau = count($this->resultats);`	84	`$id_nouveau = count($this->resultats);`
85	`$this->resultats[$id_nouveau] = $aso_page;`	85	`$this->resultats[$id_nouveau] = $aso_page;`
86	`}`	86	`}`
87		87
88	`// Méthodes`	88	`// Méthodes`
-		89	`function eliminerAccents($motif)`
-		90	`{`
-		91	`return strtr($motif,"ÀÁÂÃÄÅàáâãäåÒÓÔÕÖØòóôõöøÈÉÊËèéêëÌÍÎÏìíîïÙÚÛÜùúûüÿÑñÇç'",`
-		92	`"AAAAAAaaaaaaOOOOOOooooooEEEEeeeeIIIIiiiiUUUUuuuuyNnCc " );`
-		93	`}`
89		94
90	`function ajouterRecherche(&$objet_recherche) {`	95	`function ajouterRecherche(&$objet_recherche) {`
91	`return $this->setMoteur($objet_recherche);`	96	`return $this->setMoteur($objet_recherche);`
92	`}`	97	`}`
93		98
94	`function rechercherMotif() {`	99	`function rechercherMotif() {`
95	`foreach ($this->getMoteurs() as $cle => $val) {`	100	`foreach ($this->getMoteurs() as $cle => $val) {`
96	`$this->setResultats(array_merge((array)$this->getResultats(),(array)$val->rechercherMotif($this->getMotif())));`	101	`$this->setResultats(array_merge((array)$this->getResultats(),(array)$val->rechercherMotif($this->getMotif())));`
97	`}`	102	`}`
98	`$aso_resultats = $this->getResultats();`	103	`$aso_resultats = $this->getResultats();`
99		104
100	`// on teste l'existence de la fonction anonyme car sinon bug d'inclusion très pénible !`	105	`// on teste l'existence de la fonction anonyme car sinon bug d'inclusion très pénible !`
101	`if (function_exists('comparer')) {`	106	`if (!function_exists('comparer')) {`
102		107
103	`function comparer($a, $b) {`	108	`function comparer($a, $b) {`
104	`if ($a['poids'] > $b['poids']) {`	109	`if ($a['poids'] > $b['poids']) {`
105	`return -1;`	110	`return -1;`
106	`}`	111	`}`
107	`if ($a['poids'] < $b['poids']) {`	112	`if ($a['poids'] < $b['poids']) {`
108	`return +1;`	113	`return +1;`
109	`}`	114	`}`
110	`if ($a['poids'] = $b['poids']) {`	115	`if ($a['poids'] = $b['poids']) {`
111	`return 0;`	116	`return 0;`
112	`}`	117	`}`
113	`}`	118	`}`
114	`}`	119	`}`
115	`usort($aso_resultats, 'comparer');`	120	`usort($aso_resultats, 'comparer');`
116	`$pds_max = 0;`	121	`$pds_max = 0;`
117	`if (isset($aso_resultats[0]['poids'])) {`	122	`if (isset($aso_resultats[0]['poids'])) {`
118	`$pds_max = $aso_resultats[0]['poids'];`	123	`$pds_max = $aso_resultats[0]['poids'];`
119	`}`	124	`}`
120	`for ($i = 0 ; $i < count($aso_resultats) ; $i++) {`	125	`for ($i = 0 ; $i < count($aso_resultats) ; $i++) {`
121	`$aso_resultats[$i]['score'] = round((100 / $pds_max) * $aso_resultats[$i]['poids'], 1);`	126	`$aso_resultats[$i]['score'] = round((100 / $pds_max) * $aso_resultats[$i]['poids'], 1);`
122	`}`	127	`}`
123		128
124	`return $aso_resultats;`	129	`return $aso_resultats;`
125	`}`	130	`}`
126		131
127	`/** Renvoie le nombre d'occurences total de la présence de chaque mot.`	132	`/** Renvoie le nombre d'occurences total de la présence de chaque mot.`
128	`*`	133	`*`
129	`* @param string le motif à rechercher.`	134	`* @param string le motif à rechercher.`
130	`* @param string le texte dans lequel effectuer la recherche.`	135	`* @param string le texte dans lequel effectuer la recherche.`
131	`* @return integer le nombre de fois où les mots sont trouvés.`	136	`* @return integer le nombre de fois où les mots sont trouvés.`
132	`*/`	137	`*/`
133	`function retournerOccurenceMotif($motif, &$texte, $mode = MORE_MODE)`	138	`function retournerOccurenceMotif($motif, &$texte, $mode = MORE_MODE)`
134	`{`	139	`{`
135	`$nbre_correspondance = 0;`	140	`$nbre_correspondance = 0;`
136	`$nbre_correspondance_total = 0;`	141	`$nbre_correspondance_total = 0;`
137	`$motif = $this->traiterMotif($motif, 'simple');`	142	`$motif = $this->traiterMotif($motif, 'simple');`
138	`// Si demande de recherche d'expression complète`	143	`// Si demande de recherche d'expression complète`
139	`if (preg_match('/^".+"$/', $motif)) {`	144	`if (preg_match('/^".+"$/', $motif)) {`
140	`$mode = 2;`	145	`$mode = 2;`
141		146
142	`}`	147	`}`
143	`$motif = $this->traiterMotif($motif, 'recherche');`	148	`$motif = $this->traiterMotif($motif, 'recherche');`
144	`switch ($mode) {`	149	`switch ($mode) {`
145	`case '1' :`	150	`case '1' :`
146	`// Découpage en mot`	151	`// Découpage en mot`
147	`$tab_motif = explode(' ', $motif);`	152	`$tab_motif = explode(' ', $motif);`
148	`break;`	153	`break;`
149	`case '2' :`	154	`case '2' :`
150	`// La chaine saisie par l'utilisateur est recherchée tel quel`	155	`// La chaine saisie par l'utilisateur est recherchée tel quel`
151	`$tab_motif[] = $motif;`	156	`$tab_motif[] = $motif;`
152	`break;`	157	`break;`
153	`default:`	158	`default:`
154	`$e = 'Mode pour le moteur de recherche inconnu : '.$mode.`	159	`$e = 'Mode pour le moteur de recherche inconnu : '.$mode.`
155	`trigger_error($e, E_USER_ERROR);`	160	`trigger_error($e, E_USER_ERROR);`
156	`}`	161	`}`
157	`// Nous recherchons chaque mot`	162	`// Nous recherchons chaque mot`
158	`$compteur_mot = 0;`	163	`$compteur_mot = 0;`
159	`foreach ($tab_motif as $mot) {`	164	`foreach ($tab_motif as $mot) {`
160	`//$nbre_correspondance += preg_match_all('/'.$mot.'/i', $texte, $tab_morceaux);`	165	`//$nbre_correspondance += preg_match_all('/'.$mot.'/i', $texte, $tab_morceaux);`
161	`$nbre_correspondance = substr_count(strtolower($texte), strtolower($mot));`	166	`$nbre_correspondance = substr_count($this->eliminerAccents(strtolower($texte)), $this->eliminerAccents(strtolower($mot)));`
162	`if ($nbre_correspondance > 0) {`	167	`if ($nbre_correspondance > 0) {`
163	`$compteur_mot++;`	168	`$compteur_mot++;`
164	`}`	169	`}`
165	`$nbre_correspondance_total += $nbre_correspondance;`	170	`$nbre_correspondance_total += $nbre_correspondance;`
166	`}`	171	`}`
167	`// Si tous les mots recherchés sont présents nous renvoyons le poids de la page.`	172	`// Si tous les mots recherchés sont présents nous renvoyons le poids de la page.`
168	`if ($compteur_mot == count($tab_motif)) {`	173	`if ($compteur_mot == count($tab_motif)) {`
169	`return $nbre_correspondance_total;`	174	`return $nbre_correspondance_total;`
170	`} else {`	175	`} else {`
171	`return 0;`	176	`return 0;`
172	`}`	177	`}`
173	`}`	178	`}`
174		179
175	`function traiterMotif($motif, $type = 0)`	180	`function traiterMotif($motif, $type = 0)`
176	`{`	181	`{`
177	`switch ($type) {`	182	`switch ($type) {`
178	`case 'simple' :`	183	`case 'simple' :`
179	`return trim(stripslashes($motif));`	184	`return trim(stripslashes($motif));`
180	`break;`	185	`break;`
181	`case 'recherche' :`	186	`case 'recherche' :`
182	`if (preg_match('/^"(.+)"$/', $motif, $match)) {`	187	`if (preg_match('/^"(.+)"$/', $motif, $match)) {`
183	`$motif = $match[1];`	188	`$motif = $match[1];`
184	`}`	189	`}`
185	`return $motif;`	190	`return $motif;`
186	`break;`	191	`break;`
187	`case 'url' :`	192	`case 'url' :`
188	`$motif = trim(stripslashes($motif));`	193	`$motif = trim(stripslashes($motif));`
189	`if (preg_match('/^"(.+)"$/', $motif, $match)) {`	194	`if (preg_match('/^"(.+)"$/', $motif, $match)) {`
190	`$motif = $match[1];`	195	`$motif = $match[1];`
191	`}`	196	`}`
192	`return urlencode($motif);`	197	`return urlencode($motif);`
193	`break;`	198	`break;`
194	`default:`	199	`default:`
195	`return $motif;`	200	`return $motif;`
196	`}`	201	`}`
197	`}`	202	`}`
198		203
199	`function traduireMois($mois_numerique)`	204	`function traduireMois($mois_numerique)`
200	`{`	205	`{`
201	`switch ($mois_numerique) {`	206	`switch ($mois_numerique) {`
202	`case '01' :`	207	`case '01' :`
203	`return 'janvier';`	208	`return 'janvier';`
204	`case '02' :`	209	`case '02' :`
205	`return 'février';`	210	`return 'février';`
206	`case '03' :`	211	`case '03' :`
207	`return 'mars';`	212	`return 'mars';`
208	`case '04' :`	213	`case '04' :`
209	`return 'avril';`	214	`return 'avril';`
210	`case '05' :`	215	`case '05' :`
211	`return 'mai';`	216	`return 'mai';`
212	`case '06' :`	217	`case '06' :`
213	`return 'juin';`	218	`return 'juin';`
214	`case '07' :`	219	`case '07' :`
215	`return 'juillet';`	220	`return 'juillet';`
216	`case '08' :`	221	`case '08' :`
217	`return 'août';`	222	`return 'août';`
218	`case '09' :`	223	`case '09' :`
219	`return 'septembre';`	224	`return 'septembre';`
220	`case '10' :`	225	`case '10' :`
221	`return 'octobre';`	226	`return 'octobre';`
222	`case '11' :`	227	`case '11' :`
223	`return 'novembre';`	228	`return 'novembre';`
224	`case '12' :`	229	`case '12' :`
225	`return 'décembre';`	230	`return 'décembre';`
226	`default:`	231	`default:`
227	`return '';`	232	`return '';`
228	`}`	233	`}`
229	`}`	234	`}`
230		235
231	`/**`	236	`/**`
232	`* Coupe un texte suivant une taille donnée, pour éviter qu'il ne soit`	237	`* Coupe un texte suivant une taille donnée, pour éviter qu'il ne soit`
233	`* trop long lors de l'affichage`	238	`* trop long lors de l'affichage`
234	`* @param String texte à couper`	239	`* @param String texte à couper`
235	`* @param int taille maximum du texte`	240	`* @param int taille maximum du texte`
236	`*/`	241	`*/`
237	`function couperTexte($texte, $taille = 50)`	242	`function couperTexte($texte, $taille = 50)`
238	`{`	243	`{`
239	`$texte = substr($texte, 0, 400 + 2$taille); / eviter de travailler sur 10ko pour extraire 150 caracteres */`	244	`$texte = substr($texte, 0, 400 + 2$taille); / eviter de travailler sur 10ko pour extraire 150 caracteres */`
240		245
241	`// on utilise les \r pour passer entre les gouttes`	246	`// on utilise les \r pour passer entre les gouttes`
242	`$texte = str_replace("\r\n", "\n", $texte);`	247	`$texte = str_replace("\r\n", "\n", $texte);`
243	`$texte = str_replace("\r", "\n", $texte);`	248	`$texte = str_replace("\r", "\n", $texte);`
244		249
245	`// sauts de ligne et paragraphes`	250	`// sauts de ligne et paragraphes`
246	`$texte = ereg_replace("\n\n+", "\r", $texte);`	251	`$texte = ereg_replace("\n\n+", "\r", $texte);`
247	`$texte = ereg_replace("<(p\|br)( [^>]*)?".">", "\r", $texte);`	252	`$texte = ereg_replace("<(p\|br)( [^>]*)?".">", "\r", $texte);`
248		253
249	`// supprimer les traits, lignes etc`	254	`// supprimer les traits, lignes etc`
250	`$texte = ereg_replace("(^\|\r\|\n)(-[-#\]\|_ )", "\r", $texte);`	255	`$texte = ereg_replace("(^\|\r\|\n)(-[-#\]\|_ )", "\r", $texte);`
251		256
252	`// supprimer les tags`	257	`// supprimer les tags`
253	`$texte = $this->supprimerTags($texte);`	258	`$texte = $this->supprimerTags($texte);`
254	`$texte = trim(str_replace("\n"," ", $texte));`	259	`$texte = trim(str_replace("\n"," ", $texte));`
255	`$texte .= "\n"; // marquer la fin`	260	`$texte .= "\n"; // marquer la fin`
256		261
257	`// travailler en accents charset`	262	`// travailler en accents charset`
258	`// On supprime dans Papyrus car cela tire trop de fonctions...`	263	`// On supprime dans Papyrus car cela tire trop de fonctions...`
259	`//$texte = $this->filtrer_entites($texte);`	264	`//$texte = $this->filtrer_entites($texte);`
260		265
261	`// supprimer les liens`	266	`// supprimer les liens`
262	`$texte = ereg_replace("\[->([^]]*)\]","\\1", $texte); // liens sans texte`	267	`$texte = ereg_replace("\[->([^]]*)\]","\\1", $texte); // liens sans texte`
263	`$texte = ereg_replace("\[([^\[])->([^]])\]","\\1", $texte);`	268	`$texte = ereg_replace("\[([^\[])->([^]])\]","\\1", $texte);`
264		269
265	`// supprimer les notes`	270	`// supprimer les notes`
266	`$texte = ereg_replace("\[\[([^]]\|\][^]])*\]\]", "", $texte);`	271	`$texte = ereg_replace("\[\[([^]]\|\][^]])*\]\]", "", $texte);`
267		272
268	`// supprimer les codes typos`	273	`// supprimer les codes typos`
269	`$texte = ereg_replace("[}{]", "", $texte);`	274	`$texte = ereg_replace("[}{]", "", $texte);`
270		275
271	`// supprimer les tableaux`	276	`// supprimer les tableaux`
272	`$texte = ereg_replace("(^\|\r)\\|.*\\|\r", "\r", $texte);`	277	`$texte = ereg_replace("(^\|\r)\\|.*\\|\r", "\r", $texte);`
273		278
274	`// couper au mot precedent`	279	`// couper au mot precedent`
275	`$long = $this->gererSubstr($texte, 0, max($taille-4,1));`	280	`$long = $this->gererSubstr($texte, 0, max($taille-4,1));`
276	`$court = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*\n?$", "\\1", $long);`	281	`$court = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*\n?$", "\\1", $long);`
277	`$points = MORE_LG_RESULTAT_ETC;`	282	`$points = MORE_LG_RESULTAT_ETC;`
278		283
279	`// trop court ? ne pas faire de (...)`	284	`// trop court ? ne pas faire de (...)`
280	`if (strlen($court) < max(0.75 * $taille,2)) {`	285	`if (strlen($court) < max(0.75 * $taille,2)) {`
281	`$points = '';`	286	`$points = '';`
282	`$long = $this->gererSubstr($texte, 0, $taille);`	287	`$long = $this->gererSubstr($texte, 0, $taille);`
283	`$texte = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*$", "\\1", $long);`	288	`$texte = ereg_replace("([^[:space:]][[:space:]]+)[^[:space:]]*$", "\\1", $long);`
284	`// encore trop court ? couper au caractere`	289	`// encore trop court ? couper au caractere`
285	`if (strlen($texte) < 0.75 * $taille)`	290	`if (strlen($texte) < 0.75 * $taille)`
286	`$texte = $long;`	291	`$texte = $long;`
287	`} else`	292	`} else`
288	`$texte = $court;`	293	`$texte = $court;`
289		294
290	`if (strpos($texte, "\n")) // la fin est encore la : c'est qu'on n'a pas de texte de suite`	295	`if (strpos($texte, "\n")) // la fin est encore la : c'est qu'on n'a pas de texte de suite`
291	`$points = '';`	296	`$points = '';`
292		297
293	`// remettre les paragraphes`	298	`// remettre les paragraphes`
294	`$texte = ereg_replace("\r+", "\n\n", $texte);`	299	`$texte = ereg_replace("\r+", "\n\n", $texte);`
295		300
296	`// supprimer l'eventuelle entite finale mal coupee`	301	`// supprimer l'eventuelle entite finale mal coupee`
297	`$texte = preg_replace('/&#?[a-z0-9]*$/', '', $texte);`	302	`$texte = preg_replace('/&#?[a-z0-9]*$/', '', $texte);`
298		303
299	`return trim($texte).$points;`	304	`return trim($texte).$points;`
300	`}`	305	`}`
301		306
302	`// Gerer les outils mb_string`	307	`// Gerer les outils mb_string`
303	`// Fichier : inc_texte.php3`	308	`// Fichier : inc_texte.php3`
304	`function gererSubstr($c, $start=0, $end='')`	309	`function gererSubstr($c, $start=0, $end='')`
305	`{`	310	`{`
306	`// methode substr normale`	311	`// methode substr normale`
307	`if ($end) {`	312	`if ($end) {`
308	`return substr($c, $start, $end);`	313	`return substr($c, $start, $end);`
309	`} else {`	314	`} else {`
310	`return substr($c, $start);`	315	`return substr($c, $start);`
311	`}`	316	`}`
312	`}`	317	`}`
313		318
314	`// Suppression basique et brutale de tous les <...>`	319	`// Suppression basique et brutale de tous les <...>`
315	`// Fichier : inc_filtres.php3`	320	`// Fichier : inc_filtres.php3`
316	`function supprimerTags($texte, $rempl = "")`	321	`function supprimerTags($texte, $rempl = "")`
317	`{`	322	`{`
318	`$texte = preg_replace(",<[^>]*>,U", $rempl, $texte);`	323	`$texte = preg_replace(",<[^>]*>,U", $rempl, $texte);`
319	`// ne pas oublier un < final non ferme`	324	`// ne pas oublier un < final non ferme`
320	`$texte = str_replace('<', ' ', $texte);`	325	`$texte = str_replace('<', ' ', $texte);`
321	`return $texte;`	326	`return $texte;`
322	`}`	327	`}`
323	`}`	328	`}`
324		329
325	`/* +--Fin du code ----------------------------------------------------------------------------------------+`	330	`/* +--Fin du code ----------------------------------------------------------------------------------------+`
326	`*`	331	`*`
327	`* $Log: not supported by cvs2svn $`	332	`* $Log: not supported by cvs2svn $`
-		333	`* Revision 1.14 2008-10-21 16:54:18 aperonnet`
-		334	`* correction de bug de double inclusion de fichier quand une balise syndication est présente dans la page`
-		335	`*`
328	`* Revision 1.13 2008-10-21 15:24:50 aperonnet`	336	`* Revision 1.13 2008-10-21 15:24:50 aperonnet`
329	`* Ajout de résultats issus des fiches de bazar pour le moteur de recherche`	337	`* Ajout de résultats issus des fiches de bazar pour le moteur de recherche`
330	`*`	338	`*`
331	`* Revision 1.12 2007-10-29 18:29:30 jp_milcent`	339	`* Revision 1.12 2007-10-29 18:29:30 jp_milcent`
332	`* Ajout d'un préfixe devant les classes de l'applette pour éviter les conflits avec d'autres classes provenant des applis clientes.`	340	`* Ajout d'un préfixe devant les classes de l'applette pour éviter les conflits avec d'autres classes provenant des applis clientes.`
333	`*`	341	`*`
334	`* Revision 1.11 2007-01-02 18:49:22 jp_milcent`	342	`* Revision 1.11 2007-01-02 18:49:22 jp_milcent`
335	`* Amélioration de la gestion du motif.`	343	`* Amélioration de la gestion du motif.`
336	`* Ajout de la gestion des expressions complête via l'utilisation de guillemets.`	344	`* Ajout de la gestion des expressions complête via l'utilisation de guillemets.`
337	`*`	345	`*`
338	`* Revision 1.10 2006/12/12 13:54:41 jp_milcent`	346	`* Revision 1.10 2006/12/12 13:54:41 jp_milcent`
339	`* Correction bogue : variable non initialisée.`	347	`* Correction bogue : variable non initialisée.`
340	`*`	348	`*`
341	`* Revision 1.9 2006/10/17 09:21:40 jp_milcent`	349	`* Revision 1.9 2006/10/17 09:21:40 jp_milcent`
342	`* Mise en commun des spécifications de la recherche.`	350	`* Mise en commun des spécifications de la recherche.`
343	`*`	351	`*`
344	`* Revision 1.8 2006/05/23 14:18:19 jp_milcent`	352	`* Revision 1.8 2006/05/23 14:18:19 jp_milcent`
345	`* Ajout de la gestion du mode de recherche au moteur de recherche de Papyrus.`	353	`* Ajout de la gestion du mode de recherche au moteur de recherche de Papyrus.`
346	`* Soit on recherche chaque mot du motif, soit le motif entier.`	354	`* Soit on recherche chaque mot du motif, soit le motif entier.`
347	`*`	355	`*`
348	`* Revision 1.7 2006/05/19 10:04:55 jp_milcent`	356	`* Revision 1.7 2006/05/19 10:04:55 jp_milcent`
349	`* Ajout d'un moteur de recherche analysant les articles des sites sous Spip.`	357	`* Ajout d'un moteur de recherche analysant les articles des sites sous Spip.`
350	`*`	358	`*`
351	`* Revision 1.6 2006/04/28 12:41:49 florian`	359	`* Revision 1.6 2006/04/28 12:41:49 florian`
352	`* corrections erreurs chemin`	360	`* corrections erreurs chemin`
353	`*`	361	`*`
354	`* Revision 1.5 2005/09/20 17:01:22 ddelon`	362	`* Revision 1.5 2005/09/20 17:01:22 ddelon`
355	`* php5 et bugs divers`	363	`* php5 et bugs divers`
356	`*`	364	`*`
357	`* Revision 1.4 2005/05/25 13:49:22 jpm`	365	`* Revision 1.4 2005/05/25 13:49:22 jpm`
358	`* Corection erreur pour la recherche dans le contenu.`	366	`* Corection erreur pour la recherche dans le contenu.`
359	`*`	367	`*`
360	`* Revision 1.3 2005/05/19 12:46:12 jpm`	368	`* Revision 1.3 2005/05/19 12:46:12 jpm`
361	`* Correction bogue accesskey.`	369	`* Correction bogue accesskey.`
362	`* Ajout d'un id à la liste.`	370	`* Ajout d'un id à la liste.`
363	`* Arrondissement des score.`	371	`* Arrondissement des score.`
364	`*`	372	`*`
365	`* Revision 1.2 2005/04/14 17:39:34 jpm`	373	`* Revision 1.2 2005/04/14 17:39:34 jpm`
366	`* Amélioration du moteur de rechercher :`	374	`* Amélioration du moteur de rechercher :`
367	`* - pourcentage`	375	`* - pourcentage`
368	`* - ajout d'info`	376	`* - ajout d'info`
369	`*`	377	`*`
370	`* Revision 1.1 2004/12/07 10:24:06 jpm`	378	`* Revision 1.1 2004/12/07 10:24:06 jpm`
371	`* Moteur de recherche version de départ.`	379	`* Moteur de recherche version de départ.`
372	`*`	380	`*`
373	`*`	381	`*`
374	`* +-- Fin du code ----------------------------------------------------------------------------------------+`	382	`* +-- Fin du code ----------------------------------------------------------------------------------------+`
375	`*/`	383	`*/`
376	`?>`	384	`?>`

Subversion Repositories Applications.papyrus

(root)/trunk/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche.class.php – Rev 1934 → 1964