modules/profile.php

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