search_term_name=$search_term_name;
$this->search_term_origin_name=$search_term_origin_name;
global $$search_term_name;
global $$search_term_origin_name;
$this->search_term=stripslashes($$search_term_name);
$this->search_term_origin=stripslashes($$search_term_origin_name);
$this->n_per_page=$n_per_page;
$this->base_query=$base_query;
$this->url_for_term_show=$url_for_term_show;
$this->url_for_term_search=$url_for_term_search;
$this->keep_tilde=$keep_tilde;
$this->id_thes = $id_thes;
if ($id_thes != -1) $this->thes= new thesaurus($id_thes);
if ($page=="") $page=0;
$this->page=$page;
$this->offset=$page*$this->n_per_page;
//$this->get_term_count();
}
//Affichage du navigateur de pages
function page_navigator() {
$last_page=ceil($this->n_total/$this->n_per_page)-1;
$url_page=$this->url_for_term_search."?".$this->search_term_name."=".rawurlencode($this->search_term)."&".$this->search_term_origin_name."=".rawurlencode($this->search_term_origin);
if ($this->offset!=0) $navig.="n_total."\">
"; else $navig.="
";
if ($this->offset!=0) $navig.="page-1)."&nbresultterme=".$this->n_total."&".$this->base_query."\">
"; else $navig.="
";
$navig.=" (".($this->offset+1)."-".min($this->offset+$this->n_per_page,$this->n_total).")/".$this->n_total." ";
if (($this->offset+$this->n_per_page+1)<$this->n_total) $navig.="page+1)."&nbresultterme=".$this->n_total."&".$this->base_query."\">
"; else $navig.="
";
if (($this->offset+$this->n_per_page+1)<$this->n_total) $navig.="n_total."\">
"; else $navig.="
";
return $navig;
}
//Récupération du terme where pour la recherche
function get_where_term() {
global $msg,$charset;
global $opac_stemming_active;
//Si il y a déjà un terme where calculé alors renvoi tout de suite
if ($this->where) return $this->where;
//Si il y a un terme saisi alors close where
if ($this->search_term) {
$this->error_message="";
$aq=new analyse_query($this->search_term,0,0,1,0,$opac_stemming_active);
if (!$aq->error) {
$members=$aq->get_query_members("categories","libelle_categorie","index_categorie","num_noeud");
$where_term="and ".$members["where"];
$this->order=$members["select"];
$this->where=$where_term;
$this->aq = $aq;
} else {
$this->error_message=sprintf($msg["searcher_syntax_error_desc"],$aq->current_car,$aq->input_html,$aq->error_message);
}
}
return $where_term;
}
//Récupération du nombre de termes correspondants à la recherche
function get_term_count() {
global $lang;
global $opac_thesaurus;
global $dbh;
//Comptage du nombre de termes
$where_term=$this->get_where_term();
if ($where_term) {
$members_catdef = $this->aq->get_query_members("catdef", "catdef.libelle_categorie", "catdef.index_categorie", "catdef.num_noeud");
$members_catlg = $this->aq->get_query_members("catlg", "catlg.libelle_categorie", "catlg.index_categorie", "catlg.num_noeud");
}
if ($this->id_thes != -1){ //1 seul thesaurus
if ( ($opac_thesaurus!='1') || ($lang==$this->thes->langue_defaut) || (in_array($lang, thesaurus::getTranslationsList())===false) ) { //Recherche dans la langue par défaut du thesaurus
$q = "select count(distinct libelle_categorie) ";
$q.= "from categories as catdef ";
$q.= "where 1 ";
if ($where_term) $q.= "and ".$members_catdef["where"]." ";
$q.= "and catdef.num_thesaurus = '".$this->id_thes."' ";
$q.= "and catdef.langue = '".$this->thes->langue_defaut."' ";
$q.= "and catdef.libelle_categorie not like '~%' ";
$r = mysql_query($q);
$this->n_total=mysql_result($r, 0, 0);
} else { //Recherche dans la langue de l'interface ou dans la langue par défaut du thesaurus
$q = "drop table if exists cattmp ";
$r = mysql_query($q, $dbh);
$q1 = "create temporary table cattmp engine=myisam select ";
$q1.= "if(catlg.num_noeud is null, catdef.libelle_categorie, catlg.libelle_categorie) as categ_libelle ";
$q1.= "from categories as catdef ";
$q1.= "left join categories as catlg on catdef.num_noeud = catlg.num_noeud and catlg.langue = '".$lang."' ";
$q1.= "where 1 ";
if ($where_term) $q1.= "and if(catlg.num_noeud is null, ".$members_catdef["where"].", ".$members_catlg["where"].") ";
$q1.= "and catdef.num_thesaurus = '".$this->id_thes."' ";
$q1.= "and catdef.langue = '".$this->thes->langue_defaut."' ";
$q1.= "and catdef.libelle_categorie not like '~%' ";
$r1 = mysql_query($q1, $dbh);
$q2 = "select count(distinct categ_libelle) from cattmp ";
$r2 = mysql_query($q2);
$this->n_total=mysql_result($r2, 0, 0);
}
} else {
//tous les thesaurus
//on recherche dans la langue de l'interface ou dans la langue par défaut du thesaurus
$q = "drop table if exists cattmp ";
$r = mysql_query($q, $dbh);
$q1 = "create temporary table cattmp engine=myisam select ";
$q1.= "id_thesaurus, ";
$q1.= "if(catlg.num_noeud is null, catdef.libelle_categorie, catlg.libelle_categorie) as categ_libelle ";
$q1.= "from thesaurus ";
$q1.= "left join categories as catdef on id_thesaurus=catdef.num_thesaurus and catdef.langue=thesaurus.langue_defaut ";
$q1.= "left join categories as catlg on catdef.num_noeud=catlg.num_noeud and catlg.langue = '".$lang."' ";
$q1.= "where 1 ";
if ($where_term) $q1.= "and (if(catlg.num_noeud is null, ".$members_catdef["where"].", ".$members_catlg["where"].") ) ";
$q1.= "and catdef.libelle_categorie not like '~%' ";
$resultat1 = mysql_query($q1, $dbh);
$q2 = "select count(distinct id_thesaurus,categ_libelle) from cattmp ";
$r2=mysql_query($q2);
$this->n_total=mysql_result($r2,0,0);
}
}
//Affichage de la liste des résultats
function show_list_of_terms() {
global $charset;
global $msg;
global $lang;
global $dbh;
global $opac_thesaurus;
global $nbresultterme;
//Si il y a eu erreur lors de la première analyse...
if ($this->error_message) {
return $this->error_message;
}
//Recherche des termes correspondants à la requête
$where_term=$this->get_where_term();
if($where_term) {
$members_catdef = $this->aq->get_query_members("catdef", "catdef.libelle_categorie", "catdef.index_categorie", "catdef.num_noeud");
$members_catlg = $this->aq->get_query_members("catlg", "catlg.libelle_categorie", "catlg.index_categorie", "catlg.num_noeud");
}else{
echo $msg["term_search_info"];
return;
}
if($nbresultterme){
$this->n_total=$nbresultterme;
$requete = "select count(catdef.num_noeud) as nb, ";
}else{
$requete = "select SQL_CALC_FOUND_ROWS count(catdef.num_noeud) as nb, ";
}
if ($this->id_thes != -1){ //1 seul thesaurus
if (($lang==$this->thes->langue_defaut) || (in_array($lang, thesaurus::getTranslationsList())===false) ) { //Recherche dans la langue par défaut du thesaurus
$requete.= "num_thesaurus, ";
$requete.= "num_noeud as categ_id, ";
$requete.= "libelle_categorie as categ_libelle, ";
$requete.= "catdef.index_categorie as indexcat ";
if ($where_term) $requete.= ", ".$members_catdef["select"]." as pert ";
$requete.= "from categories as catdef ";
$requete.= "where 1 ";
if ($where_term) $requete.= "and ".$members_catdef["where"]." ";
$requete.= "and num_thesaurus = '".$this->id_thes."' ";
$requete.= "and catdef.langue = '".$this->thes->langue_defaut."' ";
$requete.= "and catdef.libelle_categorie not like '~%' ";
$requete.= "group by categ_libelle ";
$requete.= "order by ";
if ($where_term) $requete.= "pert desc, ";
$requete.= "indexcat asc ";
$requete.= "limit ".$this->offset.",".$this->n_per_page;
} else { //Recherche dans la langue de l'interface ou dans la langue par défaut du thesaurus
$requete.= "catdef.num_thesaurus, ";
$requete.= "catdef.num_noeud as categ_id, ";
$requete.= "if (catlg.num_noeud is null, catdef.libelle_categorie, catlg.libelle_categorie ) as categ_libelle, ";
$requete.= "if (catlg.num_noeud is null, catdef.index_categorie , catlg.index_categorie ) as indexcat ";
if ($where_term) $requete.= ", if (catlg.num_noeud is null, ".$members_catdef["select"].", ".$members_catlg["select"].") as pert ";
$requete.= "from categories as catdef ";
$requete.= "left join categories as catlg on catdef.num_noeud = catlg.num_noeud and catlg.langue = '".$lang."' ";
$requete.= "where 1 ";
if ($where_term) $requete.= "and (if(catlg.num_noeud is null, ".$members_catdef["where"].", ".$members_catlg["where"].") ) ";
$requete.= "and catdef.num_thesaurus = '".$this->id_thes."' ";
$requete.= "and catdef.langue = '".$this->thes->langue_defaut."' ";
$requete.= "and catdef.libelle_categorie not like '~%' ";
$requete.= "group by categ_libelle ";
$requete.= "order by ";
if ($where_term) $requete.= "pert desc, ";
$requete.= "indexcat asc ";
$requete.= "limit ".$this->offset.",".$this->n_per_page;
}
} else {
//tous les thesaurus
//on recherche dans la langue de l'interface ou dans la langue par défaut du thesaurus
$requete.= "catdef.num_thesaurus, ";
$requete.= "catdef.num_noeud as categ_id, ";
$requete.= "if (catlg.num_noeud is null, catdef.libelle_categorie , catlg.libelle_categorie ) as categ_libelle, ";
$requete.= "if (catlg.num_noeud is null, catdef.index_categorie , catlg.index_categorie ) as indexcat ";
if ($where_term) $requete.= ", if (catlg.num_noeud is null, ".$members_catdef["select"].", ".$members_catlg["select"].") as pert ";
$requete.= "from thesaurus ";
$requete.= "left join categories as catdef on id_thesaurus=catdef.num_thesaurus and catdef.langue=thesaurus.langue_defaut ";
$requete.= "left join categories as catlg on catdef.num_noeud=catlg.num_noeud and catlg.langue = '".$lang."' ";
if ($where_term) $requete.= "where if(catlg.num_noeud is null, ".$members_catdef["where"].", ".$members_catlg["where"].") ";
$requete.= "group by categ_libelle, catdef.num_thesaurus ";
$requete.= "order by ";
if ($where_term) $requete.= "pert desc, ";
$requete.= "catdef.num_thesaurus, indexcat asc ";
$requete.= "limit ".$this->offset.",".$this->n_per_page;
}
$resultat=mysql_query($requete, $dbh);
//On récupère le nombre de résultat
if(!$this->n_total){
$qry = "SELECT FOUND_ROWS() AS NbRows";
if($resnum = mysql_query($qry)){
$this->n_total=mysql_result($resnum,0,0);
}
}
$res="";
if ($this->search_term!="") $res.=$msg["term_search_found_term"]."".htmlentities($this->search_term_origin,ENT_QUOTES,$charset); else $res.="".$msg["term_search_all_terms"];
$res.="\n";
//Navigateur de page
if($this->n_total) $res.="
".$this->page_navigator()."
";
else $res.="
".$msg['term_no_results']."
";
//Affichage des termes trouvés
$class="colonne2";
while ($r=mysql_fetch_object($resultat)) {
$show=1;
//S'il n'y a qu'un seul résultat, vérification que ce n'est pas un terme masqué
if (($r->nb==1)&&(!$this->keep_tilde)) {
$t_test = new category($resultat->categ_id);
if (($t_test->is_under_tilde)&&(!$t_test->voir_id)) $show=0;
}
if ($show) {
$res.="";
if ($class=="colonne2") $class="colonne_suite";
else $class="colonne2";
}
}
if ($class="colonne_suite") $res.="\n";
return $res;
}
}
?>