2 /***************************************************************************
3 * Copyright (C) 2003-2007 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 ProfileModule
extends PLModule
27 'photo' => $this->make_hook('photo', AUTH_PUBLIC
),
28 'photo/change' => $this->make_hook('photo_change', AUTH_MDP
),
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
),
37 'referent' => $this->make_hook('referent', AUTH_COOKIE
),
38 'referent/search' => $this->make_hook('ref_search', AUTH_COOKIE
),
40 'groupes-x' => $this->make_hook('xnet', AUTH_COOKIE
),
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'),
53 function handler_fiche(&$page)
55 return $this->handler_profile($page, Env
::v('user'));
59 function _trombi_getlist($offset, $limit)
61 $where = ( $this->promo
> 0 ?
"WHERE promo='{$this->promo}'" : "" );
65 FROM auth_user_md5 AS u
66 RIGHT JOIN photo AS p ON u.user_id=p.uid
68 $pnb = $res->fetchOneCell();
71 "SELECT promo, user_id, a.alias AS forlife,
72 IF (nom_usage='', nom, nom_usage) AS nom, prenom
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' )
77 ORDER BY promo, nom, prenom LIMIT {?}, {?}", $offset*$limit, $limit);
79 return array($pnb, $res->fetchAllAssoc());
82 function handler_photo(&$page, $x = null
, $req = null
)
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();
93 if ($req && S
::logged()) {
94 include 'validations.inc.php';
95 $myphoto = PhotoReq
::get_request($uid);
96 Header('Content-type: image/'.$myphoto->mimetype
);
100 "SELECT attachmime, attach
102 WHERE uid={?}", $uid);
104 if ((list($type, $data) = $res->fetchOneRow())
105 && ($photo_pub == 'public' || S
::logged())) {
106 Header("Content-type: image/$type");
109 Header('Content-type: image/png');
110 echo file_get_contents(dirname(__FILE__
).'/../htdocs/images/none.png');
116 function handler_photo_change(&$page)
118 $page->changeTpl('profile/trombino.tpl');
120 require_once('validations.inc.php');
122 $trombi_x = '/home/web/trombino/photos'.S
::v('promo')
123 .'/'.S
::v('forlife').'.jpg';
125 if (Env
::has('upload')) {
126 $upload = new PlUpload(S
::v('forlife'), 'photo');
127 if (!$upload->upload($_FILES['userfile']) && !$upload->download(Env
::v('photo'))) {
128 $page->trig('Une erreur est survenue lors du téléchargement du fichier');
130 $myphoto = new PhotoReq(S
::v('uid'), $upload);
131 if ($myphoto->isValid()) {
135 } elseif (Env
::has('trombi')) {
136 $upload = new PlUpload(S
::v('forlife'), 'photo');
137 if ($upload->copyFrom($trombi_x)) {
138 $myphoto = new PhotoReq(S
::v('uid'), $upload);
139 if ($myphoto->isValid()) {
144 } elseif (Env
::v('suppr')) {
145 XDB
::execute('DELETE FROM photo WHERE uid = {?}',
147 XDB
::execute('DELETE FROM requests
148 WHERE user_id = {?} AND type="photo"',
150 } elseif (Env
::v('cancel')) {
151 $sql = XDB
::query('DELETE FROM requests
152 WHERE user_id={?} AND type="photo"',
156 $sql = XDB
::query('SELECT COUNT(*) FROM requests
157 WHERE user_id={?} AND type="photo"',
159 $page->assign('submited', $sql->fetchOneCell());
160 $page->assign('has_trombi_x', file_exists($trombi_x));
163 function handler_profile(&$page, $x = null
)
170 require_once 'user.func.inc.php';
172 $page->changeTpl('profile/profile.tpl', SIMPLE
);
175 if (!S
::logged() || Env
::v('view') == 'public') $view = 'public';
176 if (S
::logged() && Env
::v('view') == 'ax') $view = 'ax';
178 if (is_numeric($x)) {
182 INNER JOIN auth_user_md5 AS u ON (a.id=u.user_id AND a.type='a_vie')
183 WHERE matricule={?}", $x);
184 $login = $res->fetchOneCell();
186 $login = get_user_forlife($x);
190 if (preg_match('/([-a-z]+)\.([-a-z]+)\.([0-9]{4})/i', $x, $matches)) {
191 $matches = str_replace('-', '_', $matches);
192 $res = XDB
::query("SELECT user_id
194 WHERE prenom LIKE {?} AND nom LIKE {?} AND promo = {?}
195 AND perms = 'pending'",
196 $matches[1], $matches[2], $matches[3]);
197 if ($res->numRows() == 1) {
198 $uid = $res->fetchOneCell();
199 pl_redirect('marketing/public/' . $uid);
205 $new = Env
::v('modif') == 'new';
206 $user = get_user_details($login, S
::v('uid'), $view);
207 $user['freetext'] = MiniWiki
::WikiToHTML($user['freetext']);
208 $user['cv'] = MiniWiki
::WikiToHTML($user['cv']);
209 $title = $user['prenom'] . ' ' . empty($user['nom_usage']) ?
$user['nom'] : $user['nom_usage'];
210 $page->assign('xorg_title', $title);
214 $photo = 'photo/'.$user['forlife'].($new ?
'/req' : '');
216 if (!isset($user['y']) and !isset($user['x'])) {
217 list($user['x'], $user['y']) = getimagesize("images/none.png");
219 if (!isset($user['y']) or $user['y'] < 1) $user['y']=1;
220 if (!isset($user['x']) or $user['x'] < 1) $user['x']=1;
221 if ($user['x'] > 240) {
222 $user['y'] = (integer)($user['y']*240/$user['x']);
225 if ($user['y'] > 300) {
226 $user['x'] = (integer)($user['x']*300/$user['y']);
229 if ($user['x'] < 160) {
230 $user['y'] = (integer)($user['y']*160/$user['x']);
234 $page->assign('logged', has_user_right('private', $view));
235 if (!has_user_right($user['photo_pub'], $view)) {
239 $page->assign_by_ref('x', $user);
240 $page->assign('photo_url', $photo);
245 INNER JOIN virtual_redirect USING(vid)
246 INNER JOIN auth_user_quick ON ( user_id = {?} AND emails_alias_pub = 'public' )
247 WHERE ( redirect={?} OR redirect={?} )
248 AND alias LIKE '%@{$globals->mail->alias_dom}'",
250 $user['forlife'].'@'.$globals->mail
->domain
,
251 $user['forlife'].'@'.$globals->mail
->domain2
);
252 $page->assign('virtualalias', $res->fetchOneCell());
254 $page->addJsLink('close_on_esc.js');
255 header('Last-Modified: ' . date('r', strtotime($user['date'])));
258 function handler_p_edit(&$page, $opened_tab = 'general')
262 $page->changeTpl('profile/edit.tpl');
264 $page->addCssLink('profil.css');
265 $page->assign('xorg_title', 'Polytechnique.org - Mon Profil');
267 require_once dirname(__FILE__
) . '/profile/tabs.inc.php';
268 require_once 'profil.func.inc.php';
269 require_once 'synchro_ax.inc.php';
271 if (Post
::v('register_from_ax_question')) {
272 XDB
::execute('UPDATE auth_user_quick
273 SET profile_from_ax = 1
274 WHERE user_id = {?}',
277 if (Post
::v('add_to_nl')) {
278 require_once 'newsletter.inc.php';
279 NewsLetter
::subscribe();
281 if (Post
::v('add_to_ax')) {
282 require_once dirname(__FILE__
) . '/axletter/axletter.inc.php';
283 AXLetter
::subscribe();
285 if (Post
::v('add_to_promo')) {
286 $r = XDB
::query('SELECT id FROM groupex.asso WHERE diminutif = {?}',
288 $asso_id = $r->fetchOneCell();
289 XDB
::execute('REPLACE INTO groupex.membres (uid,asso_id)
291 S
::v('uid'), $asso_id);
292 $mmlist = new MMList(S
::v('uid'), S
::v('password'));
293 $mmlist->subscribe("promo".S
::v('promo'));
295 if (Post
::v('sub_ml')) {
296 $subs = array_keys(Post
::v('sub_ml'));
297 $current_domain = null
;
298 foreach ($subs as $list) {
299 list($sub, $domain) = explode('@', $list);
300 if ($domain != $current_domain) {
301 $current_domain = $domain;
302 $client = new MMList(S
::v('uid'), S
::v('password'), $domain);
304 $client->subscribe($sub);
308 if (is_ax_key_missing()) {
309 $page->assign('no_private_key', true
);
312 if (Env
::v('synchro_ax') == 'confirm' && !is_ax_key_missing()) {
313 ax_synchronize(S
::v('bestalias'), S
::v('uid'));
314 $page->trig('Ton profil a été synchronisé avec celui du site polytechniciens.com');
317 // pour tous les tabs, la date de naissance pour verifier
318 // quelle est bien rentree et la date.
320 "SELECT naissance, DATE_FORMAT(date, '%d.%m.%Y')
322 WHERE user_id={?}", S
::v('uid'));
323 list($naissance, $date_modif_profil) = $res->fetchOneRow();
325 // lorsqu'on n'a pas la date de naissance en base de données
327 // la date de naissance n'existait pas et vient d'être soumise dans la variable
328 if (Env
::has('birth')) {
330 if (!ereg('[0-3][0-9][0-1][0-9][1][9]([0-9]{2})', Env
::v('birth'))) {
331 $page->assign('etat_naissance', 'query');
332 $page->trig('Date de naissance incorrecte ou incohérente.');
337 $birth = sprintf("%s-%s-%s", substr(Env
::v('birth'), 4, 4),
338 substr(Env
::v('birth'), 2, 2),
339 substr(Env
::v('birth'), 0, 2));
340 XDB
::execute("UPDATE auth_user_md5
342 WHERE user_id={?}", $birth,
344 $page->assign('etat_naissance', 'ok');
348 $page->assign('etat_naissance', 'query');
349 return; // on affiche le formulaire pour naissance
352 //doit-on faire un update ?
353 if (Env
::has('modifier') || Env
::has('suivant')) {
354 require_once dirname(__FILE__
) . "/profile/get_{$opened_tab}.inc.php";
355 require_once dirname(__FILE__
) . "/profile/verif_{$opened_tab}.inc.php";
357 if($page->nb_errs()) {
358 require_once dirname(__FILE__
) . "/profile/assign_{$opened_tab}.inc.php";
359 $page->assign('onglet', $opened_tab);
360 $page->assign('onglet_tpl', "profile/$opened_tab.tpl");
364 $date=date("Y-m-j");//nouvelle date de mise a jour
366 //On sauvegarde l'uid pour l'AX
367 /* on sauvegarde les changements dans user_changes :
368 * on a juste besoin d'insérer le user_id de la personne dans la table
370 XDB
::execute('REPLACE INTO user_changes SET user_id={?}',
373 if (!S
::has('suid')) {
374 require_once 'notifs.inc.php';
375 register_watch_op(S
::v('uid'), WATCH_FICHE
);
378 // mise a jour des champs relatifs au tab ouvert
379 require_once dirname(__FILE__
) . "/profile/update_{$opened_tab}.inc.php";
381 $log =& $_SESSION['log'];
382 $log->log('profil', $opened_tab);
383 $page->assign('etat_update', 'ok');
386 if (Env
::has('suivant')) {
387 pl_redirect('profile/edit/' . get_next_tab($opened_tab));
390 require_once dirname(__FILE__
) . "/profile/get_{$opened_tab}.inc.php";
391 require_once dirname(__FILE__
) . "/profile/verif_{$opened_tab}.inc.php";
392 require_once dirname(__FILE__
) . "/profile/assign_{$opened_tab}.inc.php";
394 $page->assign('onglet', $opened_tab);
395 $page->assign('onglet_tpl', "profile/$opened_tab.tpl");
400 function handler_p_orange(&$page)
402 $page->changeTpl('profile/orange.tpl');
404 require_once 'validations.inc.php';
405 require_once 'xorg.misc.inc.php';
408 "SELECT u.promo, u.promo_sortie
409 FROM auth_user_md5 AS u
410 WHERE user_id={?}", S
::v('uid'));
412 list($promo, $promo_sortie_old) = $res->fetchOneRow();
413 $page->assign('promo_sortie_old', $promo_sortie_old);
414 $page->assign('promo', $promo);
416 if (!Env
::has('promo_sortie')) {
420 $promo_sortie = Env
::i('promo_sortie');
422 if ($promo_sortie < 1000 ||
$promo_sortie > 9999) {
423 $page->trig('L\'année de sortie doit être un nombre de quatre chiffres');
425 elseif ($promo_sortie < $promo +
3) {
426 $page->trig('Trop tôt');
428 elseif ($promo_sortie == $promo_sortie_old) {
429 $page->trig('Tu appartiens déjà à la promotion correspondante à cette année de sortie.');
431 elseif ($promo_sortie == $promo +
3) {
433 "UPDATE auth_user_md5 set promo_sortie={?}
434 WHERE user_id={?}", $promo_sortie, S
::v('uid'));
435 $page->trig('Ton statut "orange" a été supprimé.');
436 $page->assign('promo_sortie_old', $promo_sortie);
439 $page->assign('promo_sortie', $promo_sortie);
441 if (Env
::has('submit')) {
442 $myorange = new OrangeReq(S
::v('uid'),
445 $page->assign('myorange', $myorange);
450 function handler_referent(&$page, $x = null
)
452 require_once 'user.func.inc.php';
458 $page->changeTpl('profile/fiche_referent.tpl', SIMPLE
);
461 "SELECT prenom, nom, user_id, promo, cv, a.alias AS bestalias
462 FROM auth_user_md5 AS u
463 INNER JOIN aliases AS a ON (u.user_id=a.id
464 AND FIND_IN_SET('bestalias', a.flags))
465 INNER JOIN aliases AS a1 ON (u.user_id=a1.id
467 AND a1.type!='homonyme')", $x);
469 if ($res->numRows() != 1) {
473 list($prenom, $nom, $user_id, $promo, $cv, $bestalias) = $res->fetchOneRow();
475 $page->assign('prenom', $prenom);
476 $page->assign('nom', $nom);
477 $page->assign('promo', $promo);
478 $page->assign('cv', $cv);
479 $page->assign('bestalias', $bestalias);
480 $page->assign('adr_pro', get_user_details_pro($user_id));
482 ///// recuperations infos referent
485 $res = XDB
::query("SELECT expertise FROM mentor WHERE uid = {?}", $user_id);
486 $page->assign('expertise', $res->fetchOneCell());
489 $secteurs = $ss_secteurs = Array();
491 "SELECT s.label, ss.label
492 FROM mentor_secteurs AS m
493 LEFT JOIN emploi_secteur AS s ON(m.secteur = s.id)
494 LEFT JOIN emploi_ss_secteur AS ss ON(m.secteur = ss.secteur AND m.ss_secteur = ss.id)
495 WHERE uid = {?}", $user_id);
496 while (list($sec, $ssec) = $res->next()) {
498 $ss_secteurs[] = $ssec;
500 $page->assign_by_ref('secteurs', $secteurs);
501 $page->assign_by_ref('ss_secteurs', $ss_secteurs);
506 FROM mentor_pays AS m
507 LEFT JOIN geoloc_pays AS gp ON(m.pid = gp.a2)
508 WHERE uid = {?}", $user_id);
509 $page->assign('pays', $res->fetchColumn());
511 $page->addJsLink('close_on_esc.js');
514 function handler_ref_search(&$page)
516 $page->changeTpl('profile/referent.tpl');
518 $page->assign('xorg_title', 'Polytechnique.org - Conseil Pro');
520 $secteur_sel = Post
::v('secteur');
521 $ss_secteur_sel = Post
::v('ss_secteur');
522 $pays_sel = Post
::v('pays', '00');
523 $expertise_champ = Post
::v('expertise');
525 $page->assign('pays_sel', $pays_sel);
526 $page->assign('expertise_champ', $expertise_champ);
527 $page->assign('secteur_sel', $secteur_sel);
528 $page->assign('ss_secteur_sel', $ss_secteur_sel);
530 //recuperation des noms de secteurs
531 $res = XDB
::iterRow("SELECT id, label FROM emploi_secteur");
533 while (list($tmp_id, $tmp_label) = $res->next()) {
534 $secteurs[$tmp_id] = $tmp_label;
536 $page->assign_by_ref('secteurs', $secteurs);
538 //on recupere les sous-secteurs si necessaire
539 $ss_secteurs[''] = '';
540 if (!empty($secteur_sel)) {
541 $res = XDB
::iterRow("SELECT id, label FROM emploi_ss_secteur
542 WHERE secteur = {?}", $secteur_sel);
543 while (list($tmp_id, $tmp_label) = $res->next()) {
544 $ss_secteurs[$tmp_id] = $tmp_label;
547 $page->assign_by_ref('ss_secteurs', $ss_secteurs);
549 //recuperation des noms de pays
550 $res = XDB
::iterRow("SELECT a2, pays FROM geoloc_pays
551 WHERE pays <> '' ORDER BY pays");
553 while (list($tmp_id, $tmp_label) = $res->next()) {
554 $pays[$tmp_id] = $tmp_label;
556 $page->assign_by_ref('pays', $pays);
559 $res = XDB
::query("SELECT count(*) FROM mentor");
560 $page->assign('mentors_number', $res->fetchOneCell());
562 if (!Env
::has('Chercher')) {
566 // On vient d'un formulaire
569 if ($pays_sel != '00') {
570 $where[] = "mp.pid = '".addslashes($pays_sel)."'";
573 $where[] = "ms.secteur = '".addslashes($secteur_sel)."'";
574 if ($ss_secteur_sel) {
575 $where[] = "ms.ss_secteur = '".addslashes($ss_secteur_sel)."'";
578 if ($expertise_champ) {
579 $where[] = "MATCH(m.expertise) AGAINST('".addslashes($expertise_champ)."')";
583 $where = join(' AND ', $where);
585 $sql = "SELECT m.uid, a.prenom, a.nom, a.promo,
586 l.alias AS bestalias, m.expertise, mp.pid,
587 ms.secteur, ms.ss_secteur
589 LEFT JOIN auth_user_md5 AS a ON(m.uid = a.user_id)
590 INNER JOIN aliases AS l ON (a.user_id=l.id AND
591 FIND_IN_SET('bestalias', l.flags))
592 LEFT JOIN mentor_pays AS mp ON(m.uid = mp.uid)
593 LEFT JOIN mentor_secteurs AS ms ON(m.uid = ms.uid)
597 $res = XDB
::iterator($sql, S
::v('uid'));
599 if ($res->total() == 0) {
600 $page->assign('recherche_trop_large', true
);
604 $nb_max_res_total = 100;
605 $nb_max_res_ppage = 10;
607 $curpage = Env
::i('curpage', 1);
608 $personnes = array();
611 while (($pers = $res->next()) && count($personnes) < $nb_max_res_total) {
612 $the_page = intval($i / $nb_max_res_ppage) +
1;
613 if ($the_page == $curpage) {
614 $personnes[] = $pers;
619 $page->assign('personnes', $personnes);
620 $page->assign('curpage', $curpage);
621 $page->assign('nb_pages_total',
622 intval($res->total() / $nb_max_res_ppage) +
1);
626 function handler_p_usage(&$page)
628 $page->changeTpl('profile/nomusage.tpl');
630 require_once 'validations.inc.php';
631 require_once 'xorg.misc.inc.php';
634 "SELECT u.nom, u.nom_usage, u.flags, e.alias
635 FROM auth_user_md5 AS u
636 LEFT JOIN aliases AS e ON(u.user_id = e.id
637 AND FIND_IN_SET('usage', e.flags))
638 WHERE user_id={?}", S
::v('uid'));
640 list($nom, $usage_old, $flags, $alias_old) = $res->fetchOneRow();
641 $flags = new flagset($flags);
642 $page->assign('usage_old', $usage_old);
643 $page->assign('alias_old', $alias_old);
645 $nom_usage = replace_accent(trim(Env
::v('nom_usage')));
646 $nom_usage = strtoupper($nom_usage);
647 $page->assign('usage_req', $nom_usage);
649 if (Env
::has('submit') && ($nom_usage != $usage_old)) {
650 // on vient de recevoir une requete, differente de l'ancien nom d'usage
651 if ($nom_usage == $nom) {
652 $page->assign('same', true
);
653 } else { // le nom de mariage est distinct du nom à l'X
654 // on calcule l'alias pour l'afficher
655 $reason = Env
::v('reason');
656 if ($reason == 'other') {
657 $reason = Env
::v('other_reason');
659 $myusage = new UsageReq(S
::v('uid'), $nom_usage, $reason);
661 $page->assign('myusage', $myusage);
666 function handler_xnet(&$page)
668 $page->changeTpl('profile/groupesx.tpl');
669 $page->assign('xorg_title', 'Polytechnique.org - Promo, Groupes X, Binets');
672 SELECT m.asso_id, a.nom, diminutif, a.logo IS NOT NULL AS has_logo,
673 COUNT(e.eid) AS events, mail_domain AS lists
674 FROM groupex.membres AS m
675 INNER JOIN groupex.asso AS a ON(m.asso_id = a.id)
676 LEFT JOIN groupex.evenements AS e ON(e.asso_id = m.asso_id AND e.archive = 0)
677 WHERE uid = {?} GROUP BY m.asso_id ORDER BY a.nom', S
::i('uid'));
678 $page->assign('assos', $req->fetchAllAssoc());
681 function handler_vcard(&$page, $x = null
)
689 if (substr($x, -4) == '.vcf') {
690 $x = substr($x, 0, strlen($x) - 4);
693 $vcard = new VCard($x);
694 $vcard->do_page($page);
697 function handler_admin_trombino(&$page, $uid = null
, $action = null
) {
698 $page->changeTpl('profile/admin_trombino.tpl');
699 $page->assign('xorg_title','Polytechnique.org - Administration - Trombino');
700 $page->assign('uid', $uid);
703 "SELECT a.alias,promo
704 FROM auth_user_md5 AS u
705 INNER JOIN aliases AS a ON ( u.user_id = a.id AND type='a_vie' )
706 WHERE user_id = {?}", $uid);
707 list($forlife, $promo) = $q->fetchOneRow();
712 header("Content-type: image/jpeg");
713 readfile("/home/web/trombino/photos".$promo."/".$forlife.".jpg");
718 $data = file_get_contents($_FILES['userfile']['tmp_name']);
719 list($x, $y) = getimagesize($_FILES['userfile']['tmp_name']);
720 $mimetype = substr($_FILES['userfile']['type'], 6);
721 unlink($_FILES['userfile']['tmp_name']);
723 "REPLACE INTO photo SET uid={?}, attachmime = {?}, attach={?}, x={?}, y={?}",
724 $uid, $mimetype, $data, $x, $y);
728 XDB
::execute('DELETE FROM photo WHERE uid = {?}', $uid);
732 $page->assign('forlife', $forlife);
734 function handler_admin_binets(&$page, $action = 'list', $id = null
) {
735 $page->assign('xorg_title','Polytechnique.org - Administration - Binets');
736 $page->assign('title', 'Gestion des binets');
737 $table_editor = new PLTableEditor('admin/binets', 'binets_def', 'id');
738 $table_editor->add_join_table('binets_ins','binet_id',true
);
739 $table_editor->describe('text','intitulé',true
);
740 $table_editor->apply($page, $action, $id);
742 function handler_admin_formations(&$page, $action = 'list', $id = null
) {
743 $page->assign('xorg_title','Polytechnique.org - Administration - Formations');
744 $page->assign('title', 'Gestion des formations');
745 $table_editor = new PLTableEditor('admin/formations','applis_def','id');
746 $table_editor->add_join_table('applis_ins','aid',true
);
747 $table_editor->describe('text','intitulé',true
);
748 $table_editor->describe('url','site web',false
);
749 $table_editor->apply($page, $action, $id);
751 function handler_admin_groupesx(&$page, $action = 'list', $id = null
) {
752 $page->assign('xorg_title','Polytechnique.org - Administration - Groupes X');
753 $page->assign('title', 'Gestion des Groupes X');
754 $table_editor = new PLTableEditor('admin/groupes-x','groupesx_def','id');
755 $table_editor->add_join_table('groupesx_ins','gid',true
);
756 $table_editor->describe('text','intitulé',true
);
757 $table_editor->describe('url','site web',false
);
758 $table_editor->apply($page, $action, $id);
760 function handler_admin_medals(&$page, $action = 'list', $id = null
) {
761 $page->assign('xorg_title','Polytechnique.org - Administration - Distinctions');
762 $page->assign('title', 'Gestion des Distinctions');
763 $table_editor = new PLTableEditor('admin/medals','profile_medals','id');
764 $table_editor->describe('text', 'intitulé', true
);
765 $table_editor->describe('img', 'nom de l\'image', false
);
766 $table_editor->describe('flags', 'valider', true
);
767 $table_editor->apply($page, $action, $id);
768 if ($id && $action == 'edit') {
769 $page->changeTpl('profile/admin_decos.tpl');
773 if (Post
::v('act') == 'del') {
774 XDB
::execute('DELETE FROM profile_medals_grades WHERE mid={?} AND gid={?}', $mid, Post
::i('gid'));
775 } elseif (Post
::v('act') == 'new') {
776 XDB
::execute('INSERT INTO profile_medals_grades (mid,gid) VALUES({?},{?})',
777 $mid, max(array_keys(Post
::v('grades', array(0))))+
1);
779 foreach (Post
::v('grades', array()) as $gid=>$text) {
780 XDB
::execute('UPDATE profile_medals_grades SET pos={?}, text={?} WHERE gid={?}', $_POST['pos'][$gid], $text, $gid);
783 $res = XDB
::iterator('SELECT gid, text, pos FROM profile_medals_grades WHERE mid={?} ORDER BY pos', $mid);
784 $page->assign('grades', $res);
789 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8: