Revert "Initial work on the rewriting of the profile/edit page"
[platal.git] / modules / profile.php
index 429fc09..013199d 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2006 Polytechnique.org                              *
+ *  Copyright (C) 2003-2007 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -29,20 +29,27 @@ class ProfileModule extends PLModule
 
             'fiche.php'        => $this->make_hook('fiche',      AUTH_PUBLIC),
             'profile'          => $this->make_hook('profile',    AUTH_PUBLIC),
+            'profile/private'  => $this->make_hook('profile',    AUTH_COOKIE),
+            'profile/ax'       => $this->make_hook('ax',         AUTH_COOKIE, 'admin'),
             'profile/edit'     => $this->make_hook('p_edit',     AUTH_MDP),
             'profile/orange'   => $this->make_hook('p_orange',   AUTH_MDP),
             'profile/usage'    => $this->make_hook('p_usage',    AUTH_MDP),
 
             'referent'         => $this->make_hook('referent',   AUTH_COOKIE),
+            'emploi'           => $this->make_hook('ref_search', AUTH_COOKIE),
             'referent/search'  => $this->make_hook('ref_search', AUTH_COOKIE),
+            'referent/ssect'   => $this->make_hook('ref_sect',   AUTH_COOKIE, 'user', NO_AUTH),
+            'referent/country' => $this->make_hook('ref_country', AUTH_COOKIE, 'user', NO_AUTH),
 
-            'trombi'  => $this->make_hook('trombi', AUTH_COOKIE),
+            'groupes-x'        => $this->make_hook('xnet',      AUTH_COOKIE),
 
-            'vcard'   => $this->make_hook('vcard',  AUTH_COOKIE),
+            'vcard'   => $this->make_hook('vcard',  AUTH_COOKIE, 'user', NO_HTTPS),
             'admin/binets'     => $this->make_hook('admin_binets', AUTH_MDP, 'admin'),
             'admin/medals'     => $this->make_hook('admin_medals', AUTH_MDP, 'admin'),
             'admin/formations' => $this->make_hook('admin_formations', AUTH_MDP, 'admin'),
             'admin/groupes-x'  => $this->make_hook('admin_groupesx', AUTH_MDP, 'admin'),
+            'admin/sections'  => $this->make_hook('admin_sections', AUTH_MDP, 'admin'),
+            'admin/secteurs'  => $this->make_hook('admin_secteurs', AUTH_MDP, 'admin'),
             'admin/trombino'   => $this->make_hook('admin_trombino', AUTH_MDP, 'admin'),
 
         );
@@ -54,30 +61,6 @@ class ProfileModule extends PLModule
         return $this->handler_profile($page, Env::v('user'));
     }
 
-
-    function _trombi_getlist($offset, $limit)
-    {
-        $where  = ( $this->promo > 0 ? "WHERE promo='{$this->promo}'" : "" );
-
-        $res = XDB::query(
-                "SELECT  COUNT(*)
-                   FROM  auth_user_md5 AS u
-             RIGHT JOIN  photo         AS p ON u.user_id=p.uid
-             $where");
-        $pnb = $res->fetchOneCell();
-
-        $res = XDB::query(
-                "SELECT  promo, user_id, a.alias AS forlife,
-                         IF (nom_usage='', nom, nom_usage) AS nom, prenom
-                   FROM  photo         AS p
-             INNER JOIN  auth_user_md5 AS u ON u.user_id=p.uid
-             INNER JOIN  aliases       AS a ON ( u.user_id=a.id AND a.type='a_vie' )
-                  $where
-               ORDER BY  promo, nom, prenom LIMIT {?}, {?}", $offset*$limit, $limit);
-
-        return array($pnb, $res->fetchAllAssoc());
-    }
-
     function handler_photo(&$page, $x = null, $req = null)
     {
         if (is_null($x)) {
@@ -114,7 +97,7 @@ class ProfileModule extends PLModule
 
     function handler_photo_change(&$page)
     {
-        $page->changeTpl('trombino.tpl');
+        $page->changeTpl('profile/trombino.tpl');
 
         require_once('validations.inc.php');
 
@@ -122,22 +105,23 @@ class ProfileModule extends PLModule
                     .'/'.S::v('forlife').'.jpg';
 
         if (Env::has('upload')) {
-            $file = isset($_FILES['userfile']['tmp_name'])
-                    ? $_FILES['userfile']['tmp_name']
-                    : Env::v('photo');
-            if ($data = file_get_contents($file)) {
-                if ($myphoto = new PhotoReq(S::v('uid'), $data)) {
+            $upload = new PlUpload(S::v('forlife'), 'photo');
+            if (!$upload->upload($_FILES['userfile']) && !$upload->download(Env::v('photo'))) {
+                $page->trig('Une erreur est survenue lors du téléchargement du fichier');
+            } else {
+                $myphoto = new PhotoReq(S::v('uid'), $upload);
+                if ($myphoto->isValid()) {
                     $myphoto->submit();
                 }
-            } else {
-                $page->trig('Fichier inexistant ou vide');
             }
         } elseif (Env::has('trombi')) {
-            $myphoto = new PhotoReq(S::v('uid'),
-                                    file_get_contents($trombi_x));
-            if ($myphoto) {
-                $myphoto->commit();
-                $myphoto->clean();
+            $upload = new PlUpload(S::v('forlife'), 'photo');
+            if ($upload->copyFrom($trombi_x)) {
+                $myphoto = new PhotoReq(S::v('uid'), $upload);
+                if ($myphoto->isValid()) {
+                    $myphoto->commit();
+                    $myphoto->clean();
+                }
             }
         } elseif (Env::v('suppr')) {
             XDB::execute('DELETE FROM photo WHERE uid = {?}',
@@ -152,8 +136,8 @@ class ProfileModule extends PLModule
         }
 
         $sql = XDB::query('SELECT COUNT(*) FROM requests
-                                      WHERE user_id={?} AND type="photo"',
-                                    S::v('uid'));
+                            WHERE user_id={?} AND type="photo"',
+                          S::v('uid'));
         $page->assign('submited', $sql->fetchOneCell());
         $page->assign('has_trombi_x', file_exists($trombi_x));
     }
@@ -167,7 +151,7 @@ class ProfileModule extends PLModule
         global $globals;
         require_once 'user.func.inc.php';
 
-        $page->changeTpl('fiche.tpl', SIMPLE);
+        $page->changeTpl('profile/profile.tpl', SIMPLE);
 
         $view = 'private';
         if (!S::logged() || Env::v('view') == 'public') $view = 'public';
@@ -185,14 +169,26 @@ class ProfileModule extends PLModule
         }
 
         if (empty($login)) {
+            if (preg_match('/([-a-z]+)\.([-a-z]+)\.([0-9]{4})/i', $x, $matches)) {
+                $matches = str_replace('-', '_', $matches);
+                $res = XDB::query("SELECT user_id
+                                     FROM auth_user_md5
+                                    WHERE prenom LIKE {?} AND nom LIKE {?} AND promo = {?}
+                                          AND perms = 'pending'",
+                                  $matches[1], $matches[2], $matches[3]);
+                if ($res->numRows() == 1) {
+                    $uid = $res->fetchOneCell();
+                    pl_redirect('marketing/public/' . $uid);
+                }
+            }
             return PL_NOT_FOUND;
         }
 
         $new   = Env::v('modif') == 'new';
         $user  = get_user_details($login, S::v('uid'), $view);
-        $user['freetext'] = preg_replace('/((?:https?|ftp):\/\/(?:&amp;|\.*,*[a-z@0-9~%$£µ&i#\-+=_\/\?])*)/i',
-                                         '<a href="\\0">\\0</a>', $user['freetext']);
-        $title = $user['prenom'] . ' ' . empty($user['nom_usage']) ? $user['nom'] : $user['nom_usage'];
+        $user['freetext'] = MiniWiki::WikiToHTML($user['freetext']);
+        $user['cv']       = MiniWiki::WikiToHTML($user['cv'], true);
+        $title = $user['prenom'] . ' ' . ( empty($user['nom_usage']) ? $user['nom'] : $user['nom_usage'] );
         $page->assign('xorg_title', $title);
 
         // photo
@@ -238,18 +234,37 @@ class ProfileModule extends PLModule
         $page->assign('virtualalias', $res->fetchOneCell());
 
         $page->addJsLink('close_on_esc.js');
+        header('Last-Modified: ' . date('r', strtotime($user['date'])));
+    }
+
+    function handler_ax(&$page, $user = null)
+    {
+        require_once 'user.func.inc.php';
+        $user = get_user_forlife($user);
+        if (!$user) {
+            return PL_NOT_FOUND;
+        }
+        $res = XDB::query('SELECT matricule_ax
+                             FROM auth_user_md5 AS u
+                       INNER JOIN aliases       AS a ON (a.type = "a_vie" AND a.id = u.user_id)
+                            WHERE a.alias = {?}', $user);
+        $mat = $res->fetchOneCell();
+        if (!intval($mat)) {
+            $page->kill("Le matricule AX de $user est inconnu");
+        }
+        http_redirect("http://www.polytechniciens.com/?page=AX_FICHE_ANCIEN&anc_id=$mat");
     }
 
     function handler_p_edit(&$page, $opened_tab = 'general')
     {
         global $globals;
 
-        $page->changeTpl('profil.tpl');
+        $page->changeTpl('profile/edit.tpl');
 
         $page->addCssLink('profil.css');
         $page->assign('xorg_title', 'Polytechnique.org - Mon Profil');
 
-        require_once 'tabs.inc.php';
+        require_once dirname(__FILE__) . '/profile/tabs.inc.php';
         require_once 'profil.func.inc.php';
         require_once 'synchro_ax.inc.php';
 
@@ -261,7 +276,11 @@ class ProfileModule extends PLModule
         }
         if (Post::v('add_to_nl')) {
             require_once 'newsletter.inc.php';
-            subscribe_nl();
+            NewsLetter::subscribe();
+        }
+        if (Post::v('add_to_ax')) {
+            require_once dirname(__FILE__) . '/axletter/axletter.inc.php';
+            AXLetter::subscribe();
         }
         if (Post::v('add_to_promo')) {
             $r = XDB::query('SELECT id FROM groupex.asso WHERE diminutif = {?}',
@@ -270,9 +289,20 @@ class ProfileModule extends PLModule
             XDB::execute('REPLACE INTO groupex.membres (uid,asso_id)
                                      VALUES ({?}, {?})',
                                  S::v('uid'), $asso_id);
-            require_once 'lists.inc.php';
-            $client =& lists_xmlrpc(S::v('uid'), S::v('password'));
-            $client->subscribe("promo".S::v('promo'));
+            $mmlist = new MMList(S::v('uid'), S::v('password'));
+            $mmlist->subscribe("promo".S::v('promo'));
+        }
+        if (Post::v('sub_ml')) {
+            $subs = array_keys(Post::v('sub_ml'));
+            $current_domain = null;
+            foreach ($subs as $list) {
+                list($sub, $domain) = explode('@', $list);
+                if ($domain != $current_domain) {
+                    $current_domain = $domain;
+                    $client = new MMList(S::v('uid'), S::v('password'), $domain);
+                }
+                $client->subscribe($sub);
+            }
         }
 
         if (is_ax_key_missing()) {
@@ -281,7 +311,7 @@ class ProfileModule extends PLModule
 
         if (Env::v('synchro_ax') == 'confirm' && !is_ax_key_missing()) {
             ax_synchronize(S::v('bestalias'), S::v('uid'));
-            $page->trig('Ton profil a été synchronisé avec celui du site polytechniciens.com');
+            $page->trig('Ton profil a été synchronisé avec celui du site polytechniciens.com');
         }
 
         // pour tous les tabs, la date de naissance pour verifier
@@ -292,14 +322,14 @@ class ProfileModule extends PLModule
                   WHERE  user_id={?}", S::v('uid'));
         list($naissance, $date_modif_profil) = $res->fetchOneRow();
 
-        // lorsqu'on n'a pas la date de naissance en base de données
+        // lorsqu'on n'a pas la date de naissance en base de données
         if (!$naissance)  {
-            // la date de naissance n'existait pas et vient d'être soumise dans la variable
+            // la date de naissance n'existait pas et vient d'être soumise dans la variable
             if (Env::has('birth')) {
                 //en cas d'erreur :
                 if (!ereg('[0-3][0-9][0-1][0-9][1][9]([0-9]{2})', Env::v('birth'))) {
                     $page->assign('etat_naissance', 'query');
-                    $page->trig('Date de naissance incorrecte ou incohérente.');
+                    $page->trig('Date de naissance incorrecte ou incohérente.');
                     return;
                 }
 
@@ -321,13 +351,13 @@ class ProfileModule extends PLModule
 
         //doit-on faire un update ?
         if (Env::has('modifier') || Env::has('suivant')) {
-            require_once "profil/get_{$opened_tab}.inc.php";
-            require_once "profil/verif_{$opened_tab}.inc.php";
+            require_once dirname(__FILE__) . "/profile/get_{$opened_tab}.inc.php";
+            require_once dirname(__FILE__) . "/profile/verif_{$opened_tab}.inc.php";
 
             if($page->nb_errs()) {
-                require_once "profil/assign_{$opened_tab}.inc.php";
+                require_once dirname(__FILE__) . "/profile/assign_{$opened_tab}.inc.php";
                 $page->assign('onglet', $opened_tab);
-                $page->assign('onglet_tpl', "profil/$opened_tab.tpl");
+                $page->assign('onglet_tpl', "profile/$opened_tab.tpl");
                 return;
             }
 
@@ -335,7 +365,7 @@ class ProfileModule extends PLModule
 
             //On sauvegarde l'uid pour l'AX
             /* on sauvegarde les changements dans user_changes :
-            * on a juste besoin d'insérer le user_id de la personne dans la table
+            * on a juste besoin d'insérer le user_id de la personne dans la table
             */
             XDB::execute('REPLACE INTO user_changes SET user_id={?}',
                                    S::v('uid'));
@@ -346,9 +376,9 @@ class ProfileModule extends PLModule
             }
 
             // mise a jour des champs relatifs au tab ouvert
-            require_once "profil/update_{$opened_tab}.inc.php";
+            require_once dirname(__FILE__) . "/profile/update_{$opened_tab}.inc.php";
 
-            $log =& S::v('log');
+            $log =& $_SESSION['log'];
             $log->log('profil', $opened_tab);
             $page->assign('etat_update', 'ok');
         }
@@ -357,19 +387,19 @@ class ProfileModule extends PLModule
             pl_redirect('profile/edit/' . get_next_tab($opened_tab));
         }
 
-        require_once "profil/get_{$opened_tab}.inc.php";
-        require_once "profil/verif_{$opened_tab}.inc.php";
-        require_once "profil/assign_{$opened_tab}.inc.php";
+        require_once dirname(__FILE__) . "/profile/get_{$opened_tab}.inc.php";
+        require_once dirname(__FILE__) . "/profile/verif_{$opened_tab}.inc.php";
+        require_once dirname(__FILE__) . "/profile/assign_{$opened_tab}.inc.php";
 
         $page->assign('onglet', $opened_tab);
-        $page->assign('onglet_tpl', "profil/$opened_tab.tpl");
+        $page->assign('onglet_tpl', "profile/$opened_tab.tpl");
 
         return;
     }
 
     function handler_p_orange(&$page)
     {
-        $page->changeTpl('orange.tpl');
+        $page->changeTpl('profile/orange.tpl');
 
         require_once 'validations.inc.php';
         require_once 'xorg.misc.inc.php';
@@ -390,19 +420,19 @@ class ProfileModule extends PLModule
         $promo_sortie = Env::i('promo_sortie');
 
         if ($promo_sortie < 1000 || $promo_sortie > 9999) {
-            $page->trig('L\'année de sortie doit être un nombre de quatre chiffres');
+            $page->trig('L\'année de sortie doit être un nombre de quatre chiffres');
         }
         elseif ($promo_sortie < $promo + 3) {
-            $page->trig('Trop tôt');
+            $page->trig('Trop tôt');
         }
         elseif ($promo_sortie == $promo_sortie_old) {
-            $page->trig('Tu appartiens déjà à la promotion correspondante à cette année de sortie.');
+            $page->trig('Tu appartiens déjà à la promotion correspondante à cette année de sortie.');
         }
         elseif ($promo_sortie == $promo + 3) {
             XDB::execute(
                 "UPDATE  auth_user_md5 set promo_sortie={?} 
                   WHERE  user_id={?}", $promo_sortie, S::v('uid'));
-                $page->trig('Ton statut "orange" a été supprimé.');
+                $page->trig('Ton statut "orange" a été supprimé.');
                 $page->assign('promo_sortie_old', $promo_sortie);
         }
         else {
@@ -425,7 +455,7 @@ class ProfileModule extends PLModule
             return PL_NOT_FOUND;
         }
 
-        $page->changeTpl('fiche_referent.tpl', SIMPLE);
+        $page->changeTpl('profile/fiche_referent.tpl', SIMPLE);
 
         $res = XDB::query(
                 "SELECT  prenom, nom, user_id, promo, cv, a.alias AS bestalias
@@ -445,7 +475,7 @@ class ProfileModule extends PLModule
         $page->assign('prenom', $prenom);
         $page->assign('nom',    $nom);
         $page->assign('promo',  $promo);
-        $page->assign('cv',     $cv);
+        $page->assign('cv',     MiniWiki::WikiToHTML($cv, true));
         $page->assign('bestalias', $bestalias);
         $page->assign('adr_pro', get_user_details_pro($user_id));
 
@@ -481,22 +511,12 @@ class ProfileModule extends PLModule
         $page->addJsLink('close_on_esc.js');
     }
 
-    function handler_ref_search(&$page)
+    function handler_ref_search(&$page, $action = null, $subaction = null)
     {
-        $page->changeTpl('referent.tpl');
-
+        require_once 'wiki.inc.php';
+        wiki_require_page('Docs.Emploi');
         $page->assign('xorg_title', 'Polytechnique.org - Conseil Pro');
 
-        $secteur_sel     = Post::v('secteur');
-        $ss_secteur_sel  = Post::v('ss_secteur');
-        $pays_sel        = Post::v('pays', '00');
-        $expertise_champ = Post::v('expertise');
-
-        $page->assign('pays_sel', $pays_sel);
-        $page->assign('expertise_champ', $expertise_champ);
-        $page->assign('secteur_sel', $secteur_sel);
-        $page->assign('ss_secteur_sel', $ss_secteur_sel);
-
         //recuperation des noms de secteurs
         $res = XDB::iterRow("SELECT id, label FROM emploi_secteur");
         $secteurs[''] = '';
@@ -505,97 +525,78 @@ class ProfileModule extends PLModule
         }
         $page->assign_by_ref('secteurs', $secteurs);
 
-        //on recupere les sous-secteurs si necessaire
-        $ss_secteurs[''] = '';
-        if (!empty($secteur_sel)) {
-            $res = XDB::iterRow("SELECT id, label FROM emploi_ss_secteur
-                                          WHERE secteur = {?}", $secteur_sel);
-            while (list($tmp_id, $tmp_label) = $res->next()) {
-                $ss_secteurs[$tmp_id] = $tmp_label;
-            }
-        }
-        $page->assign_by_ref('ss_secteurs', $ss_secteurs);
-
-        //recuperation des noms de pays
-        $res = XDB::iterRow("SELECT a2, pays FROM geoloc_pays
-                                      WHERE pays <> '' ORDER BY pays");
-        $pays['00'] = '';
-        while (list($tmp_id, $tmp_label) = $res->next()) {
-            $pays[$tmp_id] = $tmp_label;
-        }
-        $page->assign_by_ref('pays', $pays);
-
         // nb de mentors
         $res = XDB::query("SELECT count(*) FROM mentor");
         $page->assign('mentors_number', $res->fetchOneCell());
 
-        if (!Env::has('Chercher')) {
-            return;
-        }
-
         // On vient d'un formulaire
-        $where = array();
-
-        if ($pays_sel != '00') {
-            $where[] = "mp.pid = '".addslashes($pays_sel)."'";
-        }
-        if ($secteur_sel) {
-            $where[] = "ms.secteur = '".addslashes($secteur_sel)."'";
-            if ($ss_secteur_sel) {
-                $where[] = "ms.ss_secteur = '".addslashes($ss_secteur_sel)."'";
+        $where           = array();
+        $pays_sel        = XDB::escape(Env::v('pays_sel'));
+        $secteur_sel     = XDB::escape(Env::v('secteur'));
+        $ss_secteur_sel  = XDB::escape(Env::v('ss_secteur'));
+        $expertise_champ = XDB::escape(Env::v('expertise'));
+
+        if ($pays_sel != "''") {
+            $where[] = "mp.pid = $pays_sel";
+        }
+        if ($secteur_sel != "''") {
+            $where[] = "ms.secteur = $secteur_sel";
+            if ($ss_secteur_sel != "''") {
+                $where[] = "ms.ss_secteur = $ss_secteur_sel";
             }
         }
-        if ($expertise_champ) {
-            $where[] = "MATCH(m.expertise) AGAINST('".addslashes($expertise_champ)."')";
+        if ($expertise_champ != "''") {
+            $where[] = "MATCH(m.expertise) AGAINST($expertise_champ)";
         }
 
         if ($where) {
             $where = join(' AND ', $where);
 
-            $sql = "SELECT  m.uid, a.prenom, a.nom, a.promo,
-                            l.alias AS bestalias, m.expertise, mp.pid,
-                            ms.secteur, ms.ss_secteur
-                      FROM  mentor        AS m
-                 LEFT JOIN  auth_user_md5 AS a ON(m.uid = a.user_id)
-                INNER JOIN  aliases       AS l ON (a.user_id=l.id AND
-                                                   FIND_IN_SET('bestalias', l.flags))
-                 LEFT JOIN  mentor_pays   AS mp ON(m.uid = mp.uid)
-                 LEFT JOIN  mentor_secteurs AS ms ON(m.uid = ms.uid)
-                     WHERE  $where
-                  GROUP BY  uid
-                  ORDER BY  RAND({?})";
-            $res = XDB::iterator($sql, S::v('uid'));
-
-            if ($res->total() == 0) {
-                $page->assign('recherche_trop_large', true);
-                return;
+            $set = new UserSet("INNER JOIN  mentor          AS m ON (m.uid = u.user_id) 
+                                 LEFT JOIN  mentor_pays     AS mp ON (mp.uid = m.uid) 
+                                 LEFT JOIN  mentor_secteurs AS ms ON (ms.uid = m.uid)",
+                               $where);
+            $set->addMod('mentor', 'Référents');
+            $set->apply('referent/search', $page, $action, $subaction);
+            if ($set->count() > 100) {
+                $page->assign('recherche_trop_large', true); 
             }
+        }
+        $page->changeTpl('profile/referent.tpl'); 
+    }
 
-            $nb_max_res_total = 100;
-            $nb_max_res_ppage = 10;
-
-            $curpage   = Env::i('curpage', 1);
-            $personnes = array();
-            $i         = 0;
-
-            while (($pers = $res->next()) && count($personnes) < $nb_max_res_total) {
-                $the_page = intval($i / $nb_max_res_ppage) + 1;
-                if ($the_page == $curpage) {
-                    $personnes[] = $pers;
-                }
-                $i ++;
-            }
+    function handler_ref_sect(&$page, $sect) 
+    {
+        header('Content-Type: text/html; charset=utf-8');
+        $page->changeTpl('include/field.select.tpl', NO_SKIN);
+        $page->assign('onchange', 'setSSecteurs()');
+        $page->assign('id', 'ssect_field');
+        $page->assign('name', 'ss_secteur');
+        $it = XDB::iterator("SELECT  id,label AS field
+                               FROM  emploi_ss_secteur 
+                              WHERE  secteur = {?}", $sect);
+        $page->assign('list', $it);
+    }
 
-            $page->assign('personnes', $personnes);
-            $page->assign('curpage',   $curpage);
-            $page->assign('nb_pages_total',
-                          intval($res->total() / $nb_max_res_ppage) + 1);
-        }
+    function handler_ref_country(&$page, $sect, $ssect = '')
+    {
+        header('Content-Type: text/html; charset=utf-8');
+        $page->changeTpl('include/field.select.tpl', NO_SKIN);
+        $page->assign('name', 'pays_sel');
+        $where = ($ssect ? ' AND ms.ss_secteur = {?}' : '');
+        $it = XDB::iterator("SELECT  a2 AS id, pays AS field
+                              FROM  geoloc_pays AS g
+                        INNER JOIN  mentor_pays AS mp ON (mp.pid = g.a2)
+                        INNER JOIN  mentor_secteurs AS ms ON (ms.uid = mp.uid)
+                             WHERE  ms.secteur = {?} $where
+                          GROUP BY  a2
+                          ORDER BY  pays", $sect, $ssect);
+        $page->assign('list', $it);
     }
 
     function handler_p_usage(&$page)
     {
-        $page->changeTpl('nomusage.tpl');
+        $page->changeTpl('profile/nomusage.tpl');
 
         require_once 'validations.inc.php';
         require_once 'xorg.misc.inc.php';
@@ -620,7 +621,7 @@ class ProfileModule extends PLModule
             // on vient de recevoir une requete, differente de l'ancien nom d'usage
             if ($nom_usage == $nom) {
                 $page->assign('same', true);
-            } else { // le nom de mariage est distinct du nom à l'X
+            } else { // le nom de mariage est distinct du nom à l'X
                 // on calcule l'alias pour l'afficher
                 $reason = Env::v('reason');
                 if ($reason == 'other') {
@@ -633,49 +634,21 @@ class ProfileModule extends PLModule
         }
     }
 
-    function handler_trombi(&$page, $promo = null)
+    function handler_xnet(&$page)
     {
-        require_once 'trombi.inc.php';
-
-        $page->changeTpl('trombipromo.tpl');
-        $page->assign('xorg_title', 'Polytechnique.org - Trombi Promo');
-
-        if (is_null($promo)) {
-            return;
-        }
-
-        $this->promo = $promo = intval($promo);
-
-        if ($promo >= 1900 && $promo < intval(date('Y'))
-        || ($promo == -1 && S::has_perms()))
-        {
-            $trombi = new Trombi(array($this, '_trombi_getlist'));
-            $trombi->hidePromo();
-            $trombi->setAdmin();
-            $page->assign_by_ref('trombi', $trombi);
-        } else {
-            $page->trig('Promotion incorrecte (saisir au format YYYY). Recommence.');
-        }
-    }
-
-    function format_adr($params, &$smarty)
-    {
-        // $adr1, $adr2, $adr3, $postcode, $city, $region, $country
-        extract($params['adr']);
-        $adr = trim($adr1);
-        $adr = trim("$adr\n$adr2");
-        $adr = trim("$adr\n$adr3");
-        return $this->quoted_printable_encode(";;$adr;$city;$region;$postcode;$country");
-    }
-
-    function quoted_printable_encode($text)
-    {
-        return implode("\n", 
-                       array_map('trim',
-                                 explode("\n", 
-                                         quoted_printable_encode($text))));
+        $page->changeTpl('profile/groupesx.tpl');
+        $page->assign('xorg_title', 'Polytechnique.org - Promo, Groupes X, Binets');
+        
+        $req = XDB::query('
+            SELECT m.asso_id, a.nom, diminutif, a.logo IS NOT NULL AS has_logo, 
+                   COUNT(e.eid) AS events, mail_domain AS lists
+              FROM groupex.membres AS m 
+        INNER JOIN groupex.asso AS a ON(m.asso_id = a.id)
+         LEFT JOIN groupex.evenements AS e ON(e.asso_id = m.asso_id AND e.archive = 0)
+             WHERE uid = {?} GROUP BY m.asso_id ORDER BY a.nom', S::i('uid'));
+        $page->assign('assos', $req->fetchAllAssoc());
     }
-
+    
     function handler_vcard(&$page, $x = null)
     {
         if (is_null($x)) {
@@ -688,53 +661,12 @@ class ProfileModule extends PLModule
             $x = substr($x, 0, strlen($x) - 4);
         }
 
-        $page->changeTpl('vcard.tpl', NO_SKIN);
-        require_once 'xorg.misc.inc.php';
-        require_once 'user.func.inc.php';
-
-        $page->register_modifier('qp_enc', array($this, 'quoted_printable_encode'));
-        $page->register_function('format_adr', array($this, 'format_adr'));
-
-        $login = get_user_forlife($x);
-        $user  = get_user_details($login);
-        
-        if (strlen(trim($user['freetext']))) {
-            $user['freetext'] = html_entity_decode($user['freetext']);
-        }
-
-        // alias virtual
-        $res = XDB::query(
-                "SELECT alias
-                   FROM virtual
-             INNER JOIN virtual_redirect USING(vid)
-             INNER JOIN auth_user_quick  ON ( user_id = {?} AND emails_alias_pub = 'public' )
-                  WHERE ( redirect={?} OR redirect={?} )
-                        AND alias LIKE '%@{$globals->mail->alias_dom}'",
-                S::v('uid'),
-                $user['forlife'].'@'.$globals->mail->domain,
-                $user['forlife'].'@'.$globals->mail->domain2);
-
-        $user['virtualalias'] = $res->fetchOneCell();
-        
-        // get photo
-        $res = XDB::query(
-                "SELECT attach
-                   FROM photo   AS p
-             INNER JOIN aliases AS a ON (a.id = p.uid AND a.type = 'a_vie')
-                  WHERE a.alias = {?}", $login);
-        if ($res->numRows()) {
-            $user['photo'] = $res->fetchOneCell();
-        }
-        $page->assign_by_ref('vcard', $user);
-
-        header("Pragma: ");
-        header("Cache-Control: ");
-        header("Content-type: text/x-vcard\n");
-        header("Content-Transfer-Encoding: Quoted-Printable\n");
+        $vcard = new VCard($x);
+        $vcard->do_page($page);
     }
 
     function handler_admin_trombino(&$page, $uid = null, $action = null) {
-        $page->changeTpl('admin/admin_trombino.tpl');
+        $page->changeTpl('profile/admin_trombino.tpl');
         $page->assign('xorg_title','Polytechnique.org - Administration - Trombino');
         $page->assign('uid', $uid);
         
@@ -775,7 +707,7 @@ class ProfileModule extends PLModule
         $page->assign('title', 'Gestion des binets');
         $table_editor = new PLTableEditor('admin/binets', 'binets_def', 'id');
         $table_editor->add_join_table('binets_ins','binet_id',true);
-        $table_editor->describe('text','intitulé',true);
+        $table_editor->describe('text','intitulé',true);
         $table_editor->apply($page, $action, $id);
     }
     function handler_admin_formations(&$page, $action = 'list', $id = null) {
@@ -783,7 +715,7 @@ class ProfileModule extends PLModule
         $page->assign('title', 'Gestion des formations');
         $table_editor = new PLTableEditor('admin/formations','applis_def','id');
         $table_editor->add_join_table('applis_ins','aid',true); 
-        $table_editor->describe('text','intitulé',true);
+        $table_editor->describe('text','intitulé',true);
         $table_editor->describe('url','site web',false);
         $table_editor->apply($page, $action, $id);
     } 
@@ -792,19 +724,34 @@ class ProfileModule extends PLModule
         $page->assign('title', 'Gestion des Groupes X');
         $table_editor = new PLTableEditor('admin/groupes-x','groupesx_def','id');
         $table_editor->add_join_table('groupesx_ins','gid',true); 
-        $table_editor->describe('text','intitulé',true);
+        $table_editor->describe('text','intitulé',true);
         $table_editor->describe('url','site web',false);
         $table_editor->apply($page, $action, $id);
     }  
+    function handler_admin_sections(&$page, $action = 'list', $id = null) {
+        $page->assign('xorg_title','Polytechnique.org - Administration - Sections');
+        $page->assign('title', 'Gestion des Sections');
+        $table_editor = new PLTableEditor('admin/sections','sections','id');
+        $table_editor->describe('text','intitulé',true);
+        $table_editor->apply($page, $action, $id);
+    }  
+    function handler_admin_secteurs(&$page, $action = 'list', $id = null) {
+        $page->assign('xorg_title','Polytechnique.org - Administration - Secteurs');
+        $page->assign('title', 'Gestion des Secteurs');
+        $table_editor = new PLTableEditor('admin/secteurs','emploi_secteur','id');
+        $table_editor->describe('label','intitulé',true);
+        $table_editor->apply($page, $action, $id);
+    }  
     function handler_admin_medals(&$page, $action = 'list', $id = null) {
         $page->assign('xorg_title','Polytechnique.org - Administration - Distinctions');
         $page->assign('title', 'Gestion des Distinctions');
         $table_editor = new PLTableEditor('admin/medals','profile_medals','id');
-        $table_editor->describe('text', 'intitulé',  true);
+        $table_editor->describe('text', 'intitulé',  true);
         $table_editor->describe('img',  'nom de l\'image', false);
+        $table_editor->describe('flags', 'valider', true);
         $table_editor->apply($page, $action, $id);
         if ($id && $action == 'edit') {
-            $page->changeTpl('admin/gerer_decos.tpl');
+            $page->changeTpl('profile/admin_decos.tpl');
         
             $mid = $id;
         
@@ -824,4 +771,5 @@ class ProfileModule extends PLModule
     }   
 }
 
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 ?>