function inc_recherche_to_array_dist($recherche, $options = array())
{
// options par defaut
$options = array_merge(array('score' => true, 'champs' => false, 'toutvoir' => false, 'matches' => false, 'jointures' => false), $options);
include_spip('inc/rechercher');
include_spip('inc/autoriser');
$requete = array("SELECT" => array(), "FROM" => array(), "WHERE" => array(), "GROUPBY" => array(), "ORDERBY" => array(), "LIMIT" => "", "HAVING" => array());
$table = sinon($options['table'], 'article');
if ($options['champs']) {
$champs = $options['champs'];
} else {
$l = liste_des_champs();
$champs = $l['article'];
}
$serveur = $options['serveur'];
list($methode, $q, $preg) = expression_recherche($recherche, $options);
$jointures = $options['jointures'] ? liste_des_jointures() : array();
$_id_table = id_table_objet($table);
// c'est un pis-aller : ca a peu de chance de marcher, mais mieux quand meme que en conservant la ','
// (aka ca marche au moins dans certains cas comme avec spip_formulaires_reponses_champs)
if (strpos($_id_table, ",") !== false) {
$_id_table = explode(',', $_id_table);
$_id_table = reset($_id_table);
}
$requete['SELECT'][] = "t." . $_id_table;
$a = array();
// Recherche fulltext
foreach ($champs as $champ => $poids) {
if (is_array($champ)) {
spip_log("requetes imbriquees interdites");
} else {
if (strpos($champ, ".") === FALSE) {
$champ = "t.{$champ}";
}
$requete['SELECT'][] = $champ;
$a[] = $champ . ' ' . $methode . ' ' . $q;
}
}
if ($a) {
$requete['WHERE'][] = join(" OR ", $a);
}
$requete['FROM'][] = table_objet_sql($table) . ' AS t';
$results = array();
$s = sql_select($requete['SELECT'], $requete['FROM'], $requete['WHERE'], implode(" ", $requete['GROUPBY']), $requete['ORDERBY'], $requete['LIMIT'], $requete['HAVING'], $serveur);
while ($t = sql_fetch($s, $serveur) and (!isset($t['score']) or $t['score'] > 0)) {
$id = intval($t[$_id_table]);
if ($options['toutvoir'] or autoriser('voir', $table, $id)) {
// indiquer les champs concernes
$champs_vus = array();
$score = 0;
$matches = array();
$vu = false;
foreach ($champs as $champ => $poids) {
$champ = explode('.', $champ);
$champ = end($champ);
// translitteration_rapide uniquement si on est deja en utf-8
$value = $GLOBALS['meta']['charset'] == 'utf-8' ? translitteration_rapide($t[$champ]) : translitteration($t[$champ]);
if ($n = $options['score'] || $options['matches'] ? preg_match_all($preg, $value, $regs, PREG_SET_ORDER) : preg_match($preg, $value)) {
$vu = true;
if ($options['champs']) {
$champs_vus[$champ] = $t[$champ];
}
if ($options['score']) {
$score += $n * $poids;
}
if ($options['matches']) {
$matches[$champ] = $regs;
}
if (!$options['champs'] and !$options['score'] and !$options['matches']) {
break;
}
}
}
if ($vu) {
if (!isset($results)) {
$results = array();
}
$results[$id] = array();
if ($champs_vus) {
$results[$id]['champs'] = $champs_vus;
}
if ($score) {
$results[$id]['score'] = $score;
}
if ($matches) {
$results[$id]['matches'] = $matches;
}
}
}
}
// Gerer les donnees associees
// ici on est un peu naze : pas capables de reconstruire une jointure complexe
// on ne sait passer que par table de laison en 1 coup
if (isset($jointures[$table]) and $joints = recherche_en_base($recherche, $jointures[$table], array_merge($options, array('jointures' => false)))) {
include_spip('action/editer_liens');
$trouver_table = charger_fonction('trouver_table', 'base');
$cle_depart = id_table_objet($table);
$table_depart = table_objet($table, $serveur);
$desc_depart = $trouver_table($table_depart, $serveur);
$depart_associable = objet_associable($table);
foreach ($joints as $table_liee => $ids_trouves) {
// on peut definir une fonction de recherche jointe pour regler les cas particuliers
if (!($rechercher_joints = charger_fonction("rechercher_joints_{$table}_{$table_liee}", "inc", true) or $rechercher_joints = charger_fonction("rechercher_joints_objet_{$table_liee}", "inc", true) or $rechercher_joints = charger_fonction("rechercher_joints_{$table}_objet_lie", "inc", true))) {
$cle_arrivee = id_table_objet($table_liee);
$table_arrivee = table_objet($table_liee, $serveur);
$desc_arrivee = $trouver_table($table_arrivee, $serveur);
// cas simple : $cle_depart dans la table_liee
if (isset($desc_arrivee['field'][$cle_depart])) {
$s = sql_select("{$cle_depart}, {$cle_arrivee}", $desc_arrivee['table_sql'], sql_in($cle_arrivee, array_keys($ids_trouves)), '', '', '', '', $serveur);
} elseif (isset($desc_depart['field'][$cle_arrivee])) {
$s = sql_select("{$cle_depart}, {$cle_arrivee}", $desc_depart['table_sql'], sql_in($cle_arrivee, array_keys($ids_trouves)), '', '', '', '', $serveur);
} elseif ($l = objet_associable($table_liee)) {
list($primary, $table_liens) = $l;
$s = sql_select("id_objet as {$cle_depart}, {$primary} as {$cle_arrivee}", $table_liens, array("objet='{$table}'", sql_in($primary, array_keys($ids_trouves))), '', '', '', '', $serveur);
} elseif ($l = $depart_associable) {
list($primary, $table_liens) = $l;
$s = sql_select("{$primary} as {$cle_depart}, id_objet as {$cle_arrivee}", $table_liens, array("objet='{$table_liee}'", sql_in('id_objet', array_keys($ids_trouves))), '', '', '', '', $serveur);
} elseif ($t = $trouver_table($table_arrivee . "_" . $table_depart, $serveur) or $t = $trouver_table($table_depart . "_" . $table_arrivee, $serveur)) {
$s = sql_select("{$cle_depart},{$cle_arrivee}", $t["table_sql"], sql_in($cle_arrivee, array_keys($ids_trouves)), '', '', '', '', $serveur);
}
} else {
list($cle_depart, $cle_arrivee, $s) = $rechercher_joints($table, $table_liee, array_keys($ids_trouves), $serveur);
}
while ($t = is_array($s) ? array_shift($s) : sql_fetch($s)) {
$id = $t[$cle_depart];
$joint = $ids_trouves[$t[$cle_arrivee]];
if (!isset($results)) {
$results = array();
}
if (!isset($results[$id])) {
$results[$id] = array();
}
if (isset($joint['score']) and $joint['score']) {
if (!isset($results[$id]['score'])) {
$results[$id]['score'] = 0;
}
$results[$id]['score'] += $joint['score'];
}
if (isset($joint['champs']) and $joint['champs']) {
foreach ($joint['champs'] as $c => $val) {
$results[$id]['champs'][$table_liee . '.' . $c] = $val;
}
}
if (isset($joint['matches']) and $joint['matches']) {
foreach ($joint['matches'] as $c => $val) {
$results[$id]['matches'][$table_liee . '.' . $c] = $val;
}
}
}
}
}
return $results;
}
function recherche_en_base($recherche='', $tables=NULL, $options=array(), $serveur='') {
include_spip('base/abstract_sql');
if (!is_array($tables)) {
$liste = liste_des_champs();
if (is_string($tables)
AND $tables != '') {
$toutes = array();
foreach(explode(',', $tables) as $t)
if (isset($liste[$t]))
$toutes[$t] = $liste[$t];
$tables = $toutes;
unset($toutes);
} else
$tables = $liste;
}
include_spip('inc/autoriser');
// options par defaut
$options = array_merge(array(
'preg_flags' => 'UimsS',
'toutvoir' => false,
'champs' => false,
'score' => false,
'matches' => false,
'jointures' => false
),
$options
);
$results = array();
if (!strlen($recherche) OR !count($tables))
return array();
include_spip('inc/charsets');
$recherche = translitteration($recherche);
$is_preg = false;
if (substr($recherche,0,1)=='/' AND substr($recherche,-1,1)=='/'){
// c'est une preg
$preg = $recherche.$options['preg_flags'];
$is_preg = true;
}
else
$preg = '/'.str_replace('/', '\\/', $recherche).'/' . $options['preg_flags'];
// Si la chaine est inactive, on va utiliser LIKE pour aller plus vite
// ou si l'expression reguliere est invalide
if (!$is_preg
OR (@preg_match($preg,'')===FALSE) ) {
$methode = 'LIKE';
$u = $GLOBALS['meta']['pcre_u'];
// eviter les parentheses et autres caractères qui interferent avec pcre par la suite (dans le preg_match_all) s'il y a des reponses
$recherche = str_replace(
array('(',')','?','[', ']', '+', '*', '/'),
array('\(','\)','[?]', '\[', '\]', '\+', '\*', '\/'),
$recherche);
$recherche_mod = $recherche;
// echapper les % et _
$q = str_replace(array('%','_'), array('\%', '\_'), trim($recherche));
// les expressions entre " " sont un mot a chercher tel quel
// -> on remplace les espaces par un _ et on enleve les guillemets
if (preg_match(',["][^"]+["],Uims',$q,$matches)){
foreach($matches as $match){
// corriger le like dans le $q
$word = preg_replace(",\s+,Uims","_",$match);
$word = trim($word,'"');
$q = str_replace($match,$word,$q);
// corriger la regexp
$word = preg_replace(",\s+,Uims","[\s]",$match);
$word = trim($word,'"');
$recherche_mod = str_replace($match,$word,$recherche_mod);
}
}
$q = sql_quote(
"%"
. preg_replace(",\s+,".$u, "%", $q)
. "%"
);
$preg = '/'.preg_replace(",\s+,".$u, ".+", trim($recherche_mod)).'/' . $options['preg_flags'];
} else {
$methode = 'REGEXP';
$q = sql_quote(substr($recherche,1,-1));
}
$jointures = $options['jointures']
? liste_des_jointures()
: array();
foreach ($tables as $table => $champs) {
$requete = array(
"SELECT"=>array(),
"FROM"=>array(),
"WHERE"=>array(),
"GROUPBY"=>array(),
"ORDERBY"=>array(),
"LIMIT"=>"",
"HAVING"=>array()
);
$_id_table = id_table_objet($table);
$requete['SELECT'][] = "t.".$_id_table;
$a = array();
// Recherche fulltext
foreach ($champs as $champ => $poids) {
if (is_array($champ)){
spip_log("requetes imbriquees interdites");
} else {
if (strpos($champ,".")===FALSE)
$champ = "t.$champ";
$requete['SELECT'][] = $champ;
$a[] = $champ.' '.$methode.' '.$q;
}
}
if ($a) $requete['WHERE'][] = join(" OR ", $a);
$requete['FROM'][] = table_objet_sql($table).' AS t';
$s = sql_select(
$requete['SELECT'], $requete['FROM'], $requete['WHERE'],
implode(" ",$requete['GROUPBY']),
$requete['ORDERBY'], $requete['LIMIT'],
$requete['HAVING'], $serveur
);
while ($t = sql_fetch($s,$serveur)) {
$id = intval($t[$_id_table]);
if ($options['toutvoir']
OR autoriser('voir', $table, $id)) {
// indiquer les champs concernes
$champs_vus = array();
$score = 0;
$matches = array();
$vu = false;
foreach ($champs as $champ => $poids) {
$champ = explode('.',$champ);
$champ = end($champ);
if ($n =
($options['score'] || $options['matches'])
? preg_match_all($preg, translitteration_rapide($t[$champ]), $regs, PREG_SET_ORDER)
: preg_match($preg, translitteration_rapide($t[$champ]))
) {
$vu = true;
if ($options['champs'])
$champs_vus[$champ] = $t[$champ];
if ($options['score'])
$score += $n * $poids;
if ($options['matches'])
$matches[$champ] = $regs;
if (!$options['champs']
AND !$options['score']
AND !$options['matches'])
break;
}
}
if ($vu) {
if (!isset($results[$table]))
$results[$table] = array();
$results[$table][$id] = array();
if ($champs_vus)
$results[$table][$id]['champs'] = $champs_vus;
if ($score)
$results[$table][$id]['score'] = $score;
if ($matches)
$results[$table][$id]['matches'] = $matches;
}
}
}
// Gerer les donnees associees
if (isset($jointures[$table])
AND $joints = recherche_en_base(
$recherche,
$jointures[$table],
array_merge($options, array('jointures' => false))
)
) {
foreach ($joints as $table_liee => $ids_trouves) {
if (!$rechercher_joints = charger_fonction("rechercher_joints_${table}_${table_liee}","inc",true)){
$cle_depart = id_table_objet($table);
$cle_arrivee = id_table_objet($table_liee);
$table_sql = preg_replace('/^spip_/', '', table_objet_sql($table));
$table_liee_sql = preg_replace('/^spip_/', '', table_objet_sql($table_liee));
if ($table_liee == 'document')
$s = sql_select("id_objet as $cle_depart, $cle_arrivee", "spip_documents_liens", array("objet='$table'",sql_in('id_'.${table_liee}, array_keys($ids_trouves))), '','','','',$serveur);
else
$s = sql_select("$cle_depart,$cle_arrivee", "spip_${table_liee_sql}_${table_sql}", sql_in('id_'.${table_liee}, array_keys($ids_trouves)), '','','','',$serveur);
}
else
list($cle_depart,$cle_arrivee,$s) = $rechercher_joints($table,$table_liee,array_keys($ids_trouves), $serveur);
while ($t = is_array($s)?array_shift($s):sql_fetch($s)) {
$id = $t[$cle_depart];
$joint = $ids_trouves[$t[$cle_arrivee]];
if (!isset($results[$table]))
$results[$table] = array();
if (!isset($results[$table][$id]))
$results[$table][$id] = array();
if ($joint['score'])
$results[$table][$id]['score'] += $joint['score'];
if ($joint['champs'])
foreach($joint['champs'] as $c => $val)
$results[$table][$id]['champs'][$table_liee.'.'.$c] = $val;
if ($joint['matches'])
foreach($joint['matches'] as $c => $val)
$results[$table][$id]['matches'][$table_liee.'.'.$c] = $val;
}
}
}
}
return $results;
}
