[platal.git] / modules / carnet.php

<?php
/***************************************************************************
 *  Copyright (C) 2003-2006 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 CarnetModule extends PLModule
{
    function handlers()
    {
        return array(
            'carnet'                => $this->make_hook('index',    AUTH_COOKIE),
            'carnet/panel'          => $this->make_hook('panel',    AUTH_COOKIE),
            'carnet/notifs'         => $this->make_hook('notifs',   AUTH_COOKIE),

            'carnet/contacts'       => $this->make_hook('contacts', AUTH_COOKIE),
            'carnet/contacts/pdf'   => $this->make_hook('pdf',      AUTH_COOKIE),
            'carnet/contacts/ical'  => $this->make_hook('ical',     AUTH_COOKIE),
            'carnet/contacts/vcard' => $this->make_hook('vcard',    AUTH_COOKIE),

            'carnet/rss'            => $this->make_hook('rss',      AUTH_PUBLIC),
        );
    }

    function on_subscribe($forlife, $uid, $promo, $password)
    {
        require_once 'notifs.inc.php';
        register_watch_op($uid, WATCH_INSCR);
        inscription_notifs_base($uid);
    }

    function _add_rss_link(&$page)
    {
        if (!S::has('core_rss_hash')) {
            return;
        }
        $page->setRssLink('Polytechnique.org :: Carnet',
                          '/carnet/rss/'.S::v('forlife') .'/'.S::v('core_rss_hash').'/rss.xml');
    }

    function handler_index(&$page)
    {
        $page->changeTpl('carnet/index.tpl');
        $page->assign('xorg_title','Polytechnique.org - Mon carnet');
        $this->_add_rss_link($page);
    }

    function handler_panel(&$page)
    {
        $page->changeTpl('carnet/panel.tpl');

        if (Get::has('read')) {
            $_SESSION['watch_last'] = Get::v('read');
            pl_redirect('carnet/panel');
        }

        require_once 'notifs.inc.php';

        $page->assign('now',date('YmdHis'));
        $notifs = new Notifs(S::v('uid'), true);

        $page->assign('notifs', $notifs);
        $page->assign('today', date('Y-m-d'));
        $this->_add_rss_link($page);
    }

    function _handler_notifs_promos(&$page, &$watch, $action, $arg)
    {
        if(preg_match('!^ *(\d{4}) *$!', $arg, $matches)) {
            $p = intval($matches[1]);
            if($p<1900 || $p>2100) {
                $page->trig("la promo entr�e est invalide");
            } else {
                if ($action == 'add_promo') {
                    $watch->_promos->add($p);
                } else {
                    $watch->_promos->del($p);
                }
            }
        } elseif (preg_match('!^ *(\d{4}) *- *(\d{4}) *$!', $arg, $matches)) {
            $p1 = intval($matches[1]);
            $p2 = intval($matches[2]);
            if($p1<1900 || $p1>2100) {
                $page->trig('la premi�re promo de la plage entr�e est invalide');
            } elseif($p2<1900 || $p2>2100) {
                $page->trig('la seconde promo de la plage entr�e est invalide');
            } else {
                if ($action == 'add_promo') {
                    $watch->_promos->addRange($p1, $p2);
                } else {
                    $watch->_promos->delRange($p1, $p2);
                }
            }
        } else {
            $page->trig("La promo (ou la plage de promo) entr�e est dans un format incorrect.");
        }
    }

    function handler_notifs(&$page, $action = null, $arg = null)
    {
        $page->changeTpl('carnet/notifs.tpl');

        require_once 'notifs.inc.php';

        $watch = new Watch(S::v('uid'));

        $res = XDB::query("SELECT promo_sortie
                                       FROM auth_user_md5
                                      WHERE user_id = {?}",
                                    S::v('uid', -1));
        $promo_sortie = $res->fetchOneCell();
        $page->assign('promo_sortie', $promo_sortie);

        switch ($action) {
          case 'add_promo':
          case 'del_promo':
            $this->_handler_notifs_promos($page, $watch, $action, $arg);
            break;

          case 'del_nonins':
            $watch->_nonins->del($arg);
            break;

          case 'add_nonins':
            $watch->_nonins->add($arg);
            break;
        }

        if (Env::has('subs'))       $watch->_subs->update('sub');
        if (Env::has('flags_contacts')) {
            $watch->watch_contacts = Env::b('contacts');
            $watch->saveFlags();
        }
        if (Env::has('flags_mail')) {
            $watch->watch_mail     = Env::b('mail');
            $watch->saveFlags();
        }

        $page->assign_by_ref('watch', $watch);
    }

    function _get_list($offset, $limit) {
        $uid   = S::v('uid');
        $res   = XDB::query("SELECT COUNT(*) FROM contacts WHERE uid = {?}", $uid);
        $total = $res->fetchOneCell();

        $order = Get::v('order');
        $orders = Array(
            'nom'     => 'nom DESC, u.prenom, u.promo',
            'promo'   => 'promo DESC, nom, u.prenom',
            'last'    => 'u.date DESC, nom, u.prenom, promo');
        if ($order != 'promo' && $order != 'last')
            $order = 'nom';
        $order = $orders[$order];
        if (Get::v('inv') == '')
            $order = str_replace(" DESC,", ",", $order);

        $res   = XDB::query("
                SELECT  u.prenom, IF(u.nom_usage='',u.nom,u.nom_usage) AS nom, a.alias AS forlife, u.promo
                  FROM  contacts       AS c
            INNER JOIN  auth_user_md5  AS u   ON (u.user_id = c.contact)
            INNER JOIN  aliases        AS a   ON (u.user_id = a.id AND a.type='a_vie')
                 WHERE  c.uid = {?}
              ORDER BY  $order
                 LIMIT  {?}, {?}", $uid, $offset*$limit, $limit);
        $list  = $res->fetchAllAssoc();

        return Array($total, $list);
    }

    function handler_contacts(&$page, $action = null)
    {
        $page->changeTpl('carnet/mescontacts.tpl');
        require_once("applis.func.inc.php");
        $page->assign('xorg_title','Polytechnique.org - Mes contacts');
        $this->_add_rss_link($page);

        $uid  = S::v('uid');
        $user = Env::v('user');

        switch (Env::v('action')) {
            case 'retirer':
                if (is_numeric($user)) {
                    if (XDB::execute('DELETE FROM contacts
                                                      WHERE uid = {?} AND contact = {?}',
                                               $uid, $user))
                    {
                        $page->trig("Contact retir� !");
                    }
                } else {
                    if (XDB::execute(
                                'DELETE FROM  contacts
                                       USING  contacts AS c
                                  INNER JOIN  aliases  AS a ON (c.contact=a.id and a.type!="homonyme")
                                       WHERE  c.uid = {?} AND a.alias={?}', $uid, $user))
                    {
                        $page->trig("Contact retir� !");
                    }
                }
                break;

            case 'ajouter':
                require_once('user.func.inc.php');
                if (($login = get_user_login($user)) !== false) {
                    if (XDB::execute(
                                'INSERT INTO  contacts (uid, contact)
                                      SELECT  {?}, id
                                        FROM  aliases
                                       WHERE  alias = {?}', $uid, $login))
                    {
                        $page->trig('Contact ajout� !');
                    } else {
                        $page->trig('Contact d�j� dans la liste !');
                    }
                }
        }

        if ($action == 'trombi') {
            $trombi = new Trombi(array($this, '_get_list'));
            $trombi->setNbRows(4);
            $page->assign_by_ref('trombi',$trombi);

            $order = Get::v('order');
            if ($order != 'promo' && $order != 'last')
                $order = 'nom';
            $page->assign('order', $order);
            $page->assign('inv', Get::v('inv'));

        } else {

            $order = Get::v('order');
            $orders = Array(
                'nom'     => 'sortkey DESC, a.prenom, a.promo',
                'promo'   => 'promo DESC, sortkey, a.prenom',
                'last'    => 'a.date DESC, sortkey, a.prenom, promo');
            if ($order != 'promo' && $order != 'last')
                $order = 'nom';
            $page->assign('order', $order);
            $page->assign('inv', Get::v('inv'));
            $order = $orders[$order];
            if (Get::v('inv') == '')
                $order = str_replace(" DESC,", ",", $order);

            $sql = "SELECT  contact AS id,
                            a.*, l.alias AS forlife,
                            1 AS inscrit,
                            a.perms != 'pending' AS wasinscrit,
                            a.deces != 0 AS dcd, a.deces, a.matricule_ax,
                            FIND_IN_SET('femme', a.flags) AS sexe,
                            e.entreprise, es.label AS secteur, ef.fonction_fr AS fonction,
                            IF(n.nat='',n.pays,n.nat) AS nat, n.a2 AS iso3166,
                            ad0.text AS app0text, ad0.url AS app0url, ai0.type AS app0type,
                            ad1.text AS app1text, ad1.url AS app1url, ai1.type AS app1type,
                            adr.city, gp.a2, gp.pays AS countrytxt, gr.name AS region,
                            IF(a.nom_usage<>'',a.nom_usage,a.nom) AS sortkey,
                            COUNT(em.email) > 0 AS actif
                      FROM  contacts       AS c
                INNER JOIN  auth_user_md5  AS a   ON (a.user_id = c.contact)
                INNER JOIN  aliases        AS l   ON (a.user_id = l.id AND l.type='a_vie')
                 LEFT JOIN  entreprises    AS e   ON (e.entrid = 0 AND e.uid = a.user_id)
                 LEFT JOIN  emploi_secteur AS es  ON (e.secteur = es.id)
                 LEFT JOIN  fonctions_def  AS ef  ON (e.fonction = ef.id)
                 LEFT JOIN  geoloc_pays    AS n   ON (a.nationalite = n.a2)
                 LEFT JOIN  applis_ins     AS ai0 ON (a.user_id = ai0.uid AND ai0.ordre = 0)
                 LEFT JOIN  applis_def     AS ad0 ON (ad0.id = ai0.aid)
                 LEFT JOIN  applis_ins     AS ai1 ON (a.user_id = ai1.uid AND ai1.ordre = 1)
                 LEFT JOIN  applis_def     AS ad1 ON (ad1.id = ai1.aid)
                 LEFT JOIN  adresses       AS adr ON (a.user_id = adr.uid
                                                      AND FIND_IN_SET('active', adr.statut))
                 LEFT JOIN  geoloc_pays    AS gp  ON (adr.country = gp.a2)
                 LEFT JOIN  geoloc_region  AS gr  ON (adr.country = gr.a2 AND adr.region = gr.region)
                 LEFT JOIN  emails         AS em  ON (em.uid = a.user_id AND em.flags = 'active')
                     WHERE  c.uid = $uid
                  GROUP BY  a.user_id
                  ORDER BY  ".$order;

            $page->assign('citer', XDB::iterator($sql));
        }
    }

    function handler_pdf(&$page, $arg0 = null, $arg1 = null)
    {
        require_once dirname(__FILE__).'/carnet/contacts.pdf.inc.php';
        require_once 'user.func.inc.php';

        session_write_close();

        $sql = "SELECT  a.alias
                  FROM  aliases       AS a
            INNER JOIN  auth_user_md5 AS u ON ( a.id = u.user_id )
            INNER JOIN  contacts      AS c ON ( a.id = c.contact )
                 WHERE  c.uid = {?} AND a.type='a_vie'";
        if ($arg0 == 'promo') {
            $sql .= ' ORDER BY  u.promo, u.nom, u.prenom';
        } else {
            $sql .= ' ORDER BY  u.nom, u.prenom, u.promo';
        }

        $citer = XDB::iterRow($sql, S::v('uid'));
        $pdf   = new ContactsPDF();

        while (list($alias) = $citer->next()) {
            $user = get_user_details($alias);
            $pdf = ContactsPDF::addContact($pdf, $user, $arg0 == 'photos' || $arg1 == 'photos');
        }
        $pdf->Output();

        exit;
    }

    function handler_rss(&$page, $user = null, $hash = null)
    {
        require_once 'rss.inc.php';
        require_once 'notifs.inc.php';

        $uid    = init_rss('carnet/rss.tpl', $user, $hash);
        $notifs = new Notifs($uid, false);
        $page->assign('notifs', $notifs);
    }

    function handler_ical(&$page)
    {
        require_once 'ical.inc.php';
        $page->changeTpl('carnet/calendar.tpl', NO_SKIN);
        $page->register_function('display_ical', 'display_ical');

        $res = XDB::iterRow(
                'SELECT u.prenom,
                        IF(u.nom_usage = \'\',u.nom,u.nom_usage) AS nom,
                        u.promo,
                        u.naissance,
                        DATE_ADD(u.naissance, INTERVAL 1 DAY) AS end,
                        u.date_ins,
                        a.alias AS forlife
                   FROM contacts      AS c
             INNER JOIN auth_user_md5 AS u ON (u.user_id = c.contact)
             INNER JOIN aliases       AS a ON (u.user_id = a.id AND a.type = \'a_vie\')
                  WHERE c.uid = {?}', S::v('uid'));

        $annivs = Array();
        while (list($prenom, $nom, $promo, $naissance, $end, $ts, $forlife) = $res->next()) {
            $naissance = str_replace('-', '', $naissance);
            $end       = str_replace('-', '', $end);
            $annivs[] = array(
                'timestamp' => strtotime($ts),
                'date'      => $naissance,
                'tomorrow'  => $end,
                'forlife'   => $forlife,
                'summary'   => 'Anniversaire de '.$prenom
                                .' '.$nom.' - x '.$promo,
            );
        }
        $page->assign('events', $annivs);

        header('Content-Type: text/calendar; charset=utf-8');
    }

    function handler_vcard(&$page, $photos = null)
    {
        $res = XDB::query('SELECT contact
                             FROM contacts
                            WHERE uid = {?}', S::v('uid'));

        require_once('vcard.inc.php');
        $vcard = new VCard($res->fetchColumn(), $photos == 'photos');
        $vcard->do_page(&$page);
    }
}

?>
Commit	Line	Data
0337d704	1	<?php
0337d704	2	/***************************************************************************
50a40a33	3	* Copyright (C) 2003-2006 Polytechnique.org *
0337d704	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
c9f82d49	22	class CarnetModule extends PLModule
	23	{
	24	function handlers()
	25	{
	26	return array(
5e193297	27	'carnet' => $this->make_hook('index', AUTH_COOKIE),
	28	'carnet/panel' => $this->make_hook('panel', AUTH_COOKIE),
	29	'carnet/notifs' => $this->make_hook('notifs', AUTH_COOKIE),
fc12cbd1	30
5e193297	31	'carnet/contacts' => $this->make_hook('contacts', AUTH_COOKIE),
	32	'carnet/contacts/pdf' => $this->make_hook('pdf', AUTH_COOKIE),
	33	'carnet/contacts/ical' => $this->make_hook('ical', AUTH_COOKIE),
	34	'carnet/contacts/vcard' => $this->make_hook('vcard', AUTH_COOKIE),
b48a0758	35
5e193297	36	'carnet/rss' => $this->make_hook('rss', AUTH_PUBLIC),
c9f82d49	37	);
c9f82d49	38	}
0337d704	39
8d8f7607	40	function on_subscribe($forlife, $uid, $promo, $password)
	41	{
	42	require_once 'notifs.inc.php';
	43	register_watch_op($uid, WATCH_INSCR);
	44	inscription_notifs_base($uid);
	45	}
	46
fc12cbd1	47	function _add_rss_link(&$page)
fc12cbd1	48	{
cab08090	49	if (!S::has('core_rss_hash')) {
fc12cbd1	50	return;
fd8f77de	51	}
162370e7	52	$page->setRssLink('Polytechnique.org :: Carnet',
162370e7	53	'/carnet/rss/'.S::v('forlife') .'/'.S::v('core_rss_hash').'/rss.xml');
fc12cbd1	54	}
fc12cbd1	55
b48a0758	56	function handler_index(&$page)
	57	{
	58	$page->changeTpl('carnet/index.tpl');
	59	$page->assign('xorg_title','Polytechnique.org - Mon carnet');
	60	$this->_add_rss_link($page);
b48a0758	61	}
b48a0758	62
fc12cbd1	63	function handler_panel(&$page)
	64	{
	65	$page->changeTpl('carnet/panel.tpl');
	66
	67	if (Get::has('read')) {
5e2307dc	68	$_SESSION['watch_last'] = Get::v('read');
8b00e0e0	69	pl_redirect('carnet/panel');
fc12cbd1	70	}
	71
	72	require_once 'notifs.inc.php';
	73
	74	$page->assign('now',date('YmdHis'));
cab08090	75	$notifs = new Notifs(S::v('uid'), true);
fc12cbd1	76
	77	$page->assign('notifs', $notifs);
	78	$page->assign('today', date('Y-m-d'));
	79	$this->_add_rss_link($page);
fc12cbd1	80	}
fc12cbd1	81
b48a0758	82	function _handler_notifs_promos(&$page, &$watch, $action, $arg)
	83	{
	84	if(preg_match('!^ (\d{4}) $!', $arg, $matches)) {
	85	$p = intval($matches[1]);
	86	if($p<1900 \|\| $p>2100) {
089a5801	87	$page->trig("la promo entr�e est invalide");
b48a0758	88	} else {
	89	if ($action == 'add_promo') {
	90	$watch->_promos->add($p);
	91	} else {
	92	$watch->_promos->del($p);
	93	}
	94	}
	95	} elseif (preg_match('!^ (\d{4}) - (\d{4}) $!', $arg, $matches)) {
	96	$p1 = intval($matches[1]);
	97	$p2 = intval($matches[2]);
	98	if($p1<1900 \|\| $p1>2100) {
089a5801	99	$page->trig('la premi�re promo de la plage entr�e est invalide');
b48a0758	100	} elseif($p2<1900 \|\| $p2>2100) {
089a5801	101	$page->trig('la seconde promo de la plage entr�e est invalide');
b48a0758	102	} else {
	103	if ($action == 'add_promo') {
	104	$watch->_promos->addRange($p1, $p2);
	105	} else {
	106	$watch->_promos->delRange($p1, $p2);
	107	}
	108	}
	109	} else {
089a5801	110	$page->trig("La promo (ou la plage de promo) entr�e est dans un format incorrect.");
b48a0758	111	}
	112	}
	113
	114	function handler_notifs(&$page, $action = null, $arg = null)
	115	{
b48a0758	116	$page->changeTpl('carnet/notifs.tpl');
	117
	118	require_once 'notifs.inc.php';
	119
cab08090	120	$watch = new Watch(S::v('uid'));
b48a0758	121
08cce2ff	122	$res = XDB::query("SELECT promo_sortie
b48a0758	123	FROM auth_user_md5
b48a0758	124	WHERE user_id = {?}",
cab08090	125	S::v('uid', -1));
b48a0758	126	$promo_sortie = $res->fetchOneCell();
	127	$page->assign('promo_sortie', $promo_sortie);
	128
	129	switch ($action) {
	130	case 'add_promo':
	131	case 'del_promo':
	132	$this->_handler_notifs_promos($page, $watch, $action, $arg);
	133	break;
	134
	135	case 'del_nonins':
	136	$watch->_nonins->del($arg);
	137	break;
	138
	139	case 'add_nonins':
	140	$watch->_nonins->add($arg);
	141	break;
	142	}
	143
	144	if (Env::has('subs')) $watch->_subs->update('sub');
	145	if (Env::has('flags_contacts')) {
5e2307dc	146	$watch->watch_contacts = Env::b('contacts');
b48a0758	147	$watch->saveFlags();
	148	}
	149	if (Env::has('flags_mail')) {
5e2307dc	150	$watch->watch_mail = Env::b('mail');
b48a0758	151	$watch->saveFlags();
	152	}
	153
	154	$page->assign_by_ref('watch', $watch);
b48a0758	155	}
	156
	157	function _get_list($offset, $limit) {
cab08090	158	$uid = S::v('uid');
08cce2ff	159	$res = XDB::query("SELECT COUNT(*) FROM contacts WHERE uid = {?}", $uid);
b48a0758	160	$total = $res->fetchOneCell();
b48a0758	161
5e2307dc	162	$order = Get::v('order');
b48a0758	163	$orders = Array(
	164	'nom' => 'nom DESC, u.prenom, u.promo',
	165	'promo' => 'promo DESC, nom, u.prenom',
	166	'last' => 'u.date DESC, nom, u.prenom, promo');
	167	if ($order != 'promo' && $order != 'last')
	168	$order = 'nom';
	169	$order = $orders[$order];
5e2307dc	170	if (Get::v('inv') == '')
b48a0758	171	$order = str_replace(" DESC,", ",", $order);
b48a0758	172
08cce2ff	173	$res = XDB::query("
b48a0758	174	SELECT u.prenom, IF(u.nom_usage='',u.nom,u.nom_usage) AS nom, a.alias AS forlife, u.promo
	175	FROM contacts AS c
	176	INNER JOIN auth_user_md5 AS u ON (u.user_id = c.contact)
	177	INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type='a_vie')
	178	WHERE c.uid = {?}
	179	ORDER BY $order
	180	LIMIT {?}, {?}", $uid, $offset*$limit, $limit);
	181	$list = $res->fetchAllAssoc();
	182
	183	return Array($total, $list);
	184	}
	185
	186	function handler_contacts(&$page, $action = null)
	187	{
b48a0758	188	$page->changeTpl('carnet/mescontacts.tpl');
	189	require_once("applis.func.inc.php");
	190	$page->assign('xorg_title','Polytechnique.org - Mes contacts');
59a61432	191	$this->_add_rss_link($page);
b48a0758	192
cab08090	193	$uid = S::v('uid');
5e2307dc	194	$user = Env::v('user');
b48a0758	195
5e2307dc	196	switch (Env::v('action')) {
b48a0758	197	case 'retirer':
b48a0758	198	if (is_numeric($user)) {
08cce2ff	199	if (XDB::execute('DELETE FROM contacts
b48a0758	200	WHERE uid = {?} AND contact = {?}',
	201	$uid, $user))
	202	{
089a5801	203	$page->trig("Contact retir� !");
b48a0758	204	}
b48a0758	205	} else {
08cce2ff	206	if (XDB::execute(
b48a0758	207	'DELETE FROM contacts
	208	USING contacts AS c
	209	INNER JOIN aliases AS a ON (c.contact=a.id and a.type!="homonyme")
	210	WHERE c.uid = {?} AND a.alias={?}', $uid, $user))
	211	{
089a5801	212	$page->trig("Contact retir� !");
b48a0758	213	}
	214	}
	215	break;
	216
	217	case 'ajouter':
	218	require_once('user.func.inc.php');
	219	if (($login = get_user_login($user)) !== false) {
08cce2ff	220	if (XDB::execute(
b48a0758	221	'INSERT INTO contacts (uid, contact)
	222	SELECT {?}, id
	223	FROM aliases
	224	WHERE alias = {?}', $uid, $login))
	225	{
089a5801	226	$page->trig('Contact ajout� !');
b48a0758	227	} else {
089a5801	228	$page->trig('Contact d�j� dans la liste !');
b48a0758	229	}
	230	}
	231	}
	232
	233	if ($action == 'trombi') {
b48a0758	234	$trombi = new Trombi(array($this, '_get_list'));
	235	$trombi->setNbRows(4);
	236	$page->assign_by_ref('trombi',$trombi);
	237
5e2307dc	238	$order = Get::v('order');
b48a0758	239	if ($order != 'promo' && $order != 'last')
	240	$order = 'nom';
	241	$page->assign('order', $order);
5e2307dc	242	$page->assign('inv', Get::v('inv'));
b48a0758	243
	244	} else {
	245
5e2307dc	246	$order = Get::v('order');
b48a0758	247	$orders = Array(
	248	'nom' => 'sortkey DESC, a.prenom, a.promo',
	249	'promo' => 'promo DESC, sortkey, a.prenom',
	250	'last' => 'a.date DESC, sortkey, a.prenom, promo');
	251	if ($order != 'promo' && $order != 'last')
	252	$order = 'nom';
	253	$page->assign('order', $order);
5e2307dc	254	$page->assign('inv', Get::v('inv'));
b48a0758	255	$order = $orders[$order];
5e2307dc	256	if (Get::v('inv') == '')
b48a0758	257	$order = str_replace(" DESC,", ",", $order);
	258
	259	$sql = "SELECT contact AS id,
	260	a.*, l.alias AS forlife,
	261	1 AS inscrit,
	262	a.perms != 'pending' AS wasinscrit,
	263	a.deces != 0 AS dcd, a.deces, a.matricule_ax,
	264	FIND_IN_SET('femme', a.flags) AS sexe,
	265	e.entreprise, es.label AS secteur, ef.fonction_fr AS fonction,
	266	IF(n.nat='',n.pays,n.nat) AS nat, n.a2 AS iso3166,
	267	ad0.text AS app0text, ad0.url AS app0url, ai0.type AS app0type,
	268	ad1.text AS app1text, ad1.url AS app1url, ai1.type AS app1type,
	269	adr.city, gp.a2, gp.pays AS countrytxt, gr.name AS region,
e0210288	270	IF(a.nom_usage<>'',a.nom_usage,a.nom) AS sortkey,
e0210288	271	COUNT(em.email) > 0 AS actif
b48a0758	272	FROM contacts AS c
	273	INNER JOIN auth_user_md5 AS a ON (a.user_id = c.contact)
	274	INNER JOIN aliases AS l ON (a.user_id = l.id AND l.type='a_vie')
	275	LEFT JOIN entreprises AS e ON (e.entrid = 0 AND e.uid = a.user_id)
	276	LEFT JOIN emploi_secteur AS es ON (e.secteur = es.id)
	277	LEFT JOIN fonctions_def AS ef ON (e.fonction = ef.id)
	278	LEFT JOIN geoloc_pays AS n ON (a.nationalite = n.a2)
	279	LEFT JOIN applis_ins AS ai0 ON (a.user_id = ai0.uid AND ai0.ordre = 0)
	280	LEFT JOIN applis_def AS ad0 ON (ad0.id = ai0.aid)
	281	LEFT JOIN applis_ins AS ai1 ON (a.user_id = ai1.uid AND ai1.ordre = 1)
	282	LEFT JOIN applis_def AS ad1 ON (ad1.id = ai1.aid)
	283	LEFT JOIN adresses AS adr ON (a.user_id = adr.uid
	284	AND FIND_IN_SET('active', adr.statut))
	285	LEFT JOIN geoloc_pays AS gp ON (adr.country = gp.a2)
	286	LEFT JOIN geoloc_region AS gr ON (adr.country = gr.a2 AND adr.region = gr.region)
e0210288	287	LEFT JOIN emails AS em ON (em.uid = a.user_id AND em.flags = 'active')
b48a0758	288	WHERE c.uid = $uid
e0210288	289	GROUP BY a.user_id
b48a0758	290	ORDER BY ".$order;
b48a0758	291
cfa54940	292	$page->assign('citer', XDB::iterator($sql));
b48a0758	293	}
b48a0758	294	}
	295
	296	function handler_pdf(&$page, $arg0 = null, $arg1 = null)
	297	{
ee5990c7	298	require_once dirname(__FILE__).'/carnet/contacts.pdf.inc.php';
b48a0758	299	require_once 'user.func.inc.php';
	300
	301	session_write_close();
	302
	303	$sql = "SELECT a.alias
	304	FROM aliases AS a
	305	INNER JOIN auth_user_md5 AS u ON ( a.id = u.user_id )
	306	INNER JOIN contacts AS c ON ( a.id = c.contact )
	307	WHERE c.uid = {?} AND a.type='a_vie'";
	308	if ($arg0 == 'promo') {
	309	$sql .= ' ORDER BY u.promo, u.nom, u.prenom';
	310	} else {
	311	$sql .= ' ORDER BY u.nom, u.prenom, u.promo';
	312	}
	313
cab08090	314	$citer = XDB::iterRow($sql, S::v('uid'));
b48a0758	315	$pdf = new ContactsPDF();
	316
	317	while (list($alias) = $citer->next()) {
	318	$user = get_user_details($alias);
93c099e1	319	$pdf = ContactsPDF::addContact($pdf, $user, $arg0 == 'photos' \|\| $arg1 == 'photos');
b48a0758	320	}
	321	$pdf->Output();
	322
	323	exit;
	324	}
	325
c9f82d49	326	function handler_rss(&$page, $user = null, $hash = null)
	327	{
	328	require_once 'rss.inc.php';
	329	require_once 'notifs.inc.php';
0337d704	330
c9f82d49	331	$uid = init_rss('carnet/rss.tpl', $user, $hash);
	332	$notifs = new Notifs($uid, false);
	333	$page->assign('notifs', $notifs);
c9f82d49	334	}
fbfb06dc	335
62e6d100	336	function handler_ical(&$page)
fbfb06dc	337	{
99544d53	338	require_once 'ical.inc.php';
801fcad8	339	$page->changeTpl('carnet/calendar.tpl', NO_SKIN);
3585b0c8	340	$page->register_function('display_ical', 'display_ical');
fbfb06dc	341
f3b3f363	342	$res = XDB::iterRow(
	343	'SELECT u.prenom,
	344	IF(u.nom_usage = \'\',u.nom,u.nom_usage) AS nom,
	345	u.promo,
	346	u.naissance,
	347	DATE_ADD(u.naissance, INTERVAL 1 DAY) AS end,
	348	u.date_ins,
	349	a.alias AS forlife
	350	FROM contacts AS c
	351	INNER JOIN auth_user_md5 AS u ON (u.user_id = c.contact)
	352	INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type = \'a_vie\')
	353	WHERE c.uid = {?}', S::v('uid'));
	354
	355	$annivs = Array();
	356	while (list($prenom, $nom, $promo, $naissance, $end, $ts, $forlife) = $res->next()) {
	357	$naissance = str_replace('-', '', $naissance);
	358	$end = str_replace('-', '', $end);
	359	$annivs[] = array(
	360	'timestamp' => strtotime($ts),
	361	'date' => $naissance,
	362	'tomorrow' => $end,
	363	'forlife' => $forlife,
	364	'summary' => 'Anniversaire de '.$prenom
	365	.' '.$nom.' - x '.$promo,
	366	);
fbfb06dc	367	}
f3b3f363	368	$page->assign('events', $annivs);
fbfb06dc	369
fbfb06dc	370	header('Content-Type: text/calendar; charset=utf-8');
fbfb06dc	371	}
5e193297	372
917c4d11	373	function handler_vcard(&$page, $photos = null)
5e193297	374	{
	375	$res = XDB::query('SELECT contact
	376	FROM contacts
	377	WHERE uid = {?}', S::v('uid'));
917c4d11	378
5e193297	379	require_once('vcard.inc.php');
917c4d11	380	$vcard = new VCard($res->fetchColumn(), $photos == 'photos');
5e193297	381	$vcard->do_page(&$page);
5e193297	382	}
4da0b8d7	383	}
c9f82d49	384
c9f82d49	385	?>