Merge remote branch 'origin/xorg/maint' into xorg/master
[platal.git] / modules / search.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2011 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, 'directory_ax'),
29 'advanced_search.php' => $this->make_hook('redir_advanced', AUTH_PUBLIC),
30 'search/autocomplete' => $this->make_hook('autocomplete', AUTH_COOKIE, 'directory_ax', NO_AUTH),
31 'search/list' => $this->make_hook('list', AUTH_COOKIE, 'directory_ax', NO_AUTH),
32 'jobs' => $this->make_hook('referent', AUTH_COOKIE),
33 'emploi' => $this->make_hook('referent', AUTH_COOKIE),
34 'referent/search' => $this->make_hook('referent', AUTH_COOKIE),
35 'search/referent/countries' => $this->make_hook('referent_countries', AUTH_COOKIE),
36 );
37 }
38
39 function handler_redir_advanced($page, $mode = null)
40 {
41 pl_redirect('search/adv');
42 exit;
43 }
44
45 function form_prepare()
46 {
47 Platal::page()->assign('formulaire',1);
48 }
49
50 /**
51 * $model: The way of presenting the results: minifiche, trombi, geoloc.
52 * $byletter: Show only names beginning with this letter
53 */
54 function handler_quick($page, $model = null, $byletter = null)
55 {
56 global $globals;
57
58 if (Env::has('quick') || $model == 'geoloc') {
59 $quick = Env::t('quick');
60 if (S::logged() && !Env::has('page')) {
61 S::logger()->log('search', 'quick=' . $quick);
62 }
63
64 if ($quick == '') {
65 $page->trigWarning('Aucun critère de recherche n\'est spécifié.');
66 $page->changeTpl('search/index.tpl');
67 $page->setTitle('Annuaire');
68 $page->assign('formulaire', 1);
69 return;
70 }
71
72 $list = 'profile|prf|fiche|fic|referent|ref|mentor';
73 if (S::admin()) {
74 $list .= '|admin|adm|ax';
75 }
76 $suffixes = array_keys(DirEnum::getOptions(DirEnum::ACCOUNTTYPES));
77 $suffixes = implode('|', $suffixes);
78 if (preg_match('/^(' . $list . '):([-a-z]+(\.[-a-z]+(\.(?:[md]?\d{2,4}|' . $suffixes . '))?)?)$/', replace_accent($quick), $matches)) {
79 $login = $matches[2];
80 switch($matches[1]) {
81 case 'admin': case 'adm':
82 $base = 'admin/user/';
83 break;
84 case 'ax':
85 $base = 'profile/ax/';
86 break;
87 case 'profile': case 'prf': case 'fiche': case 'fic':
88 $base = 'profile/';
89 break;
90 case 'referent': case 'ref': case 'mentor':
91 $base = 'referent/';
92 break;
93 }
94
95 $user = User::getSilent($login);
96 if ($user) {
97 pl_redirect($base . $user->login());
98 }
99 $_REQUEST['quick'] = $login;
100 $_GET['quick'] = $login;
101 } elseif (strpos($quick, 'doc:') === 0) {
102 $url = 'Docs/Recherche?';
103 $url .= 'action=search&q=' . urlencode(substr($quick, 4));
104 $url .= '&group=' . urlencode('-Equipe,-Main,-PmWiki,-Site,-Review');
105 pl_redirect($url);
106 } elseif (strpos($quick, 'trombi:') === 0) {
107 $promo = substr($quick, 7);
108 $res = XDB::query("SELECT diminutif
109 FROM groups
110 WHERE cat = 'Promotions' AND diminutif = {?}",
111 $promo);
112 if ($res->numRows() == 0) {
113 $page->trigWarning("La promotion demandée n'est pas valide: $promo");
114 } else {
115 http_redirect('http://www.polytechnique.net/login/' . $promo . '/annuaire/trombi');
116 }
117 }
118
119 $page->assign('formulaire', 0);
120
121 require_once 'userset.inc.php';
122 $view = new QuickSearchSet();
123 $view->addMod('minifiche', 'Mini-fiches', true, array('with_score' => true, 'starts_with' => $byletter));
124 if (S::logged() && !Env::i('nonins')) {
125 $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true, 'with_score' => true));
126 // TODO: Reactivate when the new map is completed.
127 // $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
128 }
129 $view->apply('search', $page, $model);
130
131 $nb_tot = $view->count();
132 $page->assign('search_results_nb', $nb_tot);
133 if (!S::logged() && $nb_tot > $globals->search->public_max) {
134 $page->trigError('Votre recherche a généré trop de résultats pour un affichage public.');
135 } elseif ($nb_tot > $globals->search->private_max) {
136 $page->trigError('Recherche trop générale. Une <a href="search/adv">recherche avancée</a> permet de préciser la recherche.');
137 } elseif (empty($nb_tot)) {
138 $page->trigError('Il n\'existe personne correspondant à ces critères dans la base !');
139 }
140 } else {
141 $page->assign('formulaire',1);
142 }
143
144 $page->changeTpl('search/index.tpl');
145 $page->setTitle('Annuaire');
146 }
147
148 /** $model is the way of presenting the results: minifiche, trombi, geoloc.
149 */
150 function handler_advanced($page, $model = null, $byletter = null)
151 {
152 global $globals;
153 $page->assign('advanced',1);
154
155 $networks = DirEnum::getOptions(DirEnum::NETWORKS);
156 $networks[-1] = 'Tous types';
157 $networks[0] = '-';
158 ksort($networks);
159 $page->assign('networking_types', $networks);
160
161 if (!Env::has('rechercher') && $model != 'geoloc') {
162 $this->form_prepare();
163 } else {
164 if (!Env::has('page')) {
165 S::logger()->log('search', 'adv=' . var_export($_GET, true));
166 }
167
168 require_once 'userset.inc.php';
169 // Enable X.org fields for X.org admins, and AX fields for AX secretaries.
170 $view = new AdvancedSearchSet(S::admin(),
171 S::user()->checkPerms(User::PERM_EDIT_DIRECTORY));
172
173 if (!$view->isValid()) {
174 $this->form_prepare();
175 $page->trigError('Recherche invalide.');
176 } else {
177 $view->addMod('minifiche', 'Mini-fiches', true, array('starts_with' => $byletter));
178 $view->addMod('trombi', 'Trombinoscope', false, array('with_promo' => true));
179 // TODO: Reactivate when the new map is completed.
180 // $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
181 if (S::user()->checkPerms(User::PERM_EDIT_DIRECTORY) || S::admin()) {
182 $view->addMod('addresses', 'Adresses postales', false);
183 }
184 $view->apply('search/adv', $page, $model);
185
186 $nb_tot = $view->count();
187 if ($nb_tot > $globals->search->private_max) {
188 $this->form_prepare();
189 if ($model != 'addresses' && (S::user()->checkPerms(User::PERM_EDIT_DIRECTORY) || S::admin())) {
190 $page->assign('suggestAddresses', true);
191 }
192 $page->trigError('Recherche trop générale.');
193 } else if ($nb_tot == 0) {
194 $this->form_prepare();
195 $page->trigError('Il n\'existe personne correspondant à ces critères dans la base !');
196 }
197 }
198 }
199
200 $page->changeTpl('search/index.tpl', $model == 'mini' ? SIMPLE : SKINNED);
201 $page->assign('public_directory',0);
202 }
203
204 function handler_autocomplete($page, $type = null)
205 {
206 // Autocompletion : according to type required, return
207 // a list of results matching with the number of matches.
208 // The output format is :
209 // result1|nb1
210 // result2|nb2
211 // ...
212 pl_content_headers("text/plain");
213 $q = preg_replace(array('/\*+$/', // always look for $q*
214 '/([\^\$\[\]])/', // escape special regexp char
215 '/\*/'), // replace joker by regexp joker
216 array('',
217 '\\\\\1',
218 '.*'),
219 Env::s('q'));
220 if (!$q) exit();
221
222 // try to look in cached results
223 $cache = XDB::query('SELECT result
224 FROM search_autocomplete
225 WHERE name = {?} AND
226 query = {?} AND
227 generated > NOW() - INTERVAL 1 DAY',
228 $type, $q);
229 if ($res = $cache->fetchOneCell()) {
230 echo $res;
231 die();
232 }
233
234 $enums = array(
235 'binetTxt' => DirEnum::BINETS,
236 'groupexTxt' => DirEnum::GROUPESX,
237 'sectionTxt' => DirEnum::SECTIONS,
238 'networking_typeTxt' => DirEnum::NETWORKS,
239 'city' => DirEnum::LOCALITIES,
240 'countryTxt' => DirEnum::COUNTRIES,
241 'entreprise' => DirEnum::COMPANIES,
242 'jobtermTxt' => DirEnum::JOBTERMS,
243 'description' => DirEnum::JOBDESCRIPTION,
244 'nationaliteTxt' => DirEnum::NATIONALITIES,
245 'schoolTxt' => DirEnum::EDUSCHOOLS,
246 );
247 if (!array_key_exists($type, $enums)) {
248 exit();
249 }
250
251 $enum = $enums[$type];
252
253 $list = DirEnum::getAutoComplete($enum, $q);
254 $nbResults = 0;
255 $res = "";
256 while ($result = $list->next()) {
257 $nbResults++;
258 if ($nbResults == 11) {
259 $res .= $q."|-1\n";
260 } else {
261 $res .= $result['field'].'|';
262 if (isset($result['nb'])) {
263 $res .= $result['nb'];
264 }
265 if (isset($result['id'])) {
266 $res .= '|'.$result['id'];
267 }
268 $res .= "\n";
269 }
270 }
271 if ($nbResults == 0) {
272 $res = $q."|-2\n";
273 }
274 XDB::query('INSERT INTO search_autocomplete (name, query, result, generated)
275 VALUES ({?}, {?}, {?}, NOW())
276 ON DUPLICATE KEY UPDATE result = VALUES(result), generated = VALUES(generated)',
277 $type, $q, $res);
278 echo $res;
279 exit();
280 }
281
282 function handler_list($page, $type = null, $idVal = null)
283 {
284 $page->assign('name', $type);
285 $page->assign('with_text_value', true);
286 $page->assign('onchange', "document.forms.recherche.{$type}Txt.value = this.options[this.selectedIndex].text");
287
288 // Give the list of all values possible of type and builds a select input for it
289 $ids = null;
290
291 switch ($type) {
292 case 'binet':
293 $ids = DirEnum::getOptionsIter(DirEnum::BINETS);
294 break;
295 case 'networking_type':
296 $ids = DirEnum::getOptionsIter(DirEnum::NETWORKS);
297 break;
298 case 'country':
299 $ids = DirEnum::getOptionsIter(DirEnum::COUNTRIES);
300 $page->assign('onchange', 'changeCountry(this.value)');
301 break;
302 case 'diploma':
303 if (Env::has('school') && Env::i('school') != 0) {
304 $ids = DirEnum::getOptionsIter(DirEnum::EDUDEGREES, Env::i('school'));
305 } else {
306 $ids = DirEnum::getOptionsIter(DirEnum::EDUDEGREES);
307 }
308 break;
309 case 'groupex':
310 $ids = DirEnum::getOptionsIter(DirEnum::GROUPESX);
311 break;
312 case 'nationalite':
313 $ids = DirEnum::getOptionsIter(DirEnum::NATIONALITIES);
314 break;
315 case 'administrativearea':
316 if (Env::has('country')) {
317 $ids = DirEnum::getOptionsIter(DirEnum::ADMINAREAS, Env::v('country'));
318 } else {
319 $ids = DirEnum::getOptionsIter(DirEnum::ADMINAREAS);
320 }
321 $page->assign('onchange', 'changeAdministrativeArea(this.value)');
322 break;
323 case 'subadministrativearea':
324 if (Env::has('administrativearea')) {
325 $ids = DirEnum::getOptionsIter(DirEnum::SUBADMINAREAS, Env::v('administrativearea'));
326 } else {
327 $ids = DirEnum::getOptionsIter(DirEnum::SUBADMINAREAS);
328 }
329 break;
330 case 'school':
331 $ids = DirEnum::getOptionsIter(DirEnum::EDUSCHOOLS);
332 $page->assign('onchange', 'changeSchool(this.value)');
333 break;
334 case 'section':
335 $ids = DirEnum::getOptionsIter(DirEnum::SECTIONS);
336 break;
337 case 'jobterm':
338 if (Env::has('jtid')) {
339 JobTerms::ajaxGetBranch($page, JobTerms::ONLY_JOBS);
340 return;
341 } else {
342 pl_content_headers('text/xml');
343 echo '<div>'; // global container so that response is valid xml
344 echo '<input name="jobtermTxt" type="text" style="display:none" size="32" />';
345 echo '<input name="jobterm" type="hidden"/>';
346 echo '<div class="term_tree"></div>'; // container where to create the tree
347 echo '<script type="text/javascript" src="javascript/jquery.jstree.js"></script>';
348 echo '<script type="text/javascript" src="javascript/jobtermstree.js"></script>';
349 echo '<script type="text/javascript">createJobTermsTree(".term_tree", "search/list/jobterm", "search", "searchForJobTerm");</script>';
350 echo '</div>';
351 exit();
352 }
353 default: exit();
354 }
355 if (isset($idVal)) {
356 pl_content_headers("text/plain");
357 echo $ids[$idVal];
358 exit();
359 }
360 pl_content_headers("text/xml");
361 $page->changeTpl('include/field.select.tpl', NO_SKIN);
362 $page->assign('list', $ids);
363 }
364
365 function handler_referent($page, $action = null, $subaction = null)
366 {
367 global $globals;
368
369 $wp = new PlWikiPage('Docs.Emploi');
370 $wp->buildCache();
371
372 $page->setTitle('Emploi et Carrières');
373
374 // Count mentors
375 $res = XDB::query("SELECT count(distinct pid) FROM profile_mentor_term");
376 $page->assign('mentors_number', $res->fetchOneCell());
377
378 // Search for mentors matching filters
379 require_once 'ufbuilder.inc.php';
380 $ufb = new UFB_MentorSearch();
381 if (!$ufb->isEmpty()) {
382 require_once 'userset.inc.php';
383 $ufc = $ufb->getUFC();
384 $set = new ProfileSet($ufc);
385 $set->addMod('mentor', 'Référents');
386 $set->apply('referent/search', $page, $action, $subaction);
387 $nb_tot = $set->count();
388 if ($nb_tot > $globals->search->private_max) {
389 $this->form_prepare();
390 $page->trigError('Recherche trop générale.');
391 $page->assign('plset_count', 0);
392 } else if ($nb_tot == 0) {
393 $this->form_prepare();
394 $page->trigError('Il n\'existe personne correspondant à ces critères dans la base.');
395 }
396 }
397
398 $page->changeTpl('search/referent.tpl');
399 }
400
401 /**
402 * Builds a select field to choose among countries that referents
403 * know about. Only referents linked to term (jtid) are displayed.
404 * @param $jtid id of job term to restrict referents
405 */
406 function handler_referent_countries($page, $jtid = null)
407 {
408 pl_content_headers("text/xml");
409 $page->changeTpl('include/field.select.tpl', NO_SKIN);
410 $page->assign('name', 'country');
411 $it = XDB::iterator("SELECT gc.iso_3166_1_a2 AS id, gc.country AS field
412 FROM geoloc_countries AS gc
413 INNER JOIN profile_mentor_country AS mp ON (mp.country = gc.iso_3166_1_a2)
414 INNER JOIN profile_mentor_term AS mt ON (mt.pid = mp.pid)
415 INNER JOIN profile_job_term_relation AS jtr ON (jtr.jtid_2 = mt.jtid)
416 WHERE jtr.jtid_1 = {?}
417 GROUP BY gc.iso_3166_1_a2
418 ORDER BY gc.country", $jtid);
419 $page->assign('list', $it);
420 }
421 }
422
423 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
424 ?>