Fix the edition of event subscription for non member
[platal.git] / modules / carnet.php
CommitLineData
0337d704 1<?php
2/***************************************************************************
5ddeb07c 3 * Copyright (C) 2003-2007 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 22class 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),
8fc4efa3 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),
b48a0758 35
8fc4efa3 36 'carnet/rss' => $this->make_hook('rss', AUTH_PUBLIC, 'user', NO_HTTPS),
c9f82d49 37 );
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)
48 {
cab08090 49 if (!S::has('core_rss_hash')) {
fc12cbd1 50 return;
fd8f77de 51 }
162370e7 52 $page->setRssLink('Polytechnique.org :: Carnet',
53 '/carnet/rss/'.S::v('forlife') .'/'.S::v('core_rss_hash').'/rss.xml');
fc12cbd1 54 }
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 }
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 }
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) {
a7de4ef7 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) {
a7de4ef7 99 $page->trig('la première promo de la plage entrée est invalide');
b48a0758 100 } elseif($p2<1900 || $p2>2100) {
a7de4ef7 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 {
a7de4ef7 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
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();
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);
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
3b2f9d11 186 function searchErrorHandler($explain) {
187 global $page;
188 $page->trig($explain);
189 $this->handler_contacts($page);
190 }
191
a2aa8436 192 function handler_contacts(&$page, $action = null, $subaction = null, $ssaction = null)
b48a0758 193 {
b48a0758 194 $page->assign('xorg_title','Polytechnique.org - Mes contacts');
59a61432 195 $this->_add_rss_link($page);
b48a0758 196
cab08090 197 $uid = S::v('uid');
5e2307dc 198 $user = Env::v('user');
b48a0758 199
5e2307dc 200 switch (Env::v('action')) {
b48a0758 201 case 'retirer':
202 if (is_numeric($user)) {
08cce2ff 203 if (XDB::execute('DELETE FROM contacts
8c4a0c30 204 WHERE uid = {?} AND contact = {?}',
205 $uid, $user))
b48a0758 206 {
a7de4ef7 207 $page->trig("Contact retiré !");
b48a0758 208 }
209 } else {
08cce2ff 210 if (XDB::execute(
e2f609cd 211 'DELETE FROM c
b48a0758 212 USING contacts AS c
213 INNER JOIN aliases AS a ON (c.contact=a.id and a.type!="homonyme")
214 WHERE c.uid = {?} AND a.alias={?}', $uid, $user))
215 {
a7de4ef7 216 $page->trig("Contact retiré !");
b48a0758 217 }
218 }
219 break;
220
221 case 'ajouter':
222 require_once('user.func.inc.php');
223 if (($login = get_user_login($user)) !== false) {
08cce2ff 224 if (XDB::execute(
51e10229 225 'REPLACE INTO contacts (uid, contact)
226 SELECT {?}, id
227 FROM aliases
228 WHERE alias = {?}', $uid, $login))
b48a0758 229 {
a7de4ef7 230 $page->trig('Contact ajouté !');
b48a0758 231 } else {
a7de4ef7 232 $page->trig('Contact déjà dans la liste !');
b48a0758 233 }
234 }
235 }
236
a2aa8436 237 $search = false;
238 if ($action == 'search') {
239 $action = $subaction;
240 $subaction = $ssaction;
241 $search = true;
242 }
243 if ($search && trim(Env::v('quick'))) {
244 require_once 'userset.inc.php';
245 $base = 'carnet/contacts/search';
3b2f9d11 246
247 require_once(dirname(__FILE__) . '/search/classes.inc.php');
248 ThrowError::$throwHook = array($this, 'searchErrorHandler');
249 $view = new SearchSet(true, false, "INNER JOIN contacts AS c2 ON (u.user_id = c2.contact)", "c2.uid = $uid");
a2aa8436 250 } else {
251 $base = 'carnet/contacts';
252 $view = new UserSet("INNER JOIN contacts AS c2 ON (u.user_id = c2.contact)", " c2.uid = $uid ");
253 }
8c4a0c30 254 $view->addMod('minifiche', 'Mini-Fiches', true);
255 $view->addMod('trombi', 'Trombinoscope', false, array('with_admin' => false, 'with_promo' => true));
a2aa8436 256 $view->addMod('geoloc', 'Planisphère', false, array('with_annu' => 'carnet/contacts/search'));
257 $view->apply($base, $page, $action, $subaction);
258 if ($action != 'geoloc' || ($search && !$ssaction) || (!$search && !$subaction)) {
8c4a0c30 259 $page->changeTpl('carnet/mescontacts.tpl');
b48a0758 260 }
b48a0758 261 }
262
263 function handler_pdf(&$page, $arg0 = null, $arg1 = null)
264 {
ee5990c7 265 require_once dirname(__FILE__).'/carnet/contacts.pdf.inc.php';
b48a0758 266 require_once 'user.func.inc.php';
267
268 session_write_close();
269
270 $sql = "SELECT a.alias
271 FROM aliases AS a
272 INNER JOIN auth_user_md5 AS u ON ( a.id = u.user_id )
273 INNER JOIN contacts AS c ON ( a.id = c.contact )
274 WHERE c.uid = {?} AND a.type='a_vie'";
275 if ($arg0 == 'promo') {
276 $sql .= ' ORDER BY u.promo, u.nom, u.prenom';
277 } else {
278 $sql .= ' ORDER BY u.nom, u.prenom, u.promo';
279 }
280
cab08090 281 $citer = XDB::iterRow($sql, S::v('uid'));
b48a0758 282 $pdf = new ContactsPDF();
283
284 while (list($alias) = $citer->next()) {
285 $user = get_user_details($alias);
ac73e294 286 foreach ($user as &$value) {
287 if (is_utf8($value)) {
288 $value = utf8_decode($value);
289 }
290 }
93c099e1 291 $pdf = ContactsPDF::addContact($pdf, $user, $arg0 == 'photos' || $arg1 == 'photos');
b48a0758 292 }
293 $pdf->Output();
294
295 exit;
296 }
297
c9f82d49 298 function handler_rss(&$page, $user = null, $hash = null)
299 {
300 require_once 'rss.inc.php';
301 require_once 'notifs.inc.php';
0337d704 302
c9f82d49 303 $uid = init_rss('carnet/rss.tpl', $user, $hash);
304 $notifs = new Notifs($uid, false);
305 $page->assign('notifs', $notifs);
c9f82d49 306 }
fbfb06dc 307
963c0b2e 308 function handler_ical(&$page, $alias = null, $hash = null)
fbfb06dc 309 {
963c0b2e 310 require_once 'rss.inc.php';
311 $uid = init_rss(null, $alias, $hash, false);
312 if (S::logged()) {
313 if (!$uid) {
314 $uid = S::i('uid');
315 } else if ($uid != S::i('uid')) {
316 require_once 'xorg.misc.inc.php';
317 send_warning_email("Récupération d\'un autre utilisateur ($uid)");
318 }
319 } else if (!$uid) {
320 exit;
321 }
99544d53 322 require_once 'ical.inc.php';
801fcad8 323 $page->changeTpl('carnet/calendar.tpl', NO_SKIN);
3585b0c8 324 $page->register_function('display_ical', 'display_ical');
fbfb06dc 325
f3b3f363 326 $res = XDB::iterRow(
327 'SELECT u.prenom,
328 IF(u.nom_usage = \'\',u.nom,u.nom_usage) AS nom,
329 u.promo,
330 u.naissance,
331 DATE_ADD(u.naissance, INTERVAL 1 DAY) AS end,
332 u.date_ins,
333 a.alias AS forlife
334 FROM contacts AS c
335 INNER JOIN auth_user_md5 AS u ON (u.user_id = c.contact)
336 INNER JOIN aliases AS a ON (u.user_id = a.id AND a.type = \'a_vie\')
963c0b2e 337 WHERE c.uid = {?}', $uid);
f3b3f363 338
339 $annivs = Array();
340 while (list($prenom, $nom, $promo, $naissance, $end, $ts, $forlife) = $res->next()) {
341 $naissance = str_replace('-', '', $naissance);
342 $end = str_replace('-', '', $end);
343 $annivs[] = array(
344 'timestamp' => strtotime($ts),
345 'date' => $naissance,
346 'tomorrow' => $end,
347 'forlife' => $forlife,
348 'summary' => 'Anniversaire de '.$prenom
349 .' '.$nom.' - x '.$promo,
350 );
fbfb06dc 351 }
f3b3f363 352 $page->assign('events', $annivs);
fbfb06dc 353
354 header('Content-Type: text/calendar; charset=utf-8');
fbfb06dc 355 }
5e193297 356
917c4d11 357 function handler_vcard(&$page, $photos = null)
5e193297 358 {
359 $res = XDB::query('SELECT contact
360 FROM contacts
361 WHERE uid = {?}', S::v('uid'));
917c4d11 362 $vcard = new VCard($res->fetchColumn(), $photos == 'photos');
5e193297 363 $vcard->do_page(&$page);
364 }
4da0b8d7 365}
c9f82d49 366
a7de4ef7 367// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
c9f82d49 368?>