2 /***************************************************************************
3 * Copyright (C) 2003-2010 Polytechnique.org *
4 * http://opensource.polytechnique.org/ *
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. *
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. *
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 *
19 * 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
20 ***************************************************************************/
22 class SearchModule
extends PLModule
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
),
35 function handler_redir_advanced(&$page, $mode = null
)
37 pl_redirect('search/adv');
41 function form_prepare()
43 Platal
::page()->assign('formulaire',1);
46 function handler_quick(&$page, $action = null
, $subaction = null
)
50 if (Env
::has('quick') ||
$action == 'geoloc') {
51 $quick = Env
::t('quick');
52 if (S
::logged() && !Env
::has('page')) {
53 S
::logger()->log('search', 'quick=' . $quick);
57 $page->trigWarning('Aucun critère de recherche n\'est spécifié.');
58 $page->changeTpl('search/index.tpl');
59 $page->setTitle('Annuaire');
60 $page->assign('formulaire', 1);
61 $page->addJsLink('ajax.js');
65 $list = 'profile|prf|fiche|fic|referent|ref|mentor';
67 $list .= '|admin|adm|ax';
69 if (preg_match('/^(' . $list . '):([-a-z]+(\.[-a-z]+(\.\d{2,4})?)?)$/', replace_accent($quick), $matches)) {
72 case 'admin': case 'adm':
73 $base = 'admin/user/';
76 $base = 'profile/ax/';
78 case 'profile': case 'prf': case 'fiche': case 'fic':
81 case 'referent': case 'ref': case 'mentor':
86 $user = User
::getSilent($login);
88 pl_redirect($base . $user->login());
90 $_REQUEST['quick'] = $login;
91 $_GET['quick'] = $login;
92 } elseif (strpos($quick, 'doc:') === 0) {
93 $url = 'Docs/Recherche?';
94 $url .= 'action=search&q=' . urlencode(substr($quick, 4));
95 $url .= '&group=' . urlencode('-Equipe,-Main,-PmWiki,-Site,-Review');
97 } elseif (strpos($quick, 'trombi:') === 0) {
98 $promo = substr($quick, 7);
99 $res = XDB
::query("SELECT diminutif
101 WHERE cat = 'Promotions' AND diminutif = {?}",
103 if ($res->numRows() == 0) {
104 $page->trigWarning("La promotion demandée n'est pas valide: $promo");
106 http_redirect('http://www.polytechnique.net/login/' . $promo . '/annuaire/trombi');
110 $page->assign('formulaire', 0);
112 require_once 'userset.inc.php';
113 $view = new SearchSet(true
, $action == 'geoloc' && substr($subaction, -3) == 'swf');
114 $view->addMod('minifiche', 'Mini-fiches', true
, array('with_score' => true
));
115 if (S
::logged() && !Env
::i('nonins')) {
116 $view->addMod('trombi', 'Trombinoscope', false
, array('with_promo' => true
, 'with_score' => true
));
117 // TODO: Reactivate when the new map is completed.
118 // $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
120 $view->apply('search', $page, $action, $subaction);
122 $nb_tot = $view->count();
123 $page->assign('search_results_nb', $nb_tot);
127 if (!S
::logged() && $nb_tot > $globals->search
->public_max
) {
128 $page->trigError('Votre recherche a généré trop de résultats pour un affichage public.');
129 } elseif ($nb_tot > $globals->search
->private_max
) {
130 $page->trigError('Recherche trop générale. Une <a href="search/adv">recherche avancée</a> permet de préciser la recherche.');
131 } elseif (empty($nb_tot)) {
132 $page->trigError('Il n\'existe personne correspondant à ces critères dans la base !');
135 $page->assign('formulaire',1);
136 $page->addJsLink('ajax.js');
139 $page->changeTpl('search/index.tpl');
140 $page->setTitle('Annuaire');
143 function handler_advanced(&$page, $action = null
, $subaction = null
)
146 require_once 'geocoding.inc.php';
147 $page->assign('advanced',1);
148 $page->addJsLink('jquery.autocomplete.js');
150 if (!Env
::has('rechercher') && $action != 'geoloc') {
151 $this->form_prepare();
153 if (!Env
::has('page')) {
154 S
::logger()->log('search', 'adv=' . var_export($_GET, true
));
157 require_once 'userset.inc.php';
158 $view = new SearchSet(false
, $action == 'geoloc' && substr($subaction, -3) == 'swf');
159 $view->addMod('minifiche', 'Mini-fiches', true
);
160 $view->addMod('trombi', 'Trombinoscope', false
, array('with_promo' => true
));
161 // TODO: Reactivate when the new map is completed.
162 // $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'search/adv'));
163 $view->apply('search/adv', $page, $action, $subaction);
168 $nb_tot = $view->count();
169 if ($nb_tot > $globals->search
->private_max
) {
170 $this->form_prepare();
171 $page->trigError('Recherche trop générale.');
175 $page->changeTpl('search/index.tpl', $action == 'mini' ? SIMPLE
: SKINNED
);
176 $page->addJsLink('ajax.js');
177 $page->assign('public_directory',0);
180 function handler_autocomplete(&$page, $type = null
)
182 // Autocompletion : according to type required, return
183 // a list of results matching with the number of matches.
184 // The output format is :
188 pl_content_headers("text/plain");
189 $q = preg_replace(array('/\*+$/', // always look for $q*
190 '/([\^\$\[\]])/', // escape special regexp char
191 '/\*/'), // replace joker by regexp joker
198 // try to look in cached results
199 $cache = XDB
::query('SELECT result
200 FROM search_autocomplete
203 generated > NOW() - INTERVAL 1 DAY',
205 if ($res = $cache->fetchOneCell()) {
211 'binetTxt' => DirEnum
::BINETS
,
212 'groupexTxt' => DirEnum
::GROUPESX
,
213 'sectionTxt' => DirEnum
::SECTIONS
,
214 'networking_typeTxt' => DirEnum
::NETWORKS
,
215 'city' => DirEnum
::LOCALITIES
,
216 'countryTxt' => DirEnum
::COUNTRIES
,
217 'entreprise' => DirEnum
::COMPANIES
,
218 'secteurTxt' => DirEnum
::SECTORS
,
219 'description' => DirEnum
::JOBDESCRIPTION
,
220 'nationaliteTxt' => DirEnum
::NATIONALITIES
,
221 'schoolTxt' => DirEnum
::EDUSCHOOLS
,
223 if (!array_key_exists($type, $enums)) {
227 $enum = $enums[$type];
229 $list = DirEnum
::getAutoComplete($enum, $q);
232 while ($result = $list->next()) {
234 if ($nbResults == 11) {
237 $res .= $result['field'].'|';
238 if (isset($result['nb'])) {
239 $res .= $result['nb'];
241 if (isset($result['id'])) {
242 $res .= '|'.$result['id'];
247 XDB
::query('REPLACE INTO search_autocomplete
248 VALUES ({?}, {?}, {?}, NOW())',
254 function handler_list(&$page, $type = null
, $idVal = null
)
256 $page->assign('name', $type);
257 $page->assign('with_text_value', true
);
258 $page->assign('onchange', "document.forms.recherche.{$type}Txt.value = this.options[this.selectedIndex].text");
260 // Give the list of all values possible of type and builds a select input for it
265 $ids = DirEnum
::getOptionsIter(DirEnum
::BINETS
);
267 case 'networking_type':
268 $ids = DirEnum
::getOptionsIter(DirEnum
::NETWORKS
);
271 $ids = DirEnum
::getOptionsIter(DirEnum
::COUNTRIES
);
272 $page->assign('onchange', 'changeCountry(this.value)');
275 if (Env
::has('school') && Env
::i('school') != 0) {
276 $ids = DirEnum
::getOptionsIter(DirEnum
::EDUDEGREES
, Env
::i('school'));
278 $ids = DirEnum
::getOptionsIter(DirEnum
::EDUDEGREES
);
282 $ids = DirEnum
::getOptionsIter(DirEnum
::GROUPESX
);
285 $ids = DirEnum
::getOptionsIter(DirEnum
::NATIONALITIES
);
288 if (Env
::has('country')) {
289 $ids = DirEnum
::getOptionsIter(DirEnum
::ADMINAREAS
, Env
::v('country'));
291 $ids = DirEnum
::getOptionsIter(DirEnum
::ADMINAREAS
);
295 $ids = DirEnum
::getOptionsIter(DirEnum
::EDUSCHOOLS
);
296 $page->assign('onchange', 'changeSchool(this.value)');
299 $ids = DirEnum
::getOptionsIter(DirEnum
::SECTIONS
);
302 $ids = DirEnum
::getOptionsIter(DirEnum
::SECTORS
);
307 pl_content_headers("text/plain");
311 pl_content_headers("text/xml");
312 $page->changeTpl('include/field.select.tpl', NO_SKIN
);
313 $page->assign('list', $ids);
317 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: