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