modules/search.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2007 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 class SearchModule extends PLModule
  23 {
  24     function handlers()
  25     {
  26         return array(
  27             'search'     => $this->make_hook('quick', AUTH_PUBLIC),
  28             'search/adv' => $this->make_hook('advanced', AUTH_COOKIE),
  29             'advanced_search.php' => $this->make_hook('redir_advanced', AUTH_PUBLIC),
  30             'search/autocomplete' => $this->make_hook('autocomplete', AUTH_COOKIE, 'user', NO_AUTH),
  31             'search/list' => $this->make_hook('list', AUTH_COOKIE, 'user', NO_AUTH),
  32         );
  33     }
  34
  35     function handler_redir_advanced(&$page, $mode = null)
  36     {
  37         pl_redirect('search/adv');
  38         exit;
  39     }
  40
  41     function on_subscribe($forlife, $uid, $promo, $pass)
  42     {
  43         require_once 'user.func.inc.php';
  44         user_reindex($uid);
  45     }
  46
  47
  48     function form_prepare()
  49     {
  50         global $page;
  51
  52         $page->assign('formulaire',1);
  53     }
  54
  55     function get_diplomas($school = null)
  56     {
  57         if (is_null($school) && Env::has('school')) {
  58             $school = Env::i('school');
  59         }
  60
  61         if (!is_null($school)) {
  62             $sql = 'SELECT type FROM applis_def WHERE id=' . $school;
  63         } else {
  64             $sql = 'DESCRIBE applis_def type';
  65         }
  66
  67         $res = XDB::query($sql);
  68         $row = $res->fetchOneRow();
  69         if (!is_null($school)) {
  70             $types = $row[0];
  71         } else {
  72             $types = explode('(',$row[1]);
  73             $types = str_replace("'","",substr($types[1],0,-1));
  74         }
  75         global $page;
  76         $page->assign('choix_diplomas', explode(',',$types));
  77     }
  78
  79     function handler_quick(&$page, $action = null, $subaction = null)
  80     {
  81         global $globals;
  82
  83         $res = XDB::query("SELECT  MIN(`diminutif`), MAX(`diminutif`)
  84                              FROM  `groupex`.`asso`
  85                             WHERE  `cat` = 'Promotions'");
  86         list($min, $max) = $res->fetchOneRow();
  87         $page->assign('promo_min', $min);
  88         $page->assign('promo_max', $max);
  89
  90         if (Env::has('quick') || $action == 'geoloc') {
  91             $quick = trim(Env::v('quick'));
  92             $list = 'profile|prf|fiche|fic|referent|ref|mentor';
  93             if (S::has_perms()) {
  94                 $list .= '|admin|adm|ax';
  95             }
  96             if (preg_match('/^(' . $list . '):([-a-z]+(\.[-a-z]+(\.\d{2,4})?)?)$/', $quick, $matches)) {
  97                 $forlife = $matches[2];
  98                 switch($matches[1]) {
  99                   case 'admin': case 'adm':
 100                     $base = 'admin/user/';
 101                     break;
 102                   case 'ax':
 103                     $base = 'profile/ax/';
 104                     break;
 105                   case 'profile': case 'prf': case 'fiche': case 'fic':
 106                     $base = 'profile/';
 107                     break;
 108                   case 'referent': case 'ref': case 'mentor':
 109                     $base = 'referent/';
 110                     break;
 111                 }
 112                 pl_redirect($base . $forlife);
 113             } elseif (strpos($quick, 'doc:') === 0) {
 114                 $url = 'Docs/Recherche?';
 115                 $url .= 'action=search&q=' . urlencode(substr($quick, 4));
 116                 $url .= '&group=' . urlencode('-Equipe,-Main,-PmWiki,-Site');
 117                 pl_redirect($url);
 118             }
 119
 120             $page->assign('formulaire', 0);
 121
 122             require_once 'userset.inc.php';
 123             $view = new SearchSet(true, $action == 'geoloc' && substr($subaction, -3) == 'swf');
 124             $view->addMod('minifiche', 'Minifiches', true, array('with_score' => true));
 125             if (S::logged() && !Env::i('nonins')) {
 126                 $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true, 'with_score' => true));
 127                 $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
 128             }
 129             $view->apply('search', $page, $action, $subaction);
 130
 131             $nb_tot = $view->count();
 132             $page->assign('search_results_nb', $nb_tot);
 133             if ($subaction) {
 134                 return;
 135             }
 136             if (!S::logged() && $nb_tot > $globals->search->public_max) {
 137                 new ThrowError('Votre recherche a généré trop de résultats pour un affichage public.');
 138             } elseif ($nb_tot > $globals->search->private_max) {
 139                 new ThrowError('Recherche trop générale');
 140             } elseif (empty($nb_tot)) {
 141                 new ThrowError('il n\'existe personne correspondant à ces critères dans la base !');
 142             }
 143         } else {
 144             $page->assign('formulaire',1);
 145             $page->addJsLink('ajax.js');
 146         }
 147
 148         require_once dirname(__FILE__) . '/search/search.inc.php';
 149         $page->changeTpl('search/index.tpl');
 150         $page->assign('xorg_title','Polytechnique.org - Annuaire');
 151     }
 152
 153     function handler_advanced(&$page, $action = null, $subaction = null)
 154     {
 155         global $globals;
 156         require_once 'geoloc.inc.php';
 157         require_once dirname(__FILE__) . '/search/search.inc.php';
 158         $page->assign('advanced',1);
 159
 160         if (!Env::has('rechercher') && $action != 'geoloc') {
 161             $this->form_prepare();
 162         } else {
 163             require_once 'userset.inc.php';
 164             $view = new SearchSet(false, $action == 'geoloc' && substr($subaction, -3) == 'swf');
 165             $view->addMod('minifiche', 'Minifiches', true);
 166             $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true));
 167             $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
 168             $view->apply('search/adv', $page, $action, $subaction);
 169
 170             if ($subaction) {
 171                 return;
 172             }
 173             $nb_tot = $view->count();
 174             if ($nb_tot > $globals->search->private_max) {
 175                 $this->form_prepare();
 176                 new ThrowError('Recherche trop générale');
 177             }
 178         }
 179
 180         $page->changeTpl('search/index.tpl', $action == 'mini' ? SIMPLE : SKINNED);
 181         $page->addJsLink('ajax.js');
 182         $page->assign('public_directory',0);
 183     }
 184
 185     function handler_autocomplete(&$page, $type = null)
 186     {
 187         // Autocompletion : according to type required, return
 188         // a list of results matching with the number of matches.
 189         // The output format is :
 190         //   result1|nb1
 191         //   result2|nb2
 192         //   ...
 193         header('Content-Type: text/plain; charset="UTF-8"');
 194         $q = preg_replace(array('/\*+$/', // always look for $q*
 195                                 '/([\^\$\[\]])/', // escape special regexp char
 196                                 '/\*/'), // replace joker by regexp joker
 197                            array('',
 198                                  '\\\\\1',
 199                                  '.*'),
 200                            $_REQUEST['q']);
 201         if (!$q) exit();
 202
 203         // try to look in cached results
 204         $cache = XDB::query('SELECT  `result`
 205                                FROM  `search_autocomplete`
 206                               WHERE  `name` = {?} AND
 207                                      `query` = {?} AND
 208                                      `generated` > NOW() - INTERVAL 1 DAY',
 209                              $type, $q);
 210         if ($res = $cache->fetchOneCell()) {
 211             echo $res;
 212             die();
 213         }
 214
 215         // default search
 216         $q = preg_quote($q);
 217         $unique = '`user_id`';
 218         $db = '`auth_user_md5`';
 219         $realid = false;
 220         $beginwith = true;
 221         $field2 = false;
 222         $qsearch = $q;
 223
 224         switch ($type) {
 225           case 'binetTxt':
 226             $db = '`binets_def` INNER JOIN
 227                    `binets_ins` ON(`binets_def`.`id` = `binets_ins`.`binet_id`)';
 228             $field='`binets_def`.`text`';
 229             if (strlen($q) > 2)
 230                 $beginwith = false;
 231             $realid = '`binets_def`.`id`';
 232             break;
 233           case 'city':
 234             $db = '`geoloc_city` INNER JOIN
 235                    `adresses` ON(`geoloc_city`.`id` = `adresses`.`cityid`)';
 236             $unique='`uid`';
 237             $field='`geoloc_city`.`name`';
 238             break;
 239           case 'countryTxt':
 240             $db = '`geoloc_pays` INNER JOIN
 241                    `adresses` ON(`geoloc_pays`.`a2` = `adresses`.`country`)';
 242             $unique='`uid`';
 243             $field = '`geoloc_pays`.`pays`';
 244             $field2 = '`geoloc_pays`.`country`';
 245             $realid='`geoloc_pays`.`a2`';
 246             break;
 247           case 'entreprise':
 248             $db = '`entreprises`';
 249             $field = '`entreprise`';
 250             $unique='`uid`';
 251             break;
 252           case 'firstname':
 253             $field = '`prenom`';
 254             $q = '(^|[ \\-])'.$q;
 255             $beginwith = false;
 256             break;
 257           case 'fonctionTxt':
 258             $db = '`fonctions_def` INNER JOIN
 259                    `entreprises` ON(`entreprises`.`fonction` = `fonctions_def`.`id`)';
 260             $field = '`fonction_fr`';
 261             $unique = '`uid`';
 262             $realid = '`fonctions_def`.`id`';
 263             $qsearch = '(^|[ /\\-])'.$q;
 264             $beginwith = false;
 265             break;
 266           case 'groupexTxt':
 267             $db = '`groupesx_def` INNER JOIN
 268                    `groupesx_ins` ON(`groupesx_def`.`id` = `groupesx_ins`.`gid`)';
 269             $field='`groupesx_def`.`text`';
 270             if (strlen($q) > 2)
 271                 $beginwith = false;
 272             $realid = '`groupesx_def`.`id`';
 273             $unique = '`guid`';
 274             break;
 275           case 'name':
 276             $field = '`nom`';
 277             $field2 = '`nom_usage`';
 278             $qsearch = '(^|[ \\-])'.$q;
 279             $beginwith = false;
 280             break;
 281           case 'nationaliteTxt':
 282             $db = '`geoloc_pays` INNER JOIN
 283                    `auth_user_md5` ON(`geoloc_pays`.`a2` = `auth_user_md5`.`nationalite`)';
 284             $field = 'IF(`geoloc_pays`.`nat`=\'\',
 285                                        `geoloc_pays`.`pays`,
 286                                        `geoloc_pays`.`nat`)';
 287             $realid = '`geoloc_pays`.`a2`';
 288             break;
 289           case 'nickname':
 290             $field = '`profile_nick`';
 291             $db = '`auth_user_quick`';
 292             $qsearch = '(^|[ \\-])'.$q;
 293             $beginwith = false;
 294             break;
 295           case 'poste':
 296             $db = '`entreprises`';
 297             $field = '`poste`';
 298             $unique='`uid`';
 299             break;
 300           case 'schoolTxt':
 301             $db = '`applis_def` INNER JOIN
 302                    `applis_ins` ON(`applis_def`.`id` = `applis_ins`.`aid`)';
 303             $field='`applis_def`.`text`';
 304             $unique = '`uid`';
 305             $realid = '`applis_def`.`id`';
 306             if (strlen($q) > 2)
 307                 $beginwith = false;
 308             break;
 309           case 'secteurTxt':
 310             $db = '`emploi_secteur` INNER JOIN
 311                    `entreprises` ON(`entreprises`.`secteur` = `emploi_secteur`.`id`)';
 312             $field = '`emploi_secteur`.`label`';
 313             $realid = '`emploi_secteur`.`id`';
 314             $unique = '`uid`';
 315             $beginwith = false;
 316             break;
 317           case 'sectionTxt':
 318             $db = '`sections` INNER JOIN
 319                    `auth_user_md5` ON(`auth_user_md5`.`section` = `sections`.`id`)';
 320             $field = '`sections`.`text`';
 321             $realid = '`sections`.`id`';
 322             $beginwith = false;
 323             break;
 324           default: exit();
 325         }
 326
 327         $field_select = $field;
 328         if ($field2) {
 329             $field_select = 'IF('.$field.' REGEXP {?}, '.$field.', '.$field2.')';
 330         }
 331
 332         if ($beginwith) {
 333             $qsearch = '^'.$qsearch;
 334         }
 335         $list = XDB::iterator('SELECT  '.$field_select.' AS field,
 336                                        COUNT(DISTINCT '.$unique.') AS nb
 337                                        '.($realid?(', '.$realid.' AS id'):'').'
 338                                  FROM  '.$db.'
 339                                 WHERE  '.$field.' REGEXP {?}'.
 340                                         ($field2?(' OR '.$field2.' REGEXP {?}'):'').'
 341                              GROUP BY  '.$field_select.'
 342                              ORDER BY  nb DESC
 343                                 LIMIT  11',
 344                                $qsearch, $qsearch, $qsearch, $qsearch);
 345         $nbResults = 0;
 346         $res = "";
 347         while ($result = $list->next()) {
 348             $nbResults++;
 349             if ($nbResults == 11) {
 350                 $res .= '...|1'."\n";
 351             } else {
 352                 $res .= $result['field'].'|';
 353                 $res .= $result['nb'];
 354                 if (isset($result['id'])) {
 355                     $res  .= '|'.$result['id'];
 356                 }
 357                 $res .= "\n";
 358             }
 359         }
 360         XDB::query('REPLACE INTO  `search_autocomplete`
 361                           VALUES  ({?}, {?}, {?}, NOW())',
 362                     $type, $q, $res);
 363         echo $res;
 364         exit();
 365     }
 366
 367     function handler_list(&$page, $type = null, $idVal = null)
 368     {
 369         // Give the list of all values possible of type and builds a select input for it
 370         $field = '`text`';
 371         $id = '`id`';
 372         $where = '';
 373
 374         switch ($type) {
 375           case 'binet':
 376             $db = '`binets_def`';
 377             break;
 378           case 'country':
 379             $db = '`geoloc_pays`';
 380             $field = '`pays`';
 381             $id = '`a2`';
 382             $page->assign('onchange', 'changeCountry(this.value)');
 383             break;
 384           case 'fonction':
 385             $db = '`fonctions_def`';
 386             $field = '`fonction_fr`';
 387             break;
 388           case 'diploma':
 389             header('Content-Type: text/xml; charset="UTF-8"');
 390             $this->get_diplomas();
 391             $page->changeTpl('search/adv.grade.form.tpl', NO_SKIN);
 392             return;
 393           case 'groupex':
 394             $db = '`groupesx_def`';
 395             break;
 396           case 'nationalite':
 397             $db = '`geoloc_pays` INNER JOIN
 398                    `auth_user_md5` ON (`geoloc_pays`.`a2` = `auth_user_md5`.`nationalite`)';
 399             $field = 'IF(`nat`=\'\', `pays`, `nat`)';
 400             $id = '`a2`';
 401             break;
 402           case 'region':
 403             $db = '`geoloc_region`';
 404             $field = '`name`';
 405             $id = '`region`';
 406             if (isset($_REQUEST['country'])) {
 407                 $where .= ' WHERE `a2` = "'.$_REQUEST['country'].'"';
 408             }
 409             break;
 410           case 'school':
 411             $db = '`applis_def`';
 412             $page->assign('onchange', 'changeSchool(this.value)');
 413             break;
 414           case 'section':
 415             $db = '`sections`';
 416             break;
 417           case 'secteur':
 418             $db = '`emploi_secteur`';
 419             $field = '`label`';
 420             break;
 421           default: exit();
 422         }
 423         if (isset($idVal)) {
 424             header('Content-Type: text/plain; charset="UTF-8"');
 425             $result = XDB::query('SELECT '.$field.' AS field FROM '.$db.' WHERE '.$id.' = {?} LIMIT 1',$idVal);
 426             echo $result->fetchOneCell();
 427             exit();
 428         }
 429         header('Content-Type: text/xml; charset="UTF-8"');
 430         $page->changeTpl('include/field.select.tpl', NO_SKIN);
 431         $page->assign('name', $type);
 432         $page->assign('list', XDB::iterator('SELECT  '.$field.' AS field,
 433                                                      '.$id.' AS id
 434                                                FROM  '.$db.$where.'
 435                                            GROUP BY  '.$field.'
 436                                            ORDER BY  '.$field));
 437     }
 438 }
 439
 440 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 441 ?>