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