Subversion Repositories Applications.papyrus

Compare Revisions

No changes between revisions

Ignore whitespace Rev 2041 → Rev 2042

/branches/v5.0-ouadji/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche_spip_article.class.php
New file
0,0 → 1,187
<?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$
/**
* Classe permettant d'effectuer des recherches sur les informations des articles de Spip.
*
* Permet de rechercher et classer les articles en fonction d'une chaine.
* Utilisation des bibliothèques inclue par Papyrus :
* - Papyrus pap_meta.fonct.php
* - Papyrus pap_menu.fonct.php
* - Papyrus pap_url.class.php
*
*@package Applette
*@subpackage Moteur_Recherche
//Auteur original :
*@author Jean-Pascal MILCENT <jpm@tela-botanica.org>
//Autres auteurs :
*@author aucun
*@copyright Tela-Botanica 2000-2006
*@version $Revision$ $Date$
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTETE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
///** Inclusion du fichier contenant les fonctions de manipulations des menus de Papyrus.*/
//require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php';
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
class More_Recherche_Spip_Article extends More_Recherche {
// Constructeur
function Recherche_Menu_Meta($motif) {
$this->setMotif($motif);
}
// Accesseurs
function getMotif() {
return $this->motif;
}
function setMotif($motif) {
$this->motif = $motif;
}
// Méthodes
function rechercherMotif($motif) {
for ($i = 0; $i < count($GLOBALS['_MOTEUR_RECHERCHE_']['spip']); $i++ ) {
$db = DB::connect($GLOBALS['_MOTEUR_RECHERCHE_']['spip'][$i]['bdd_dsn']);
if (DB::isError($db)) {
$msg_erreur_connection = 'Impossible de se connecter à la base de données Spip.';
die(BOG_afficherErreurSql(__FILE__, __LINE__, $db->getMessage(), 'connexion à la base de données',$msg_erreur_connection));
}
$prefixe = $GLOBALS['_MOTEUR_RECHERCHE_']['spip'][$i]['table_prefixe'];
$url_base = $GLOBALS['_MOTEUR_RECHERCHE_']['spip'][$i]['url'];
$tab_articles = $this->retournerArticles($db, $prefixe);
foreach ($tab_articles as $article_id => $Article) {
// Initialisation du tableau de résultat vide
$aso_resultat = array( 'poids' => 0, 'url' => '', 'titre' => '',
'hreflang' => '', 'accesskey' => '', 'title' => '',
'date_creation' => '', 'description' => '');
// Analyse du poids de cette page vis à vis des données
$tab_champs_a_visiter = array('surtitre', 'titre', 'soustitre', 'descriptif', 'chapo', 'texte', 'ps');
foreach ($tab_champs_a_visiter as $val) {
// Vérification que le champ existe et contient quelque chose
if (isset($Article->$val) && $Article->$val != '') {
$aso_resultat['poids'] += $this->retournerOccurenceMotif($motif, $Article->$val);
}
}
if ($aso_resultat['poids'] > 0) {
// Création de l'url
$aso_resultat['url_simple'] = $url_base.'article'.$article_id.'.html';
$aso_resultat['url'] = $aso_resultat['url_simple'].'?var_recherche='.$this->traiterMotif($motif, 'url');
// Récupération du titre de la page
if (trim($Article->titre) != '') {
$aso_resultat['titre'] = htmlentities($Article->titre);
} else if (trim($Article->surtitre) != '') {
$aso_resultat['titre'] = htmlentities($Article->surtitre);
} else if (trim($Article->soustitre) != '') {
$aso_resultat['titre'] = htmlentities($Article->soustitre);
}
$aso_resultat['hreflang'] = htmlentities($Article->lang);
$aso_resultat['description'] = $this->couperTexte($Article->texte, MORE_RESULTAT_TAILLE_DESCRIPTION);
if (($jour = date('d', strtotime($Article->date)) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_jour"> '.$jour.'</span>'."\n";
}
if (($mois = $this->traduireMois(date('m', strtotime($Article->date))) ) != '' ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_mois"> '.$mois.'</span>'."\n";
}
if (($annee = date('Y', strtotime($Article->date)) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_annee"> '.$annee.'</span>'."\n";
}
$this->setResultat($aso_resultat);
}
}
}
return $this->getResultats();
}
/** Renvoie un tableau contenant les infos sur les articles
*
* @param mixed une instance de la classse Pear DB.
* @param string le préfixe pour les tables spip.
* @return array tableau contenant les articles.
*/
function retournerArticles(&$db, $prefixe = '')
{
//----------------------------------------------------------------------------
// Recherche des informations sur le menu
$requete = 'SELECT * '.
'FROM '.$prefixe.'spip_articles '.
'WHERE statut = "publie"';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die(BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
//----------------------------------------------------------------------------
// Récupération des infos
$tab_retour = array();
while ($info_article = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
$tab_retour[$info_article->id_article] = $info_article;
}
$resultat->free();
return $tab_retour;
}
}
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log$
* Revision 1.7 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.6 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.5 2006/11/20 09:36:59 jp_milcent
* Correction bogue zéro résultat et ajout d'url simple pour indiquer la page de l'article.
*
* Revision 1.4 2006/11/14 16:08:40 jp_milcent
* Paramétrage de la découpe de la description et du symbole "etc"
*
* Revision 1.3 2006/10/17 09:21:40 jp_milcent
* Mise en commun des spécifications de la recherche.
*
* Revision 1.2 2006/10/16 14:11:30 jp_milcent
* Amélioration du moteur de recherche.
* Utilisation de l'opérateur "et" entre les mots recherchés.
*
* Revision 1.1 2006/05/19 10:04:55 jp_milcent
* Ajout d'un moteur de recherche analysant les articles des sites sous Spip.
*
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/branches/v5.0-ouadji/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche_bazar.class.php
99,5 → 99,5
}
}
}
 
?>
/branches/v5.0-ouadji/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche.class.php
New file
0,0 → 1,384
<?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 ----------------------------------------------------------------------------------------+
*/
?>
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/branches/v5.0-ouadji/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche_projet.class.php
New file
0,0 → 1,243
<?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_projet.class.php,v 1.1 2008-08-26 15:31:31 alexandre_tb Exp $
/**
* Classe permettant d'effectuer des recherches sur les informations des articles de Spip.
*
* Permet de rechercher et classer les articles en fonction d'une chaine.
* Utilisation des bibliothèques inclue par Papyrus :
* - Papyrus pap_meta.fonct.php
* - Papyrus pap_menu.fonct.php
* - Papyrus pap_url.class.php
*
*@package Applette
*@subpackage Moteur_Recherche
//Auteur original :
*@author Alexandre Granier <alexandre@tela-botanica.org>
//Autres auteurs :
*@author aucun
*@copyright Tela-Botanica 2000-2006
*@version $Revision: 1.1 $ $Date: 2008-08-26 15:31:31 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTETE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
class More_Recherche_Projet extends More_Recherche {
// Constructeur
function Recherche_Menu_Meta($motif) {
$this->setMotif($motif);
}
// Accesseurs
function getMotif() {
return $this->motif;
}
function setMotif($motif) {
$this->motif = $motif;
}
// Méthodes
function rechercherMotif($motif) {
$db = $GLOBALS['_MOTEUR_RECHERCHE_']['bd']['papyrus'];
 
$url_base = $GLOBALS['_MOTEUR_RECHERCHE_']['projet']['url'];
$tab_articles = $this->retournerProjets($db);
foreach ($tab_articles as $article_id => $Article) {
// Initialisation du tableau de résultat vide
$aso_resultat = array( 'poids' => 0, 'url' => '', 'titre' => '',
'hreflang' => '', 'accesskey' => '', 'title' => '',
'date_creation' => '', 'description' => '');
// Analyse du poids de cette page vis à vis des données
$tab_champs_a_visiter = array('p_id', 'p_titre', 'p_resume', 'p_description', 'pd_nom', 'pd_description');
foreach ($tab_champs_a_visiter as $val) {
// Vérification que le champ existe et contient quelque chose
if (isset($Article->$val) && $Article->$val != '') {
$aso_resultat['poids'] += $this->retournerOccurenceMotif($motif, $Article->$val);
}
}
if ($aso_resultat['poids'] > 0) {
// Création de l'url
$aso_resultat['url_simple'] = $url_base.'?id_projet='.$article_id;
$aso_resultat['url'] = $aso_resultat['url_simple'];
// Récupération du titre de la page
if (trim($Article->p_titre) != '') {
$aso_resultat['titre'] = htmlentities($Article->p_titre);
}
$aso_resultat['id'] = htmlentities($Article->p_id);
$aso_resultat['description'] = $this->couper($Article->p_description, MORE_RESULTAT_TAILLE_DESCRIPTION);
if (($jour = date('d', strtotime($Article->p_date_creation)) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_jour"> '.$jour.'</span>'."\n";
}
if (($mois = $this->traduireMois(date('m', strtotime($Article->p_date_creation))) ) != '' ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_mois"> '.$mois.'</span>'."\n";
}
if (($annee = date('Y', strtotime($Article->p_date_creation)) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_annee"> '.$annee.'</span>'."\n";
}
$this->setResultat($aso_resultat);
}
}
return $this->getResultats();
}
/** Renvoie un tableau contenant les infos sur les articles
*
* @param mixed une instance de la classse Pear DB.
* @param string le préfixe pour les tables spip.
* @return array tableau contenant les articles.
*/
function retournerProjets(&$db)
{
//----------------------------------------------------------------------------
// Recherche des informations sur le menu
$requete = 'SELECT * '.
'FROM projet ';
$resultat = $db->query($requete);
(DB::isError($resultat)) ? die (BOG_afficherErreurSql(__FILE__, __LINE__, $resultat->getMessage(), $requete)) : '';
//----------------------------------------------------------------------------
// Récupération des infos
$tab_retour = array();
while ($info_article = $resultat->fetchRow(DB_FETCHMODE_OBJECT)) {
$tab_retour[$info_article->p_id] = $info_article;
}
$resultat->free();
return $tab_retour;
}
// Fichier : inc_texte.php3
function couper($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->supprimer_tags($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->spip_substr($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->spip_substr($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 spip_substr($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 supprimer_tags($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 $
*
* +-- Fin du code ----------------------------------------------------------------------------------------+
*/
?>
Property changes:
Added: svn:executable
+*
\ No newline at end of property
/branches/v5.0-ouadji/papyrus/applettes/moteur_recherche/bibliotheque/more_recherche_papyrus_menu.class.php
New file
0,0 → 1,207
<?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_papyrus_menu.class.php,v 1.15 2008-10-21 15:24:50 aperonnet Exp $
/**
* Classe permettant d'effectuer des recherches sur les informations des menus de Papyrus.
*
* Permet de rechercher et classer les menus en fonction d'une chaine.
* Utilisation des bibliothèques inclue par Papyrus :
* - Papyrus pap_meta.fonct.php
* - Papyrus pap_menu.fonct.php
* - Papyrus pap_url.class.php
*
*@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-10-21 15:24:50 $
// +------------------------------------------------------------------------------------------------------+
*/
 
// +------------------------------------------------------------------------------------------------------+
// | ENTETE du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
///** Inclusion du fichier contenant les fonctions de manipulations des menus de Papyrus.*/
//require_once GEN_CHEMIN_BIBLIO.'pap_menu.fonct.php';
 
// +------------------------------------------------------------------------------------------------------+
// | CORPS du PROGRAMME |
// +------------------------------------------------------------------------------------------------------+
 
class More_Recherche_Papyrus_Menu extends More_Recherche{
// Constructeur
function Recherche_Menu_Meta($motif) {
$this->setMotif($motif);
}
// Accesseurs
function getMotif() {
return $this->motif;
}
function setMotif($motif) {
$this->motif = $motif;
}
// Méthodes
function rechercherMotif($motif) {
$db = $GLOBALS['_MOTEUR_RECHERCHE_']['bd']['papyrus'];
$tab_menus = GEN_retournerMenus($db);
foreach ($tab_menus as $cle => $menu_id) {
// Initialisation du tableau de résultat vide
$aso_resultat = array( 'poids' => 0, 'url' => '', 'titre' => '',
'hreflang' => '', 'accesskey' => '', 'title' => '',
'date_creation' => '', 'description' => '');
// Récupération des infos du menu courant : transtypage pour éviter les erreur avec array_merge
$aso_menu_info = (array) GEN_lireInfoMenu($db, $menu_id, DB_FETCHMODE_ASSOC);
// Nous vérifions que le menu a une date de validité valide
if ($aso_menu_info['gm_date_fin_validite'] == '0000-00-00 00:00:00' || strtotime($aso_menu_info['gm_date_fin_validite']) > time() ) {
// Récupération du contenu du menu courant : transtypage pour éviter les erreur avec array_merge
$aso_menu_contenu = (array) GEN_lireContenuMenu($db, $menu_id, DB_FETCHMODE_ASSOC);
// Fusion des deux tableaux de champs à analyser
$aso_menu = array_merge($aso_menu_info, $aso_menu_contenu);
// Analyse du poids de cette page vis à vis des méta informations et du contenu
$tab_champs_a_visiter = array( 'gm_nom', 'gm_titre', 'gm_titre_alternatif', 'gm_mots_cles',
'gm_description_libre', 'gm_description_resume', 'gm_description_table_matieres',
'gm_source', 'gm_auteur', 'gm_contributeur', 'gm_editeur', 'gm_categorie',
'gm_public', 'gmc_contenu');
foreach ($tab_champs_a_visiter as $val) {
// Vérification que le champ existe et contient quelque chose
if (isset($aso_menu[$val]) && $aso_menu[$val] != '') {
$aso_resultat['poids'] += $this->retournerOccurenceMotif($motif, $aso_menu[$val]);
}
}
// Si le menu contient les mots recherchés nous poursuivons
if ($aso_resultat['poids'] > 0) {
// Création de l'url
// TODO : utiliser comme pour spip un fichier de config spécifique pour virer PAP_URL d'ici
$une_url =& new Pap_URL(PAP_URL);
$une_url->setId($menu_id);
$aso_resultat['url_simple'] = $une_url->getURL();
$une_url->addQueryString('var_recherche', $this->traiterMotif($motif, 'url'), true);
$aso_resultat['url'] = $une_url->getURL();
$une_url->removeQueryString('var_recherche');
// Récupération du titre de la page
if (trim($aso_menu_info['gm_nom']) != '') {
$aso_resultat['titre'] = htmlentities($aso_menu_info['gm_nom']);
} else if (trim($aso_menu_info['gm_titre']) != '') {
$aso_resultat['titre'] = htmlentities($aso_menu_info['gm_titre']);
} else if (trim($aso_menu_info['gm_titre_alternatif']) != '') {
$aso_resultat['titre'] = htmlentities($aso_menu_info['gm_titre_alternatif']);
}
$aso_resultat['hreflang'] = htmlentities($aso_menu_info['gm_ce_i18n']);
$raccourci_txt = '';
$aso_resultat['accesskey'] = htmlentities($aso_menu_info['gm_raccourci_clavier']);
if ($aso_resultat['accesskey'] != '') {
$raccourci_txt = MORE_LG_RESULTAT_CADRE_OUVRIR.
MORE_LG_RESULTAT_RACCOURCI.$aso_resultat['accesskey'].' '.
MORE_LG_RESULTAT_CADRE_FERMER.MORE_LG_RESULTAT_POINT.' ';
}
$aso_resultat['title'] = htmlentities($raccourci_txt.$aso_menu_info['gm_description_resume']);
$aso_resultat['description'] = htmlentities($aso_menu_info['gm_description_libre']);
if (($jour = date('d', strtotime($aso_menu_info['gm_date_creation'] )) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_jour"> '.$jour.'</span>'."\n";
}
if (($mois = $this->traduireMois(date('m', strtotime($aso_menu_info['gm_date_creation'] ))) ) != '' ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_mois"> '.$mois.'</span>'."\n";
}
if (($annee = date('Y', strtotime($aso_menu_info['gm_date_creation'] )) ) != 0 ) {
$aso_resultat['date_creation'] .= '<span class="page_modification_annee"> '.$annee.'</span>'."\n";
}
$this->setResultat($aso_resultat);
}
}
}
return $this->getResultats();
}
}
 
/* +--Fin du code ----------------------------------------------------------------------------------------+
*
* $Log: not supported by cvs2svn $
* Revision 1.14 2008-08-08 16:04:41 jp_milcent
* Fusion avec la livraions AHA.
*
* Revision 1.13.2.1 2008-08-08 15:59:09 jp_milcent
* Les menus dont la date de fin de validité est dépassée ne sont plus affichés.
*
* Revision 1.13 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.12 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.11 2006/11/21 18:52:20 jp_milcent
* Ajout de la possibilité de surligner des mots.
*
* Revision 1.10 2006/11/20 09:36:59 jp_milcent
* Correction bogue zéro résultat et ajout d'url simple pour indiquer la page de l'article.
*
* Revision 1.9 2006/10/17 09:21:40 jp_milcent
* Mise en commun des spécifications de la recherche.
*
* Revision 1.8 2006/10/16 14:11:30 jp_milcent
* Amélioration du moteur de recherche.
* Utilisation de l'opérateur "et" entre les mots recherchés.
*
* Revision 1.7 2006/10/10 13:28:13 jp_milcent
* Suppression d'une variable et utilisation de la constante PAP_URL
*
* Revision 1.6 2006/05/19 10:04:55 jp_milcent
* Ajout d'un moteur de recherche analysant les articles des sites sous Spip.
*
* Revision 1.5 2006/04/28 12:41:49 florian
* corrections erreurs chemin
*
* 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 ----------------------------------------------------------------------------------------+
*/
?>
Property changes:
Added: svn:executable
+*
\ No newline at end of property