Lighter query to get the number of events displaid on every single page of
[platal.git] / modules / search.php
CommitLineData
09824164 1<?php
2/***************************************************************************
5ddeb07c 3 * Copyright (C) 2003-2007 Polytechnique.org *
09824164 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
22class 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),
ba2afb88 29 'advanced_search.php' => $this->make_hook('redir_advanced', AUTH_PUBLIC),
2ab7a09f 30 'search/autocomplete' => $this->make_hook('autocomplete', AUTH_COOKIE, 'user', NO_AUTH),
31 'search/list' => $this->make_hook('list', AUTH_COOKIE, 'user', NO_AUTH),
09824164 32 );
33 }
34
ba2afb88 35 function handler_redir_advanced(&$page, $mode = null)
36 {
37 pl_redirect('search/adv');
38 exit;
39 }
40
8d8f7607 41 function on_subscribe($forlife, $uid, $promo, $pass)
42 {
43 require_once 'user.func.inc.php';
44 user_reindex($uid);
45 }
46
09824164 47
48 function form_prepare()
49 {
d25e0f0b 50 global $page;
51
09824164 52 $page->assign('formulaire',1);
3c640222 53 }
54
55 function get_diplomas($school = null)
56 {
57 if (is_null($school) && Env::has('school')) {
58 $school = Env::i('school');
59 }
09824164 60
3c640222 61 if (!is_null($school)) {
62 $sql = 'SELECT type FROM applis_def WHERE id=' . $school;
09824164 63 } else {
64 $sql = 'DESCRIBE applis_def type';
65 }
66
08cce2ff 67 $res = XDB::query($sql);
09824164 68 $row = $res->fetchOneRow();
3c640222 69 if (!is_null($school)) {
09824164 70 $types = $row[0];
71 } else {
72 $types = explode('(',$row[1]);
73 $types = str_replace("'","",substr($types[1],0,-1));
74 }
3c640222 75 global $page;
09824164 76 $page->assign('choix_diplomas', explode(',',$types));
77 }
78
8c4a0c30 79 function handler_quick(&$page, $action = null, $subaction = null)
09824164 80 {
81 global $globals;
82
97eff0ff 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
8c4a0c30 90 if (Env::has('quick') || $action == 'geoloc') {
383bcdec 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 }
8fee4fbd 96 if (preg_match('/^(' . $list . '):([-a-z]+(\.[-a-z]+(\.\d{2,4})?)?)$/', $quick, $matches)) {
383bcdec 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);
8fee4fbd 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);
383bcdec 118 }
8fee4fbd 119
09824164 120 $page->assign('formulaire', 0);
121
8c4a0c30 122 require_once 'userset.inc.php';
123 $view = new SearchSet(true, $action == 'geoloc' && substr($subaction, -3) == 'swf');
35fa92e8 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));
a2aa8436 127 $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
35fa92e8 128 }
8c4a0c30 129 $view->apply('search', $page, $action, $subaction);
09824164 130
8c4a0c30 131 $nb_tot = $view->count();
e35882be 132 $page->assign('search_results_nb', $nb_tot);
8c4a0c30 133 if ($subaction) {
134 return;
135 }
cab08090 136 if (!S::logged() && $nb_tot > $globals->search->public_max) {
a7de4ef7 137 new ThrowError('Votre recherche a généré trop de résultats pour un affichage public.');
09824164 138 } elseif ($nb_tot > $globals->search->private_max) {
a7de4ef7 139 new ThrowError('Recherche trop générale');
09824164 140 } elseif (empty($nb_tot)) {
a7de4ef7 141 new ThrowError('il n\'existe personne correspondant à ces critères dans la base !');
09824164 142 }
143 } else {
144 $page->assign('formulaire',1);
e654517d 145 $page->addJsLink('ajax.js');
09824164 146 }
147
90ccb062 148 require_once dirname(__FILE__) . '/search/search.inc.php';
eaf30d86 149 $page->changeTpl('search/index.tpl');
8c4a0c30 150 $page->assign('xorg_title','Polytechnique.org - Annuaire');
09824164 151 }
152
90ccb062 153 function handler_advanced(&$page, $action = null, $subaction = null)
09824164 154 {
155 global $globals;
bc67c37c 156 require_once 'geoloc.inc.php';
157 require_once dirname(__FILE__) . '/search/search.inc.php';
158 $page->assign('advanced',1);
159
90ccb062 160 if (!Env::has('rechercher') && $action != 'geoloc') {
09824164 161 $this->form_prepare();
162 } else {
8c4a0c30 163 require_once 'userset.inc.php';
164 $view = new SearchSet(false, $action == 'geoloc' && substr($subaction, -3) == 'swf');
165 $view->addMod('minifiche', 'Minifiches', true);
35fa92e8 166 $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true));
a2aa8436 167 $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
86b5c8f0 168 $view->apply('search/adv', $page, $action, $subaction);
eaf30d86 169
8c4a0c30 170 if ($subaction) {
171 return;
09824164 172 }
8c4a0c30 173 $nb_tot = $view->count();
09824164 174 if ($nb_tot > $globals->search->private_max) {
175 $this->form_prepare();
a7de4ef7 176 new ThrowError('Recherche trop générale');
09824164 177 }
09824164 178 }
179
90ccb062 180 $page->changeTpl('search/index.tpl', $action == 'mini' ? SIMPLE : SKINNED);
3c640222 181 $page->addJsLink('ajax.js');
8c4a0c30 182 $page->assign('public_directory',0);
09824164 183 }
3c640222 184
838cc16a 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"');
ff3eb9b7 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']);
838cc16a 201 if (!$q) exit();
c15afc4e 202
eaf30d86 203 // try to look in cached results
ff3eb9b7 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);
c15afc4e 210 if ($res = $cache->fetchOneCell()) {
ff3eb9b7 211 echo $res;
212 die();
c15afc4e 213 }
eaf30d86 214
2ab7a09f 215 // default search
af2ff9ef 216 $q = preg_quote($q);
f6818108 217 $unique = '`user_id`';
218 $db = '`auth_user_md5`';
2ab7a09f 219 $realid = false;
f3da6d81 220 $beginwith = true;
f6818108 221 $field2 = false;
222 $qsearch = $q;
eaf30d86 223
838cc16a 224 switch ($type) {
ff3eb9b7 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;
07c4f9cc 252 case 'firstname':
ff3eb9b7 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':
eaf30d86 318 $db = '`sections` INNER JOIN
ff3eb9b7 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();
838cc16a 325 }
326
ff3eb9b7 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);
838cc16a 345 $nbResults = 0;
c15afc4e 346 $res = "";
2ab7a09f 347 while ($result = $list->next()) {
838cc16a 348 $nbResults++;
349 if ($nbResults == 11) {
c15afc4e 350 $res .= '...|1'."\n";
838cc16a 351 } else {
f6818108 352 $res .= $result['field'].'|';
ff3eb9b7 353 $res .= $result['nb'];
354 if (isset($result['id'])) {
355 $res .= '|'.$result['id'];
356 }
357 $res .= "\n";
838cc16a 358 }
359 }
ff3eb9b7 360 XDB::query('REPLACE INTO `search_autocomplete`
361 VALUES ({?}, {?}, {?}, NOW())',
362 $type, $q, $res);
c15afc4e 363 echo $res;
838cc16a 364 exit();
365 }
eaf30d86 366
2ab7a09f 367 function handler_list(&$page, $type = null, $idVal = null)
368 {
ff3eb9b7 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':
f6818108 389 header('Content-Type: text/xml; charset="UTF-8"');
ff3eb9b7 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':
eaf30d86 397 $db = '`geoloc_pays` INNER JOIN
a85224e3 398 `auth_user_md5` ON (`geoloc_pays`.`a2` = `auth_user_md5`.`nationalite`)';
ff3eb9b7 399 $field = 'IF(`nat`=\'\', `pays`, `nat`)';
400 $id = '`a2`';
401 break;
402 case 'region':
403 $db = '`geoloc_region`';
404 $field = '`name`';
eaf30d86 405 $id = '`region`';
f6818108 406 if (isset($_REQUEST['country'])) {
407 $where .= ' WHERE `a2` = "'.$_REQUEST['country'].'"';
408 }
ff3eb9b7 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 }
f6818108 429 header('Content-Type: text/xml; charset="UTF-8"');
05cb05c0 430 $page->changeTpl('include/field.select.tpl', NO_SKIN);
f6818108 431 $page->assign('name', $type);
ff3eb9b7 432 $page->assign('list', XDB::iterator('SELECT '.$field.' AS field,
433 '.$id.' AS id
434 FROM '.$db.$where.'
a85224e3 435 GROUP BY '.$field.'
ff3eb9b7 436 ORDER BY '.$field));
2ab7a09f 437 }
09824164 438}
439
a7de4ef7 440// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
09824164 441?>