2 /***************************************************************************
3 * Copyright (C) 2003-2006 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
6 * This program is free software; you can redistribute it and/or modify *
7 * it under the terms of the GNU General Public License as published by *
8 * the Free Software Foundation; either version 2 of the License, or *
9 * (at your option) any later version. *
11 * This program is distributed in the hope that it will be useful, *
12 * but WITHOUT ANY WARRANTY; without even the implied warranty of *
13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the *
14 * GNU General Public License for more details. *
16 * You should have received a copy of the GNU General Public License *
17 * along with this program; if not, write to the Free Software *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 require_once("xorg.misc.inc.php");
24 // {{{ Global variables used for the search Queries
26 $globals->search
->result_fields
= '
27 u.user_id, u.promo, u.matricule, u.matricule_ax,
28 if(u.nom_usage=\'\', u.nom, u.nom_usage) AS NomSortKey,
30 u.deces!=0 AS dcd,u.deces,
31 u.perms IN (\'admin\',\'user\', \'disabled\') AS inscrit,
32 u.perms != \'pending\' AS wasinscrit,
33 FIND_IN_SET(\'femme\', u.flags) AS sexe,
35 ad0.text AS app0text, ad0.url AS app0url, ai0.type AS app0type,
36 ad1.text AS app1text, ad1.url AS app1url, ai1.type AS app1type,
37 es.label AS secteur, ef.fonction_fr AS fonction,
38 IF(n.nat=\'\',n.pays,n.nat) AS nat, n.a2 AS iso3166,
39 COUNT(em.email) > 0 AS actif,';
40 // hide private information if not logged
42 $globals->search
->result_fields
.='
44 q.profile_mobile AS mobile,
45 q.profile_freetext AS freetext,
46 adr.city, gp.pays AS countrytxt, gr.name AS region,
49 $globals->search
->result_fields
.="
50 IF(q.profile_web_pub='public', q.profile_web, '') AS web,
51 IF(q.profile_mobile_pub='public', q.profile_mobile, '') AS mobile,
52 IF(q.profile_freetext_pub='public', q.profile_freetext, '') AS freetext,
53 IF(adr.pub='public', adr.city, '') AS city,
54 IF(adr.pub='public', gp.pays, '') AS countrytxt,
55 IF(adr.pub='public', gr.name, '') AS region,
56 IF(e.pub='public', e.entreprise, '') AS entreprise,";
57 $globals->search
->result_where_statement
= '
58 LEFT JOIN applis_ins AS ai0 ON (u.user_id = ai0.uid AND ai0.ordre = 0)
59 LEFT JOIN applis_def AS ad0 ON (ad0.id = ai0.aid)
60 LEFT JOIN applis_ins AS ai1 ON (u.user_id = ai1.uid AND ai1.ordre = 1)
61 LEFT JOIN applis_def AS ad1 ON (ad1.id = ai1.aid)
62 LEFT JOIN entreprises AS e ON (e.entrid = 0 AND e.uid = u.user_id)
63 LEFT JOIN emploi_secteur AS es ON (e.secteur = es.id)
64 LEFT JOIN fonctions_def AS ef ON (e.fonction = ef.id)
65 LEFT JOIN geoloc_pays AS n ON (u.nationalite = n.a2)
66 LEFT JOIN adresses AS adr ON (u.user_id = adr.uid AND FIND_IN_SET(\'active\',adr.statut))
67 LEFT JOIN geoloc_pays AS gp ON (adr.country = gp.a2)
68 LEFT JOIN geoloc_region AS gr ON (adr.country = gr.a2 AND adr.region = gr.region)
69 LEFT JOIN emails AS em ON (em.uid = u.user_id AND em.flags = \'active\')';
72 // {{{ function display_lines()
75 * This function is a heuristic that approximatively tells
76 * how many lines of output the contact list will use.
78 function display_lines($text)
81 $tokens = Array('<tr>', '<div class="nom">');
82 foreach ($tokens as $t) {
84 while ( ($i = strpos($text,$t,$i+
1))!==false
) { $n++
; }
90 // {{{ class ThrowError
92 /** handle errors for end-users queries
93 * assign the error message and runs the templates
95 * @author Jean-Sebastien Bedo
100 * @param $explain string the error (in natural language)
102 function ThrowError($explain)
105 $page->trig('Erreur : '.$explain);
111 // {{{ class SField [Base class]
113 /** classe de base représentant un champ de recherche
114 * (correspond à un champ du formulaire mais peut être à plusieurs champs de la bdd)
115 * interface étendue pour chaque type de champ particulier
121 /** le nom du champ dans le formulaire HTML */
123 /** champs de la bdd correspondant à ce champ sous forme d'un tableau */
125 /** champ résultat dans la requête MySQL correspondant à ce champ
126 * (alias utilisé pour la clause ORDER BY) */
127 var $fieldResultName;
128 /** valeur du champ instanciée par l'utilisateur */
135 * (récupère la requête de l'utilisateur pour ce champ) */
136 function SField($_fieldFormName, $_fieldDbName='', $_fieldResultName='')
138 $this->fieldFormName
= $_fieldFormName;
139 $this->fieldDbName
= $_fieldDbName;
140 $this->fieldResultName
= $_fieldResultName;
141 $this->get_request();
145 // {{{ function get_request()
147 /** récupérer la requête de l'utilisateur
148 * on met une chaîne vide si le champ n'a pas été complété */
149 function get_request()
151 $this->value
= trim(Env
::v($this->fieldFormName
));
155 // {{{ function get_where_statement()
157 /** récupérer la clause correspondant au champ dans la clause WHERE de la requête
158 * on parcourt l'ensemble des champs de la bdd de $fieldDbName et on associe
159 * à chacun d'entre eux une clause spécifique
160 * la clause totale et la disjonction de ces clauses spécifiques */
161 function get_where_statement()
163 if ($this->value
=='') {
166 $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_where_statement'), $this->fieldDbName
)));
167 return empty($res) ?
'' : "($res)";
171 // {{{ function get_order_statement()
173 /** récupérer la clause correspondant au champ dans la clause ORDER BY de la requête
174 * utilisé par exemple pour placer d'abord le nom égal à la requête avant les approximations */
175 function get_order_statement()
181 // {{{ function get_select_statement()
183 function get_select_statement()
189 // {{{ function get_url()
191 /** récupérer le bout d'URL correspondant aux paramètres permettant d'imiter une requête d'un
192 * utilisateur assignant la valeur $this->value à ce champ */
195 if (empty($this->value
)) {
198 return $this->fieldFormName
.'='.urlencode($this->value
);
206 // {{{ class QuickSearch [Google Like]
208 class QuickSearch
extends SField
214 /** stores numerical ranges */
220 function QuickSearch($_fieldFormName)
222 $this->fieldFormName
= $_fieldFormName;
223 $this->get_request();
224 if (preg_match(":[\]\[{}~/§_`|%$^=+]|\*\*:", $this->value
)) {
225 new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
230 // {{{ function isempty()
234 return empty($this->strings
) && empty($this->ranges
);
238 // {{{ function get_request()
240 function get_request()
242 parent
::get_request();
243 $s = replace_accent(trim($this->value
));
244 $s = preg_replace('!\d+!', ' ', $s);
245 $s = str_replace('*','%',$s);
246 $this->strings
= preg_split("![^a-zA-Z%]+!",$s, -1, PREG_SPLIT_NO_EMPTY
);
248 $s = trim($this->value
);
249 $s = preg_replace('! *- *!', '-', $s);
250 $s = preg_replace('!([<>]) *!', ' \1', $s);
251 $s = preg_replace('![^0-9\-><]!', ' ', $s);
252 $s = preg_replace('![<>\-] !', '', $s);
253 $ranges = preg_split('! +!', $s, -1, PREG_SPLIT_NO_EMPTY
);
254 $this->ranges
=Array();
255 foreach ($ranges as $r) {
256 if (preg_match('!^([<>]\d{4}|\d{4}(-\d{4})?)$!', $r)) $this->ranges
[] = $r;
261 // {{{ function get_where_statement()
263 function get_where_statement()
266 foreach ($this->strings
as $i => $s) {
267 $t = str_replace('*', '%', $s).'%';
268 $t = str_replace('%%', '%', $t);
269 $where[] = "sn$i.token LIKE '$t'";
273 foreach ($this->ranges
as $r) {
274 if (preg_match('!^\d{4}$!', $r)) {
275 $wherep[] = "u.promo=$r";
276 } elseif (preg_match('!^(\d{4})-(\d{4})$!', $r, $matches)) {
277 $p1=min(intval($matches[1]), intval($matches[2]));
278 $p2=max(intval($matches[1]), intval($matches[2]));
279 $wherep[] = "(u.promo>=$p1 AND u.promo<=$p2)";
280 } elseif (preg_match('!^<(\d{4})!', $r, $matches)) {
281 $wherep[] = "u.promo<={$matches[1]}";
282 } elseif (preg_match('!^>(\d{4})!', $r, $matches)) {
283 $wherep[] = "u.promo>={$matches[1]}";
286 if (!empty($wherep)) {
287 $where[] = '('.join(' OR ',$wherep).')';
289 return join(" AND ", $where);
293 // {{{ get_select_statement
294 function get_select_statement()
297 foreach ($this->strings
as $i => $s) {
298 $join .= "INNER JOIN search_name AS sn$i ON (u.user_id = sn$i.uid)\n";
303 // {{{ function get_order_statement()
305 function get_order_statement()
311 // {{{ function get_score_statement
313 function get_score_statement()
316 foreach ($this->strings
as $i => $s) {
317 $sum[] .= "SUM(sn$i.score + IF('$s'=sn$i.token,5,0))";
319 return join('+', $sum).' AS score';
326 // {{{ class NumericSField [Integer fields]
328 /** classe de champ numérique entier (offset par exemple)
330 class NumericSField
extends SField
335 * (récupère la requête de l'utilisateur pour ce champ) */
336 function NumericSField($_fieldFormName)
338 $this->fieldFormName
= $_fieldFormName;
339 $this->get_request();
343 // {{{ function get_request()
345 /** récupère la requête de l'utilisateur et échoue s'il ne s'agit pas d'un entier */
346 function get_request()
348 parent
::get_request();
349 if (empty($this->value
)) {
352 if (!preg_match("/^[0-9]+$/", $this->value
)) {
353 new ThrowError('Un champ numérique contient des caractères alphanumériques.');
361 // {{{ class RefSField [ ??? ]
363 class RefSField
extends SField
375 function RefSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition, $_exact=true
)
377 $this->fieldFormName
= $_fieldFormName;
378 $this->fieldDbName
= $_fieldDbName;
379 $this->refTable
= $_refTable;
380 $this->refAlias
= $_refAlias;
381 $this->refCondition
= $_refCondition;
382 $this->exact
= $_exact;
383 $this->get_request();
387 // {{{ function get_request()
389 function get_request() {
390 parent
::get_request();
391 if ($this->value
=='00' ||
$this->value
=='0') {
397 // {{{ function too_large()
401 return ($this->value
=='');
405 // {{{ function compare()
409 $val = addslashes($this->value
);
410 return $this->exact ?
"='$val'" : " LIKE '%$val%'";
414 // {{{ function get_single_match_statement()
416 function get_single_match_statement($field)
418 return $field.$this->compare();
422 // {{{ function get_single_where_statement()
424 function get_single_where_statement($field)
426 return $this->refTable
=='' ?
$this->get_single_match_statement($field) : false
;
430 // {{{ function get_select_statement()
432 function get_select_statement()
434 if ($this->value
=='' ||
$this->refTable
=='') {
437 $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_match_statement'), $this->fieldDbName
)));
438 return "INNER JOIN {$this->refTable} AS {$this->refAlias} ON ({$this->refCondition} AND ($res) )";
446 // {{{ class RefSFieldMultipleTable
447 class MapSField
extends RefSField
451 function MapSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition, $_mapId=false
)
453 if ($_mapId === false
)
454 $this->mapId
= Env
::v($_fieldFormName, '');
456 $this->mapId
= $_mapId;
457 $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true
, false
);
459 function get_select_statement()
461 if ($this->mapId
=== '') return false
;
462 $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_match_statement'), $this->fieldDbName
)));
463 foreach ($this->refTable
as $i => $refT)
466 foreach ($this->refTable
as $i => $refT)
467 $inner .= " INNER JOIN {$refT} AS {$this->refAlias[$i]} ON ({$this->refCondition[$i]} ".(($i == $last)?
"AND ($res) ":"").")";
470 function get_request()
472 $this->value
= $this->mapId
;
476 // {{{ class RefWithSoundexSField [ ??? ]
478 class RefWithSoundexSField
extends RefSField
480 // {{{ function compare()
484 return "='".soundex_fr($this->value
)."'";
491 // {{{ class StringSField [String fields]
493 /** classe de champ texte (nom par exemple)
495 class StringSField
extends SField
497 // {{{ function get_request()
499 /** récupère la requête de l'utilisateur et échoue si la chaîne contient des caractères
501 function get_request()
503 parent
::get_request();
504 if (preg_match(":[\]\[<>{}~/§_`|%$^=+]|\*\*:", $this->value
)) {
505 new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
510 // {{{ function length()
512 /** donne la longueur de la requête de l'utilisateur
513 * (au sens strict i.e. pas d'* ni d'espace ou de trait d'union -> les contraintes réellement
514 * imposées par l'utilisateur) */
517 global $lc_accent,$uc_accent;
518 return strlen($this->value
) - strlen(ereg_replace('[a-z'.$lc_accent.$uc_accent.']', '', strtolower($this->value
)));
522 // {{{ function too_large()
526 return ($this->length()<2);
530 // {{{ function get_single_where_statement()
532 /** clause WHERE correspondant à un champ de la bdd et à ce champ de formulaire
533 * @param field nom de champ de la bdd concerné par la clause */
534 function get_single_where_statement($field)
536 $regexp = strtr(addslashes($this->value
), '-*', '_%');
537 return "$field LIKE '$regexp%'";
541 // {{{ function get_order_statement()
543 /** clause ORDER BY correspondant à ce champ de formulaire */
544 function get_order_statement()
546 if ($this->value
!='' && $this->fieldResultName
!='') {
547 return "{$this->fieldResultName}!='".addslashes($this->value
)."'";
557 // {{{ class NameSField [Names : serach 'n%' + '% b']
559 /** classe pour les noms : on cherche en plus du like 'foo%' le like '% foo' (particules)
561 class NameSField
extends StringSField
563 // {{{ function get_single_where_statement()
565 function get_single_where_statement($field)
567 $regexp = strtr(addslashes($this->value
), '-*', '_%');
568 return "$field LIKE '$regexp%' OR $field LIKE '% $regexp%' OR $field LIKE '%-$regexp%'";
572 // {{{ function get_order_statement()
574 function get_order_statement()
576 if ($this->value
!='' && $this->fieldResultName
!='') {
577 return "{$this->fieldResultName} NOT LIKE '".addslashes($this->value
)."'";
587 // {{{ class StringWithSoundexSField [Strings + soundex]
589 /** classe de champ texte avec soundex (nom par exemple)
591 class StringWithSoundexSField
extends StringSField
593 // {{{ function get_single_where_statement()
595 /** clause WHERE correspondant à un champ de la bdd et à ce champ de formulaire
596 * @param field nom de champ de la bdd concerné par la clause */
597 function get_single_where_statement($field) {
598 return $field.'="'.soundex_fr($this->value
).'"';
605 // {{{ class PromoSField [Prom field]
607 /** classe de champ de promotion */
608 class PromoSField
extends SField
612 /** opérateur de comparaison (<,>,=) de la promo utilisé pour ce champ de formulaire */
619 * compareField est un champ de formulaire très simple qui ne sert qu'à la construction de la
620 * clause WHERE de la promo */
621 function PromoSField($_fieldFormName, $_compareFieldFormName, $_fieldDbName, $_fieldResultName)
623 parent
::SField($_fieldFormName, $_fieldDbName, $_fieldResultName);
624 $this->compareField
= new SField($_compareFieldFormName);
628 // {{{ function get_request()
630 /** récupère la requête utilisateur et échoue si le champ du formulaire ne représente pas une
631 * promotion (nombre à 4 chiffres) */
632 function get_request()
634 parent
::get_request();
635 if (preg_match('/^[0-9]{2}$/', $this->value
)){
636 $this->value
= intval($this->value
) +
1900;
638 if (!(empty($this->value
) or preg_match('/^[0-9]{4}$/', $this->value
))) {
639 new ThrowError('La promotion est une année à quatre chiffres.');
644 // {{{ function is_a_single_promo()
646 /** teste si la requête est de la forme =promotion -> contrainte forte imposée -> elle suffit
647 * pour autoriser un affichage des résultats alors que <promotion est insuffisant */
648 function is_a_single_promo()
650 return ($this->compareField
->value
=='=' && $this->value
!='');
654 // {{{ function too_large()
658 return !$this->is_a_single_promo();
662 // {{{ function get_single_where_statement()
664 /** clause WHERE correspondant à ce champ */
665 function get_single_where_statement($field)
667 return $field.$this->compareField
->value
.$this->value
;
671 // {{{ function get_url()
673 /** récupérer le bout d'URL correspondant aux paramètres permettant d'imiter une requête
674 * d'un utilisateur assignant la valeur $this->value à ce champ et assignant l'opérateur de
675 * comparaison adéquat */
678 if (!($u=parent
::get_url())) {
681 return $u.'&'.$this->compareField
->get_url();
688 // {{{ class SFieldGroup [Group fields]
690 /** classe groupant des champs de formulaire de recherche */
695 /** tableau des classes correspondant aux champs groupés */
697 /** type de groupe : ET ou OU */
704 function SFieldGroup($_and, $_fields)
706 $this->fields
= $_fields;
711 // {{{ function too_large()
716 for ($i=0; $b && $i<count($this->fields
); $i++
) {
717 $b &= $this->fields
[$i]->too_large();
723 // {{{ function field_get_select()
725 function field_get_select($f)
727 return $f->get_select_statement();
731 // {{{ function field_get_where()
733 /** récupérer la clause WHERE d'un objet champ de recherche */
734 function field_get_where($f)
736 return $f->get_where_statement();
740 // {{{ function field_get_order()
742 /** récupérer la clause ORDER BY d'un objet champ de recherche */
743 function field_get_order($f)
745 return $f->get_order_statement();
749 // {{{ function field_get_url()
751 /** récupérer le bout d'URL correspondant à un objet champ de recherche */
752 function field_get_url($f)
754 return $f->get_url();
758 // {{{ function get_select_statement()
760 function get_select_statement()
762 return implode(' ', array_filter(array_map(array($this, 'field_get_select'), $this->fields
)));
766 // {{{ function get_where_statement()
768 /** récupérer la clause WHERE du groupe de champs = conjonction (ET) ou disjonction (OU) de
769 * clauses des champs élémentaires */
770 function get_where_statement()
772 $joinText = $this->and ?
' AND ' : ' OR ';
773 $res = implode($joinText, array_filter(array_map(array($this, 'field_get_where'), $this->fields
)));
774 return $res == '' ?
'' : "($res)";
778 // {{{ function get_order_statement()
780 /** récupérer la clause ORDER BY du groupe de champs = conjonction (ET) ou disjonction (OU) de
781 * clauses des champs élémentaires */
782 function get_order_statement()
784 $order = array_filter(array_map(array($this, 'field_get_order'), $this->fields
));
785 return count($order)>0 ?
implode(',', $order) : false
;
789 // {{{ function get_url()
791 /** récupérer le bout d'URL correspondant à ce groupe de champs = concaténation des bouts d'URL
792 * des champs élémentaires */
793 function get_url($others=Array())
795 $url = array_filter(array_map(array($this, 'field_get_url'), $this->fields
));
796 foreach ($url as $key=>$val) {
801 foreach ($others as $key=>$val) {
803 $url[] = "$key=$val";
806 return count($url)>0 ?
implode('&', $url) : false
;
814 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker: