modules/search/classes.inc.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2008 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   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.                                    *
  10  *                                                                         *
  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.                           *
  15  *                                                                         *
  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            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 // {{{ Global variables used for the search Queries
  23
  24 @$globals->search->result_fields = '
  25     u.user_id, u.promo, u.matricule, u.matricule_ax,
  26     if(u.nom_usage=\'\', u.nom, u.nom_usage) AS NomSortKey,
  27     u.nom_usage,u.date,
  28     u.deces!=0 AS dcd,u.deces,
  29     u.perms IN (\'admin\',\'user\', \'disabled\') AS inscrit,
  30     u.perms != \'pending\' AS wasinscrit,
  31     FIND_IN_SET(\'femme\', u.flags) AS sexe,
  32     a.alias AS forlife,
  33     ad0.text AS app0text, ad0.url AS app0url, ai0.type AS app0type,
  34     ad1.text AS app1text, ad1.url AS app1url, ai1.type AS app1type,
  35     es.label AS secteur, ef.fonction_fr AS fonction,
  36     IF(n.nat=\'\',n.pays,n.nat) AS nat, n.a2 AS iso3166,
  37     (COUNT(em.email) > 0 OR FIND_IN_SET("googleapps", u.mail_storage) > 0) AS actif,';
  38 // hide private information if not logged
  39 if (S::logged())
  40     $globals->search->result_fields .='
  41         q.profile_freetext AS freetext,
  42         adr.city, gp.pays AS countrytxt, gr.name AS region,
  43         e.entreprise,
  44         nw.address AS networking_address,
  45         nwe.name AS networking_name,';
  46 else
  47     $globals->search->result_fields .="
  48         IF(q.profile_freetext_pub='public', q.profile_freetext, '') AS freetext,
  49         IF(adr.pub='public', adr.city, '') AS city,
  50         IF(adr.pub='public', gp.pays, '') AS countrytxt,
  51         IF(adr.pub='public', gr.name, '') AS region,
  52         IF(e.pub='public', e.entreprise, '') AS entreprise,
  53         IF(nw.pub='public', nw.address, '') AS networking_address,
  54         IF(nw.pub='public', nwe.name, '') AS networking_name,";
  55 @$globals->search->result_where_statement = '
  56     LEFT JOIN  applis_ins              AS ai0 ON (u.user_id = ai0.uid AND ai0.ordre = 0)
  57     LEFT JOIN  applis_def              AS ad0 ON (ad0.id = ai0.aid)
  58     LEFT JOIN  applis_ins              AS ai1 ON (u.user_id = ai1.uid AND ai1.ordre = 1)
  59     LEFT JOIN  applis_def              AS ad1 ON (ad1.id = ai1.aid)
  60     LEFT JOIN  entreprises             AS e   ON (e.entrid = 0 AND e.uid = u.user_id)
  61     LEFT JOIN  emploi_secteur          AS es  ON (e.secteur = es.id)
  62     LEFT JOIN  fonctions_def           AS ef  ON (e.fonction = ef.id)
  63     LEFT JOIN  geoloc_pays             AS n   ON (u.nationalite = n.a2)
  64     LEFT JOIN  adresses                AS adr ON (u.user_id = adr.uid AND FIND_IN_SET(\'active\',adr.statut))
  65     LEFT JOIN  geoloc_pays             AS gp  ON (adr.country = gp.a2)
  66     LEFT JOIN  geoloc_region           AS gr  ON (adr.country = gr.a2 AND adr.region = gr.region)
  67     LEFT JOIN  emails                  AS em  ON (em.uid = u.user_id AND em.flags = \'active\')
  68     LEFT JOIN  profile_networking      AS nw  ON (nw.uid = u.user_id)
  69     LEFT JOIN  profile_networking_enum AS nwe ON (nwe.network_type = nw.network_type)';
  70
  71 // }}}
  72 // {{{ class ThrowError
  73
  74 /** handle errors for end-users queries
  75  * assign the error message and runs the templates
  76  *
  77  * @author Jean-Sebastien Bedo
  78  */
  79 class ThrowError
  80 {
  81     public static $throwHook = array('ThrowError', 'defaultHandler');
  82
  83     /** constuctor
  84      * @param  $explain string  the error (in natural language)
  85      */
  86     public function __construct($explain)
  87     {
  88         call_user_func(ThrowError::$throwHook, $explain);
  89     }
  90
  91     /** defaut error handler
  92      */
  93     private static function defaultHandler($explain)
  94     {
  95         global $globals;
  96         $page =& Platal::page();
  97         $page->changeTpl('search/index.tpl');
  98         $page->setTitle('Polytechnique.org - Annuaire');
  99         $page->assign('baseurl', $globals->baseurl);
 100         $page->trigError($explain);
 101         $page->run();
 102     }
 103 }
 104
 105 // }}}
 106 // {{{ class SField                                     [Base class]
 107
 108 /** classe de base représentant un champ de recherche
 109  * (correspond à un champ du formulaire mais peut être à plusieurs champs de la bdd)
 110  * interface étendue pour chaque type de champ particulier
 111  */
 112 class SField
 113 {
 114     // {{{ properties
 115
 116     /** le nom du champ dans le formulaire HTML */
 117     var $fieldFormName;
 118     /** champs de la bdd correspondant à ce champ sous forme d'un tableau */
 119     var $fieldDbName;
 120     /** champ résultat dans la requête MySQL correspondant à ce champ
 121      * (alias utilisé pour la clause ORDER BY) */
 122     var $fieldResultName;
 123     /** valeur du champ instanciée par l'utilisateur */
 124     var $value;
 125
 126     // }}}
 127     // {{{ constructor
 128
 129     /** constructeur
 130      * (récupère la requête de l'utilisateur pour ce champ) */
 131     function SField($_fieldFormName, $_fieldDbName='', $_fieldResultName='')
 132     {
 133         $this->fieldFormName   = $_fieldFormName;
 134         $this->fieldDbName     = $_fieldDbName;
 135         $this->fieldResultName = $_fieldResultName;
 136         $this->get_request();
 137     }
 138
 139     // }}}
 140     // {{{ function get_request()
 141
 142     /** récupérer la requête de l'utilisateur
 143      * on met une chaîne vide si le champ n'a pas été complété */
 144     function get_request()
 145     {
 146         $this->value = trim(Env::v($this->fieldFormName));
 147     }
 148
 149     // }}}
 150     // {{{ function get_where_statement()
 151
 152     /** récupérer la clause correspondant au champ dans la clause WHERE de la requête
 153      * on parcourt l'ensemble des champs de la bdd de $fieldDbName et on associe
 154      * à chacun d'entre eux une clause spécifique
 155      * la clause totale et la disjonction de ces clauses spécifiques */
 156     function get_where_statement()
 157     {
 158         if ($this->value=='') {
 159             return false;
 160         }
 161         $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_where_statement'), $this->fieldDbName)));
 162         return empty($res) ? '' : "($res)";
 163     }
 164
 165     // }}}
 166     // {{{ function get_order_statement()
 167
 168     /** récupérer la clause correspondant au champ dans la clause ORDER BY de la requête
 169      * utilisé par exemple pour placer d'abord le nom égal à la requête avant les approximations */
 170     function get_order_statement()
 171     {
 172         return false;
 173     }
 174
 175     // }}}
 176     // {{{ function get_select_statement()
 177
 178     function get_select_statement()
 179     {
 180         return false;
 181     }
 182
 183     // }}}
 184     // {{{ function get_url()
 185
 186     /** récupérer le bout d'URL correspondant aux paramètres permettant d'imiter une requête d'un
 187      * utilisateur assignant la valeur $this->value à ce champ */
 188     function get_url()
 189     {
 190         if (empty($this->value)) {
 191             return false;
 192         } else {
 193             return $this->fieldFormName.'='.urlencode($this->value);
 194         }
 195     }
 196
 197     // }}}
 198 }
 199
 200 // }}}
 201 // {{{ class QuickSearch                                [Google Like]
 202
 203 class QuickSearch extends SField
 204 {
 205     // {{{ properties
 206
 207     /** stores tokens */
 208     var $strings;
 209     /** stores numerical ranges */
 210     var $ranges;
 211     /** stores admin searches */
 212     var $email;
 213     var $ip;
 214     /** stores phone number */
 215     var $phone;
 216
 217     // }}}
 218     // {{{ constructor
 219
 220     function QuickSearch($_fieldFormName)
 221     {
 222         $this->fieldFormName = $_fieldFormName;
 223         $this->get_request();
 224         if (preg_match(":[\]\[{}~/§_`|%$^=+]|\*\*:u", $this->value)) {
 225             new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
 226         }
 227     }
 228
 229     // }}}
 230     // {{{ function isempty()
 231
 232     function isempty()
 233     {
 234         return empty($this->strings) && empty($this->ranges) && empty($this->email) && empty($this->ip) && empty($this->phone);
 235     }
 236
 237     // }}}
 238     // {{{ function get_request()
 239
 240     function get_request()
 241     {
 242         parent::get_request();
 243         $s = replace_accent(trim($this->value));
 244         $r = $s = str_replace('*','%',$s);
 245
 246         if (S::has_perms() && strpos($s, '@') !== false) {
 247             $this->email = $s;
 248         } else if (S::has_perms() && preg_match('/[0-9]+\.([0-9]+|%)\.([0-9]+|%)\.([0-9]+|%)/', $s)) {
 249             $this->ip = $s;
 250         }
 251         if ($this->email || $this->ip) {
 252             $this->strings = $this->ranges = array();
 253             return;
 254         }
 255
 256         $s = preg_replace('!\d+!', ' ', $s);
 257         $this->strings = preg_split("![^a-zA-Z%]+!",$s, -1, PREG_SPLIT_NO_EMPTY);
 258         if (count($this->strings) > 5) {
 259             Platal::page()->trigWarning("Tu as indiqué trop d'éléments dans ta recherche, seuls les 5 premiers seront pris en compte");
 260             $this->strings = array_slice($this->strings, 0, 5);
 261         }
 262
 263         $s = preg_replace('! *- *!', '-', $r);
 264         $s = preg_replace('!([<>]) *!', ' \1', $s);
 265         $s = preg_replace('![^0-9\-><]!', ' ', $s);
 266         $s = preg_replace('![<>\-] !', '', $s);
 267         $ranges = preg_split('! +!', $s, -1, PREG_SPLIT_NO_EMPTY);
 268         $this->ranges=Array();
 269         foreach ($ranges as $r) {
 270             if (preg_match('!^([<>]\d{4}|\d{4}(-\d{4})?)$!', $r)) $this->ranges[] = $r;
 271         }
 272
 273         $t = preg_replace('!(\d{4}-\d{4}|>\d{4}|<\d{4})!', '', $s);
 274         $t = preg_replace('![<>\- ]!', '', $t);
 275         if (strlen($t) > 4) {
 276             $this->phone = $t;
 277         }
 278     }
 279
 280     // }}}
 281     // {{{ function get_where_statement()
 282
 283     function get_where_statement()
 284     {
 285         $where = Array();
 286         foreach ($this->strings as $i => $s) {
 287             if (Env::i('with_soundex') && strlen($s) > 1) {
 288                 $t = soundex_fr($s);
 289                 $where[] = "sn$i.soundex = '$t'";
 290             } else {
 291                 $t = str_replace('*', '%', $s).'%';
 292                 $t = str_replace('%%', '%', $t);
 293                 $where[] = "sn$i.token LIKE '$t'";
 294             }
 295         }
 296
 297         $wherep = Array();
 298         foreach ($this->ranges as $r) {
 299             if (preg_match('!^\d{4}$!', $r)) {
 300                 $wherep[] = "u.promo=$r";
 301             } elseif (preg_match('!^(\d{4})-(\d{4})$!', $r, $matches)) {
 302                 $p1=min(intval($matches[1]), intval($matches[2]));
 303                 $p2=max(intval($matches[1]), intval($matches[2]));
 304                 $wherep[] = "(u.promo>=$p1 AND u.promo<=$p2)";
 305             } elseif (preg_match('!^<(\d{4})!', $r, $matches)) {
 306                 $wherep[] = "u.promo<={$matches[1]}";
 307             } elseif (preg_match('!^>(\d{4})!', $r, $matches)) {
 308                 $wherep[] = "u.promo>={$matches[1]}";
 309             }
 310         }
 311         if (!empty($wherep)) {
 312             $where[] = '('.join(' OR ',$wherep).')';
 313         }
 314         if (!empty($this->email)) {
 315             $where[] = 'ems.email = ' . XDB::escape($this->email);
 316         }
 317         if (!empty($this->ip)) {
 318             $ip = ip_to_uint($this->ip);
 319             $where[] = "( ls.ip = $ip OR ls.forward_ip = $ip ) AND ls.suid = 0";
 320         }
 321         if (!empty($this->phone)){
 322             require_once("profil.func.inc.php");
 323             $phone = format_phone_number($this->phone) . "%";
 324             $where[] = 't.search_tel LIKE ' . XDB::escape($phone);
 325         }
 326
 327         return join(" AND ", $where);
 328     }
 329
 330     // }}}
 331     // {{{ get_select_statement
 332     function get_select_statement()
 333     {
 334         $join = "";
 335         $and  = '';
 336         $uniq = '';
 337         foreach ($this->strings as $i => $s) {
 338             if (!S::logged()) {
 339                 $and = "AND FIND_IN_SET('public', sn$i.flags)";
 340             }
 341             $myu  = str_replace('snv', "sn$i", $uniq);
 342             $join .= "INNER JOIN search_name AS sn$i ON (u.user_id = sn$i.uid $and$myu)\n";
 343             $uniq .= " AND sn$i.token != snv.token";
 344         }
 345         if (!empty($this->email)) {
 346             $join .= "LEFT JOIN emails AS ems ON (ems.uid = u.user_id)";
 347         }
 348         if (!empty($this->ip)) {
 349             $join .= "INNER JOIN logger.sessions AS ls ON (ls.uid = u.user_id)\n";
 350         }
 351         if (!empty($this->phone)) {
 352             if (!S::logged()) {
 353                 $join .= "INNER JOIN profile_phones AS t ON (t.uid = u.user_id AND t.pub = 'public')";
 354             } else {
 355                 $join .= "INNER JOIN profile_phones AS t ON (t.uid = u.user_id)";
 356             }
 357         }
 358         return $join;
 359     }
 360     // }}}
 361     // {{{ function get_order_statement()
 362
 363     function get_order_statement()
 364     {
 365         return false;
 366     }
 367
 368     // }}}
 369     // {{{ function get_score_statement
 370
 371     function get_score_statement()
 372     {
 373         $sum = array('0');
 374         foreach ($this->strings as $i => $s) {
 375             $sum[] .= "SUM(sn$i.score + IF('$s'=sn$i.token,5,0))";
 376         }
 377         return join('+', $sum).' AS score';
 378     }
 379
 380     // }}}
 381 }
 382
 383 // }}}
 384 // {{{ class NumericSField                              [Integer fields]
 385
 386 /** classe de champ numérique entier (offset par exemple)
 387  */
 388 class NumericSField extends SField
 389 {
 390     // {{{ constructor
 391
 392     /** constructeur
 393      * (récupère la requête de l'utilisateur pour ce champ) */
 394     function NumericSField($_fieldFormName)
 395     {
 396         $this->fieldFormName = $_fieldFormName;
 397         $this->get_request();
 398     }
 399
 400     // }}}
 401     // {{{ function get_request()
 402
 403     /** récupère la requête de l'utilisateur et échoue s'il ne s'agit pas d'un entier */
 404     function get_request()
 405     {
 406         parent::get_request();
 407         if (empty($this->value)) {
 408             $this->value = 0;
 409         }
 410         if (!preg_match("/^[0-9]+$/", $this->value)) {
 411             new ThrowError('Un champ numérique contient des caractères alphanumériques.');
 412         }
 413     }
 414
 415     // }}}
 416 }
 417
 418 // }}}
 419 // {{{ class RefSField                                  [ ??? ]
 420
 421 class RefSField extends SField
 422 {
 423     // {{{ properties
 424
 425     var $refTable;
 426     var $refAlias;
 427     var $refCondition;
 428     var $exact = true;
 429
 430     // }}}
 431     // {{{ constructor
 432
 433     function RefSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition, $_exact=true)
 434     {
 435         $this->fieldFormName = $_fieldFormName;
 436         $this->fieldDbName   = $_fieldDbName;
 437         $this->refTable      = $_refTable;
 438         $this->refAlias      = $_refAlias;
 439         $this->refCondition  = $_refCondition;
 440         $this->exact         = $_exact;
 441         $this->get_request();
 442     }
 443
 444     // }}}
 445     // {{{ function get_request()
 446
 447     function get_request() {
 448         parent::get_request();
 449         if ($this->value=='00' || $this->value=='0') {
 450             $this->value='';
 451         }
 452     }
 453
 454     // }}}
 455     // {{{ function too_large()
 456
 457     function too_large()
 458     {
 459         return ($this->value=='');
 460     }
 461
 462     // }}}
 463     // {{{ function compare()
 464
 465     function compare()
 466     {
 467         $val = addslashes($this->value);
 468         return $this->exact ? "='$val'" : " LIKE '%$val%'";
 469     }
 470
 471     // }}}
 472     // {{{ function get_single_match_statement()
 473
 474     function get_single_match_statement($field)
 475     {
 476         return $field.$this->compare();
 477     }
 478
 479     // }}}
 480     // {{{ function get_single_where_statement()
 481
 482     function get_single_where_statement($field)
 483     {
 484         return $this->refTable=='' ? $this->get_single_match_statement($field) : false;
 485     }
 486
 487     // }}}
 488     // {{{ function get_select_statement()
 489
 490     function get_select_statement()
 491     {
 492         if ($this->value=='' || $this->refTable=='') {
 493             return false;
 494         }
 495         $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_match_statement'), $this->fieldDbName)));
 496         if (is_array($this->refTable)) {
 497            foreach ($this->refTable as $i => $refT)
 498                $last = $i;
 499            $inner = "";
 500             foreach ($this->refTable as $i => $refT)
 501                 $inner .= " INNER JOIN {$refT} AS {$this->refAlias[$i]} ON ({$this->refCondition[$i]} ".(($i == $last)?"AND ($res) ":"").")\n";
 502             return $inner;
 503         } else {
 504             return "INNER JOIN {$this->refTable} AS {$this->refAlias} ON ({$this->refCondition} AND ($res) )";
 505         }
 506     }
 507
 508     // }}}
 509 }
 510
 511 // }}}
 512
 513 // {{{ class RefSFieldMultipleTable
 514 class PhoneSField extends RefSField
 515 {
 516     function PhoneSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition)
 517     {
 518         $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true);
 519     }
 520
 521     function get_request()
 522     {
 523         require_once("profil.func.inc.php");
 524         $this->value = trim(Env::v($this->fieldFormName));
 525         $this->value = format_phone_number($this->value);
 526     }
 527
 528     function compare()
 529     {
 530         return " LIKE '" . addslashes($this->value) . "%'";
 531     }
 532 }
 533
 534 class IndexSField extends RefSField
 535 {
 536     function IndexSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition)
 537     {
 538         $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true);
 539     }
 540
 541     function get_request()
 542     {
 543         $this->value = trim(Env::v($this->fieldFormName));
 544     }
 545 }
 546
 547 class MapSField extends RefSField
 548 {
 549     var $mapId;
 550
 551     function MapSField($_fieldFormName, $_fieldDbName='', $_refTable, $_refAlias, $_refCondition, $_mapId=false)
 552     {
 553         if ($_mapId === false)
 554             $this->mapId = Env::v($_fieldFormName, '');
 555         else
 556             $this->mapId = $_mapId;
 557         $this->value =  $this->mapId;
 558         $this->RefSField($_fieldFormName, $_fieldDbName, $_refTable, $_refAlias, $_refCondition, true, false);
 559     }
 560
 561     function get_select_statement()
 562     {
 563         if ($this->mapId === '') return false;
 564         $res = implode(' OR ', array_filter(array_map(array($this, 'get_single_match_statement'), $this->fieldDbName)));
 565         foreach ($this->refTable as $i => $refT)
 566             $last = $i;
 567         $inner = "";
 568         foreach ($this->refTable as $i => $refT)
 569             $inner .= " INNER JOIN {$refT} AS {$this->refAlias[$i]} ON ({$this->refCondition[$i]} ".(($i == $last)?"AND ($res) ":"").")";
 570         return $inner;
 571     }
 572     function get_request()
 573     {
 574         $this->value = $this->mapId;
 575     }
 576 }
 577
 578 // {{{ class RefWithSoundexSField                       [ ??? ]
 579
 580 class RefWithSoundexSField extends RefSField
 581 {
 582     // {{{ function compare()
 583
 584     function compare()
 585     {
 586         return "='".soundex_fr($this->value)."'";
 587     }
 588
 589     // }}}
 590 }
 591
 592 // }}}
 593 // {{{ class StringSField                               [String fields]
 594
 595 /** classe de champ texte (nom par exemple)
 596  */
 597 class StringSField extends SField
 598 {
 599     // {{{ function get_request()
 600
 601     /** récupère la requête de l'utilisateur et échoue si la chaîne contient des caractères
 602      * interdits */
 603     function get_request()
 604     {
 605         parent::get_request();
 606         if (preg_match(":[\]\[<>{}~/§_`|%$^=+]|\*\*:u", $this->value)) {
 607             new ThrowError('Un champ contient un caractère interdit rendant la recherche impossible.');
 608         }
 609     }
 610
 611     // }}}
 612     // {{{ function length()
 613
 614     /** donne la longueur de la requête de l'utilisateur
 615      * (au sens strict i.e. pas d'* ni d'espace ou de trait d'union -> les contraintes réellement
 616      * imposées par l'utilisateur) */
 617     function length()
 618     {
 619         $cleaned = replace_accent(strtolower($this->value));
 620         $length  = strlen(ereg_replace('[a-z0-9]', '', $cleaned));
 621         return strlen($this->value) - $length;
 622     }
 623
 624     // }}}
 625     // {{{ function too_large()
 626
 627     function too_large()
 628     {
 629         return ($this->length()<2);
 630     }
 631
 632     // }}}
 633     // {{{ function get_single_where_statement()
 634
 635     /** clause WHERE correspondant à un champ de la bdd et à ce champ de formulaire
 636      * @param field nom de champ de la bdd concerné par la clause */
 637     function get_single_where_statement($field)
 638     {
 639         $regexp = strtr(addslashes($this->value), '-*', '_%');
 640         return "$field LIKE '$regexp%'";
 641     }
 642
 643     // }}}
 644     // {{{ function get_order_statement()
 645
 646     /** clause ORDER BY correspondant à ce champ de formulaire */
 647     function get_order_statement()
 648     {
 649         if ($this->value!='' && $this->fieldResultName!='') {
 650             return "{$this->fieldResultName}!='".addslashes($this->value)."'";
 651         } else {
 652             return false;
 653         }
 654     }
 655
 656     // }}}
 657 }
 658
 659 // }}}
 660 // {{{ class NameSField                                 [Names : serach 'n%' + '% b']
 661
 662 /** classe pour les noms : on cherche en plus du like 'foo%' le like '% foo' (particules)
 663 +*/
 664 class NameSField extends StringSField
 665 {
 666     // {{{ function get_single_where_statement()
 667
 668     function get_single_where_statement($field)
 669     {
 670         $regexp = strtr(addslashes($this->value), '-*', '_%');
 671         return "$field LIKE '$regexp%' OR $field LIKE '% $regexp%' OR $field LIKE '%-$regexp%'";
 672     }
 673
 674     // }}}
 675     // {{{ function get_order_statement()
 676
 677     function get_order_statement()
 678     {
 679         if ($this->value!='' && $this->fieldResultName!='') {
 680             return "{$this->fieldResultName} NOT LIKE '".addslashes($this->value)."'";
 681         } else {
 682             return false;
 683         }
 684     }
 685
 686     // }}}
 687 }
 688
 689 // }}}
 690 // {{{ class StringWithSoundexSField                    [Strings + soundex]
 691
 692 /** classe de champ texte avec soundex (nom par exemple)
 693  */
 694 class StringWithSoundexSField extends StringSField
 695 {
 696     // {{{ function get_single_where_statement()
 697
 698     /** clause WHERE correspondant à un champ de la bdd et à ce champ de formulaire
 699      * @param field nom de champ de la bdd concerné par la clause */
 700     function get_single_where_statement($field) {
 701         return $field.'="'.soundex_fr($this->value).'"';
 702     }
 703
 704     // }}}
 705 }
 706
 707 // }}}
 708 // {{{ class PromoSField                                [Prom field]
 709
 710 /** classe de champ de promotion */
 711 class PromoSField extends SField
 712 {
 713     // {{{ properties
 714
 715     /** opérateur de comparaison (<,>,=) de la promo utilisé pour ce champ de formulaire */
 716     var $compareField;
 717
 718     // }}}
 719     // {{{ constructor
 720
 721     /** constructeur
 722      * compareField est un champ de formulaire très simple qui ne sert qu'à la construction de la
 723      * clause WHERE de la promo */
 724     function PromoSField($_fieldFormName, $_compareFieldFormName, $_fieldDbName, $_fieldResultName)
 725     {
 726         parent::SField($_fieldFormName, $_fieldDbName, $_fieldResultName);
 727         $this->compareField = new SField($_compareFieldFormName);
 728     }
 729
 730     // }}}
 731     // {{{ function get_request()
 732
 733     /** récupère la requête utilisateur et échoue si le champ du formulaire ne représente pas une
 734      * promotion (nombre à 4 chiffres) */
 735     function get_request()
 736     {
 737         parent::get_request();
 738         if (preg_match('/^[0-9]{2}$/', $this->value)){
 739             $this->value = intval($this->value) + 1900;
 740         }
 741         if (!(empty($this->value) or preg_match('/^[0-9]{4}$/', $this->value))) {
 742             new ThrowError('La promotion est une année à quatre chiffres.');
 743         }
 744     }
 745
 746     // }}}
 747     // {{{ function is_a_single_promo()
 748
 749     /** teste si la requête est de la forme =promotion -> contrainte forte imposée -> elle suffit
 750      * pour autoriser un affichage des résultats alors que <promotion est insuffisant */
 751     function is_a_single_promo()
 752     {
 753         return ($this->compareField->value=='=' && $this->value!='');
 754     }
 755
 756     // }}}
 757     // {{{ function too_large()
 758
 759     function too_large()
 760     {
 761         return !$this->is_a_single_promo();
 762     }
 763
 764     // }}}
 765     // {{{ function get_single_where_statement()
 766
 767     /** clause WHERE correspondant à ce champ */
 768     function get_single_where_statement($field)
 769     {
 770         return $field.$this->compareField->value.$this->value;
 771     }
 772
 773     // }}}
 774     // {{{ function get_url()
 775
 776     /** récupérer le bout d'URL correspondant aux paramètres permettant d'imiter une requête
 777      * d'un utilisateur assignant la valeur $this->value à ce champ et assignant l'opérateur de
 778      * comparaison adéquat */
 779     function get_url()
 780     {
 781         if (!($u=parent::get_url())) {
 782             return false;
 783         }
 784         return $u.'&amp;'.$this->compareField->get_url();
 785     }
 786
 787     // }}}
 788 }
 789
 790 // }}}
 791 // {{{ class SFieldGroup                                [Group fields]
 792
 793 /** classe groupant des champs de formulaire de recherche */
 794 class SFieldGroup
 795 {
 796     // {{{ properties
 797
 798     /** tableau des classes correspondant aux champs groupés */
 799     var $fields;
 800     /** type de groupe : ET ou OU */
 801     var $and;
 802
 803     // }}}
 804     // {{{ constuctor
 805
 806     /** constructeur */
 807     function SFieldGroup($_and, $_fields)
 808     {
 809         $this->fields = $_fields;
 810         $this->and    = $_and;
 811         foreach ($this->fields as $key=>&$field) {
 812             if (is_null($field)) {
 813                 unset($this->fields[$key]);
 814             }
 815         }
 816     }
 817
 818     // }}}
 819     // {{{ function too_large()
 820
 821     function too_large()
 822     {
 823         $b = true;
 824         for ($i=0 ; $b && $i<count($this->fields) ; $i++) {
 825             if (!is_null($this->fields[$i])) {
 826                 $b = $b && $this->fields[$i]->too_large();
 827             }
 828         }
 829         return $b;
 830     }
 831
 832     // }}}
 833     // {{{ function field_get_select()
 834
 835     function field_get_select($f)
 836     {
 837         return $f->get_select_statement();
 838     }
 839
 840     // }}}
 841     // {{{ function field_get_where()
 842
 843     /** récupérer la clause WHERE d'un objet champ de recherche */
 844     function field_get_where($f)
 845     {
 846         return $f->get_where_statement();
 847     }
 848
 849     // }}}
 850     // {{{ function field_get_order()
 851
 852     /** récupérer la clause ORDER BY d'un objet champ de recherche */
 853     function field_get_order($f)
 854     {
 855         return $f->get_order_statement();
 856     }
 857
 858     // }}}
 859     // {{{ function field_get_url()
 860
 861     /** récupérer le bout d'URL correspondant à un objet champ de recherche */
 862     function field_get_url($f)
 863     {
 864         return $f->get_url();
 865     }
 866
 867     // }}}
 868     // {{{ function get_select_statement()
 869
 870     function get_select_statement()
 871     {
 872         return implode(' ', array_filter(array_map(array($this, 'field_get_select'), $this->fields)));
 873     }
 874
 875     // }}}
 876     // {{{ function get_where_statement()
 877
 878     /** récupérer la clause WHERE du groupe de champs = conjonction (ET) ou disjonction (OU) de
 879      * clauses des champs élémentaires */
 880     function get_where_statement()
 881     {
 882         $joinText = $this->and ? ' AND ' : ' OR ';
 883         $res = implode($joinText, array_filter(array_map(array($this, 'field_get_where'), $this->fields)));
 884         return $res == '' ? '' : "($res)";
 885     }
 886
 887     // }}}
 888     // {{{ function get_order_statement()
 889
 890     /** récupérer la clause ORDER BY du groupe de champs = conjonction (ET) ou disjonction (OU) de
 891      * clauses des champs élémentaires */
 892     function get_order_statement()
 893     {
 894         $order = array_filter(array_map(array($this, 'field_get_order'), $this->fields));
 895         return count($order)>0 ? implode(',', $order) : false;
 896     }
 897
 898     // }}}
 899     // {{{ function get_url()
 900
 901     /** récupérer le bout d'URL correspondant à ce groupe de champs = concaténation des bouts d'URL
 902      * des champs élémentaires */
 903     function get_url($others=Array())
 904     {
 905         $url = array_filter(array_map(array($this, 'field_get_url'), $this->fields));
 906         foreach ($url as $key=>$val) {
 907             if (empty($val)) {
 908                 unset($url[$key]);
 909             }
 910         }
 911         foreach ($others as $key=>$val) {
 912             if (!empty($val)) {
 913                 $url[] = "$key=$val";
 914             }
 915         }
 916         return count($url)>0 ? implode('&amp;', $url) : false;
 917     }
 918
 919     // }}}
 920 }
 921
 922 // }}}
 923
 924 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 925 ?>