| 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'); |
| 128 | } |
| 129 | $view->apply('search', $page, $action, $subaction); |
| 130 | |
| 131 | $nb_tot = $view->count(); |
| 132 | if ($subaction) { |
| 133 | return; |
| 134 | } |
| 135 | if (!S::logged() && $nb_tot > $globals->search->public_max) { |
| 136 | new ThrowError('Votre recherche a généré trop de résultats pour un affichage public.'); |
| 137 | } elseif ($nb_tot > $globals->search->private_max) { |
| 138 | new ThrowError('Recherche trop générale'); |
| 139 | } elseif (empty($nb_tot)) { |
| 140 | new ThrowError('il n\'existe personne correspondant à ces critères dans la base !'); |
| 141 | } |
| 142 | } else { |
| 143 | $page->assign('formulaire',1); |
| 144 | $page->addJsLink('ajax.js'); |
| 145 | } |
| 146 | |
| 147 | require_once dirname(__FILE__) . '/search/search.inc.php'; |
| 148 | $page->changeTpl('search/index.tpl'); |
| 149 | $page->assign('xorg_title','Polytechnique.org - Annuaire'); |
| 150 | } |
| 151 | |
| 152 | function handler_advanced(&$page, $action = null, $subaction = null) |
| 153 | { |
| 154 | global $globals; |
| 155 | require_once 'geoloc.inc.php'; |
| 156 | require_once dirname(__FILE__) . '/search/search.inc.php'; |
| 157 | $page->assign('advanced',1); |
| 158 | |
| 159 | if (!Env::has('rechercher') && $action != 'geoloc') { |
| 160 | $this->form_prepare(); |
| 161 | } else { |
| 162 | require_once 'userset.inc.php'; |
| 163 | $view = new SearchSet(false, $action == 'geoloc' && substr($subaction, -3) == 'swf'); |
| 164 | $view->addMod('minifiche', 'Minifiches', true); |
| 165 | $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true)); |
| 166 | $view->addMod('geoloc', 'Planisphère'); |
| 167 | $view->apply('search/adv', $page, $action, $subaction); |
| 168 | |
| 169 | if ($subaction) { |
| 170 | return; |
| 171 | } |
| 172 | $nb_tot = $view->count(); |
| 173 | if ($nb_tot > $globals->search->private_max) { |
| 174 | $this->form_prepare(); |
| 175 | new ThrowError('Recherche trop générale'); |
| 176 | } |
| 177 | } |
| 178 | |
| 179 | $page->changeTpl('search/index.tpl', $action == 'mini' ? SIMPLE : SKINNED); |
| 180 | $page->addJsLink('ajax.js'); |
| 181 | $page->assign('public_directory',0); |
| 182 | } |
| 183 | |
| 184 | function handler_autocomplete(&$page, $type = null) |
| 185 | { |
| 186 | // Autocompletion : according to type required, return |
| 187 | // a list of results matching with the number of matches. |
| 188 | // The output format is : |
| 189 | // result1|nb1 |
| 190 | // result2|nb2 |
| 191 | // ... |
| 192 | header('Content-Type: text/plain; charset="UTF-8"'); |
| 193 | $q = preg_replace(array('/\*+$/', // always look for $q* |
| 194 | '/([\^\$\[\]])/', // escape special regexp char |
| 195 | '/\*/'), // replace joker by regexp joker |
| 196 | array('', |
| 197 | '\\\\\1', |
| 198 | '.*'), |
| 199 | $_REQUEST['q']); |
| 200 | if (!$q) exit(); |
| 201 | |
| 202 | // try to look in cached results |
| 203 | $cache = XDB::query('SELECT `result` |
| 204 | FROM `search_autocomplete` |
| 205 | WHERE `name` = {?} AND |
| 206 | `query` = {?} AND |
| 207 | `generated` > NOW() - INTERVAL 1 DAY', |
| 208 | $type, $q); |
| 209 | if ($res = $cache->fetchOneCell()) { |
| 210 | echo $res; |
| 211 | die(); |
| 212 | } |
| 213 | |
| 214 | // default search |
| 215 | $q = preg_quote($q); |
| 216 | $unique = '`user_id`'; |
| 217 | $db = '`auth_user_md5`'; |
| 218 | $realid = false; |
| 219 | $beginwith = true; |
| 220 | $field2 = false; |
| 221 | $qsearch = $q; |
| 222 | |
| 223 | switch ($type) { |
| 224 | case 'binetTxt': |
| 225 | $db = '`binets_def` INNER JOIN |
| 226 | `binets_ins` ON(`binets_def`.`id` = `binets_ins`.`binet_id`)'; |
| 227 | $field='`binets_def`.`text`'; |
| 228 | if (strlen($q) > 2) |
| 229 | $beginwith = false; |
| 230 | $realid = '`binets_def`.`id`'; |
| 231 | break; |
| 232 | case 'city': |
| 233 | $db = '`geoloc_city` INNER JOIN |
| 234 | `adresses` ON(`geoloc_city`.`id` = `adresses`.`cityid`)'; |
| 235 | $unique='`uid`'; |
| 236 | $field='`geoloc_city`.`name`'; |
| 237 | break; |
| 238 | case 'countryTxt': |
| 239 | $db = '`geoloc_pays` INNER JOIN |
| 240 | `adresses` ON(`geoloc_pays`.`a2` = `adresses`.`country`)'; |
| 241 | $unique='`uid`'; |
| 242 | $field = '`geoloc_pays`.`pays`'; |
| 243 | $field2 = '`geoloc_pays`.`country`'; |
| 244 | $realid='`geoloc_pays`.`a2`'; |
| 245 | break; |
| 246 | case 'entreprise': |
| 247 | $db = '`entreprises`'; |
| 248 | $field = '`entreprise`'; |
| 249 | $unique='`uid`'; |
| 250 | break; |
| 251 | case 'firstname': |
| 252 | $field = '`prenom`'; |
| 253 | $q = '(^|[ \\-])'.$q; |
| 254 | $beginwith = false; |
| 255 | break; |
| 256 | case 'fonctionTxt': |
| 257 | $db = '`fonctions_def` INNER JOIN |
| 258 | `entreprises` ON(`entreprises`.`fonction` = `fonctions_def`.`id`)'; |
| 259 | $field = '`fonction_fr`'; |
| 260 | $unique = '`uid`'; |
| 261 | $realid = '`fonctions_def`.`id`'; |
| 262 | $qsearch = '(^|[ /\\-])'.$q; |
| 263 | $beginwith = false; |
| 264 | break; |
| 265 | case 'groupexTxt': |
| 266 | $db = '`groupesx_def` INNER JOIN |
| 267 | `groupesx_ins` ON(`groupesx_def`.`id` = `groupesx_ins`.`gid`)'; |
| 268 | $field='`groupesx_def`.`text`'; |
| 269 | if (strlen($q) > 2) |
| 270 | $beginwith = false; |
| 271 | $realid = '`groupesx_def`.`id`'; |
| 272 | $unique = '`guid`'; |
| 273 | break; |
| 274 | case 'name': |
| 275 | $field = '`nom`'; |
| 276 | $field2 = '`nom_usage`'; |
| 277 | $qsearch = '(^|[ \\-])'.$q; |
| 278 | $beginwith = false; |
| 279 | break; |
| 280 | case 'nationaliteTxt': |
| 281 | $db = '`geoloc_pays` INNER JOIN |
| 282 | `auth_user_md5` ON(`geoloc_pays`.`a2` = `auth_user_md5`.`nationalite`)'; |
| 283 | $field = 'IF(`geoloc_pays`.`nat`=\'\', |
| 284 | `geoloc_pays`.`pays`, |
| 285 | `geoloc_pays`.`nat`)'; |
| 286 | $realid = '`geoloc_pays`.`a2`'; |
| 287 | break; |
| 288 | case 'nickname': |
| 289 | $field = '`profile_nick`'; |
| 290 | $db = '`auth_user_quick`'; |
| 291 | $qsearch = '(^|[ \\-])'.$q; |
| 292 | $beginwith = false; |
| 293 | break; |
| 294 | case 'poste': |
| 295 | $db = '`entreprises`'; |
| 296 | $field = '`poste`'; |
| 297 | $unique='`uid`'; |
| 298 | break; |
| 299 | case 'schoolTxt': |
| 300 | $db = '`applis_def` INNER JOIN |
| 301 | `applis_ins` ON(`applis_def`.`id` = `applis_ins`.`aid`)'; |
| 302 | $field='`applis_def`.`text`'; |
| 303 | $unique = '`uid`'; |
| 304 | $realid = '`applis_def`.`id`'; |
| 305 | if (strlen($q) > 2) |
| 306 | $beginwith = false; |
| 307 | break; |
| 308 | case 'secteurTxt': |
| 309 | $db = '`emploi_secteur` INNER JOIN |
| 310 | `entreprises` ON(`entreprises`.`secteur` = `emploi_secteur`.`id`)'; |
| 311 | $field = '`emploi_secteur`.`label`'; |
| 312 | $realid = '`emploi_secteur`.`id`'; |
| 313 | $unique = '`uid`'; |
| 314 | $beginwith = false; |
| 315 | break; |
| 316 | case 'sectionTxt': |
| 317 | $db = '`sections` INNER JOIN |
| 318 | `auth_user_md5` ON(`auth_user_md5`.`section` = `sections`.`id`)'; |
| 319 | $field = '`sections`.`text`'; |
| 320 | $realid = '`sections`.`id`'; |
| 321 | $beginwith = false; |
| 322 | break; |
| 323 | default: exit(); |
| 324 | } |
| 325 | |
| 326 | $field_select = $field; |
| 327 | if ($field2) { |
| 328 | $field_select = 'IF('.$field.' REGEXP {?}, '.$field.', '.$field2.')'; |
| 329 | } |
| 330 | |
| 331 | if ($beginwith) { |
| 332 | $qsearch = '^'.$qsearch; |
| 333 | } |
| 334 | $list = XDB::iterator('SELECT '.$field_select.' AS field, |
| 335 | COUNT(DISTINCT '.$unique.') AS nb |
| 336 | '.($realid?(', '.$realid.' AS id'):'').' |
| 337 | FROM '.$db.' |
| 338 | WHERE '.$field.' REGEXP {?}'. |
| 339 | ($field2?(' OR '.$field2.' REGEXP {?}'):'').' |
| 340 | GROUP BY '.$field_select.' |
| 341 | ORDER BY nb DESC |
| 342 | LIMIT 11', |
| 343 | $qsearch, $qsearch, $qsearch, $qsearch); |
| 344 | $nbResults = 0; |
| 345 | $res = ""; |
| 346 | while ($result = $list->next()) { |
| 347 | $nbResults++; |
| 348 | if ($nbResults == 11) { |
| 349 | $res .= '...|1'."\n"; |
| 350 | } else { |
| 351 | $res .= $result['field'].'|'; |
| 352 | $res .= $result['nb']; |
| 353 | if (isset($result['id'])) { |
| 354 | $res .= '|'.$result['id']; |
| 355 | } |
| 356 | $res .= "\n"; |
| 357 | } |
| 358 | } |
| 359 | XDB::query('REPLACE INTO `search_autocomplete` |
| 360 | VALUES ({?}, {?}, {?}, NOW())', |
| 361 | $type, $q, $res); |
| 362 | echo $res; |
| 363 | exit(); |
| 364 | } |
| 365 | |
| 366 | function handler_list(&$page, $type = null, $idVal = null) |
| 367 | { |
| 368 | // Give the list of all values possible of type and builds a select input for it |
| 369 | $field = '`text`'; |
| 370 | $id = '`id`'; |
| 371 | $where = ''; |
| 372 | |
| 373 | switch ($type) { |
| 374 | case 'binet': |
| 375 | $db = '`binets_def`'; |
| 376 | break; |
| 377 | case 'country': |
| 378 | $db = '`geoloc_pays`'; |
| 379 | $field = '`pays`'; |
| 380 | $id = '`a2`'; |
| 381 | $page->assign('onchange', 'changeCountry(this.value)'); |
| 382 | break; |
| 383 | case 'fonction': |
| 384 | $db = '`fonctions_def`'; |
| 385 | $field = '`fonction_fr`'; |
| 386 | break; |
| 387 | case 'diploma': |
| 388 | header('Content-Type: text/xml; charset="UTF-8"'); |
| 389 | $this->get_diplomas(); |
| 390 | $page->changeTpl('search/adv.grade.form.tpl', NO_SKIN); |
| 391 | return; |
| 392 | case 'groupex': |
| 393 | $db = '`groupesx_def`'; |
| 394 | break; |
| 395 | case 'nationalite': |
| 396 | $db = '`geoloc_pays` INNER JOIN |
| 397 | `auth_user_md5` ON (`geoloc_pays`.`a2` = `auth_user_md5`.`nationalite`)'; |
| 398 | $field = 'IF(`nat`=\'\', `pays`, `nat`)'; |
| 399 | $id = '`a2`'; |
| 400 | break; |
| 401 | case 'region': |
| 402 | $db = '`geoloc_region`'; |
| 403 | $field = '`name`'; |
| 404 | $id = '`region`'; |
| 405 | if (isset($_REQUEST['country'])) { |
| 406 | $where .= ' WHERE `a2` = "'.$_REQUEST['country'].'"'; |
| 407 | } |
| 408 | break; |
| 409 | case 'school': |
| 410 | $db = '`applis_def`'; |
| 411 | $page->assign('onchange', 'changeSchool(this.value)'); |
| 412 | break; |
| 413 | case 'section': |
| 414 | $db = '`sections`'; |
| 415 | break; |
| 416 | case 'secteur': |
| 417 | $db = '`emploi_secteur`'; |
| 418 | $field = '`label`'; |
| 419 | break; |
| 420 | default: exit(); |
| 421 | } |
| 422 | if (isset($idVal)) { |
| 423 | header('Content-Type: text/plain; charset="UTF-8"'); |
| 424 | $result = XDB::query('SELECT '.$field.' AS field FROM '.$db.' WHERE '.$id.' = {?} LIMIT 1',$idVal); |
| 425 | echo $result->fetchOneCell(); |
| 426 | exit(); |
| 427 | } |
| 428 | header('Content-Type: text/xml; charset="UTF-8"'); |
| 429 | $page->changeTpl('include/field.select.tpl', NO_SKIN); |
| 430 | $page->assign('name', $type); |
| 431 | $page->assign('list', XDB::iterator('SELECT '.$field.' AS field, |
| 432 | '.$id.' AS id |
| 433 | FROM '.$db.$where.' |
| 434 | GROUP BY '.$field.' |
| 435 | ORDER BY '.$field)); |
| 436 | } |
| 437 | } |
| 438 | |
| 439 | // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: |
| 440 | ?> |