modules/carnet.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2009 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 class CarnetModule extends PLModule
  23 {
  24     function handlers()
  25     {
  26         return array(
  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),
  30
  31             'carnet/contacts'       => $this->make_hook('contacts', AUTH_COOKIE),
  32             'carnet/contacts/pdf'   => $this->make_hook('pdf',      AUTH_COOKIE, 'user', NO_HTTPS),
  33             'carnet/contacts/ical'  => $this->make_hook('ical',     AUTH_PUBLIC, 'user', NO_HTTPS),
  34             'carnet/contacts/vcard' => $this->make_hook('vcard',    AUTH_COOKIE, 'user', NO_HTTPS),
  35
  36             'carnet/rss'            => $this->make_hook('rss',      AUTH_PUBLIC, 'user', NO_HTTPS),
  37         );
  38     }
  39
  40     function _add_rss_link(&$page)
  41     {
  42         if (!S::has('core_rss_hash')) {
  43             return;
  44         }
  45         $page->setRssLink('Polytechnique.org :: Carnet',
  46                           '/carnet/rss/'.S::v('hruid').'/'.S::v('core_rss_hash').'/rss.xml');
  47     }
  48
  49     function handler_index(&$page)
  50     {
  51         $page->changeTpl('carnet/index.tpl');
  52         $page->setTitle('Mon carnet');
  53         $this->_add_rss_link($page);
  54     }
  55
  56     function handler_panel(&$page)
  57     {
  58         $page->changeTpl('carnet/panel.tpl');
  59
  60         if (Get::has('read')) {
  61             S::set('watch_last', Get::v('read'));
  62             Platal::session()->updateNbNotifs();
  63             pl_redirect('carnet/panel');
  64         }
  65
  66         require_once 'notifs.inc.php';
  67
  68         $page->assign('now',date('YmdHis'));
  69         $notifs = new Notifs(S::v('uid'), true);
  70
  71         $page->assign('notifs', $notifs);
  72         $page->assign('today', date('Y-m-d'));
  73         $this->_add_rss_link($page);
  74     }
  75
  76     function _handler_notifs_promos(&$page, &$watch, $action, $arg)
  77     {
  78         if(preg_match('!^ *(\d{4}) *$!', $arg, $matches)) {
  79             $p = intval($matches[1]);
  80             if($p<1900 || $p>2100) {
  81                 $page->trigError("la promo entrée est invalide");
  82             } else {
  83                 if ($action == 'add_promo') {
  84                     $watch->_promos->add($p);
  85                 } else {
  86                     $watch->_promos->del($p);
  87                 }
  88             }
  89         } elseif (preg_match('!^ *(\d{4}) *- *(\d{4}) *$!', $arg, $matches)) {
  90             $p1 = intval($matches[1]);
  91             $p2 = intval($matches[2]);
  92             if($p1<1900 || $p1>2100) {
  93                 $page->trigError('la première promo de la plage entrée est invalide');
  94             } elseif($p2<1900 || $p2>2100) {
  95                 $page->trigError('la seconde promo de la plage entrée est invalide');
  96             } else {
  97                 if ($action == 'add_promo') {
  98                     $watch->_promos->addRange($p1, $p2);
  99                 } else {
 100                     $watch->_promos->delRange($p1, $p2);
 101                 }
 102             }
 103         } else {
 104             $page->trigError("La promo (ou la plage de promo) entrée est dans un format incorrect.");
 105         }
 106     }
 107
 108     function handler_notifs(&$page, $action = null, $arg = null)
 109     {
 110         $page->changeTpl('carnet/notifs.tpl');
 111
 112         require_once 'notifs.inc.php';
 113
 114         $watch = new Watch(S::v('uid'));
 115
 116         $res = XDB::query("SELECT promo_sortie
 117                                        FROM auth_user_md5
 118                                       WHERE user_id = {?}",
 119                                     S::v('uid', -1));
 120         $promo_sortie = $res->fetchOneCell();
 121         $page->assign('promo_sortie', $promo_sortie);
 122
 123         if ($action) {
 124             S::assert_xsrf_token();
 125         }
 126         switch ($action) {
 127           case 'add_promo':
 128           case 'del_promo':
 129             $this->_handler_notifs_promos($page, $watch, $action, $arg);
 130             break;
 131
 132           case 'del_nonins':
 133             $watch->_nonins->del($arg);
 134             break;
 135
 136           case 'add_nonins':
 137             $watch->_nonins->add($arg);
 138             break;
 139         }
 140
 141         if (Env::has('subs')) {
 142             S::assert_xsrf_token();
 143             $watch->_subs->update('sub');
 144         }
 145
 146         if (Env::has('flags_contacts')) {
 147             S::assert_xsrf_token();
 148             $watch->watch_contacts = Env::b('contacts');
 149             $watch->saveFlags();
 150         }
 151
 152         if (Env::has('flags_mail')) {
 153             S::assert_xsrf_token();
 154             $watch->watch_mail = Env::b('mail');
 155             $watch->saveFlags();
 156         }
 157
 158         $page->assign_by_ref('watch', $watch);
 159     }
 160
 161     function handler_contacts(&$page, $action = null, $subaction = null, $ssaction = null)
 162     {
 163         $page->setTitle('Mes contacts');
 164         $this->_add_rss_link($page);
 165
 166         $uid  = S::v('uid');
 167         $user = Env::v('user');
 168
 169         // For XSRF protection, checks both the normal xsrf token, and the special RSS token.
 170         // It allows direct linking to contact adding in the RSS feed.
 171         if (Env::v('action') && Env::v('token') !== S::v('core_rss_hash')) {
 172             S::assert_xsrf_token();
 173         }
 174         switch (Env::v('action')) {
 175             case 'retirer':
 176                 if (($user = User::get(Env::v('user')))) {
 177                     if (XDB::execute("DELETE FROM  contacts
 178                                             WHERE  uid = {?} AND contact = {?}", $uid, $user->id())) {
 179                         $page->trigSuccess("Contact retiré !");
 180                     }
 181                 }
 182                 break;
 183
 184             case 'ajouter':
 185                 if (($user = User::get(Env::v('user')))) {
 186                     if (XDB::execute("REPLACE INTO  contacts (uid, contact)
 187                                             VALUES  ({?}, {?})", $uid, $user->id())) {
 188                         $page->trigSuccess('Contact ajouté !');
 189                     } else {
 190                         $page->trigWarning('Contact déjà dans la liste !');
 191                     }
 192                 }
 193                 break;
 194         }
 195
 196         $search = false;
 197         if ($action == 'search') {
 198             $action = $subaction;
 199             $subaction = $ssaction;
 200             $search = true;
 201         }
 202         if ($search && trim(Env::v('quick'))) {
 203             require_once 'userset.inc.php';
 204             $base = 'carnet/contacts/search';
 205
 206             Platal::load('search', 'classes.inc.php');
 207             ThrowError::$throwHook = array($this, 'searchErrorHandler');
 208             $view = new SearchSet(true, false, "INNER JOIN contacts AS c2 ON (u.user_id = c2.contact)", "c2.uid = $uid");
 209         } else {
 210             $base = 'carnet/contacts';
 211             $view = new UserSet("INNER JOIN contacts AS c2 ON (u.user_id = c2.contact)", " c2.uid = $uid ");
 212         }
 213         $view->addMod('minifiche', 'Mini-fiches', true);
 214         $view->addMod('trombi', 'Trombinoscope', false, array('with_admin' => false, 'with_promo' => true));
 215         $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'carnet/contacts/search'));
 216         $view->apply($base, $page, $action, $subaction);
 217         if ($action != 'geoloc' || ($search && !$ssaction) || (!$search && !$subaction)) {
 218             $page->changeTpl('carnet/mescontacts.tpl');
 219         }
 220     }
 221
 222     function handler_pdf(&$page, $arg0 = null, $arg1 = null)
 223     {
 224         $this->load('contacts.pdf.inc.php');
 225         require_once 'user.func.inc.php';
 226
 227         Platal::session()->close();
 228
 229         $sql = "SELECT  a.alias
 230                   FROM  aliases       AS a
 231             INNER JOIN  auth_user_md5 AS u ON ( a.id = u.user_id )
 232             INNER JOIN  contacts      AS c ON ( a.id = c.contact )
 233                  WHERE  c.uid = {?} AND a.type='a_vie'";
 234         if ($arg0 == 'promo') {
 235             $sql .= ' ORDER BY  u.promo, u.nom, u.prenom';
 236         } else {
 237             $sql .= ' ORDER BY  u.nom, u.prenom, u.promo';
 238         }
 239
 240         $citer = XDB::iterRow($sql, S::v('uid'));
 241         $pdf   = new ContactsPDF();
 242
 243         while (list($alias) = $citer->next()) {
 244             $user = get_user_details($alias);
 245             foreach ($user as &$value) {
 246                 if (is_utf8($value)) {
 247                     $value = utf8_decode($value);
 248                 }
 249             }
 250             $pdf = ContactsPDF::addContact($pdf, $user, $arg0 == 'photos' || $arg1 == 'photos');
 251         }
 252         $pdf->Output();
 253
 254         exit;
 255     }
 256
 257     function handler_rss(&$page, $user = null, $hash = null)
 258     {
 259         $this->load('feed.inc.php');
 260         $feed = new CarnetFeed();
 261         return $feed->run($page, $user, $hash);
 262     }
 263
 264     function handler_ical(&$page, $alias = null, $hash = null)
 265     {
 266         require_once 'rss.inc.php';
 267         $uid = init_rss(null, $alias, $hash, false);
 268         if (S::logged()) {
 269             if (!$uid) {
 270                 $uid = S::i('uid');
 271             } else if ($uid != S::i('uid')) {
 272                 send_warning_email("Récupération d\'un autre utilisateur ($uid)");
 273             }
 274         } else if (!$uid) {
 275             exit;
 276         }
 277
 278         require_once 'ical.inc.php';
 279         $page->changeTpl('carnet/calendar.tpl', NO_SKIN);
 280         $page->register_function('display_ical', 'display_ical');
 281
 282         $res = XDB::iterRow(
 283                 'SELECT u.prenom,
 284                         IF(u.nom_usage = \'\',u.nom,u.nom_usage) AS nom,
 285                         u.promo,
 286                         u.naissance,
 287                         DATE_ADD(u.naissance, INTERVAL 1 DAY) AS end,
 288                         u.date_ins,
 289                         u.hruid
 290                    FROM contacts      AS c
 291              INNER JOIN auth_user_md5 AS u ON (u.user_id = c.contact)
 292              INNER JOIN aliases       AS a ON (u.user_id = a.id AND a.type = \'a_vie\')
 293                   WHERE c.uid = {?}', $uid);
 294
 295         $annivs = Array();
 296         while (list($prenom, $nom, $promo, $naissance, $end, $ts, $hruid) = $res->next()) {
 297             $naissance = str_replace('-', '', $naissance);
 298             $end       = str_replace('-', '', $end);
 299             $annivs[] = array(
 300                 'timestamp' => strtotime($ts),
 301                 'date'      => $naissance,
 302                 'tomorrow'  => $end,
 303                 'hruid'     => $hruid,
 304                 'summary'   => 'Anniversaire de '.$prenom
 305                                 .' '.$nom.' - x '.$promo,
 306             );
 307         }
 308         $page->assign('events', $annivs);
 309
 310         header('Content-Type: text/calendar; charset=utf-8');
 311     }
 312
 313     function handler_vcard(&$page, $photos = null)
 314     {
 315         $res = XDB::query('SELECT contact
 316                              FROM contacts
 317                             WHERE uid = {?}', S::v('uid'));
 318         $vcard = new VCard($photos == 'photos');
 319         $vcard->addUsers($res->fetchColumn());
 320         $vcard->show();
 321     }
 322 }
 323
 324 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 325 ?>