<?php
/***************************************************************************
 *  Copyright (C) 2003-2014 Polytechnique.org                              *
 *  http://opensource.polytechnique.org/                                   *
 *                                                                         *
 *  This program is free software; you can redistribute it and/or modify   *
 *  it under the terms of the GNU General Public License as published by   *
 *  the Free Software Foundation; either version 2 of the License, or      *
 *  (at your option) any later version.                                    *
 *                                                                         *
 *  This program is distributed in the hope that it will be useful,        *
 *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
 *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
 *  GNU General Public License for more details.                           *
 *                                                                         *
 *  You should have received a copy of the GNU General Public License      *
 *  along with this program; if not, write to the Free Software            *
 *  Foundation, Inc.,                                                      *
 *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
 ***************************************************************************/

class ProfileModule extends PLModule
{
    function handlers()
    {
        return array(
            'photo'                      => $this->make_hook('photo',                      AUTH_PUBLIC),
            'photo/change'               => $this->make_hook('photo_change',               AUTH_PASSWD, 'user'),

            'fiche.php'                  => $this->make_hook('fiche',                      AUTH_PUBLIC),
            'profile'                    => $this->make_hook('profile',                    AUTH_PUBLIC),
            'profile/private'            => $this->make_hook('profile',                    AUTH_COOKIE, 'user'),
            'profile/ax'                 => $this->make_hook('ax',                         AUTH_COOKIE, 'admin,edit_directory'),
            'profile/edit'               => $this->make_hook('p_edit',                     AUTH_PASSWD, 'user'),
            'profile/ajax/address'       => $this->make_hook('ajax_address',               AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/address/del'   => $this->make_hook('ajax_address_del',           AUTH_PASSWD, 'user'),
            'profile/ajax/tel'           => $this->make_hook('ajax_tel',                   AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/edu'           => $this->make_hook('ajax_edu',                   AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/medal'         => $this->make_hook('ajax_medal',                 AUTH_COOKIE, 'user', NO_AUTH),
            'profile/networking'         => $this->make_hook('networking',                 AUTH_PUBLIC),
            'profile/ajax/job'           => $this->make_hook('ajax_job',                   AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/skill'         => $this->make_hook('ajax_skill',                 AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/deltaten'      => $this->make_hook('ajax_deltaten',              AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/searchname'    => $this->make_hook('ajax_searchname',            AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/buildnames'    => $this->make_hook('ajax_buildnames',            AUTH_COOKIE, 'user', NO_AUTH),
            'profile/ajax/tree/jobterms' => $this->make_hook('ajax_tree_job_terms',        AUTH_COOKIE, 'user', NO_AUTH),
            'profile/jobterms'           => $this->make_hook('jobterms',                   AUTH_COOKIE, 'user', NO_AUTH),
            'javascript/education.js'    => $this->make_hook('education_js',               AUTH_COOKIE, 'user'),
            'javascript/grades.js'       => $this->make_hook('grades_js',                  AUTH_COOKIE, 'user'),
            'profile/medal'              => $this->make_hook('medal',                      AUTH_PUBLIC),

            'referent'                   => $this->make_hook('referent',                   AUTH_COOKIE, 'user'),
            'referent/country'           => $this->make_hook('ref_country',                AUTH_COOKIE, 'user', NO_AUTH),
            'referent/autocomplete'      => $this->make_hook('ref_autocomplete',           AUTH_COOKIE, 'user', NO_AUTH),

            'groupes-x'                  => $this->make_hook('xnet',                       AUTH_COOKIE, 'groups'),
            'groupes-x/logo'             => $this->make_hook('xnetlogo',                   AUTH_PUBLIC),

            'vcard'                      => $this->make_hook('vcard',                      AUTH_COOKIE, 'user', NO_HTTPS),
            'admin/binets'               => $this->make_hook('admin_binets',               AUTH_PASSWD, 'admin'),
            'admin/medals'               => $this->make_hook('admin_medals',               AUTH_PASSWD, 'admin'),
            'admin/education'            => $this->make_hook('admin_education',            AUTH_PASSWD, 'admin'),
            'admin/education_field'      => $this->make_hook('admin_education_field',      AUTH_PASSWD, 'admin'),
            'admin/education_degree'     => $this->make_hook('admin_education_degree',     AUTH_PASSWD, 'admin'),
            'admin/education_degree_set' => $this->make_hook('admin_education_degree_set', AUTH_PASSWD, 'admin'),
            'admin/sections'             => $this->make_hook('admin_sections',             AUTH_PASSWD, 'admin'),
            'admin/networking'           => $this->make_hook('admin_networking',           AUTH_PASSWD, 'admin'),
            'admin/trombino'             => $this->make_hook('admin_trombino',             AUTH_PASSWD, 'admin'),
            'admin/corps_enum'           => $this->make_hook('admin_corps_enum',           AUTH_PASSWD, 'admin'),
            'admin/corps_rank'           => $this->make_hook('admin_corps_rank',           AUTH_PASSWD, 'admin'),
        );
    }

    /* Function needed for compatibility reasons.
     * TODO: removes calls to fiche.php?user=blah.machin.2083 and then removes this.
     */
    function handler_fiche($page)
    {
        return $this->handler_profile($page, Env::v('user'));
    }

    function handler_photo($page, $x = null, $req = null)
    {
        if (!$x || !($profile = Profile::get($x))) {
            return PL_NOT_FOUND;
        }

        // Retrieve the photo and its mime type.
        if ($req && S::logged()) {
            $myphoto = PhotoReq::get_request($profile->id());
            $photo = PlImage::fromData($myphoto->data, $myphoto->mimetype);
        } else {
            $photo = $profile->getPhoto(true, true);
        }

        // Display the photo, or a default one when not available.
        $photo->send();
    }

    function handler_medal($page, $mid)
    {
        $thumb = ($mid == 'thumb');
        $mid = $thumb ? @func_get_arg(2) : $mid;

        $res = XDB::query("SELECT  img
                             FROM  profile_medal_enum
                            WHERE  id = {?}",
                          $mid);
        $img  = $thumb ?
            dirname(__FILE__).'/../htdocs/images/medals/thumb/' . $res->fetchOneCell() :
            dirname(__FILE__).'/../htdocs/images/medals/' . $res->fetchOneCell();
        pl_cached_content_headers(mime_content_type($img));
        echo file_get_contents($img);
        exit;
    }

    function handler_networking($page, $mid)
    {
        $res = XDB::query("SELECT  icon
                             FROM  profile_networking_enum
                            WHERE  nwid = {?}",
                          $mid);
        $img  = dirname(__FILE__) . '/../htdocs/images/networking/' . $res->fetchOneCell();
        pl_cached_content_headers(mime_content_type($img));
        echo file_get_contents($img);
        exit;
    }

    /** Tries to return the correct profile from a given hrpid.
     */
    private function findProfile($hrpid = null)
    {
        if (is_null($hrpid)) {
            $user = S::user();
            if (!$user->hasProfile()) {
                return PL_NOT_FOUND;
            } else {
                $profile = $user->profile(false,0,Visibility::get(Visibility::VIEW_ADMIN));
            }
        } else {
            $profile = Profile::get($hrpid,0,Visibility::get(Visibility::VIEW_ADMIN));
        }

        if (!$profile) {
            return PL_NOT_FOUND;
        } else if (!S::user()->canEdit($profile) && Platal::notAllowed()) {
            return PL_FORBIDDEN;
        }
        return $profile;
    }

    function handler_photo_change($page, $hrpid = null)
    {
        global $globals;
        $profile = $this->findProfile($hrpid);
        if (! ($profile instanceof Profile) && ($profile == PL_NOT_FOUND || $profile == PL_FORBIDDEN)) {
            return $profile;
        }
        if (is_null($hrpid)) {
            pl_redirect('photo/change/' . $profile->hrid());
        }

        $page->changeTpl('profile/trombino.tpl');
        $page->assign('hrpid', $profile->hrid());

        $trombi_x = '/home/web/trombino/photos' . $profile->promo() . '/' . $profile->hrid() . '.jpg';
        if (Env::has('upload')) {
            S::assert_xsrf_token();

            $upload = new PlUpload($profile->hrid(), 'photo');
            if (!$upload->upload($_FILES['userfile']) && !$upload->download(Env::v('photo'))) {
                $page->trigError('Une erreur est survenue lors du téléchargement du fichier');
            } else {
                $myphoto = new PhotoReq(S::user(), $profile, $upload);
                if ($myphoto->isValid()) {
                    $myphoto->submit();
                }
            }
        } elseif (Env::has('trombi')) {
            S::assert_xsrf_token();

            $upload = new PlUpload($profile->hrid(), 'photo');
            if ($upload->copyFrom($trombi_x)) {
                $myphoto = new PhotoReq(S::user(), $profile, $upload);
                if ($myphoto->isValid()) {
                    $myphoto->commit();
                    $myphoto->clean();
                }
            }
        } elseif (Env::v('suppr')) {
            S::assert_xsrf_token();

            XDB::execute('DELETE FROM  profile_photos
                                WHERE  pid = {?}',
                         $profile->id());
            XDB::execute("DELETE FROM  requests
                                WHERE  pid = {?} AND type = 'photo'",
                         $profile->id());
            $globals->updateNbValid();
            $page->trigSuccess("Ta photo a bien été supprimée. Elle ne sera plus visible sur le site dans au plus une heure.");
        } elseif (Env::v('cancel')) {
            S::assert_xsrf_token();

            $sql = XDB::query("DELETE FROM  requests
                                     WHERE  pid = {?} AND type = 'photo'",
                              $profile->id());
            $globals->updateNbValid();
        }

        $sql = XDB::query("SELECT  COUNT(*)
                             FROM  requests
                            WHERE  pid = {?} AND type = 'photo'",
                          $profile->id());
        $page->assign('submited', $sql->fetchOneCell());
        $page->assign('has_trombi_x', file_exists($trombi_x));
    }

    function handler_profile($page, $id = null)
    {
        // Checks if the identifier corresponds to an actual profile. Numeric
        // identifiers canonly be user by logged users.
        if (is_null($id)) {
            return PL_NOT_FOUND;
        }

        // Determines the access level at which the profile will be displayed.
        // Note: VIEW_HIDDEN can NOT be selected. The admins who want to read
        // information need to use the "edit profile" pages instead.
        if (Env::v('view') == 'public') {
            $view = Visibility::VIEW_PUBLIC;
        } else if (Env::v('view') == 'ax') {
            $view = Visibility::VIEW_AX;
        } else {
            $view = Visibility::VIEW_PRIVATE;
        }
        $visibility = Visibility::defaultForRead($view);

        // Display pending picture
        if (S::logged() && Env::v('modif') == 'new') {
            $page->assign('with_pending_pic', true);
        }

        $pid = (!is_numeric($id) || S::admin()) ? Profile::getPID($id) : null;
        if (is_null($pid)) {
            $owner = User::getSilent($id);
            if ($owner) {
                $profile = $owner->profile(true, Profile::FETCH_ALL, $visibility);
                if ($profile) {
                    $pid = $profile->id();
                }
            }
        } else {
            // Fetches profile's and profile's owner information and redirects to
            // marketing if the owner has not subscribed and the requirer has logged in.
            $profile = Profile::get($pid, Profile::FETCH_ALL, $visibility);
            $owner = $profile->owner();
        }
        if (is_null($pid)) {
            if (S::logged()) {
                $page->kill($id . " inconnu dans l'annuaire.");
            }
            return PL_NOT_FOUND;
        }

        // Now that we know this is an existing profile, we can switch to the
        // appropriate template.
        $page->changeTpl('profile/profile.tpl', SIMPLE);

        // Profile view are logged.
        if (S::logged()) {
            S::logger()->log('view_profile', $profile->hrid());
        }

        // Sets the title of the html page.
        $page->setTitle($profile->fullName());

        // Determines and displays the virtual alias.
        if (!is_null($owner) && $profile->isVisible($profile->alias_pub)) {
            $page->assign('virtualalias', $owner->emailAlias());
        }

        $page->assign_by_ref('profile', $profile);
        $page->assign_by_ref('owner', $owner);
        $page->assign('view', $visibility);
        $page->assign('logged', S::logged());

        header('Last-Modified: ' . date('r', strtotime($profile->last_change)));
    }

    function handler_ax($page, $user = null)
    {
        $user = Profile::get($user);
        if (!$user) {
            return PL_NOT_FOUND;
        }
        if (!$user->ax_id) {
            $page->kill("Le matricule AX de {$user->hrid()} est inconnu");
        }
        http_redirect("http://kx.polytechniciens.com/?page=AX_FICHE_ANCIEN&ancc_id=" . $user->ax_id);
    }

    function handler_p_edit($page, $hrpid = null, $opened_tab = null, $mode = null, $success = null)
    {
        global $globals;

        if (in_array($hrpid, array('general', 'adresses', 'emploi', 'poly', 'deco', 'mentor', 'deltaten'))) {
            $aux = $opened_tab;
            $opened_tab = $hrpid;
            $hrpid = $aux;
            $url_error = true;
        } else {
            $url_error = false;
        }
        $profile = $this->findProfile($hrpid);
        if (! ($profile instanceof Profile) && ($profile == PL_NOT_FOUND || $profile == PL_FORBIDDEN)) {
            return $profile;
        }
        if (is_null($hrpid) || $url_error) {
            pl_redirect('profile/edit/' . $profile->hrid() . (is_null($opened_tab) ? '' : '/' . $opened_tab));
        }

        // Build the page
        $page->addJsLink('jquery.ui.xorg.js');
        $page->addJsLink('education.js', true, false); /* dynamic content */
        $page->addJsLink('grades.js', true, false);    /* dynamic content */
        $page->addJsLink('profile.js');
        $wiz = new PlWizard('Profil', PlPage::getCoreTpl('plwizard.tpl'), true, true, false);
        $wiz->addUserData('profile', $profile);
        $wiz->addUserData('owner', $profile->owner());
        $this->load('page.inc.php');
        $wiz->addPage('ProfilePageGeneral', 'Général', 'general');
        $wiz->addPage('ProfilePageAddresses', 'Adresses personnelles', 'adresses');
        $wiz->addPage('ProfilePageJobs', 'Informations professionnelles', 'emploi');
        $viewPrivate = S::user()->checkPerms(User::PERM_DIRECTORY_PRIVATE);
        if ($viewPrivate) {
            $wiz->addPage('ProfilePageGroups', 'Groupes X - Binets', 'poly');
        }
        $wiz->addPage('ProfilePageDecos', 'Décorations - Medailles', 'deco');
        if ($viewPrivate) {
            $wiz->addPage('ProfilePageMentor', 'Mentoring', 'mentor');
        }
        if ($viewPrivate && $profile->isDeltatenEnabled(Profile::DELTATEN_OLD)) {
            $wiz->addPage('ProfilePageDeltaten', 'Opération N N-10', 'deltaten');
        }
        $wiz->apply($page, 'profile/edit/' . $profile->hrid(), $opened_tab, $mode);

        if (!$profile->birthdate) {
            $page->trigWarning("Ta date de naissance n'est pas renseignée, ce qui t'empêcheras de réaliser"
                      . " la procédure de récupération de mot de passe si un jour tu le perdais.");
        }

       $page->setTitle('Mon Profil');
       $page->assign('hrpid', $profile->hrid());
       $page->assign('viewPrivate', $viewPrivate);
       $page->assign('isMe', S::user()->isMyProfile($profile));
       if (isset($success) && $success) {
           $page->trigSuccess('Ton profil a bien été mis à jour.');
       }
    }

    function handler_education_js($page)
    {
        pl_cached_dynamic_content_headers('text/javascript', 'utf-8');
        $page->changeTpl('profile/education.js.tpl', NO_SKIN);
        require_once 'education.func.inc.php';
    }

    function handler_grades_js($page)
    {
        pl_cached_content_headers("text/javascript", "utf-8");
        $page->changeTpl('profile/grades.js.tpl', NO_SKIN);
        $res    = XDB::iterator("SELECT  *
                                   FROM  profile_medal_grade_enum
                               ORDER BY  mid, pos");
        $grades = array();
        while ($tmp = $res->next()) {
            $grades[$tmp['mid']][] = $tmp;
        }
        $page->assign('grades', $grades);

        $res    = XDB::iterator("SELECT  *, FIND_IN_SET('validation', flags) AS validate
                                   FROM  profile_medal_enum
                               ORDER BY  type, text");
        $mlist  = array();
        while ($tmp = $res->next()) {
            $mlist[$tmp['type']][] = $tmp;
        }
        $page->assign('medal_list', $mlist);
    }

    function handler_ajax_address($page, $id, $pid)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/adresses.address.tpl', NO_SKIN);
        $page->assign('i', $id);
        $page->assign('address', array('mail' => true));
        $page->assign('profile', Profile::get($pid));
        $page->assign('isMe', true);
        $page->assign('geocoding_removal', true);
    }

    function handler_ajax_tel($page, $prefid, $prefname, $telid, $subField, $mainField, $mainId)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/phone.tpl', NO_SKIN);
        $page->assign('prefid', $prefid);
        $page->assign('prefname', $prefname);
        $page->assign('telid', $telid);
        $phone = new Phone();
        $page->assign('tel', $phone->toFormArray());
        if ($mainField) {
            $page->assign('subField', $subField);
            $page->assign('mainField', $mainField);
            $page->assign('mainId', $mainId);
        }
    }

    function handler_ajax_edu($page, $eduid, $class)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/general.edu.tpl', NO_SKIN);
        $res = XDB::iterator("SELECT  id, field
                                FROM  profile_education_field_enum
                            ORDER BY  field");
        $page->assign('edu_fields', $res->fetchAllAssoc());
        $page->assign('eduid', $eduid);
        $page->assign('class', $class);
        require_once "education.func.inc.php";
    }

    function handler_ajax_medal($page, $i, $id)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/deco.medal.tpl', NO_SKIN);
        list($valid, $has_levels) = XDB::fetchOneRow("SELECT  NOT FIND_IN_SET('validation', flags), FIND_IN_SET('has_levels', flags)
                                                        FROM  profile_medal_enum
                                                       WHERE  id = {?}",
                                                     $id);
        $page->assign('id', $i);
        $page->assign('medal', array('id' => $id, 'grade' => 0, 'valid' => $valid, 'has_levels' => $has_levels));
    }

    function handler_ajax_job($page, $id, $pid)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/jobs.job.tpl', NO_SKIN);
        $page->assign('i', $id);
        $page->assign('job', array());
        $page->assign('new', true);
        $page->assign('profile', Profile::get($pid));
        $page->assign('isMe', true);
        $page->assign('geocoding_removal', true);
        require_once "emails.combobox.inc.php";
        fill_email_combobox($page, array('redirect', 'job', 'stripped_directory'));
    }

    /**
     * Page for url "profile/ajax/tree/jobterms". Display a JSon page containing
     * the sub-branches of a branch in the job terms tree.
     * @param $page the Platal page
     * @param $filter filter helps to display only jobterms that are contained in jobs or in mentors
     *
     * @param Env::i('jtid') job term id of the parent branch, if none trunk will be used
     * @param Env::v('attrfunc') the name of a javascript function that will be called when a branch
     * is chosen
     * @param Env::v('treeid') tree id that will be given as first argument of attrfunc function
     * the second argument will be the chosen job term id and the third one the chosen job full name.
     */
    function handler_ajax_tree_job_terms($page, $filter = JobTerms::ALL)
    {
        JobTerms::ajaxGetBranch($page, $filter);
    }

    function handler_ajax_skill($page, $cat, $id)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/skill.skill.tpl', NO_SKIN);
        $page->assign('cat', $cat);
        $page->assign('id', $id);
        if ($cat == 'competences') {
          $page->assign('levels', array('initié' => 'initié',
                                        'bonne connaissance' => 'bonne connaissance',
                                        'expert' => 'expert'));
        } else {
          $page->assign('levels', array(1 => 'connaissance basique',
                                        2 => 'maîtrise des bases',
                                        3 => 'maîtrise limitée',
                                        4 => 'maîtrise générale',
                                        5 => 'bonne maîtrise',
                                        6 => 'maîtrise complète'));
        }
    }

    function handler_ajax_searchname($page, $id, $isFemale)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/general.private_name.tpl', NO_SKIN);
        $page->assign('other_names', array('nickname' => 'Surnom', 'firstname' => 'Autre prénom', 'lastname' => 'Autre nom'));
        $page->assign('new_name', true);
        $page->assign('isFemale', $isFemale);
        $page->assign('id', $id);
    }

    function handler_ajax_buildnames($page, $data, $isFemale)
    {
        pl_content_headers("text/html");
        $page->changeTpl('profile/general.buildnames.tpl', NO_SKIN);
        require_once 'name.func.inc.php';
        $page->assign('names', build_javascript_names($data, $isFemale));
    }

    function handler_referent($page, $pf)
    {
        $page->changeTpl('profile/fiche_referent.tpl', SIMPLE);

        $pf = Profile::get($pf);
        if (!$pf) {
            return PL_NOT_FOUND;
        }

        // Referent view are logged.
        if (S::logged()) {
            S::logger()->log('view_referent', $pf->hrid());
        }

        $page->assign_by_ref('profile', $pf);

        // Retrieves referents' countries.
        $res = XDB::query(
                "SELECT  gc.country
                   FROM  profile_mentor_country AS m
              LEFT JOIN  geoloc_countries       AS gc ON (m.country = gc.iso_3166_1_a2)
                  WHERE  pid = {?}", $pf->id());
        $page->assign('pays', $res->fetchColumn());
    }

    function handler_ref_country($page)
    {
        pl_content_headers("text/html");
        $page->changeTpl('include/field.select.tpl', NO_SKIN);
        $page->assign('name', 'pays_sel');
        $it = XDB::iterator("SELECT  gc.iso_3166_1_a2 AS id, gc.country AS field
                               FROM  geoloc_countries       AS gc
                         INNER JOIN  profile_mentor_country AS mp ON (mp.country = gc.iso_3166_1_a2)
                           GROUP BY  iso_3166_1_a2
                           ORDER BY  country");
        $page->assign('list', $it);
    }

    /**
     * Page for url "referent/autocomplete". Display an "autocomplete" page (plain/text with values
     * separated by "|" chars) for jobterms in referent (mentor) search.
     * @see handler_jobterms
     */
    function handler_ref_autocomplete($page)
    {
        $this->handler_jobterms($page, 'mentor');
    }

    /**
     * Page for url "profile/jobterms" (function also used for "referent/autocomplete" @see
     * handler_ref_autocomplete). Displays an "autocomplete" page (plain text with values
     * separated by "|" chars) for jobterms to add in profile.
     * @param $page the Platal page
     * @param $type set to 'mentor' to display the number of mentors for each term and order
     *  by descending number of mentors.
     *
     * @param Env::v('q') the text that has been typed and to complete automatically
     */
    function handler_jobterms($page, $type = 'nomentor')
    {
        pl_content_headers("text/plain");

        $q = Env::v('term') . '%';
        $tokens = JobTerms::tokenize($q);
        if (count($tokens) == 0) {
            exit;
        }
        sort($tokens);
        $q_normalized = implode(' ', $tokens);

        // Try to look in cached results.
        $cached = false;
        $cache = XDB::query('SELECT  result
                               FROM  search_autocomplete
                              WHERE  name = {?} AND query = {?} AND generated > NOW() - INTERVAL 1 DAY',
                             $type, $q_normalized);

        if ($cache->numRows() > 0) {
            $cached = true;
            $data = explode("\n", $cache->fetchOneCell());
            $list = array();
            foreach ($data as $line) {
                if ($line != '') {
                    $aux = explode("\t", $line);
                    if ($type == 'mentor') {
                        $item = array(
                            'field' => $aux[0],
                            'nb'    => $aux[1],
                            'id'    => $aux[2]
                        );
                        $item['value'] = SearchModule::format_autocomplete($item);
                    } else {
                        $item = array(
                            'value' => $aux[0],
                            'id'    => $aux[1]
                        );
                    }
                    array_push($list, $item);
                }
            }
        } else {
            $joins = JobTerms::token_join_query($tokens, 'e');
            if ($type == 'mentor') {
                $count = ', COUNT(DISTINCT pid) AS nb';
                $countjoin = ' INNER JOIN  profile_job_term_relation AS r ON(r.jtid_1 = e.jtid) INNER JOIN  profile_mentor_term AS m ON(r.jtid_2 = m.jtid)';
                $countorder = 'nb DESC, ';
            } else {
                $count = $countjoin = $countorder = '';
            }
            $list = XDB::fetchAllAssoc('SELECT  e.jtid AS id, e.full_name AS field' . $count . '
                                          FROM  profile_job_term_enum AS e ' . $joins . $countjoin . '
                                      GROUP BY  e.jtid
                                      ORDER BY  ' . $countorder . 'field
                                         LIMIT  ' . DirEnumeration::AUTOCOMPLETE_LIMIT);
            $to_cache = '';
            if ($type == 'mentor') {
                foreach ($list as &$item) {
                    $to_cache .= $item['field'] . "\t" . $item['nb'] . "\t" . $item['id'] . "\n";
                    $item['value'] = SearchModule::format_autocomplete($item);
                }
            } else {
                foreach ($list as &$item) {
                    $to_cache .= $item['field'] . "\t" . $item['id'] . "\n";
                    $item['value'] = $item['field'];
                }
            }
        }

        if (count($list) == DirEnumeration::AUTOCOMPLETE_LIMIT && $type == 'nomentor') {
            $list[] = array(
                'value' => '… parcourir les résultats dans un arbre …',
                'field' => '',
                'id'    => -1
            );
        }

        if (!$cached) {
            XDB::query('INSERT INTO  search_autocomplete (name, query, result, generated)
                             VALUES  ({?}, {?}, {?}, NOW())
            ON DUPLICATE KEY UPDATE  result = VALUES(result), generated = VALUES(generated)',
                       $type, $q_normalized, $to_cache);
        }
        echo json_encode($list);
        exit();
    }

    function handler_xnet($page)
    {
        $page->changeTpl('profile/groupesx.tpl');
        $page->setTitle('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 group_members AS m
        INNER JOIN groups AS a ON(m.asso_id = a.id)
         LEFT JOIN group_events AS e ON(e.asso_id = m.asso_id AND e.archive = 0)
             WHERE m.uid = {?} GROUP BY m.asso_id ORDER BY a.nom', S::i('uid'));
        $page->assign('assos', $req->fetchAllAssoc());
    }

    function handler_xnetlogo($page, $id)
    {
        if (is_null($id)) {
            return PL_NOT_FOUND;
        }

        $res = XDB::query('SELECT  logo, logo_mime
                             FROM  groups
                            WHERE  id = {?}', $id);
        list($logo, $logo_mime) = $res->fetchOneRow();

        if (!empty($logo)) {
            pl_cached_dynamic_content_headers($logo_mime);
            echo $logo;
        } else {
            pl_cached_dynamic_content_headers("image/jpeg");
            readfile(dirname(__FILE__) . '/../htdocs/images/dflt_carre.jpg');
        }

        exit;
    }

    function handler_vcard($page, $x = null)
    {
        if (is_null($x)) {
            return PL_NOT_FOUND;
        }

        global $globals;

        if (substr($x, -4) == '.vcf') {
            $x = substr($x, 0, strlen($x) - 4);
        }

        $vcard = new VCard();
        $vcard->addProfile(Profile::get($x, Profile::FETCH_ALL));
        $vcard->show();
    }

    function handler_admin_trombino($page, $login = null, $action = null) {
        $page->changeTpl('profile/admin_trombino.tpl');
        $page->setTitle('Administration - Trombino');

        if (!$login || !($user = User::get($login))) {
            return PL_NOT_FOUND;
        } else {
            $page->assign_by_ref('user', $user);
        }

        switch ($action) {
            case "original":
                PlImage::fromFile("/home/web/trombino/photos" . $user->promo() . "/" . $user->login() . ".jpg", "image/jpeg")->send();
                exit;

            case "new":
                S::assert_xsrf_token();

                $data = file_get_contents($_FILES['userfile']['tmp_name']);
                list($x, $y) = getimagesize($_FILES['userfile']['tmp_name']);
                $mimetype = substr($_FILES['userfile']['type'], 6);
                unlink($_FILES['userfile']['tmp_name']);
                XDB::execute('INSERT INTO  profile_photos (pid, attachmime, attach, x, y)
                                   VALUES  ({?}, {?}, {?}, {?}, {?})
                  ON DUPLICATE KEY UPDATE  attachmime = VALUES(attachmime), attach = VALUES(attach), x = VALUES(x), y = VALUES(y)',
                             $user->profile()->id(), $mimetype, $data, $x, $y);
                break;

            case "delete":
                S::assert_xsrf_token();

                XDB::execute('DELETE FROM profile_photos WHERE pid = {?}', $user->profile()->id());
                break;
        }
    }
    function handler_admin_binets($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Binets');
        $page->assign('title', 'Gestion des binets');
        $table_editor = new PLTableEditor('admin/binets', 'profile_binet_enum', 'id');
        $table_editor->add_join_table('profile_binets','binet_id',true);
        $table_editor->describe('text','intitulé',true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_education($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Formations');
        $page->assign('title', 'Gestion des formations');
        $table_editor = new PLTableEditor('admin/education', 'profile_education_enum', 'id');
        $table_editor->add_join_table('profile_education', 'eduid', true);
        $table_editor->add_join_table('profile_education_degree', 'eduid', true);
        $table_editor->describe('name', 'intitulé', true);
        $table_editor->describe('url', 'site web', false, true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_education_field($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Domaines de formation');
        $page->assign('title', 'Gestion des domaines de formation');
        $table_editor = new PLTableEditor('admin/education_field', 'profile_education_field_enum', 'id', true);
        $table_editor->add_join_table('profile_education', 'fieldid', true);
        $table_editor->describe('field', 'domaine', true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_education_degree($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Niveau de formation');
        $page->assign('title', 'Gestion des niveau de formation');
        $table_editor = new PLTableEditor('admin/education_degree', 'profile_education_degree_enum', 'id');
        $table_editor->add_join_table('profile_education_degree', 'degreeid', true);
        $table_editor->add_join_table('profile_education', 'degreeid', true);
        $table_editor->describe('degree', 'niveau', true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_education_degree_set($page, $action = 'list', $id = null, $id2 = null) {
        $page->setTitle('Administration - Correspondances formations - niveau de formation');
        $page->assign('title', 'Gestion des correspondances formations - niveau de formation');
        $table_editor = new PLTableEditor('admin/education_degree_set', 'profile_education_degree', 'eduid', true, 'degreeid');
        $table_editor->describe('eduid', 'id formation', true);
        $table_editor->describe('degreeid', 'id niveau', true);

        // Adds fields to show the names of education
        $table_editor->add_option_table('profile_education_enum','profile_education_enum.id = eduid');
        $table_editor->add_option_field('profile_education_enum.name', 'edu_name', 'formation', null, 'degreeid');
        // Adds fields to show the names of degrees
        $table_editor->add_option_table('profile_education_degree_enum','profile_education_degree_enum.id = t.degreeid');
        $table_editor->add_option_field('profile_education_degree_enum.degree', 'degree_name', 'niveau');

        $table_editor->apply($page, $action, $id, $id2);
    }
    function handler_admin_sections($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Sections');
        $page->assign('title', 'Gestion des sections');
        $table_editor = new PLTableEditor('admin/sections','profile_section_enum','id');
        $table_editor->describe('text','intitulé',true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_networking($page, $action = 'list', $id = null) {
        $page->assign('xorg_title', 'Polytechnique.org - Administration - Networking');
        $page->assign('title', 'Gestion des types de networking');
        $table_editor = new PLTableEditor('admin/networking', 'profile_networking_enum', 'nwid');
        $table_editor->describe('name', 'intitulé', true);
        $table_editor->describe('icon', 'nom de l\'icône', false, true);
        $table_editor->describe('filter', 'filtre', true);
        $table_editor->describe('link', 'lien web', true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_corps_enum($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Corps');
        $page->assign('title', 'Gestion des Corps');
        $table_editor = new PLTableEditor('admin/corps_enum', 'profile_corps_enum', 'id');
        $table_editor->describe('name', 'intitulé', true);
        $table_editor->describe('abbreviation', 'abbréviation', true);
        $table_editor->describe('still_exists', 'existe encore ?', true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_corps_rank($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Grade dans les Corps');
        $page->assign('title', 'Gestion des grade dans les Corps');
        $table_editor = new PLTableEditor('admin/corps_rank', 'profile_corps_rank_enum', 'id');
        $table_editor->describe('name', 'intitulé', true);
        $table_editor->describe('abbreviation', 'abbréviation', true);
        $table_editor->apply($page, $action, $id);
    }
    function handler_admin_medals($page, $action = 'list', $id = null) {
        $page->setTitle('Administration - Distinctions');
        $page->assign('title', 'Gestion des Distinctions');
        $table_editor = new PLTableEditor('admin/medals','profile_medal_enum','id');
        $table_editor->describe('text', 'intitulé',  true);
        $table_editor->describe('img',  'nom de l\'image', false, true);
        $table_editor->describe('flags', 'valider', true);
        $table_editor->apply($page, $action, $id);
        if ($id && $action == 'edit') {
            $page->changeTpl('profile/admin_decos.tpl');

            $mid = $id;

            if (Post::v('act') == 'del') {
                XDB::execute('DELETE FROM  profile_medal_grade_enum
                                    WHERE  mid={?} AND gid={?}', $mid, Post::i('gid'));
            } else {
                foreach (Post::v('grades', array()) as $gid=>$text) {
                    if ($gid === 0) {
                        if (!empty($text)) {
                            $res = XDB::query('SELECT  MAX(gid)
                                                 FROM  profile_medal_grade_enum
                                                WHERE  mid = {?}', $mid);
                            $gid = $res->fetchOneCell() + 1;

                            XDB::execute('INSERT INTO  profile_medal_grade_enum (mid, gid, text, pos)
                                               VALUES  ({?}, {?}, {?}, {?})',
                                $mid, $gid, $text, $_POST['pos']['0']);
                        }
                    } else {
                        XDB::execute('UPDATE  profile_medal_grade_enum
                                         SET  pos={?}, text={?}
                                       WHERE  gid={?} AND mid={?}', $_POST['pos'][$gid], $text, $gid, $mid);
                    }
                }
            }
            $res = XDB::iterator('SELECT gid, text, pos FROM profile_medal_grade_enum WHERE mid={?} ORDER BY pos', $mid);
            $page->assign('grades', $res);
        }
    }
}

// vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
?>