[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/rss'          => $this->make_hook('rss',      AUTH_PUBLIC),
            'carnet/ical'         => $this->make_hook('ical',     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->assign('xorg_rss',
                      array('title' => 'Polytechnique.org :: Carnet',
                            'href'  => '/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');

        $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') {
            require_once 'trombi.inc.php';

            $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->addContact($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 dirname(__FILE__).'/carnet/smarty.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');
    }
}

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