directlink_user;
$onglets_search_perso_form=$search_p->directlink_user_form;
switch ($search_type) {
case "simple_search":
// les tests de formulaire
$result = $script_test_form;
$tests = test_field("search_input", "query", "recherche");
$result = str_replace("!!tests!!", $tests, $result);
// les typ_doc
if ($opac_search_show_typdoc) {
$query = "SELECT typdoc FROM notices where typdoc!='' GROUP BY typdoc";
$result2 = pmb_mysql_query($query, $dbh);
$toprint_typdocfield = " ";
$toprint_typdocfield .= " \n";
$doctype = new marc_list('doctype');
while (($rt = pmb_mysql_fetch_row($result2))) {
$obj[$rt[0]]=1;
}
foreach ($doctype->table as $key=>$libelle){
if ($obj[$key]==1){
$toprint_typdocfield .= " \n";
}
}
$toprint_typdocfield .= " ";
} else $toprint_typdocfield="";
if ($opac_search_other_function) $toprint_typdocfield.=search_other_function_filters();
$toprint_typdocfield.="".do_ou_chercher()."
";
elseif ($opac_recherches_pliables==1)
$ou_chercher="".gen_plus_form("zsimples",$msg["rechercher_dans"],do_ou_chercher(),false)."
" ;
elseif ($opac_recherches_pliables==2)
$ou_chercher="".gen_plus_form("zsimples",$msg["rechercher_dans"],do_ou_chercher(),true)."
" ;
elseif ($opac_recherches_pliables==3)
// les options de recherches sont invisibles, pas dépliables.
$ou_chercher="\n".do_ou_chercher_hidden()."\n" ;
$result = str_replace("", $ou_chercher, $result);
// map
if($opac_map_activate){
$layer_params = json_decode($opac_map_base_layer_params,true);
$baselayer = "baseLayerType: dojox.geo.openlayers.BaseLayerType.".$opac_map_base_layer_type;
if(count($layer_params)){
if($layer_params['name']) $baselayer.=",baseLayerName:\"".$layer_params['name']."\"";
if($layer_params['url']) $baselayer.=",baseLayerUrl:\"".$layer_params['url']."\"";
if($layer_params['options']) $baselayer.=",baseLayerOptions:".json_encode($layer_params['options']);
}
$size=explode("*",$opac_map_size_search_edition);
if(count($size)!=2)$map_size="width:800px; height:480px;";
$map_size= "width:".$size[0]."px; height:".$size[1]."px;";
if(!$map_emprises_query)$map_emprises_query = array();
$map_holds=array();
foreach($map_emprises_query as $map_hold){
$map_holds[] = array(
"wkt" => $map_hold,
"type"=> "search",
"color"=> null,
"objects"=> array()
);
}
$r="
";
$result = str_replace("!!map!!", $r, $result);
}
// on se place dans le bon champ
// $result .= form_focus("search_input", "query");
$others="";
if ($opac_allow_personal_search) $others.="".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$result."
";
$result.=$onglets_search_perso_form;
break;
//Recherche avancee
case "external_search":
//Si c'est une multi-critere, on l'affiche telle quelle
global $external_type;
if ($external_type) $_SESSION["ext_type"]=$external_type;
global $mode_aff;
//Affinage
if ($mode_aff) {
if ($mode_aff=="aff_module") {
//ajout de la recherche dans l'historique
$_SESSION["nb_queries"]=$_SESSION["nb_queries"]+1;
$n=$_SESSION["nb_queries"];
$_SESSION["notice_view".$n]=$_SESSION["last_module_search"];
switch ($_SESSION["last_module_search"]["search_mod"]) {
case 'etagere_see':
//appel de la fonction tableau_etagere du fichier etagere_func.inc.php
$r1 = $msg["etagere_query"];
$t=array();
$t=tableau_etagere($_SESSION["last_module_search"]["search_id"]);
$r=$r1." '".$t[0]["nometagere"]."'";
break;
case 'categ_see':
// instanciation de la catégorie
$ourCateg = new categorie($_SESSION["last_module_search"]["search_id"]);
$r1 = $msg["category"];
$r=$r1." '".$ourCateg->libelle."'";
break;
case 'indexint_see':
// instanciation de la classe indexation
$r1= $msg["indexint_search"];
$ourIndexint = new indexint($_SESSION["last_module_search"]["search_id"]);
$r=$r1." '".$ourIndexint->name." ".$ourIndexint->comment."'";
break;
case 'section_see':
$resultat=pmb_mysql_query("select location_libelle from docs_location where idlocation='".addslashes($_SESSION["last_module_search"]["search_location"])."'");
$j=pmb_mysql_fetch_array($resultat);
$localisation_=$j["location_libelle"];
pmb_mysql_free_result($resultat);
$resultat=pmb_mysql_query("select section_libelle from docs_section where idsection='".addslashes($_SESSION["last_module_search"]["search_id"])."'");
$j=pmb_mysql_fetch_array($resultat);
$section_=$j["section_libelle"];
pmb_mysql_free_result($resultat);
$r1 = $localisation_." => ".$msg["section"];
$r=$r1." '".$section_."'";
break;
}
$_SESSION["human_query".$n]=$r;
$_SESSION["search_type".$n]="module";
} else {
if ($_SESSION["last_query"]) {
$n=$_SESSION["last_query"];
} else {
$n=$_SESSION["nb_queries"];
}
}
}
if ($_SESSION["ext_type"]=="multi") {
global $search;
if (!$search) {
$search[0]="s_2";
$op_0_s_2="EQ";
$field_0_s_2=array();
} else {
//Recherche du champp source, s'il n'est pas present, on decale tout et on l'ajoute
$flag_found=false;
for ($i=0; $i=0; $i--) {
$search[$i+1]=$search[$i];
decale("field_".$i."_".$search[$i],"field_".($i+1)."_".$search[$i]);
decale("op_".$i."_".$search[$i],"op_".($i+1)."_".$search[$i]);
decale("inter_".$i."_".$search[$i],"inter_".($i+1)."_".$search[$i]);
decale("fieldvar_".$i."_".$search[$i],"fieldvar_".($i+1)."_".$search[$i]);
}
$search[0]="s_2";
$op_0_s_2="EQ";
$field_0_s_2=array();
}
}
if ($mode_aff) {
//générer les critères de la multi_critères
$search[1]="s_1";
$op_="EQ";
//opérateur
$op="op_1_".$search[1];
global $$op;
$$op=$op_;
//contenu de la recherche
$field="field_1_".$search[1];
$field_=array();
$field_[0]=$n;
global $$field;
$$field=$field_;
//opérateur inter-champ
$inter="inter_1_".$search[1];
global $$inter;
$$inter="and";
//variables auxiliaires
$fieldvar_="fieldvar_1_".$search[1];
global $$fieldvar_;
$$fieldvar_="";
$fieldvar=$$fieldvar_;
}
$es=new search("search_fields_unimarc");
$result=$es->show_form("./index.php?lvl=$lvl&search_type_asked=external_search","./index.php?lvl=search_result&search_type_asked=external_search");
} else {
global $mode_aff;
//Si il y a une mode d'affichage demandé, on construit l'écran correspondant
if ($mode_aff) {
$f=get_field_text($n);
$user_query=$f[0];
$look=$f[1];
global $$look;
$$look=1;
global $look_FIRSTACCESS;
$look_FIRSTACCESS=1;
} else {
if ($external_env) {
$external_env=unserialize(stripslashes($external_env));
foreach ($external_env as $varname=>$varvalue) {
global $$varname;
$$varname=$varvalue;
}
}
}
$result=$search_input;
$result=str_replace("!!user_query!!",htmlentities(stripslashes($user_query),ENT_QUOTES,$charset),$result);
$result = str_replace("", do_ou_chercher(), $result);
$result = str_replace("", do_sources(), $result);
}
$others="".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["search_by_map"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$result."
";
$result.=$onglets_search_perso_form;
break;
//Recherche par termes
case "term_search":
global $search_term;
global $term_click;
global $page_search;
global $opac_term_search_height;
global $opac_show_help;
if (!$opac_term_search_height) $height=300;
else $height=$opac_term_search_height;
$search_form_term = "
";
//recuperation du thesaurus session
if(!$id_thes) $id_thes = thesaurus::getSessionThesaurusId();
else thesaurus::setSessionThesaurusId($id_thes);
//affichage du selectionneur de thesaurus et du lien vers les thesaurus
$liste_thesaurus = thesaurus::getThesaurusList();
$sel_thesaurus = '';
$lien_thesaurus = '';
if ($opac_thesaurus != 0) { //la liste des thesaurus n'est pas affichée en mode monothesaurus
$sel_thesaurus = "" ;
foreach($liste_thesaurus as $id_thesaurus=>$libelle_thesaurus) {
$sel_thesaurus.= "";
}
$sel_thesaurus.= " ";
$sel_thesaurus.= " ";
$lien_thesaurus = "".$msg[thes_lien]." ";
}
$search_form_term=str_replace("",$sel_thesaurus,$search_form_term);
$search_form_term=str_replace("",$lien_thesaurus,$search_form_term);
$result=$search_form_term;
$others="";
$others.="".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["search_by_terms"]." ";
if ($opac_allow_tags_search) $others.="".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ";
if ($opac_show_onglet_perio_a2z) $others.="".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." $msg[search_result_for]".htmlentities(stripslashes($user_query),ENT_QUOTES,$charset)." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ";
else $others.="".$msg["onglet_empr_compte"]." ";
}
if ($opac_allow_external_search) $others.="".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ";
$others.=$onglets_search_perso;
if ($opac_allow_extended_search) $others.="".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ";
if (($opac_show_onglet_empr==1)||(($opac_show_onglet_empr==2)&&($_SESSION["user_code"]))) {
if (!$_SESSION["user_code"]) $others.="".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." ".$msg["simple_search"]." ".$msg["search_perso_menu"]." ".$msg["extended_search"]." ".$msg["term_search"]." ".$msg["tags_search"]." ".$msg["a2z_onglet"]." ";
if (($opac_show_onglet_empr==1)||(($opac_show_onglet_empr==2)&&($_SESSION["user_code"]))) {
if (!$_SESSION["user_code"]) $others.="".$msg["onglet_empr_connect"]." ".$msg["onglet_empr_compte"]." ".$msg["connecteurs_external_search"]." ".$msg["search_by_map"]." $msg[tous_types_docs] \n";
$doctype = new marc_list('doctype');
while (($rt = pmb_mysql_fetch_row($res))) {
$obj[$rt[1]]=1;
$qte[$rt[1]]=$rt[0];
}
foreach ($doctype->table as $key=>$libelle){
if ($obj[$key]==1){
$toprint_typdocfield .= " \n";
}
}
// récupération des statuts de documents utilisés.
$query = "SELECT count(statut), id_notice_statut, gestion_libelle ";
$query .= "FROM notices, notice_statut where id_notice_statut=statut GROUP BY id_notice_statut order by gestion_libelle";
$res = pmb_mysql_query($query, $dbh);
$toprint_statutfield .= " $msg[tous_statuts_notice] \n";
while ($obj = @pmb_mysql_fetch_row($res)) {
$toprint_statutfield .= " \n";
}
$search_form_map = str_replace("!!typdocfield!!", $toprint_typdocfield, $search_form_map);
$search_form_map = str_replace("!!statutfield!!", $toprint_statutfield, $search_form_map);
$search_form_map = str_replace("!!all_query!!", htmlentities(stripslashes($all_query),ENT_QUOTES, $charset), $search_form_map);
$search_form_map = str_replace("!!categ_query!!", htmlentities(stripslashes($categ_query),ENT_QUOTES, $charset), $search_form_map);
if($thesaurus_concepts_active){
$search_form_map = str_replace("!!concept_query!!", htmlentities(stripslashes($concept_query),ENT_QUOTES, $charset), $search_form_map);
}
// map
$layer_params = json_decode($opac_map_base_layer_params,true);
$baselayer = "baseLayerType: dojox.geo.openlayers.BaseLayerType.".$opac_map_base_layer_type;
if(count($layer_params)){
if($layer_params['name']) $baselayer.=",baseLayerName:\"".$layer_params['name']."\"";
if($layer_params['url']) $baselayer.=",baseLayerUrl:\"".$layer_params['url']."\"";
if($layer_params['options']) $baselayer.=",baseLayerOptions:".json_encode($layer_params['options']);
}
$size=explode("*",$opac_map_size_search_edition);
if(count($size)!=2)$map_size="width:800px; height:480px;";
$map_size= "width:".$size[0]."px; height:".$size[1]."px;";
if(!$map_emprises_query)$map_emprises_query = array();
$map_holds=array();
foreach($map_emprises_query as $map_hold){
$map_holds[] = array(
"wkt" => $map_hold,
"type"=> "search",
"color"=> null,
"objects"=> array()
);
}
$r="
";
$search_form_map = str_replace("!!map!!", $r, $search_form_map);
//champs maps
$requete = "SELECT map_echelle_id, map_echelle_name FROM map_echelles ORDER BY map_echelle_name ";
$projections=gen_liste($requete,"map_echelle_id","map_echelle_name","map_echelle_query","",$map_echelle_query,0,"",0,$msg['map_echelle_vide']);
$search_form_map=str_replace("!!map_echelle_list!!",$projections,$search_form_map);
$requete = "SELECT map_projection_id, map_projection_name FROM map_projections ORDER BY map_projection_name ";
$projections=gen_liste($requete,"map_projection_id","map_projection_name","map_projection_query","",$map_projection_query,0,"",0,$msg['map_projection_vide']);
$search_form_map=str_replace("!!map_projection_list!!",$projections,$search_form_map);
$requete = "SELECT map_ref_id, map_ref_name FROM map_refs ORDER BY map_ref_name ";
$refs=gen_liste($requete,"map_ref_id","map_ref_name","map_ref_query","",$map_ref_query,0,"",0,$msg['map_ref_vide']);
$search_form_map=str_replace("!!map_ref_list!!",$refs,$search_form_map);
$search_form_map=str_replace("!!map_equinoxe_value!!",$map_equinoxe_query,$search_form_map);
$checkbox="";
if($thesaurus_auto_postage_search){
$checkbox = "
";
$checkbox = str_replace("!!auto_postage_checked!!", (($auto_postage_query) ? 'checked' : ''), $checkbox);
}
$search_form_map = str_replace("!!auto_postage!!", $checkbox, $search_form_map);
if($pmb_indexation_docnum){
$checkbox = "";
$checkbox = str_replace("!!docnum_query_checked!!", (($pmb_indexation_docnum_allfields || $docnum_query) ? 'checked' : ''), $checkbox);
$search_form_map = str_replace("!!docnum_query!!", $checkbox, $search_form_map);
} else $search_form_map = str_replace("!!docnum_query!!", '' , $search_form_map);
// $search_form_map = str_replace("!!base_url!!", $this->base_url,$search_form_map);
$result=str_replace("!!contenu!!",$search_form_map,$result);
break;
}
return $result;
}
function do_ou_chercher () {
global $look_TITLE,
$look_AUTHOR,
$look_PUBLISHER,
$look_TITRE_UNIFORME,
$look_COLLECTION,
$look_SUBCOLLECTION,
$look_CATEGORY,
$look_INDEXINT,
$look_KEYWORDS,
$look_ABSTRACT,
$look_ALL,
$look_DOCNUM,
$look_CONTENT,
$look_CONCEPT;
global $look_FIRSTACCESS ; // si 0 alors premier Acces : la rech par defaut est cochee
// pour mise en service de cette precision de recherche : commenter cette partie
/*
$look_TITLE = "1" ;
$look_AUTHOR = "1" ;
$look_PUBLISHER = "1" ;
$look_COLLECTION = "1" ;
$look_SUBCOLLECTION = "1" ;
$look_CATEGORY = "1" ;
$look_INDEXINT = "1" ;
$look_KEYWORDS = "1" ;
$look_ABSTRACT = "1" ;
$look_CONTENT = "1" ;
return "";
*/
// pour mise en service de cette precision de recherche : commenter jusque la
// on recupere les globales de ce qui est autorise en recherche dans le parametrage de l'OPAC
global $opac_modules_search_title,
$opac_modules_search_author,
$opac_modules_search_publisher,
$opac_modules_search_titre_uniforme,
$opac_modules_search_collection,
$opac_modules_search_subcollection,
$opac_modules_search_category,
$opac_modules_search_indexint,
$opac_modules_search_keywords,
$opac_modules_search_abstract,
$opac_modules_search_all,
$opac_modules_search_docnum,
$pmb_indexation_docnum,
$opac_modules_search_concept,
$opac_allow_tags_search;
// $opac_modules_search_content; inutilise pour l'instant, le search_abstract cherche aussi dans les notes de contenu
global $msg,$get_query;
if (!$look_FIRSTACCESS && !$get_query ) {
// premier acces :
if ($opac_modules_search_title==2) $look_TITLE=1;
if ($opac_modules_search_author==2) $look_AUTHOR=1 ;
if ($opac_modules_search_publisher==2) $look_PUBLISHER = 1 ;
if ($opac_modules_search_titre_uniforme==2) $look_TITRE_UNIFORME = 1 ;
if ($opac_modules_search_collection==2) $look_COLLECTION = 1 ;
if ($opac_modules_search_subcollection==2) $look_SUBCOLLECTION = 1 ;
if ($opac_modules_search_category==2) $look_CATEGORY = 1 ;
if ($opac_modules_search_indexint==2) $look_INDEXINT = 1 ;
if ($opac_modules_search_keywords==2) $look_KEYWORDS = 1 ;
if ($opac_modules_search_abstract==2) $look_ABSTRACT = 1 ;
if ($opac_modules_search_all==2) $look_ALL = 1 ;
if ($opac_modules_search_docnum==2) $look_DOCNUM = 1;
if ($opac_modules_search_concept==2) $look_CONCEPT = 1;
}
if ($look_TITLE) $checked_TITLE = "checked" ;
if ($look_AUTHOR) $checked_AUTHOR = "checked" ;
if ($look_PUBLISHER) $checked_PUBLISHER = "checked" ;
if ($look_TITRE_UNIFORME) $checked_TITRE_UNIFORME = "checked" ;
if ($look_COLLECTION) $checked_COLLECTION = "checked" ;
if ($look_SUBCOLLECTION) $checked_SUBCOLLECTION = "checked" ;
if ($look_CATEGORY) $checked_CATEGORY = "checked" ;
if ($look_INDEXINT) $checked_INDEXINT = "checked" ;
if ($look_KEYWORDS) $checked_KEYWORDS = "checked" ;
if ($look_ABSTRACT) $checked_ABSTRACT = "checked" ;
if ($look_ALL) $checked_ALL = "checked" ;
if ($look_DOCNUM) $checked_DOCNUM = "checked";
if ($look_CONCEPT) $checked_CONCEPT = "checked";
$authpersos=new authpersos();
$ou_chercher_authperso_tab=$authpersos->get_simple_seach_list_tpl();
if (!($look_TITLE || $look_AUTHOR || $look_PUBLISHER || $look_TITRE_UNIFORME || $look_COLLECTION || $look_SUBCOLLECTION || $look_CATEGORY || $look_INDEXINT || $look_KEYWORDS || $look_ABSTRACT || $look_ALL || $look_DOCNUM || $look_CONCEPT || $authpersos->simple_seach_list_checked)) {
$checked_TITLE = "checked" ;
$look_TITLE = "1" ;
$checked_AUTHOR = "checked" ;
$look_AUTHOR = "1" ;
}
$ou_chercher_tab=array();
if ($opac_modules_search_title>0) $ou_chercher_tab[] = "\n $msg[titles] $msg[authors] $msg[publishers] ".$msg["titres_uniformes"]." $msg[collections] $msg[subcollections] $msg[categories] $msg[indexint] ";
if($opac_allow_tags_search) $ou_chercher_skey .= $msg['tag'];
else $ou_chercher_skey .= $msg['keywords'];
$ou_chercher_skey .= " $msg[abstract] ".$msg['tous']." ".$msg['docnum']." ".$msg['skos_view_concepts_concepts']." " ;
for ($nbopac_smodules=0;$nbopac_smodules
";
}
if ($paquets_de_source) $paquets_de_sources[] = $paquets_de_source;
foreach($paquets_de_sources as $paquets_de_source) {
$r .= gen_plus_form("zsources".$paquets_de_source["id"], $paquets_de_source["name"], $paquets_de_source["content"], $paquets_de_source["opac_expanded"])."\n\n";
}
return $r;
}
function decale($var,$var1) {
global $$var;
global $$var1;
$$var1=$$var;
}