projects / platal.git / blame
? search:
summary | shortlog | log | commit | commitdiff | tree
blob | blame (incremental) | history | HEAD
Update ChangeLog
[platal.git] / modules / xnetevents.php
CommitLineData
4f10a058 1<?php
2/***************************************************************************
9f5bd98e 3 * Copyright (C) 2003-2010 Polytechnique.org *
4f10a058 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
ed21e24a 22define('NB_PER_PAGE', 25);
23
4f10a058 24class XnetEventsModule extends PLModule
25{
26 function handlers()
27 {
28 return array(
d1ebc57a 29 '%grp/events' => $this->make_hook('events', AUTH_MDP),
30 '%grp/events/sub' => $this->make_hook('sub', AUTH_MDP),
8fc4efa3 31 '%grp/events/csv' => $this->make_hook('csv', AUTH_MDP, 'user', NO_HTTPS),
32 '%grp/events/ical' => $this->make_hook('ical', AUTH_MDP, 'user', NO_HTTPS),
c6c10b6b 33 '%grp/events/edit' => $this->make_hook('edit', AUTH_MDP, 'groupadmin'),
1490093c 34 '%grp/events/admin' => $this->make_hook('admin', AUTH_MDP, 'groupmember'),
4f10a058 35 );
36 }
37
f02eefd4 38 function handler_events(&$page, $archive = null)
4f10a058 39 {
40 global $globals;
41
1490093c 42 $page->changeTpl('xnetevents/index.tpl');
f02eefd4 43 $action = null;
1490093c 44 $archive = ($archive == 'archive' && may_update());
45
2b9e5fd3 46 if (Post::has('del')) {
f02eefd4 47 $action = 'del';
48 $eid = Post::v('del');
49 } elseif (Post::has('archive')) {
50 $action = 'archive';
51 $eid = Post::v('archive');
52 } elseif (Post::has('unarchive')) {
53 $action = 'unarchive';
54 $eid = Post::v('unarchive');
55 }
56
57 if (!is_null($action)) {
2b9e5fd3 58 if (!may_update()) {
73fdb1e8 59 return PL_FORBIDDEN;
2b9e5fd3 60 }
4fcbb455 61 S::assert_xsrf_token();
2b9e5fd3 62
eb41eda9 63 $res = XDB::query("SELECT asso_id, short_name FROM group_events
3cabafae 64 WHERE eid = {?} AND asso_id = {?}",
65 $eid, $globals->asso('id'));
2b9e5fd3 66
67 $tmp = $res->fetchOneRow();
68 if (!$tmp) {
73fdb1e8 69 return PL_FORBIDDEN;
2b9e5fd3 70 }
f02eefd4 71 }
2b9e5fd3 72
f02eefd4 73 if ($action == 'del') {
2b9e5fd3 74 // deletes the event mailing aliases
75 if ($tmp[1]) {
9ff5b337
SJ		 76 foreach (array('-absents@', '-participants@', '-paye@', '-participants-non-paye@') as $v) {
77 XDB::execute("DELETE FROM virtual
78 WHERE type = 'evt' AND alias LIKE {?}",
79 $tmp[1] . $v . '%');
80 }
2b9e5fd3 81 }
82
83 // deletes the event items
eb41eda9 84 XDB::execute('DELETE FROM group_event_items
9ff5b337 85 WHERE eid = {?}', $eid);
2b9e5fd3 86
87 // deletes the event participants
eb41eda9 88 XDB::execute('DELETE FROM group_event_participants
9ff5b337 89 WHERE eid = {?}', $eid);
2b9e5fd3 90
91 // deletes the event
eb41eda9 92 XDB::execute('DELETE FROM group_events
9ff5b337
SJ		 93 WHERE eid = {?} AND asso_id = {?}',
94 $eid, $globals->asso('id'));
2b9e5fd3 95
96 // delete the requests for payments
97 require_once 'validations.inc.php';
9ff5b337
SJ		 98 XDB::execute("DELETE FROM requests
99 WHERE type = 'paiements' AND data LIKE {?}",
100 PayReq::same_event($eid, $globals->asso('id')));
ebfdf077 101 $globals->updateNbValid();
2b9e5fd3 102 }
103
f02eefd4 104 if ($action == 'archive') {
eb41eda9 105 XDB::execute("UPDATE group_events
f02eefd4 106 SET archive = 1
107 WHERE eid = {?} AND asso_id = {?}",
108 $eid, $globals->asso('id'));
109 }
110
111 if ($action == 'unarchive') {
eb41eda9 112 XDB::execute("UPDATE group_events
f02eefd4 113 SET archive = 0
114 WHERE eid = {?} AND asso_id = {?}",
115 $eid, $globals->asso('id'));
116 }
ab02e9bc 117
f02eefd4 118 $page->assign('archive', $archive);
07eb5b0e
FB		 119 $evenements = XDB::iterator('SELECT e.*, LEFT(10, e.debut) AS first_day, LEFT(10, e.fin) AS last_day,
120 IF(e.deadline_inscription,
121 e.deadline_inscription >= LEFT(NOW(), 10),
122 1) AS inscr_open,
123 e.deadline_inscription,
124 MAX(ep.nb) IS NOT NULL AS inscrit, MAX(ep.paid) AS paid
eb41eda9
FB		 125 FROM group_events AS e
126 LEFT JOIN group_event_participants AS ep ON (ep.eid = e.eid AND ep.uid = {?})
07eb5b0e
FB		 127 WHERE asso_id = {?} AND archive = {?}
128 GROUP BY e.eid
129 ORDER BY inscr_open DESC, debut DESC',
130 S::i('uid'), $globals->asso('id'), $archive ? 1 : 0);
4f10a058 131
132 $evts = array();
fbfc01a1 133 $undisplayed_events = 0;
20c5c7e6 134 $this->load('xnetevents.inc.php');
d6d580ec 135
4f10a058 136 while ($e = $evenements->next()) {
fbfc01a1
SJ		 137 if (!is_member() && !may_update() && !$e['accept_nonmembre']) {
138 $undisplayed_events ++;
139 continue;
140 }
141
3cabafae 142 $e['show_participants'] = ($e['show_participants'] && (is_member() || may_update()));
07eb5b0e 143 $e['moments'] = XDB::fetchAllAssoc('SELECT titre, details, montant, ei.item_id, nb, ep.paid
eb41eda9
FB		 144 FROM group_event_items AS ei
145 LEFT JOIN group_event_participants AS ep
07eb5b0e
FB		 146 ON (ep.eid = ei.eid AND ep.item_id = ei.item_id AND ep.uid = {?})
147 WHERE ei.eid = {?}',
148 S::i('uid'), $e['eid']);
d6d580ec 149
150 $e['topay'] = 0;
98a7e9dc 151 $e['paid'] = $e['moments'][0]['paid'];
d6d580ec 152 foreach ($e['moments'] as $m) {
153 $e['topay'] += $m['nb'] * $m['montant'];
154 }
155
08cce2ff 156 $query = XDB::query(
b3cd1320
DB		 157 "SELECT amount
158 FROM payment_transactions AS t
cab08090 159 WHERE ref = {?} AND uid = {?}", $e['paiement_id'], S::v('uid'));
4f10a058 160 $montants = $query->fetchColumn();
d6d580ec 161
4f10a058 162 foreach ($montants as $m) {
d6d580ec 163 $p = strtr(substr($m, 0, strpos($m, 'EUR')), ',', '.');
4f10a058 164 $e['paid'] += trim($p);
165 }
d6d580ec 166
20c5c7e6
SJ		 167 make_event_date($e);
168
1f5b0b59 169 if (Env::has('updated') && $e['eid'] == Env::i('updated')) {
170 $page->assign('updated', $e);
171 }
4f10a058 172 $evts[] = $e;
173 }
ab02e9bc 174
4f10a058 175 $page->assign('evenements', $evts);
fbfc01a1 176 $page->assign('undisplayed_events', $undisplayed_events);
4f10a058 177 }
178
d6d580ec 179 function handler_sub(&$page, $eid = null)
180 {
460d8f55 181 $this->load('xnetevents.inc.php');
1490093c 182 $page->changeTpl('xnetevents/subscribe.tpl');
d6d580ec 183
184 $evt = get_event_detail($eid);
df1cf596 185 if (is_null($evt)) {
d6d580ec 186 return PL_NOT_FOUND;
187 }
df1cf596
FB		 188 if ($evt === false) {
189 global $globals, $platal;
190 $url = $globals->asso('sub_url');
191 if (empty($url)) {
192 $url = $platal->ns . 'subscribe';
193 }
194 $page->kill('Cet événement est reservé aux membres du groupe ' . $globals->asso('nom') .
195 '. Pour devenir membre, rends-toi sur la page de <a href="' . $url . '">demande d\'inscripton</a>.');
196 }
d6d580ec 197
198 if (!$evt['inscr_open']) {
a7de4ef7 199 $page->kill('Les inscriptions pour cet événement sont closes');
d6d580ec 200 }
3cabafae 201 if (!$evt['accept_nonmembre'] && !is_member() && !may_update()) {
a7de4ef7 202 $page->kill('Cet événement est fermé aux non-membres du groupe');
3cabafae 203 }
d6d580ec 204
2ac0bcee 205 global $globals;
257ae408
SJ		 206 $res = XDB::query("SELECT stamp
207 FROM requests
2ac0bcee
FB		 208 WHERE type = 'paiements' AND data LIKE {?}",
209 PayReq::same_event($evt['eid'], $globals->asso('id')));
210 $page->assign('validation', $res->numRows());
d6d580ec 211 $page->assign('event', $evt);
212
213 if (!Post::has('submit')) {
214 return;
4fcbb455
VZ		 215 } else {
216 S::assert_xsrf_token();
d6d580ec 217 }
218
5e2307dc 219 $moments = Post::v('moment', array());
220 $pers = Post::v('personnes', array());
d6d580ec 221 $subs = array();
222
223 foreach ($moments as $j => $v) {
224 $subs[$j] = intval($v);
225
226 // retreive ohter field when more than one person
227 if ($subs[$j] == 2) {
228 if (!isset($pers[$j]) || !is_numeric($pers[$j])
229 || $pers[$j] < 0)
230 {
6bb2f79a 231 $page->trigError("Tu dois choisir un nombre d'invités correct&nbsp;!");
d6d580ec 232 return;
233 }
234 $subs[$j] = 1 + $pers[$j];
235 }
236 }
237
238 // impossible to unsubscribe if you already paid sthing
98a7e9dc 239 if (!array_sum($subs) && $evt['paid'] != 0) {
9ff5b337
SJ		 240 $page->trigError("Impossible de te désinscrire complètement " .
241 "parce que tu as fait un paiement par " .
242 "chèque ou par liquide. Contacte un " .
243 "administrateur du groupe si tu es sûr de " .
244 "ne pas venir.");
d6d580ec 245 return;
246 }
247
248 // update actual inscriptions
1f5b0b59 249 $updated = false;
9193e8f7 250 $total = 0;
30138a46 251 $paid = $evt['paid'] ? $evt['paid'] : 0;
8bac35d8 252 $telepaid= $evt['telepaid'] ? $evt['telepaid'] : 0;
d6d580ec 253 foreach ($subs as $j => $nb) {
9193e8f7 254 if ($nb >= 0) {
08cce2ff 255 XDB::execute(
eb41eda9 256 "REPLACE INTO group_event_participants
2ac0bcee 257 VALUES ({?}, {?}, {?}, {?}, {?}, {?})",
8bac35d8
FB		 258 $eid, S::v('uid'), $j, $nb, Env::has('notify_payment') ? 'notify_payment' : '',
259 $j == 1 ? $paid - $telepaid : 0);
1f5b0b59 260 $updated = $eid;
d6d580ec 261 } else {
08cce2ff 262 XDB::execute(
eb41eda9 263 "DELETE FROM group_event_participants
d6d580ec 264 WHERE eid = {?} AND uid = {?} AND item_id = {?}",
2847640f 265 $eid, S::v("uid"), $j);
1f5b0b59 266 $updated = $eid;
d6d580ec 267 }
9193e8f7 268 $total += $nb;
d6d580ec 269 }
9193e8f7 270 if ($updated !== false) {
6aac1d08 271 $page->trigSuccess('Ton inscription à l\'événement a été mise à jour avec succès.');
9ff5b337 272 subscribe_lists_event($total, S::i('uid'), $evt, $paid);
1f5b0b59 273 }
d6d580ec 274 $page->assign('event', get_event_detail($eid));
275 }
276
4f10a058 277 function handler_csv(&$page, $eid = null, $item_id = null)
278 {
460d8f55 279 $this->load('xnetevents.inc.php');
4f10a058 280
bd46a8e4 281 if (!is_numeric($item_id)) {
282 $item_id = null;
283 }
284
4f10a058 285 $evt = get_event_detail($eid, $item_id);
286 if (!$evt) {
287 return PL_NOT_FOUND;
288 }
289
3cb500d5 290 pl_content_headers("text/x-csv");
801fcad8 291 $page->changeTpl('xnetevents/csv.tpl', NO_SKIN);
4f10a058 292
293 $admin = may_update();
294
07eb5b0e 295 $tri = (Env::v('order') == 'alpha' ? UserFilter::sortByPromo() : UserFilter::sortByName());
4f10a058 296
ed21e24a 297 $page->assign('participants',
298 get_event_participants($evt, $item_id, $tri));
4f10a058 299
4f10a058 300 $page->assign('admin', $admin);
301 $page->assign('moments', $evt['moments']);
302 $page->assign('money', $evt['money']);
478f7c3a 303 $page->assign('telepayment', $evt['paiement_id']);
5e2307dc 304 $page->assign('tout', !Env::v('item_id', false));
4f10a058 305 }
bd46a8e4 306
11d8a183 307 function handler_ical(&$page, $eid = null)
308 {
309 global $globals;
310
460d8f55 311 $this->load('xnetevents.inc.php');
11d8a183 312 $evt = get_event_detail($eid);
313 if (!$evt) {
73fdb1e8 314 return PL_FORBIDDEN;
11d8a183 315 }
316 $evt['debut'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['debut']);
317 $evt['fin'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['fin']);
318
99544d53 319 foreach ($evt['moments'] as $m) {
320 $evt['descriptif'] .= "\n\n** " . $m['titre'] . " **\n" . $m['details'];
321 }
322
11d8a183 323 $page->changeTpl('xnetevents/calendar.tpl', NO_SKIN);
324
99544d53 325 require_once('ical.inc.php');
11d8a183 326 $page->assign('asso', $globals->asso());
327 $page->assign('timestamp', time());
99544d53 328 $page->assign('admin', may_update());
329
330 if (may_update()) {
07eb5b0e 331 $page->assign('participants', get_event_participants($evt, null, UserFilter::sortByPromo()));
99544d53 332 }
11d8a183 333 $page->register_function('display_ical', 'display_ical');
334 $page->assign_by_ref('e', $evt);
ab02e9bc 335
3cb500d5 336 pl_content_headers("text/calendar");
11d8a183 337 }
338
bd46a8e4 339 function handler_edit(&$page, $eid = null)
340 {
341 global $globals;
342
5cbb1fad 343 // get eid if the the given one is a short name
344 if (!is_null($eid) && !is_numeric($eid)) {
345 $res = XDB::query("SELECT eid
eb41eda9 346 FROM group_events
5cbb1fad 347 WHERE asso_id = {?} AND short_name = {?}",
348 $globals->asso('id'), $eid);
349 if ($res->numRows()) {
350 $eid = (int)$res->fetchOneCell();
351 }
352 }
353
5070a22d 354 // check the event is in our group
bd46a8e4 355 if (!is_null($eid)) {
73fdb1e8 356 $res = XDB::query("SELECT short_name
eb41eda9 357 FROM group_events
73fdb1e8 358 WHERE eid = {?} AND asso_id = {?}",
359 $eid, $globals->asso('id'));
360 if ($res->numRows()) {
361 $infos = $res->fetchOneAssoc();
362 } else {
363 return PL_FORBIDDEN;
bd46a8e4 364 }
365 }
366
1490093c 367 $page->changeTpl('xnetevents/edit.tpl');
bd46a8e4 368
58d0edab 369 $moments = range(1, 4);
f56e5e53 370 $error = false;
5070a22d 371 $page->assign('moments', $moments);
bd46a8e4 372
5e2307dc 373 if (Post::v('intitule')) {
4fcbb455
VZ		 374 S::assert_xsrf_token();
375
460d8f55 376 $this->load('xnetevents.inc.php');
2847640f
VZ		 377 $short_name = event_change_shortname($page, $eid,
378 $infos['short_name'],
5e2307dc 379 Env::v('short_name', ''));
f56e5e53 380 if ($short_name != Env::v('short_name')) {
381 $error = true;
382 }
5070a22d 383 $evt = array(
384 'eid' => $eid,
385 'asso_id' => $globals->asso('id'),
5e2307dc 386 'paiement_id' => Post::v('paiement_id') > 0 ? Post::v('paiement_id') : null,
387 'debut' => Post::v('deb_Year').'-'.Post::v('deb_Month')
388 .'-'.Post::v('deb_Day').' '.Post::v('deb_Hour')
389 .':'.Post::v('deb_Minute').':00',
390 'fin' => Post::v('fin_Year').'-'.Post::v('fin_Month')
391 .'-'.Post::v('fin_Day').' '.Post::v('fin_Hour')
392 .':'.Post::v('fin_Minute').':00',
f56e5e53 393 'short_name' => $short_name,
5070a22d 394 );
395
396 $trivial = array('intitule', 'descriptif', 'noinvite',
25412aa4 397 'show_participants', 'accept_nonmembre', 'organisateur_uid');
5070a22d 398 foreach ($trivial as $k) {
5e2307dc 399 $evt[$k] = Post::v($k);
bd46a8e4 400 }
25412aa4 401 if (!$eid) {
402 $evt['organisateur_uid'] = S::v('uid');
403 }
bd46a8e4 404
5e2307dc 405 if (Post::v('deadline')) {
406 $evt['deadline_inscription'] = Post::v('inscr_Year').'-'
407 . Post::v('inscr_Month').'-'
408 . Post::v('inscr_Day');
5070a22d 409 } else {
410 $evt['deadline_inscription'] = null;
9ece1588 411 }
bd46a8e4 412
413 // Store the modifications in the database
eb41eda9 414 XDB::execute('REPLACE INTO group_events
bd46a8e4 415 SET eid={?}, asso_id={?}, organisateur_uid={?}, intitule={?},
5070a22d 416 paiement_id = {?}, descriptif = {?}, debut = {?},
417 fin = {?}, show_participants = {?}, short_name = {?},
3cabafae 418 deadline_inscription = {?}, noinvite = {?},
419 accept_nonmembre = {?}',
5070a22d 420 $evt['eid'], $evt['asso_id'], $evt['organisateur_uid'],
421 $evt['intitule'], $evt['paiement_id'], $evt['descriptif'],
422 $evt['debut'], $evt['fin'], $evt['show_participants'],
423 $evt['short_name'], $evt['deadline_inscription'],
3cabafae 424 $evt['noinvite'], $evt['accept_nonmembre']);
bd46a8e4 425
426 // if new event, get its id
427 if (!$eid) {
8b83a166 428 $eid = XDB::insertId();
bd46a8e4 429 }
430
5070a22d 431 $nb_moments = 0;
bd46a8e4 432 $money_defaut = 0;
433
434 foreach ($moments as $i) {
5e2307dc 435 if (Post::v('titre'.$i)) {
bd46a8e4 436 $nb_moments++;
5070a22d 437
5e2307dc 438 $montant = strtr(Post::v('montant'.$i), ',', '.');
5070a22d 439 $money_defaut += (float)$montant;
08cce2ff 440 XDB::execute("
eb41eda9 441 REPLACE INTO group_event_items
bd46a8e4 442 VALUES ({?}, {?}, {?}, {?}, {?})",
5e2307dc 443 $eid, $i, Post::v('titre'.$i),
444 Post::v('details'.$i), $montant);
bd46a8e4 445 } else {
eb41eda9 446 XDB::execute("DELETE FROM group_event_items
bd46a8e4 447 WHERE eid = {?} AND item_id = {?}", $eid, $i);
448 }
449 }
bd46a8e4 450 // request for a new payment
5e2307dc 451 if (Post::v('paiement_id') == -1 && $money_defaut >= 0) {
bd46a8e4 452 require_once 'validations.inc.php';
5daf68f6 453 $p = new PayReq(S::user(),
5e2307dc 454 Post::v('intitule')." - ".$globals->asso('nom'),
455 Post::v('site'), $money_defaut,
456 Post::v('confirmation'), 0, 999,
bd46a8e4 457 $globals->asso('id'), $eid);
20934085 458 if ($p->accept()) {
459 $p->submit();
460 } else {
461 $page->assign('paiement_message', Post::v('confirmation'));
462 $page->assign('paiement_site', Post::v('site'));
463 $error = true;
464 }
bd46a8e4 465 }
466
467 // events with no sub-event: add a sub-event with no name
468 if ($nb_moments == 0) {
eb41eda9 469 XDB::execute("INSERT INTO group_event_items
20934085 470 VALUES ({?}, {?}, '', '', 0)", $eid, 1);
bd46a8e4 471 }
bd46a8e4 472
f56e5e53 473 if (!$error) {
58d0edab 474 pl_redirect('events');
475 }
bd46a8e4 476 }
477
478 // get a list of all the payment for this asso
08cce2ff 479 $res = XDB::iterator("SELECT id, text
b3cd1320 480 FROM payments
5cbb1fad 481 WHERE asso_id = {?}", $globals->asso('id'));
bd46a8e4 482 $paiements = array();
483 while ($a = $res->next()) $paiements[$a['id']] = $a['text']; {
484 $page->assign('paiements', $paiements);
485 }
486
487 // when modifying an old event retreive the old datas
488 if ($eid) {
08cce2ff 489 $res = XDB::query(
00112b2e
VZ		 490 "SELECT eid, intitule, descriptif, debut, fin, organisateur_uid,
491 show_participants, paiement_id, short_name,
492 deadline_inscription, noinvite, accept_nonmembre
eb41eda9 493 FROM group_events
bd46a8e4 494 WHERE eid = {?}", $eid);
495 $evt = $res->fetchOneAssoc();
496 // find out if there is already a request for a payment for this event
497 require_once 'validations.inc.php';
257ae408
SJ		 498 $res = XDB::query("SELECT stamp
499 FROM requests
500 WHERE type = 'paiements' AND data LIKE {?}",
5cbb1fad 501 PayReq::same_event($eid, $globals->asso('id')));
bd46a8e4 502 $stamp = $res->fetchOneCell();
503 if ($stamp) {
f56e5e53 504 $evt['paiement_id'] = -2;
bd46a8e4 505 $evt['paiement_req'] = $stamp;
506 }
507 $page->assign('evt', $evt);
508 // get all the different moments infos
08cce2ff 509 $res = XDB::iterator(
00112b2e 510 "SELECT item_id, titre, details, montant
eb41eda9
FB		 511 FROM group_event_items AS ei
512 INNER JOIN group_events AS e ON(e.eid = ei.eid)
00112b2e 513 WHERE e.eid = {?}
bd46a8e4 514 ORDER BY item_id", $eid);
515 $items = array();
516 while ($item = $res->next()) {
517 $items[$item['item_id']] = $item;
518 }
519 $page->assign('items', $items);
520 }
5cbb1fad 521 $page->assign('url_ref', $eid);
bd46a8e4 522 }
523
524 function handler_admin(&$page, $eid = null, $item_id = null)
525 {
526 global $globals;
527
460d8f55 528 $this->load('xnetevents.inc.php');
bd46a8e4 529
530 $evt = get_event_detail($eid, $item_id);
bd46a8e4 531 if (!$evt) {
532 return PL_NOT_FOUND;
533 }
534
1490093c 535 $page->changeTpl('xnetevents/admin.tpl');
536 if (!$evt['show_participants'] && !may_update()) {
537 return PL_FORBIDDEN;
bd46a8e4 538 }
539
5e2307dc 540 if (may_update() && Post::v('adm')) {
4fcbb455
VZ		 541 S::assert_xsrf_token();
542
4bf97262 543 $member = User::getSilent(Post::v('mail'));
ed21e24a 544 if (!$member) {
a7d35093 545 $page->trigError("Membre introuvable");
bd46a8e4 546 }
bd46a8e4 547
ed21e24a 548 // change the price paid by a participant
5e2307dc 549 if (Env::v('adm') == 'prix' && $member) {
eb41eda9 550 XDB::execute("UPDATE group_event_participants
d4fd2f8a 551 SET paid = paid + {?}
4e4b828b 552 WHERE uid = {?} AND eid = {?} AND item_id = 1",
5e2307dc 553 strtr(Env::v('montant'), ',', '.'),
4bf97262 554 $member->uid, $evt['eid']);
ed21e24a 555 }
bd46a8e4 556
ed21e24a 557 // change the number of personns coming with a participant
5e2307dc 558 if (Env::v('adm') == 'nbs' && $member) {
08cce2ff 559 $res = XDB::query("SELECT paid
eb41eda9 560 FROM group_event_participants
dc2073c3 561 WHERE uid = {?} AND eid = {?}",
4bf97262 562 $member->uid, $evt['eid']);
ed21e24a 563
564 $paid = intval($res->fetchOneCell());
5e2307dc 565 $nbs = Post::v('nb', array());
ed21e24a 566
567 foreach ($nbs as $id => $nb) {
5070a22d 568 $nb = max(intval($nb), 0);
eb41eda9 569 XDB::execute("REPLACE INTO group_event_participants
2ac0bcee 570 VALUES ({?}, {?}, {?}, {?}, {?}, {?})",
4bf97262 571 $evt['eid'], $member->uid, $id, $nb, '', $id == 1 ? $paid : 0);
bd46a8e4 572 }
ed21e24a 573
9193e8f7 574 $res = XDB::query("SELECT COUNT(uid) AS cnt, SUM(nb) AS nb
eb41eda9 575 FROM group_event_participants
9193e8f7 576 WHERE uid = {?} AND eid = {?}
577 GROUP BY uid",
4bf97262 578 $member->uid, $evt['eid']);
9193e8f7 579 $u = $res->fetchOneAssoc();
3bfa0e8d
PC		 580 if ($u['cnt'] == 1 && $paid == 0 && Post::v('cancel')) {
581 XDB::execute("DELETE FROM group_event_participants
582 WHERE uid = {?} AND eid = {?}",
583 $member->uid, $evt['eid']);
584 $u = 0;
585 } else {
586 $u = $u['cnt'] ? $u['nb'] : null;
587 }
4bf97262 588 subscribe_lists_event($u, $member->uid, $evt, $paid);
bd46a8e4 589 }
ed21e24a 590
bd46a8e4 591 $evt = get_event_detail($eid, $item_id);
592 }
593
e01ebe65 594 $page->assign_by_ref('evt', $evt);
1f3362a3 595 $page->assign('tout', is_null($item_id));
bd46a8e4 596
ed21e24a 597 if (count($evt['moments'])) {
598 $page->assign('moments', $evt['moments']);
599 }
bd46a8e4 600
bd46a8e4 601 if ($evt['paiement_id']) {
07eb5b0e 602 $infos = User::getBulkUsersWithUIDs(
b3cd1320
DB		 603 XDB::fetchAllAssoc('SELECT t.uid, t.amount
604 FROM payment_transactions AS t
eb41eda9 605 LEFT JOIN group_event_participants AS ep ON(ep.uid = t.uid AND ep.eid = {?})
07eb5b0e
FB		 606 WHERE t.ref = {?} AND ep.uid IS NULL',
607 $evt['eid'], $evt['paiement_id']),
608 'uid', 'user');
609 $page->assign('oublis', count($infos));
610 $page->assign('oubliinscription', $infos);
611 }
612
613 $absents = User::getBulkUsersFromDB('SELECT p.uid
eb41eda9
FB		 614 FROM group_event_participants AS p
615 LEFT JOIN group_event_participants AS p2 ON (p2.uid = p.uid
07eb5b0e
FB		 616 AND p2.eid = p.eid
617 AND p2.nb != 0)
618 WHERE p.eid = {?} AND p2.eid IS NULL
619 GROUP BY p.uid', $evt['eid']);
ab02e9bc 620
621 $ofs = Env::i('offset');
037b02c8
FB		 622 $tot = (Env::v('initiale') ? $tot : $nb_tot);
623 $nbp = ceil($tot / NB_PER_PAGE);
624 if ($nbp > 1) {
625 $links = array();
626 if ($ofs) {
627 $links['précédent'] = $ofs - 1;
628 }
629 for ($i = 1 ; $i <= $nbp; $i++) {
630 $links[(string)$i] = $i - 1;
631 }
632 if ($ofs < $nbp) {
633 $links['suivant'] = $ofs+1;
634 }
ab02e9bc 635 $page->assign('links', $links);
636 }
637
61664f8b 638 $page->assign('absents', $absents);
ab02e9bc 639 $page->assign('participants',
07eb5b0e 640 get_event_participants($evt, $item_id, UserFilter::sortByName(),
cc69b311 641 new PLLimit(NB_PER_PAGE), $ofs * NB_PER_PAGE));
bd46a8e4 642 }
4f10a058 643}
644
a7de4ef7 645// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
4f10a058 646?>
plat/al