Merge commit 'origin/master' into fusionax
[platal.git] / modules / search / classes.inc.php
index db3c466..a7d0360 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2007 Polytechnique.org                              *
+ *  Copyright (C) 2003-2009 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  ***************************************************************************/
 
-require_once("xorg.misc.inc.php");
-
 // {{{ Global variables used for the search Queries
 
-$globals->search->result_fields = '
-                u.user_id, u.promo, u.matricule, u.matricule_ax,
-               if(u.nom_usage=\'\', u.nom, u.nom_usage) AS NomSortKey,
-                u.nom_usage,u.date,
-                u.deces!=0 AS dcd,u.deces,
-               u.perms IN (\'admin\',\'user\', \'disabled\') AS inscrit,
-               u.perms != \'pending\' AS wasinscrit,
-               FIND_IN_SET(\'femme\', u.flags) AS sexe,
-                a.alias AS forlife,
-                ad0.text AS app0text, ad0.url AS app0url, ai0.type AS app0type,
-                ad1.text AS app1text, ad1.url AS app1url, ai1.type AS app1type,
-                es.label AS secteur, ef.fonction_fr AS fonction,
-                IF(n.nat=\'\',n.pays,n.nat) AS nat, n.a2 AS iso3166,
-        COUNT(em.email) > 0 AS actif,';
+@$globals->search->result_fields = '
+    u.user_id, u.promo, u.matricule, u.matricule_ax,
+    if(u.nom_usage=\'\', u.nom, u.nom_usage) AS NomSortKey,
+    u.nom_usage,u.date,
+    u.deces!=0 AS dcd,u.deces,
+    u.perms IN (\'admin\',\'user\', \'disabled\') AS inscrit,
+    u.perms != \'pending\' AS wasinscrit,
+    FIND_IN_SET(\'femme\', u.flags) AS sexe,
+    ede0.name AS eduname0, ede0.url AS eduurl0, edd0.degree AS edudegree0,
+    edu0.grad_year AS edugrad_year0, f0.field AS edufield0, edu0.program AS eduprogram0,
+    ede1.name AS eduname1, ede1.url AS eduurl1, edd1.degree AS edudegree1,
+    edu1.grad_year AS edugrad_year1, f1.field AS edufield1, edu1.program AS eduprogram1,
+    ede2.name AS eduname2, ede2.url AS eduurl2, edd2.degree AS edudegree2,
+    edu2.grad_year AS edugrad_year2, f2.field AS edufield2, edu2.program AS eduprogram2,
+    ede3.name AS eduname3, ede3.url AS eduurl3, edd3.degree AS edudegree3,
+    edu3.grad_year AS edugrad_year3, f3.field AS edufield3, edu3.program AS eduprogram3,
+    es.name AS secteur, ef.fonction_fr AS fonction,
+    IF(n1.nat=\'\',n1.pays,n1.nat) AS nat1, n1.a2 AS iso3166_1,
+    IF(n2.nat=\'\',n2.pays,n2.nat) AS nat2, n2.a2 AS iso3166_2,
+    IF(n3.nat=\'\',n3.pays,n3.nat) AS nat3, n3.a2 AS iso3166_3,
+    (COUNT(em.email) > 0 OR FIND_IN_SET("googleapps", u.mail_storage) > 0) AS actif,';
 // hide private information if not logged
-if (S::logged()) 
-       $globals->search->result_fields .='
-               q.profile_web AS web,
-               q.profile_mobile AS mobile,
-               q.profile_freetext AS freetext,
-                adr.city, gp.pays AS countrytxt, gr.name AS region,
-               e.entreprise,';
+if (S::logged())
+    $globals->search->result_fields .='
+        q.profile_freetext AS freetext,
+        adr.city, gp.pays AS countrytxt, gr.name AS region,
+        ee.name,
+        nw.address AS networking_address,
+        nwe.name AS networking_name,';
 else
-       $globals->search->result_fields .="
-               IF(q.profile_web_pub='public', q.profile_web, '') AS web,
-               IF(q.profile_mobile_pub='public', q.profile_mobile, '') AS mobile,
-               IF(q.profile_freetext_pub='public', q.profile_freetext, '') AS freetext,
-               IF(adr.pub='public', adr.city, '') AS city,
-               IF(adr.pub='public', gp.pays, '') AS countrytxt,
-               IF(adr.pub='public', gr.name, '') AS region,
-               IF(e.pub='public', e.entreprise, '') AS entreprise,";
-$globals->search->result_where_statement = '
-                LEFT JOIN  applis_ins     AS ai0 ON (u.user_id = ai0.uid AND ai0.ordre = 0)
-                LEFT JOIN  applis_def     AS ad0 ON (ad0.id = ai0.aid)
-                LEFT JOIN  applis_ins     AS ai1 ON (u.user_id = ai1.uid AND ai1.ordre = 1)
-                LEFT JOIN  applis_def     AS ad1 ON (ad1.id = ai1.aid)
-                LEFT JOIN  entreprises    AS e   ON (e.entrid = 0 AND e.uid = u.user_id)
-                LEFT JOIN  emploi_secteur AS es  ON (e.secteur = es.id)
-                LEFT JOIN  fonctions_def  AS ef  ON (e.fonction = ef.id)
-                LEFT JOIN  geoloc_pays    AS n   ON (u.nationalite = n.a2)
-                LEFT JOIN  adresses       AS adr ON (u.user_id = adr.uid AND FIND_IN_SET(\'active\',adr.statut))
-                LEFT JOIN  geoloc_pays    AS gp  ON (adr.country = gp.a2)
-                LEFT JOIN  geoloc_region  AS gr  ON (adr.country = gr.a2 AND adr.region = gr.region)
-                LEFT JOIN  emails         AS em  ON (em.uid = u.user_id AND em.flags = \'active\')';
-
-// }}}
-// {{{ function display_lines()
-
-/**
- * This function is a heuristic that approximatively tells
- * how many lines of output the contact list will use.
- */
-function display_lines($text)
-{
-    $n = 0;
-    $tokens = Array('<tr>', '<div class="nom">');
-    foreach ($tokens as $t) {
-        $i = -1;
-        while ( ($i = strpos($text,$t,$i+1))!==false) { $n++; }
-    }
-    return $n;
-}
+    $globals->search->result_fields .="
+        IF(q.profile_freetext_pub='public', q.profile_freetext, '') AS freetext,
+        IF(adr.pub='public', adr.city, '')   AS city,
+        IF(adr.pub='public', gp.pays, '')    AS countrytxt,
+        IF(adr.pub='public', gr.name, '')    AS region,
+        IF(e.pub='public', je.name, '')      AS entreprise,
+        IF(nw.pub='public', nw.address, '')  AS networking_address,
+        IF(nw.pub='public', nwe.name, '')    AS networking_name,";
+@$globals->search->result_where_statement = '
+    LEFT JOIN  profile_education             AS edu0 ON (u.user_id = edu0.uid AND edu0.id = 0)
+    LEFT JOIN  profile_education_enum        AS ede0 ON (ede0.id = edu0.eduid)
+    LEFT JOIN  profile_education_degree_enum AS edd0 ON (edd0.id = edu0.degreeid)
+    LEFT JOIN  profile_education_field_enum  AS f0   ON (f0.id = edu0.fieldid)
+    LEFT JOIN  profile_education             AS edu1 ON (u.user_id = edu1.uid AND edu1.id = 1)
+    LEFT JOIN  profile_education_enum        AS ede1 ON (ede1.id = edu1.eduid)
+    LEFT JOIN  profile_education_degree_enum AS edd1 ON (edd1.id = edu1.degreeid)
+    LEFT JOIN  profile_education_field_enum  AS f1   ON (f1.id = edu1.fieldid)
+    LEFT JOIN  profile_education             AS edu2 ON (u.user_id = edu2.uid AND edu2.id = 2)
+    LEFT JOIN  profile_education_enum        AS ede2 ON (ede2.id = edu2.eduid)
+    LEFT JOIN  profile_education_degree_enum AS edd2 ON (edd2.id = edu2.degreeid)
+    LEFT JOIN  profile_education_field_enum  AS f2   ON (f2.id = edu2.fieldid)
+    LEFT JOIN  profile_education             AS edu3 ON (u.user_id = edu3.uid AND edu3.id = 3)
+    LEFT JOIN  profile_education_enum        AS ede3 ON (ede3.id = edu3.eduid)
+    LEFT JOIN  profile_education_degree_enum AS edd3 ON (edd3.id = edu3.degreeid)
+    LEFT JOIN  profile_education_field_enum  AS f3   ON (f3.id = edu3.fieldid)
+    LEFT JOIN  profile_job                   AS e    ON (e.uid = u.user_id)
+    LEFT JOIN  profile_job_enum              AS ee   ON (e.jobid = ee.id)
+    LEFT JOIN  profile_job_sector_enum       AS es   ON (es.id = e.sectorid)
+    LEFT JOIN  fonctions_def                 AS ef   ON (e.fonction = ef.id)
+    LEFT JOIN  geoloc_pays                   AS n1   ON (u.nationalite = n1.a2)
+    LEFT JOIN  geoloc_pays                   AS n2   ON (u.nationalite2 = n2.a2)
+    LEFT JOIN  geoloc_pays                   AS n3   ON (u.nationalite3 = n3.a2)
+    LEFT JOIN  adresses                      AS adr  ON (u.user_id = adr.uid AND FIND_IN_SET(\'active\',adr.statut))
+    LEFT JOIN  geoloc_pays                   AS gp   ON (adr.country = gp.a2)
+    LEFT JOIN  geoloc_region                 AS gr   ON (adr.country = gr.a2 AND adr.region = gr.region)
+    LEFT JOIN  emails                        AS em   ON (em.uid = u.user_id AND em.flags = \'active\')
+    LEFT JOIN  profile_networking            AS nw   ON (nw.uid = u.user_id)
+    LEFT JOIN  profile_networking_enum       AS nwe  ON (nwe.network_type = nw.network_type)';
 
 // }}}
 // {{{ class ThrowError
@@ -96,13 +100,26 @@ function display_lines($text)
  */
 class ThrowError
 {
+    public static $throwHook = array('ThrowError', 'defaultHandler');
+
     /** constuctor
      * @param  $explain string  the error (in natural language)
      */
-    function ThrowError($explain)
+    public function __construct($explain)
     {
-        global $page;
-        $page->trig('Erreur : '.$explain);
+        call_user_func(ThrowError::$throwHook, $explain);
+    }
+
+    /** defaut error handler
+     */
+    private static function defaultHandler($explain)
+    {
+        global $globals;
+        $page =& Platal::page();
+        $page->changeTpl('search/index.tpl');
+        $page->setTitle('Polytechnique.org - Annuaire');
+        $page->assign('baseurl', $globals->baseurl);
+        $page->trigError($explain);
         $page->run();
     }
 }
@@ -117,7 +134,7 @@ class ThrowError
 class SField
 {
     // {{{ properties
-    
+
     /** le nom du champ dans le formulaire HTML */
     var $fieldFormName;
     /** champs de la bdd correspondant à ce champ sous forme d'un tableau */
@@ -144,7 +161,7 @@ class SField
     // }}}
     // {{{ function get_request()
 
-    /** récupérer la requête de l'utilisateur 
+    /** récupérer la requête de l'utilisateur
      * on met une chaîne vide si le champ n'a pas été complété */
     function get_request()
     {
@@ -153,9 +170,9 @@ class SField
 
     // }}}
     // {{{ function get_where_statement()
-    
+
     /** récupérer la clause correspondant au champ dans la clause WHERE de la requête
-     * on parcourt l'ensemble des champs de la bdd de $fieldDbName et on associe 
+     * on parcourt l'ensemble des champs de la bdd de $fieldDbName et on associe
      * à chacun d'entre eux une clause spécifique
      * la clause totale et la disjonction de ces clauses spécifiques */
     function get_where_statement()
@@ -169,7 +186,7 @@ class SField
 
     // }}}
     // {{{ function get_order_statement()
-    
+
     /** récupérer la clause correspondant au champ dans la clause ORDER BY de la requête
      * utilisé par exemple pour placer d'abord le nom égal à la requête avant les approximations */
     function get_order_statement()
@@ -208,20 +225,25 @@ class SField
 class QuickSearch extends SField
 {
     // {{{ properties
-    
+
     /** stores tokens */
     var $strings;
     /** stores numerical ranges */
     var $ranges;
+    /** stores admin searches */
+    var $email;
+    var $ip;
+    /** stores phone number */
+    var $phone;
 
     // }}}
     // {{{ constructor
-    
+
     function QuickSearch($_fieldFormName)
     {
         $this->fieldFormName = $_fieldFormName;
         $this->get_request();
-        if (preg_match(":[\]\[{}~/§_`|%$^=+]|\*\*:", $this->value)) {
+        if (preg_match(":[\]\[{}~/§_`|%$^=+]|\*\*:u", $this->value)) {
             new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
         }
     }
@@ -231,62 +253,102 @@ class QuickSearch extends SField
 
     function isempty()
     {
-       return empty($this->strings) && empty($this->ranges);
+        return empty($this->strings) && empty($this->ranges) && empty($this->email) && empty($this->ip) && empty($this->phone);
     }
 
     // }}}
     // {{{ function get_request()
-    
+
     function get_request()
     {
-       parent::get_request();
-       $s = replace_accent(trim($this->value));
-       $s = preg_replace('!\d+!', ' ', $s);
-        $s = str_replace('*','%',$s);
-       $this->strings = preg_split("![^a-zA-Z%]+!",$s, -1, PREG_SPLIT_NO_EMPTY);
+        parent::get_request();
+        $s = replace_accent(trim($this->value));
+        $r = $s = str_replace('*','%',$s);
 
-       $s = trim($this->value);
-       $s = preg_replace('! *- *!', '-', $s);
-       $s = preg_replace('!([<>]) *!', ' \1', $s);
-       $s = preg_replace('![^0-9\-><]!', ' ', $s);
-       $s = preg_replace('![<>\-] !', '', $s);
-       $ranges = preg_split('! +!', $s, -1, PREG_SPLIT_NO_EMPTY);
-       $this->ranges=Array();
-       foreach ($ranges as $r) {
-           if (preg_match('!^([<>]\d{4}|\d{4}(-\d{4})?)$!', $r)) $this->ranges[] = $r;
-       }
+        if (S::has_perms() && strpos($s, '@') !== false) {
+            $this->email = $s;
+        } else if (S::has_perms() && preg_match('/[0-9]+\.([0-9]+|%)\.([0-9]+|%)\.([0-9]+|%)/', $s)) {
+            $this->ip = $s;
+        }
+        if ($this->email || $this->ip) {
+            $this->strings = $this->ranges = array();
+            return;
+        }
+
+        $s = preg_replace('!\d+!', ' ', $s);
+        $this->strings = preg_split("![^a-zA-Z%]+!",$s, -1, PREG_SPLIT_NO_EMPTY);
+        if (count($this->strings) > 5) {
+            Platal::page()->trigWarning("Tu as indiqué trop d'éléments dans ta recherche, seuls les 5 premiers seront pris en compte");
+            $this->strings = array_slice($this->strings, 0, 5);
+        }
+
+        $s = preg_replace('! *- *!', '-', $r);
+        $s = preg_replace('!([<>]) *!', ' \1', $s);
+        $s = preg_replace('![^0-9\-><]!', ' ', $s);
+        $s = preg_replace('![<>\-] !', '', $s);
+        $ranges = preg_split('! +!', $s, -1, PREG_SPLIT_NO_EMPTY);
+        $this->ranges=Array();
+        foreach ($ranges as $r) {
+            if (preg_match('!^([<>]\d{4}|\d{4}(-\d{4})?)$!', $r)) $this->ranges[] = $r;
+        }
+
+        $t = preg_replace('!(\d{4}-\d{4}|>\d{4}|<\d{4})!', '', $s);
+        $t = preg_replace('![<>\- ]!', '', $t);
+        if (strlen($t) > 4) {
+            $this->phone = $t;
+        }
     }
 
     // }}}
     // {{{ function get_where_statement()
-    
+
     function get_where_statement()
     {
-       $where = Array();
-       foreach ($this->strings as $i => $s) {
-           $t = str_replace('*', '%', $s).'%';
-           $t = str_replace('%%', '%', $t);
-           $where[] = "sn$i.token LIKE '$t'";
-       }
-       
-       $wherep = Array();
-       foreach ($this->ranges as $r) {
-           if (preg_match('!^\d{4}$!', $r)) {
-               $wherep[] = "u.promo=$r";
-           } elseif (preg_match('!^(\d{4})-(\d{4})$!', $r, $matches)) {
-               $p1=min(intval($matches[1]), intval($matches[2]));
-               $p2=max(intval($matches[1]), intval($matches[2]));
-               $wherep[] = "(u.promo>=$p1 AND u.promo<=$p2)";
-           } elseif (preg_match('!^<(\d{4})!', $r, $matches)) {
-               $wherep[] = "u.promo<={$matches[1]}";
-           } elseif (preg_match('!^>(\d{4})!', $r, $matches)) {
-               $wherep[] = "u.promo>={$matches[1]}";
-           }
-       }
-       if (!empty($wherep)) {
+        $where = Array();
+        foreach ($this->strings as $i => $s) {
+            if (Env::i('with_soundex') && strlen($s) > 1) {
+                $t = soundex_fr($s);
+                $where[] = "sn$i.soundex = '$t'";
+            } elseif (Env::i('exact')) {
+                $where[] = "sn$i.token = '$s'";
+            } else {
+                $t = str_replace('*', '%', $s).'%';
+                $t = str_replace('%%', '%', $t);
+                $where[] = "sn$i.token LIKE '$t'";
+            }
+        }
+
+        $wherep = Array();
+        foreach ($this->ranges as $r) {
+            if (preg_match('!^\d{4}$!', $r)) {
+                $wherep[] = "u.promo=$r";
+            } elseif (preg_match('!^(\d{4})-(\d{4})$!', $r, $matches)) {
+                $p1=min(intval($matches[1]), intval($matches[2]));
+                $p2=max(intval($matches[1]), intval($matches[2]));
+                $wherep[] = "(u.promo>=$p1 AND u.promo<=$p2)";
+            } elseif (preg_match('!^<(\d{4})!', $r, $matches)) {
+                $wherep[] = "u.promo<={$matches[1]}";
+            } elseif (preg_match('!^>(\d{4})!', $r, $matches)) {
+                $wherep[] = "u.promo>={$matches[1]}";
+            }
+        }
+        if (!empty($wherep)) {
             $where[] = '('.join(' OR ',$wherep).')';
         }
-       return join(" AND ", $where);
+        if (!empty($this->email)) {
+            $where[] = 'ems.email = ' . XDB::escape($this->email);
+        }
+        if (!empty($this->ip)) {
+            $ip = ip_to_uint($this->ip);
+            $where[] = "( ls.ip = $ip OR ls.forward_ip = $ip ) AND ls.suid = 0";
+        }
+        if (!empty($this->phone)){
+            require_once("profil.func.inc.php");
+            $phone = format_phone_number($this->phone) . "%";
+            $where[] = 't.search_tel LIKE ' . XDB::escape($phone);
+        }
+
+        return join(" AND ", $where);
     }
 
     // }}}
@@ -294,14 +356,34 @@ class QuickSearch extends SField
     function get_select_statement()
     {
         $join = "";
-       foreach ($this->strings as $i => $s) {
-            $join .= "INNER JOIN search_name AS sn$i ON (u.user_id = sn$i.uid)\n";
+        $and  = '';
+        $uniq = '';
+        foreach ($this->strings as $i => $s) {
+            if (!S::logged()) {
+                $and = "AND FIND_IN_SET('public', sn$i.flags)";
+            }
+            $myu  = str_replace('snv', "sn$i", $uniq);
+            $join .= "INNER JOIN search_name AS sn$i ON (u.user_id = sn$i.uid $and$myu)\n";
+            $uniq .= " AND sn$i.token != snv.token";
+        }
+        if (!empty($this->email)) {
+            $join .= "LEFT JOIN emails AS ems ON (ems.uid = u.user_id)";
+        }
+        if (!empty($this->ip)) {
+            $join .= "INNER JOIN logger.sessions AS ls ON (ls.uid = u.user_id)\n";
+        }
+        if (!empty($this->phone)) {
+            if (!S::logged()) {
+                $join .= "INNER JOIN profile_phones AS t ON (t.uid = u.user_id AND t.pub = 'public')";
+            } else {
+                $join .= "INNER JOIN profile_phones AS t ON (t.uid = u.user_id)";
+            }
         }
         return $join;
     }
     // }}}
     // {{{ function get_order_statement()
-    
+
     function get_order_statement()
     {
         return false;
@@ -309,11 +391,11 @@ class QuickSearch extends SField
 
     // }}}
     // {{{ function get_score_statement
-    
+
     function get_score_statement()
     {
         $sum = array('0');
-       foreach ($this->strings as $i => $s) {
+        foreach ($this->strings as $i => $s) {
             $sum[] .= "SUM(sn$i.score + IF('$s'=sn$i.token,5,0))";
         }
         return join('+', $sum).' AS score';
@@ -330,7 +412,7 @@ class QuickSearch extends SField
 class NumericSField extends SField
 {
     // {{{ constructor
-    
+
     /** constructeur
      * (récupère la requête de l'utilisateur pour ce champ) */
     function NumericSField($_fieldFormName)
@@ -341,7 +423,7 @@ class NumericSField extends SField
 
     // }}}
     // {{{ function get_request()
-    
+
     /** récupère la requête de l'utilisateur et échoue s'il ne s'agit pas d'un entier */
     function get_request()
     {
@@ -353,7 +435,7 @@ class NumericSField extends SField
             new ThrowError('Un champ numérique contient des caractères alphanumériques.');
         }
     }
-    
+
     // }}}
 }
 
@@ -363,7 +445,7 @@ class NumericSField extends SField
 class RefSField extends SField
 {
     // {{{ properties
-    
+
     var $refTable;
     var $refAlias;
     var $refCondition;
@@ -385,7 +467,7 @@ class RefSField extends SField
 
     // }}}
     // {{{ function get_request()
-    
+
     function get_request() {
         parent::get_request();
         if ($this->value=='00' || $this->value=='0') {
@@ -407,6 +489,7 @@ class RefSField extends SField
     function compare()
     {
         $val = addslashes($this->value);
+        if (Env::i('exact')) return "='$val'";
         return $this->exact ? "='$val'" : " LIKE '%$val%'";
     }
 
@@ -435,7 +518,16 @@ class RefSField extends SField
             return false;
         }
         $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_match_statement'), $this->fieldDbName)));
-        return "INNER JOIN {$this->refTable} AS {$this->refAlias} ON ({$this->refCondition} AND ($res) )";
+        if (is_array($this->refTable)) {
+           foreach ($this->refTable as $i => $refT)
+               $last = $i;
+           $inner = "";
+            foreach ($this->refTable as $i => $refT)
+                $inner .= " INNER JOIN {$refT} AS {$this->refAlias[$i]} ON ({$this->refCondition[$i]} ".(($i == $last)?"AND ($res) ":"").")\n";
+            return $inner;
+        } else {
+            return "INNER JOIN {$this->refTable} AS {$this->refAlias} ON ({$this->refCondition} AND ($res) )";
+        }
     }
 
     // }}}
@@ -444,18 +536,53 @@ class RefSField extends SField
 // }}}
 
 // {{{ class RefSFieldMultipleTable
+class PhoneSField extends RefSField
+{
+    function PhoneSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition)
+    {
+        $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true);
+    }
+
+    function get_request()
+    {
+        require_once("profil.func.inc.php");
+        $this->value = trim(Env::v($this->fieldFormName));
+        $this->value = format_phone_number($this->value);
+    }
+
+    function compare()
+    {
+        return " LIKE '" . addslashes($this->value) . "%'";
+    }
+}
+
+class IndexSField extends RefSField
+{
+    function IndexSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition)
+    {
+        $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true);
+    }
+
+    function get_request()
+    {
+        $this->value = trim(Env::v($this->fieldFormName));
+    }
+}
+
 class MapSField extends RefSField
 {
-       var $mapId;
-       
+    var $mapId;
+
     function MapSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition, $_mapId=false)
     {
         if ($_mapId === false)
             $this->mapId = Env::v($_fieldFormName, '');
         else
             $this->mapId = $_mapId;
+        $this->value =  $this->mapId;
         $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true, false);
     }
+
     function get_select_statement()
     {
         if ($this->mapId === '') return false;
@@ -478,10 +605,10 @@ class MapSField extends RefSField
 class RefWithSoundexSField extends RefSField
 {
     // {{{ function compare()
-    
+
     function compare()
     {
-       return "='".soundex_fr($this->value)."'";
+        return "='".soundex_fr($this->value)."'";
     }
 
     // }}}
@@ -495,13 +622,13 @@ class RefWithSoundexSField extends RefSField
 class StringSField extends SField
 {
     // {{{ function get_request()
-    
+
     /** récupère la requête de l'utilisateur et échoue si la chaîne contient des caractères
      * interdits */
     function get_request()
     {
         parent::get_request();
-        if (preg_match(":[\]\[<>{}~/§_`|%$^=+]|\*\*:", $this->value)) {
+        if (preg_match(":[\]\[<>{}~/§_`|%$^=+]|\*\*:u", $this->value)) {
             new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
         }
     }
@@ -514,8 +641,9 @@ class StringSField extends SField
      * imposées par l'utilisateur) */
     function length()
     {
-        global $lc_accent,$uc_accent;
-        return strlen($this->value) - strlen(ereg_replace('[a-z'.$lc_accent.$uc_accent.']', '', strtolower($this->value)));
+        $cleaned = replace_accent(strtolower($this->value));
+        $length  = strlen(ereg_replace('[a-z0-9]', '', $cleaned));
+        return strlen($this->value) - $length;
     }
 
     // }}}
@@ -533,7 +661,9 @@ class StringSField extends SField
      * @param field nom de champ de la bdd concerné par la clause */
     function get_single_where_statement($field)
     {
-        $regexp = strtr(addslashes($this->value), '-*', '_%');
+        $val = addslashes($this->value);
+        if (Env::i('exact')) return "$field = '$val'";
+        $regexp = strtr($val, '-*', '_%');
         return "$field LIKE '$regexp%'";
     }
 
@@ -561,16 +691,18 @@ class StringSField extends SField
 class NameSField extends StringSField
 {
     // {{{ function get_single_where_statement()
-    
+
     function get_single_where_statement($field)
     {
-        $regexp = strtr(addslashes($this->value), '-*', '_%');
+        $val = addslashes($this->value);
+        if (Env::i('exact')) return "$field = '$val'";
+        $regexp = strtr($val, '-*', '_%');
         return "$field LIKE '$regexp%' OR $field LIKE '% $regexp%' OR $field LIKE '%-$regexp%'";
     }
 
     // }}}
     // {{{ function get_order_statement()
-    
+
     function get_order_statement()
     {
         if ($this->value!='' && $this->fieldResultName!='') {
@@ -608,14 +740,14 @@ class StringWithSoundexSField extends StringSField
 class PromoSField extends SField
 {
     // {{{ properties
-    
+
     /** opérateur de comparaison (<,>,=) de la promo utilisé pour ce champ de formulaire */
     var $compareField;
 
     // }}}
     // {{{ constructor
 
-    /** constructeur 
+    /** constructeur
      * compareField est un champ de formulaire très simple qui ne sert qu'à la construction de la
      * clause WHERE de la promo */
     function PromoSField($_fieldFormName, $_compareFieldFormName, $_fieldDbName, $_fieldResultName)
@@ -691,7 +823,7 @@ class PromoSField extends SField
 class SFieldGroup
 {
     // {{{ properties
-    
+
     /** tableau des classes correspondant aux champs groupés */
     var $fields;
     /** type de groupe : ET ou OU */
@@ -705,6 +837,11 @@ class SFieldGroup
     {
         $this->fields = $_fields;
         $this->and    = $_and;
+        foreach ($this->fields as $key=>&$field) {
+            if (is_null($field)) {
+                unset($this->fields[$key]);
+            }
+        }
     }
 
     // }}}
@@ -713,8 +850,10 @@ class SFieldGroup
     function too_large()
     {
         $b = true;
-        for ($i=0; $b && $i<count($this->fields); $i++) {
-            $b &= $this->fields[$i]->too_large();
+        for ($i=0 ; $b && $i<count($this->fields) ; $i++) {
+            if (!is_null($this->fields[$i])) {
+                $b = $b && $this->fields[$i]->too_large();
+            }
         }
         return $b;
     }
@@ -753,7 +892,7 @@ class SFieldGroup
     {
         return $f->get_url();
     }
-    
+
     // }}}
     // {{{ function get_select_statement()