Change default: show menu in xnet pages.
[platal.git] / modules / profile.php
1 <?php
2 /***************************************************************************
3 * Copyright (C) 2003-2006 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 ProfileModule extends PLModule
23 {
24 function handlers()
25 {
26 return array(
27 'photo' => $this->make_hook('photo', AUTH_PUBLIC),
28 'photo/change' => $this->make_hook('photo_change', AUTH_MDP),
29
30 'fiche.php' => $this->make_hook('fiche', AUTH_PUBLIC),
31 'profile' => $this->make_hook('profile', AUTH_PUBLIC),
32 'profile/private' => $this->make_hook('profile', AUTH_COOKIE),
33 'profile/edit' => $this->make_hook('p_edit', AUTH_MDP),
34 'profile/orange' => $this->make_hook('p_orange', AUTH_MDP),
35 'profile/usage' => $this->make_hook('p_usage', AUTH_MDP),
36
37 'referent' => $this->make_hook('referent', AUTH_COOKIE),
38 'referent/search' => $this->make_hook('ref_search', AUTH_COOKIE),
39
40 'trombi' => $this->make_hook('trombi', AUTH_COOKIE),
41
42 'vcard' => $this->make_hook('vcard', AUTH_COOKIE),
43 'admin/binets' => $this->make_hook('admin_binets', AUTH_MDP, 'admin'),
44 'admin/medals' => $this->make_hook('admin_medals', AUTH_MDP, 'admin'),
45 'admin/formations' => $this->make_hook('admin_formations', AUTH_MDP, 'admin'),
46 'admin/groupes-x' => $this->make_hook('admin_groupesx', AUTH_MDP, 'admin'),
47 'admin/trombino' => $this->make_hook('admin_trombino', AUTH_MDP, 'admin'),
48
49 );
50 }
51
52 /* XXX COMPAT */
53 function handler_fiche(&$page)
54 {
55 return $this->handler_profile($page, Env::v('user'));
56 }
57
58
59 function _trombi_getlist($offset, $limit)
60 {
61 $where = ( $this->promo > 0 ? "WHERE promo='{$this->promo}'" : "" );
62
63 $res = XDB::query(
64 "SELECT COUNT(*)
65 FROM auth_user_md5 AS u
66 RIGHT JOIN photo AS p ON u.user_id=p.uid
67 $where");
68 $pnb = $res->fetchOneCell();
69
70 $res = XDB::query(
71 "SELECT promo, user_id, a.alias AS forlife,
72 IF (nom_usage='', nom, nom_usage) AS nom, prenom
73 FROM photo AS p
74 INNER JOIN auth_user_md5 AS u ON u.user_id=p.uid
75 INNER JOIN aliases AS a ON ( u.user_id=a.id AND a.type='a_vie' )
76 $where
77 ORDER BY promo, nom, prenom LIMIT {?}, {?}", $offset*$limit, $limit);
78
79 return array($pnb, $res->fetchAllAssoc());
80 }
81
82 function handler_photo(&$page, $x = null, $req = null)
83 {
84 if (is_null($x)) {
85 return PL_NOT_FOUND;
86 }
87
88 $res = XDB::query("SELECT id, pub FROM aliases
89 LEFT JOIN photo ON(id = uid)
90 WHERE alias = {?}", $x);
91 list($uid, $photo_pub) = $res->fetchOneRow();
92
93 if ($req && S::logged()) {
94 include 'validations.inc.php';
95 $myphoto = PhotoReq::get_request($uid);
96 Header('Content-type: image/'.$myphoto->mimetype);
97 echo $myphoto->data;
98 } else {
99 $res = XDB::query(
100 "SELECT attachmime, attach
101 FROM photo
102 WHERE uid={?}", $uid);
103
104 if ((list($type, $data) = $res->fetchOneRow())
105 && ($photo_pub == 'public' || S::logged())) {
106 Header("Content-type: image/$type");
107 echo $data;
108 } else {
109 Header('Content-type: image/png');
110 echo file_get_contents(dirname(__FILE__).'/../htdocs/images/none.png');
111 }
112 }
113 exit;
114 }
115
116 function handler_photo_change(&$page)
117 {
118 $page->changeTpl('trombino.tpl');
119
120 require_once('validations.inc.php');
121
122 $trombi_x = '/home/web/trombino/photos'.S::v('promo')
123 .'/'.S::v('forlife').'.jpg';
124
125 if (Env::has('upload')) {
126 $file = isset($_FILES['userfile']['tmp_name'])
127 ? $_FILES['userfile']['tmp_name']
128 : Env::v('photo');
129 if ($data = file_get_contents($file)) {
130 if ($myphoto = new PhotoReq(S::v('uid'), $data)) {
131 $myphoto->submit();
132 }
133 } else {
134 $page->trig('Fichier inexistant ou vide');
135 }
136 } elseif (Env::has('trombi')) {
137 $myphoto = new PhotoReq(S::v('uid'),
138 file_get_contents($trombi_x));
139 if ($myphoto) {
140 $myphoto->commit();
141 $myphoto->clean();
142 }
143 } elseif (Env::v('suppr')) {
144 XDB::execute('DELETE FROM photo WHERE uid = {?}',
145 S::v('uid'));
146 XDB::execute('DELETE FROM requests
147 WHERE user_id = {?} AND type="photo"',
148 S::v('uid'));
149 } elseif (Env::v('cancel')) {
150 $sql = XDB::query('DELETE FROM requests
151 WHERE user_id={?} AND type="photo"',
152 S::v('uid'));
153 }
154
155 $sql = XDB::query('SELECT COUNT(*) FROM requests
156 WHERE user_id={?} AND type="photo"',
157 S::v('uid'));
158 $page->assign('submited', $sql->fetchOneCell());
159 $page->assign('has_trombi_x', file_exists($trombi_x));
160 }
161
162 function handler_profile(&$page, $x = null)
163 {
164 if (is_null($x)) {
165 return PL_NOT_FOUND;
166 }
167
168 global $globals;
169 require_once 'user.func.inc.php';
170
171 $page->changeTpl('fiche.tpl', SIMPLE);
172
173 $view = 'private';
174 if (!S::logged() || Env::v('view') == 'public') $view = 'public';
175 if (S::logged() && Env::v('view') == 'ax') $view = 'ax';
176
177 if (is_numeric($x)) {
178 $res = XDB::query(
179 "SELECT alias
180 FROM aliases AS a
181 INNER JOIN auth_user_md5 AS u ON (a.id=u.user_id AND a.type='a_vie')
182 WHERE matricule={?}", $x);
183 $login = $res->fetchOneCell();
184 } else {
185 $login = get_user_forlife($x);
186 }
187
188 if (empty($login)) {
189 return PL_NOT_FOUND;
190 }
191
192 $new = Env::v('modif') == 'new';
193 $user = get_user_details($login, S::v('uid'), $view);
194 require_once('url_catcher.inc.php');
195 $user['freetext'] = url_catcher($user['freetext'], false);
196 $title = $user['prenom'] . ' ' . empty($user['nom_usage']) ? $user['nom'] : $user['nom_usage'];
197 $page->assign('xorg_title', $title);
198
199 // photo
200
201 $photo = 'photo/'.$user['forlife'].($new ? '/req' : '');
202
203 if (!isset($user['y']) and !isset($user['x'])) {
204 list($user['x'], $user['y']) = getimagesize("images/none.png");
205 }
206 if (!isset($user['y']) or $user['y'] < 1) $user['y']=1;
207 if (!isset($user['x']) or $user['x'] < 1) $user['x']=1;
208 if ($user['x'] > 240) {
209 $user['y'] = (integer)($user['y']*240/$user['x']);
210 $user['x'] = 240;
211 }
212 if ($user['y'] > 300) {
213 $user['x'] = (integer)($user['x']*300/$user['y']);
214 $user['y'] = 300;
215 }
216 if ($user['x'] < 160) {
217 $user['y'] = (integer)($user['y']*160/$user['x']);
218 $user['x'] = 160;
219 }
220
221 $page->assign('logged', has_user_right('private', $view));
222 if (!has_user_right($user['photo_pub'], $view)) {
223 $photo = "";
224 }
225
226 $page->assign_by_ref('x', $user);
227 $page->assign('photo_url', $photo);
228 // alias virtual
229 $res = XDB::query(
230 "SELECT alias
231 FROM virtual
232 INNER JOIN virtual_redirect USING(vid)
233 INNER JOIN auth_user_quick ON ( user_id = {?} AND emails_alias_pub = 'public' )
234 WHERE ( redirect={?} OR redirect={?} )
235 AND alias LIKE '%@{$globals->mail->alias_dom}'",
236 S::v('uid'),
237 $user['forlife'].'@'.$globals->mail->domain,
238 $user['forlife'].'@'.$globals->mail->domain2);
239 $page->assign('virtualalias', $res->fetchOneCell());
240
241 $page->addJsLink('close_on_esc.js');
242 }
243
244 function handler_p_edit(&$page, $opened_tab = 'general')
245 {
246 global $globals;
247
248 $page->changeTpl('profil.tpl');
249
250 $page->addCssLink('profil.css');
251 $page->assign('xorg_title', 'Polytechnique.org - Mon Profil');
252
253 require_once 'tabs.inc.php';
254 require_once 'profil.func.inc.php';
255 require_once 'synchro_ax.inc.php';
256
257 if (Post::v('register_from_ax_question')) {
258 XDB::execute('UPDATE auth_user_quick
259 SET profile_from_ax = 1
260 WHERE user_id = {?}',
261 S::v('uid'));
262 }
263 if (Post::v('add_to_nl')) {
264 require_once 'newsletter.inc.php';
265 subscribe_nl();
266 }
267 if (Post::v('add_to_promo')) {
268 $r = XDB::query('SELECT id FROM groupex.asso WHERE diminutif = {?}',
269 S::v('promo'));
270 $asso_id = $r->fetchOneCell();
271 XDB::execute('REPLACE INTO groupex.membres (uid,asso_id)
272 VALUES ({?}, {?})',
273 S::v('uid'), $asso_id);
274 $mmlist = new MMList(S::v('uid'), S::v('password'));
275 $mmlist->subscribe("promo".S::v('promo'));
276 }
277
278 if (is_ax_key_missing()) {
279 $page->assign('no_private_key', true);
280 }
281
282 if (Env::v('synchro_ax') == 'confirm' && !is_ax_key_missing()) {
283 ax_synchronize(S::v('bestalias'), S::v('uid'));
284 $page->trig('Ton profil a été synchronisé avec celui du site polytechniciens.com');
285 }
286
287 // pour tous les tabs, la date de naissance pour verifier
288 // quelle est bien rentree et la date.
289 $res = XDB::query(
290 "SELECT naissance, DATE_FORMAT(date, '%d.%m.%Y')
291 FROM auth_user_md5
292 WHERE user_id={?}", S::v('uid'));
293 list($naissance, $date_modif_profil) = $res->fetchOneRow();
294
295 // lorsqu'on n'a pas la date de naissance en base de données
296 if (!$naissance) {
297 // la date de naissance n'existait pas et vient d'être soumise dans la variable
298 if (Env::has('birth')) {
299 //en cas d'erreur :
300 if (!ereg('[0-3][0-9][0-1][0-9][1][9]([0-9]{2})', Env::v('birth'))) {
301 $page->assign('etat_naissance', 'query');
302 $page->trig('Date de naissance incorrecte ou incohérente.');
303 return;
304 }
305
306 //sinon
307 $birth = sprintf("%s-%s-%s", substr(Env::v('birth'), 4, 4),
308 substr(Env::v('birth'), 2, 2),
309 substr(Env::v('birth'), 0, 2));
310 XDB::execute("UPDATE auth_user_md5
311 SET naissance={?}
312 WHERE user_id={?}", $birth,
313 S::v('uid'));
314 $page->assign('etat_naissance', 'ok');
315 return;
316 }
317
318 $page->assign('etat_naissance', 'query');
319 return; // on affiche le formulaire pour naissance
320 }
321
322 //doit-on faire un update ?
323 if (Env::has('modifier') || Env::has('suivant')) {
324 require_once "profil/get_{$opened_tab}.inc.php";
325 require_once "profil/verif_{$opened_tab}.inc.php";
326
327 if($page->nb_errs()) {
328 require_once "profil/assign_{$opened_tab}.inc.php";
329 $page->assign('onglet', $opened_tab);
330 $page->assign('onglet_tpl', "profil/$opened_tab.tpl");
331 return;
332 }
333
334 $date=date("Y-m-j");//nouvelle date de mise a jour
335
336 //On sauvegarde l'uid pour l'AX
337 /* on sauvegarde les changements dans user_changes :
338 * on a juste besoin d'insérer le user_id de la personne dans la table
339 */
340 XDB::execute('REPLACE INTO user_changes SET user_id={?}',
341 S::v('uid'));
342
343 if (!S::has('suid')) {
344 require_once 'notifs.inc.php';
345 register_watch_op(S::v('uid'), WATCH_FICHE);
346 }
347
348 // mise a jour des champs relatifs au tab ouvert
349 require_once "profil/update_{$opened_tab}.inc.php";
350
351 $log =& S::v('log');
352 $log->log('profil', $opened_tab);
353 $page->assign('etat_update', 'ok');
354 }
355
356 if (Env::has('suivant')) {
357 pl_redirect('profile/edit/' . get_next_tab($opened_tab));
358 }
359
360 require_once "profil/get_{$opened_tab}.inc.php";
361 require_once "profil/verif_{$opened_tab}.inc.php";
362 require_once "profil/assign_{$opened_tab}.inc.php";
363
364 $page->assign('onglet', $opened_tab);
365 $page->assign('onglet_tpl', "profil/$opened_tab.tpl");
366
367 return;
368 }
369
370 function handler_p_orange(&$page)
371 {
372 $page->changeTpl('orange.tpl');
373
374 require_once 'validations.inc.php';
375 require_once 'xorg.misc.inc.php';
376
377 $res = XDB::query(
378 "SELECT u.promo, u.promo_sortie
379 FROM auth_user_md5 AS u
380 WHERE user_id={?}", S::v('uid'));
381
382 list($promo, $promo_sortie_old) = $res->fetchOneRow();
383 $page->assign('promo_sortie_old', $promo_sortie_old);
384 $page->assign('promo', $promo);
385
386 if (!Env::has('promo_sortie')) {
387 return;
388 }
389
390 $promo_sortie = Env::i('promo_sortie');
391
392 if ($promo_sortie < 1000 || $promo_sortie > 9999) {
393 $page->trig('L\'année de sortie doit être un nombre de quatre chiffres');
394 }
395 elseif ($promo_sortie < $promo + 3) {
396 $page->trig('Trop tôt');
397 }
398 elseif ($promo_sortie == $promo_sortie_old) {
399 $page->trig('Tu appartiens déjà à la promotion correspondante à cette année de sortie.');
400 }
401 elseif ($promo_sortie == $promo + 3) {
402 XDB::execute(
403 "UPDATE auth_user_md5 set promo_sortie={?}
404 WHERE user_id={?}", $promo_sortie, S::v('uid'));
405 $page->trig('Ton statut "orange" a été supprimé.');
406 $page->assign('promo_sortie_old', $promo_sortie);
407 }
408 else {
409 $page->assign('promo_sortie', $promo_sortie);
410
411 if (Env::has('submit')) {
412 $myorange = new OrangeReq(S::v('uid'),
413 $promo_sortie);
414 $myorange->submit();
415 $page->assign('myorange', $myorange);
416 }
417 }
418 }
419
420 function handler_referent(&$page, $x = null)
421 {
422 require_once 'user.func.inc.php';
423
424 if (is_null($x)) {
425 return PL_NOT_FOUND;
426 }
427
428 $page->changeTpl('fiche_referent.tpl', SIMPLE);
429
430 $res = XDB::query(
431 "SELECT prenom, nom, user_id, promo, cv, a.alias AS bestalias
432 FROM auth_user_md5 AS u
433 INNER JOIN aliases AS a ON (u.user_id=a.id
434 AND FIND_IN_SET('bestalias', a.flags))
435 INNER JOIN aliases AS a1 ON (u.user_id=a1.id
436 AND a1.alias = {?}
437 AND a1.type!='homonyme')", $x);
438
439 if ($res->numRows() != 1) {
440 return PL_NOT_FOUND;
441 }
442
443 list($prenom, $nom, $user_id, $promo, $cv, $bestalias) = $res->fetchOneRow();
444
445 $page->assign('prenom', $prenom);
446 $page->assign('nom', $nom);
447 $page->assign('promo', $promo);
448 $page->assign('cv', $cv);
449 $page->assign('bestalias', $bestalias);
450 $page->assign('adr_pro', get_user_details_pro($user_id));
451
452 ///// recuperations infos referent
453
454 //expertise
455 $res = XDB::query("SELECT expertise FROM mentor WHERE uid = {?}", $user_id);
456 $page->assign('expertise', $res->fetchOneCell());
457
458 //secteurs
459 $secteurs = $ss_secteurs = Array();
460 $res = XDB::iterRow(
461 "SELECT s.label, ss.label
462 FROM mentor_secteurs AS m
463 LEFT JOIN emploi_secteur AS s ON(m.secteur = s.id)
464 LEFT JOIN emploi_ss_secteur AS ss ON(m.secteur = ss.secteur AND m.ss_secteur = ss.id)
465 WHERE uid = {?}", $user_id);
466 while (list($sec, $ssec) = $res->next()) {
467 $secteurs[] = $sec;
468 $ss_secteurs[] = $ssec;
469 }
470 $page->assign_by_ref('secteurs', $secteurs);
471 $page->assign_by_ref('ss_secteurs', $ss_secteurs);
472
473 //pays
474 $res = XDB::query(
475 "SELECT gp.pays
476 FROM mentor_pays AS m
477 LEFT JOIN geoloc_pays AS gp ON(m.pid = gp.a2)
478 WHERE uid = {?}", $user_id);
479 $page->assign('pays', $res->fetchColumn());
480
481 $page->addJsLink('close_on_esc.js');
482 }
483
484 function handler_ref_search(&$page)
485 {
486 $page->changeTpl('referent.tpl');
487
488 $page->assign('xorg_title', 'Polytechnique.org - Conseil Pro');
489
490 $secteur_sel = Post::v('secteur');
491 $ss_secteur_sel = Post::v('ss_secteur');
492 $pays_sel = Post::v('pays', '00');
493 $expertise_champ = Post::v('expertise');
494
495 $page->assign('pays_sel', $pays_sel);
496 $page->assign('expertise_champ', $expertise_champ);
497 $page->assign('secteur_sel', $secteur_sel);
498 $page->assign('ss_secteur_sel', $ss_secteur_sel);
499
500 //recuperation des noms de secteurs
501 $res = XDB::iterRow("SELECT id, label FROM emploi_secteur");
502 $secteurs[''] = '';
503 while (list($tmp_id, $tmp_label) = $res->next()) {
504 $secteurs[$tmp_id] = $tmp_label;
505 }
506 $page->assign_by_ref('secteurs', $secteurs);
507
508 //on recupere les sous-secteurs si necessaire
509 $ss_secteurs[''] = '';
510 if (!empty($secteur_sel)) {
511 $res = XDB::iterRow("SELECT id, label FROM emploi_ss_secteur
512 WHERE secteur = {?}", $secteur_sel);
513 while (list($tmp_id, $tmp_label) = $res->next()) {
514 $ss_secteurs[$tmp_id] = $tmp_label;
515 }
516 }
517 $page->assign_by_ref('ss_secteurs', $ss_secteurs);
518
519 //recuperation des noms de pays
520 $res = XDB::iterRow("SELECT a2, pays FROM geoloc_pays
521 WHERE pays <> '' ORDER BY pays");
522 $pays['00'] = '';
523 while (list($tmp_id, $tmp_label) = $res->next()) {
524 $pays[$tmp_id] = $tmp_label;
525 }
526 $page->assign_by_ref('pays', $pays);
527
528 // nb de mentors
529 $res = XDB::query("SELECT count(*) FROM mentor");
530 $page->assign('mentors_number', $res->fetchOneCell());
531
532 if (!Env::has('Chercher')) {
533 return;
534 }
535
536 // On vient d'un formulaire
537 $where = array();
538
539 if ($pays_sel != '00') {
540 $where[] = "mp.pid = '".addslashes($pays_sel)."'";
541 }
542 if ($secteur_sel) {
543 $where[] = "ms.secteur = '".addslashes($secteur_sel)."'";
544 if ($ss_secteur_sel) {
545 $where[] = "ms.ss_secteur = '".addslashes($ss_secteur_sel)."'";
546 }
547 }
548 if ($expertise_champ) {
549 $where[] = "MATCH(m.expertise) AGAINST('".addslashes($expertise_champ)."')";
550 }
551
552 if ($where) {
553 $where = join(' AND ', $where);
554
555 $sql = "SELECT m.uid, a.prenom, a.nom, a.promo,
556 l.alias AS bestalias, m.expertise, mp.pid,
557 ms.secteur, ms.ss_secteur
558 FROM mentor AS m
559 LEFT JOIN auth_user_md5 AS a ON(m.uid = a.user_id)
560 INNER JOIN aliases AS l ON (a.user_id=l.id AND
561 FIND_IN_SET('bestalias', l.flags))
562 LEFT JOIN mentor_pays AS mp ON(m.uid = mp.uid)
563 LEFT JOIN mentor_secteurs AS ms ON(m.uid = ms.uid)
564 WHERE $where
565 GROUP BY uid
566 ORDER BY RAND({?})";
567 $res = XDB::iterator($sql, S::v('uid'));
568
569 if ($res->total() == 0) {
570 $page->assign('recherche_trop_large', true);
571 return;
572 }
573
574 $nb_max_res_total = 100;
575 $nb_max_res_ppage = 10;
576
577 $curpage = Env::i('curpage', 1);
578 $personnes = array();
579 $i = 0;
580
581 while (($pers = $res->next()) && count($personnes) < $nb_max_res_total) {
582 $the_page = intval($i / $nb_max_res_ppage) + 1;
583 if ($the_page == $curpage) {
584 $personnes[] = $pers;
585 }
586 $i ++;
587 }
588
589 $page->assign('personnes', $personnes);
590 $page->assign('curpage', $curpage);
591 $page->assign('nb_pages_total',
592 intval($res->total() / $nb_max_res_ppage) + 1);
593 }
594 }
595
596 function handler_p_usage(&$page)
597 {
598 $page->changeTpl('nomusage.tpl');
599
600 require_once 'validations.inc.php';
601 require_once 'xorg.misc.inc.php';
602
603 $res = XDB::query(
604 "SELECT u.nom, u.nom_usage, u.flags, e.alias
605 FROM auth_user_md5 AS u
606 LEFT JOIN aliases AS e ON(u.user_id = e.id
607 AND FIND_IN_SET('usage', e.flags))
608 WHERE user_id={?}", S::v('uid'));
609
610 list($nom, $usage_old, $flags, $alias_old) = $res->fetchOneRow();
611 $flags = new flagset($flags);
612 $page->assign('usage_old', $usage_old);
613 $page->assign('alias_old', $alias_old);
614
615 $nom_usage = replace_accent(trim(Env::v('nom_usage')));
616 $nom_usage = strtoupper($nom_usage);
617 $page->assign('usage_req', $nom_usage);
618
619 if (Env::has('submit') && ($nom_usage != $usage_old)) {
620 // on vient de recevoir une requete, differente de l'ancien nom d'usage
621 if ($nom_usage == $nom) {
622 $page->assign('same', true);
623 } else { // le nom de mariage est distinct du nom à l'X
624 // on calcule l'alias pour l'afficher
625 $reason = Env::v('reason');
626 if ($reason == 'other') {
627 $reason = Env::v('other_reason');
628 }
629 $myusage = new UsageReq(S::v('uid'), $nom_usage, $reason);
630 $myusage->submit();
631 $page->assign('myusage', $myusage);
632 }
633 }
634 }
635
636 function handler_trombi(&$page, $promo = null)
637 {
638 $page->changeTpl('trombipromo.tpl');
639 $page->assign('xorg_title', 'Polytechnique.org - Trombi Promo');
640
641 if (is_null($promo)) {
642 return;
643 }
644
645 $this->promo = $promo = intval($promo);
646
647 if ($promo >= 1900 && ($promo < intval(date('Y')) || ($promo == intval(date('Y')) && intval(date('m')) >= 9))
648 || ($promo == -1 && S::has_perms()))
649 {
650 $trombi = new Trombi(array($this, '_trombi_getlist'));
651 $trombi->hidePromo();
652 $trombi->setAdmin();
653 $page->assign_by_ref('trombi', $trombi);
654 } else {
655 $page->trig('Promotion incorrecte (saisir au format YYYY). Recommence.');
656 }
657 }
658
659 function handler_vcard(&$page, $x = null)
660 {
661 if (is_null($x)) {
662 return PL_NOT_FOUND;
663 }
664
665 global $globals;
666
667 if (substr($x, -4) == '.vcf') {
668 $x = substr($x, 0, strlen($x) - 4);
669 }
670
671 require_once('vcard.inc.php');
672 $vcard = new VCard($x);
673 $vcard->do_page($page);
674 }
675
676 function handler_admin_trombino(&$page, $uid = null, $action = null) {
677 $page->changeTpl('admin/admin_trombino.tpl');
678 $page->assign('xorg_title','Polytechnique.org - Administration - Trombino');
679 $page->assign('uid', $uid);
680
681 $q = XDB::query(
682 "SELECT a.alias,promo
683 FROM auth_user_md5 AS u
684 INNER JOIN aliases AS a ON ( u.user_id = a.id AND type='a_vie' )
685 WHERE user_id = {?}", $uid);
686 list($forlife, $promo) = $q->fetchOneRow();
687
688 switch ($action) {
689
690 case "original":
691 header("Content-type: image/jpeg");
692 readfile("/home/web/trombino/photos".$promo."/".$forlife.".jpg");
693 exit;
694 break;
695
696 case "new":
697 $data = file_get_contents($_FILES['userfile']['tmp_name']);
698 list($x, $y) = getimagesize($_FILES['userfile']['tmp_name']);
699 $mimetype = substr($_FILES['userfile']['type'], 6);
700 unlink($_FILES['userfile']['tmp_name']);
701 XDB::execute(
702 "REPLACE INTO photo SET uid={?}, attachmime = {?}, attach={?}, x={?}, y={?}",
703 $uid, $mimetype, $data, $x, $y);
704 break;
705
706 case "delete":
707 XDB::execute('DELETE FROM photo WHERE uid = {?}', $uid);
708 break;
709 }
710
711 $page->assign('forlife', $forlife);
712 }
713 function handler_admin_binets(&$page, $action = 'list', $id = null) {
714 $page->assign('xorg_title','Polytechnique.org - Administration - Binets');
715 $page->assign('title', 'Gestion des binets');
716 $table_editor = new PLTableEditor('admin/binets', 'binets_def', 'id');
717 $table_editor->add_join_table('binets_ins','binet_id',true);
718 $table_editor->describe('text','intitulé',true);
719 $table_editor->apply($page, $action, $id);
720 }
721 function handler_admin_formations(&$page, $action = 'list', $id = null) {
722 $page->assign('xorg_title','Polytechnique.org - Administration - Formations');
723 $page->assign('title', 'Gestion des formations');
724 $table_editor = new PLTableEditor('admin/formations','applis_def','id');
725 $table_editor->add_join_table('applis_ins','aid',true);
726 $table_editor->describe('text','intitulé',true);
727 $table_editor->describe('url','site web',false);
728 $table_editor->apply($page, $action, $id);
729 }
730 function handler_admin_groupesx(&$page, $action = 'list', $id = null) {
731 $page->assign('xorg_title','Polytechnique.org - Administration - Groupes X');
732 $page->assign('title', 'Gestion des Groupes X');
733 $table_editor = new PLTableEditor('admin/groupes-x','groupesx_def','id');
734 $table_editor->add_join_table('groupesx_ins','gid',true);
735 $table_editor->describe('text','intitulé',true);
736 $table_editor->describe('url','site web',false);
737 $table_editor->apply($page, $action, $id);
738 }
739 function handler_admin_medals(&$page, $action = 'list', $id = null) {
740 $page->assign('xorg_title','Polytechnique.org - Administration - Distinctions');
741 $page->assign('title', 'Gestion des Distinctions');
742 $table_editor = new PLTableEditor('admin/medals','profile_medals','id');
743 $table_editor->describe('text', 'intitulé', true);
744 $table_editor->describe('img', 'nom de l\'image', false);
745 $table_editor->apply($page, $action, $id);
746 if ($id && $action == 'edit') {
747 $page->changeTpl('admin/gerer_decos.tpl');
748
749 $mid = $id;
750
751 if (Post::v('act') == 'del') {
752 XDB::execute('DELETE FROM profile_medals_grades WHERE mid={?} AND gid={?}', $mid, Post::i('gid'));
753 } elseif (Post::v('act') == 'new') {
754 XDB::execute('INSERT INTO profile_medals_grades (mid,gid) VALUES({?},{?})',
755 $mid, max(array_keys(Post::v('grades', array(0))))+1);
756 } else {
757 foreach (Post::v('grades', array()) as $gid=>$text) {
758 XDB::execute('UPDATE profile_medals_grades SET pos={?}, text={?} WHERE gid={?}', $_POST['pos'][$gid], $text, $gid);
759 }
760 }
761 $res = XDB::iterator('SELECT gid, text, pos FROM profile_medals_grades WHERE mid={?} ORDER BY pos', $mid);
762 $page->assign('grades', $res);
763 }
764 }
765 }
766
767 ?>