modules/xnetevents.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2014 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 define('NB_PER_PAGE', 25);
  23
  24 class XnetEventsModule extends PLModule
  25 {
  26     function handlers()
  27     {
  28         return array(
  29             '%grp/events'       => $this->make_hook('events', AUTH_PASSWD, 'groups'),
  30             '%grp/events/sub'   => $this->make_hook('sub',    AUTH_PASSWD, 'groups'),
  31             '%grp/events/csv'   => $this->make_hook('csv',    AUTH_PASSWD, 'groups', NO_HTTPS),
  32             '%grp/events/ical'  => $this->make_hook('ical',   AUTH_PASSWD, 'groups', NO_HTTPS),
  33             '%grp/events/edit'  => $this->make_hook('edit',   AUTH_PASSWD, 'groupadmin'),
  34             '%grp/events/admin' => $this->make_hook('admin',  AUTH_PASSWD, 'groupmember'),
  35         );
  36     }
  37
  38     function handler_events($page, $archive = null)
  39     {
  40         global $globals;
  41
  42         $page->changeTpl('xnetevents/index.tpl');
  43         $this->load('xnetevents.inc.php');
  44
  45         $action = null;
  46         $archive = ($archive == 'archive' && may_update());
  47
  48         if (Post::has('del')) {
  49             $action = 'del';
  50             $eid = Post::v('del');
  51         } elseif (Post::has('archive')) {
  52             $action = 'archive';
  53             $eid = Post::v('archive');
  54         } elseif (Post::has('unarchive')) {
  55             $action = 'unarchive';
  56             $eid = Post::v('unarchive');
  57         }
  58
  59         if (!is_null($action)) {
  60             if (!may_update()) {
  61                 return PL_FORBIDDEN;
  62             }
  63             S::assert_xsrf_token();
  64
  65             $res = XDB::query("SELECT asso_id, short_name FROM group_events
  66                                 WHERE eid = {?} AND asso_id = {?}",
  67                               $eid, $globals->asso('id'));
  68
  69             $tmp = $res->fetchOneRow();
  70             if (!$tmp) {
  71                 return PL_FORBIDDEN;
  72             }
  73         }
  74
  75         if ($action == 'del') {
  76             // deletes the event mailing aliases
  77             if ($tmp[1]) {
  78                 require_once 'emails.inc.php';
  79                 foreach (explode(',', $globals->xnet->event_lists) as $suffix) {
  80                     delete_list_alias($tmp[1] . $suffix, $globals->xnet->evts_domain, 'event');
  81                 }
  82             }
  83
  84             // archive le paiement associé si il existe
  85             $pay_id = XDB::fetchOneCell("SELECT paiement_id
  86                                            FROM group_events
  87                                           WHERE eid = {?} AND asso_id = {?}",
  88                                         $eid, $globals->asso('id'));
  89             if (!$pay_id=='') {
  90                 XDB::execute("UPDATE payments
  91                                  SET flags = 'old'
  92                                WHERE id = {?}",
  93                              $pay_id);
  94             }
  95             // deletes the event items
  96             XDB::execute('DELETE FROM  group_event_items
  97                                 WHERE  eid = {?}', $eid);
  98
  99             // deletes the event participants
 100             XDB::execute('DELETE FROM  group_event_participants
 101                                 WHERE  eid = {?}', $eid);
 102
 103             // deletes the event
 104             XDB::execute('DELETE FROM  group_events
 105                                 WHERE  eid = {?} AND asso_id = {?}',
 106                          $eid, $globals->asso('id'));
 107
 108             // delete the requests for payments
 109             XDB::execute("DELETE FROM  requests
 110                                 WHERE  type = 'paiements' AND data LIKE {?}",
 111                          PayReq::same_event($eid, $globals->asso('id')));
 112             $globals->updateNbValid();
 113         }
 114
 115         if ($action == 'archive') {
 116             $pay_id = XDB::fetchOneCell("SELECT paiement_id
 117                                            FROM group_events
 118                                           WHERE eid = {?} AND asso_id = {?}",
 119                                         $eid, $globals->asso('id'));
 120             if (!$pay_id=='') {
 121                 XDB::execute("UPDATE payments
 122                                  SET flags = 'old'
 123                                WHERE id = {?}",
 124                                $pay_id);
 125             }
 126             XDB::execute("UPDATE group_events
 127                              SET archive = 1
 128                            WHERE eid = {?} AND asso_id = {?}",
 129                            $eid, $globals->asso('id'));
 130         }
 131
 132         if ($action == 'unarchive') {
 133             $pay_id = XDB::fetchOneCell("SELECT paiement_id FROM group_events
 134                                      WHERE eid = {?} AND asso_id = {?}",
 135                                    $eid, $globals->asso('id'));
 136             if (!$pay_id=='') {
 137                 XDB::execute("UPDATE payments
 138                                  SET flags = ''
 139                                WHERE id = {?}",
 140                                $pay_id);
 141             }
 142             XDB::execute("UPDATE group_events
 143                              SET archive = 0
 144                            WHERE eid = {?} AND asso_id = {?}",
 145                          $eid, $globals->asso('id'));
 146         }
 147
 148         $page->assign('archive', $archive);
 149
 150         if (Post::has('order')) {
 151             $order = Post::v('order');
 152             XDB::execute("UPDATE groups
 153                              SET event_order = {?}
 154                            WHERE id = {?}",
 155                           $order, $globals->asso('id'));
 156         }
 157         $order = get_event_order($globals->asso('id'));
 158         $evts = get_events($globals->asso('id'), $order);
 159         $page->assign('order', $order);
 160
 161         $undisplayed_events = 0;
 162         foreach ($evts as $eid => &$e) {
 163             if (!is_member() && !may_update() && !$e['accept_nonmembre']) {
 164                 $undisplayed_events ++;
 165                 continue;
 166             }
 167
 168             $e['show_participants'] = ($e['show_participants'] && (is_member() || may_update()));
 169             $e['items'] = get_event_items($eid);
 170             $e['topay'] = 0;
 171             $e['paid']  = 0;
 172             $sub = get_event_subscription($eid, S::i('uid'));
 173             if (empty($sub)) {
 174                 $e['inscrit'] = false;
 175             } else {
 176                 $e['inscrit'] = true;
 177                 foreach ($e['items'] as $item_id => $m) {
 178                     if (isset($sub[$item_id])) {
 179                         $e['topay'] += $sub[$item_id]['nb'] * $m['montant'];
 180                         $e['paid'] += $sub[$item_id]['paid'];
 181                     }
 182                 }
 183             }
 184             $e['sub'] = $sub;
 185
 186             $telepaid = get_event_telepaid($eid, S::i('uid'));
 187             $e['paid'] += $telepaid;
 188
 189             $e['date'] = make_event_date($e['debut'], $e['fin']);
 190             if ($e['deadline_inscription'] == null || strtotime($e['deadline_inscription']) >= time()) {
 191                 $e['inscr_open'] = true;
 192             } else {
 193                 $e['inscr_open'] = false;
 194             }
 195
 196             if (Env::has('updated') && $e['eid'] == Env::i('updated')) {
 197                 $page->assign('updated', $e);
 198             }
 199         }
 200
 201         $page->assign('evenements', $evts);
 202         $page->assign('undisplayed_events', $undisplayed_events);
 203     }
 204
 205     function handler_sub($page, $eid = null)
 206     {
 207         $this->load('xnetevents.inc.php');
 208         $page->changeTpl('xnetevents/subscribe.tpl');
 209
 210         $evt = get_event($eid);
 211         if (is_null($evt)) {
 212             return PL_NOT_FOUND;
 213         }
 214
 215         global $globals;
 216
 217         if (!$evt['inscr_open']) {
 218             $page->kill('Les inscriptions pour cet événement sont closes');
 219         }
 220         if (!$evt['accept_nonmembre'] && !is_member() && !may_update()) {
 221             $url = $globals->asso('sub_url');
 222             if (empty($url)) {
 223                 $url = $platal->ns . 'subscribe';
 224             }
 225             $page->kill('Cet événement est reservé aux membres du groupe ' . $globals->asso('nom') .
 226                         '. Pour devenir membre, rends-toi sur la page de <a href="' . $url . '">demande d\'inscripton</a>.');
 227         }
 228
 229         $res = XDB::query("SELECT  stamp
 230                              FROM  requests
 231                             WHERE  type = 'paiements' AND data LIKE {?}",
 232                            PayReq::same_event($eid, $globals->asso('id')));
 233         $page->assign('validation', $res->numRows());
 234
 235         $page->assign('eid', $eid);
 236         $page->assign('event', $evt);
 237
 238         $items = get_event_items($eid);
 239         $subs = get_event_subscription($eid, S::v('uid'));
 240         var_dump($subs);
 241         // count what the user must pay
 242         $topay = 0;
 243         foreach ($items as $item_id => $item) {
 244             if (array_key_exists($item_id, $subs)) {
 245                 $topay += $item['montant']*$subs[$item_id]['nb'];
 246             }
 247         }
 248         $page->assign('moments', $items);
 249         $page->assign('subs', $subs);
 250         $page->assign('topay', $topay);
 251         $page->assign('telepaid', get_event_telepaid($eid, S::v('uid')));
 252
 253         if (!Post::has('submit')) {
 254             return;
 255         } else {
 256             S::assert_xsrf_token();
 257         }
 258
 259         $moments = Post::v('moment',    array());
 260         $pers    = Post::v('personnes', array());
 261         $subs    = array();
 262
 263         foreach ($moments as $j => $v) {
 264             $subs[$j] = intval($v);
 265
 266             // retrieve other field when more than one person
 267             if ($subs[$j] == 2) {
 268                 if (!isset($pers[$j]) || !is_numeric($pers[$j]) || $pers[$j] < 0) {
 269                     $page->trigError("Tu dois choisir un nombre d'invités correct&nbsp;!");
 270                     return;
 271                 }
 272                 $subs[$j] = $pers[$j];
 273             }
 274         }
 275
 276         // impossible to unsubscribe if you already paid sthing
 277         if (!array_sum($subs) && $evt['paid'] != 0) {
 278             $page->trigError("Impossible de te désinscrire complètement " .
 279                             "parce que tu as fait un paiement par " .
 280                             "chèque ou par liquide. Contacte un " .
 281                             "administrateur du groupe si tu es sûr de " .
 282                             "ne pas venir.");
 283             return;
 284         }
 285
 286         // update actual inscriptions
 287         $updated = subscribe(S::v('uid'), $eid, $subs);
 288    /*     foreach ($subs as $j => $nb) {
 289             if ($nb >= 0) {
 290                 XDB::execute('INSERT INTO  group_event_participants (eid, uid, item_id, nb, flags, paid)
 291                                    VALUES  ({?}, {?}, {?}, {?}, {?}, {?})
 292                   ON DUPLICATE KEY UPDATE  nb = VALUES(nb), flags = VALUES(flags), paid = VALUES(paid)',
 293                              $eid, S::v('uid'), $j, $nb, (Env::has('notify_payment') ? 'notify_payment' : ''),
 294                              ((!$paid_inserted) ? $paid - $telepaid : 0));
 295                 $updated = $eid;
 296                 $paid_inserted = true;
 297             } else {
 298                 XDB::execute(
 299                     "DELETE FROM  group_event_participants
 300                            WHERE  eid = {?} AND uid = {?} AND item_id = {?}",
 301                     $eid, S::v("uid"), $j);
 302                 $updated = $eid;
 303             }
 304             $total += $nb;
 305    }
 306     */
 307         if ($updated) {
 308             $evt = get_event_detail($eid);
 309             if ($evt['topay'] > 0) {
 310                 $page->trigSuccess('Ton inscription à l\'événement a été mise à jour avec succès, tu peux payer ta participation en cliquant ci-dessous');
 311             } else {
 312                 $page->trigSuccess('Ton inscription à l\'événement a été mise à jour avec succès.');
 313             }
 314
 315             if ($evt['subscription_notification'] != 'nobody') {
 316                 $mailer = new PlMailer('xnetevents/subscription-notif.mail.tpl');
 317                 if ($evt['subscription_notification'] != 'creator') {
 318                     $admins = $globals->asso()->iterAdmins();
 319                     while ($admin = $admins->next()) {
 320                         $mailer->addTo($admin);
 321                     }
 322                 }
 323                 if ($evt['subscription_notification'] != 'animator') {
 324                     $mailer->addTo($evt['organizer']);
 325                 }
 326                 $mailer->assign('group', $globals->asso('nom'));
 327                 $mailer->assign('event', $evt['intitule']);
 328                 $mailer->assign('subs', $subs);
 329                 $mailer->assign('moments', $evt['moments']);
 330                 $mailer->assign('name', S::user()->fullName('promo'));
 331                 $mailer->send();
 332             }
 333         }
 334         $page->assign('event', get_event_detail($eid));
 335     }
 336
 337     function handler_csv($page, $eid = null, $item_id = null)
 338     {
 339         $this->load('xnetevents.inc.php');
 340
 341         if (!is_numeric($item_id)) {
 342             $item_id = null;
 343         }
 344
 345         $evt = get_event_detail($eid, $item_id);
 346         if (!$evt) {
 347             return PL_NOT_FOUND;
 348         }
 349
 350         pl_cached_content_headers('text/x-csv', 'iso-8859-1', 1);
 351         $page->changeTpl('xnetevents/csv.tpl', NO_SKIN);
 352
 353         $admin = may_update();
 354         $tri = (Env::v('order') == 'alpha' ? UserFilter::sortByPromo() : UserFilter::sortByName());
 355         $all = !Env::v('item_id', false);
 356
 357         $participants = get_event_participants($evt, $item_id, $tri);
 358         $title = 'Nom;Prénom;Promotion;Email';
 359         if ($admin) {
 360             $title .=';Société;Poste';
 361         }
 362         if ($all) {
 363             foreach ($evt['moments'] as $moment) {
 364                 $title .= ';' . $moment['titre'];
 365             }
 366         }
 367         if ($admin && $evt['money']) {
 368             $title .= ';À payer;';
 369             if ($evt['paiement_id']) {
 370                 $title .= 'Télépaiement;Liquide/Chèque;';
 371             }
 372             $title .= 'Payé';
 373         } else {
 374             $title .= ';Nombre';
 375         }
 376         echo utf8_decode($title) . "\n";
 377
 378         if ($participants) {
 379             foreach ($participants as $participant) {
 380                 $user = $participant['user'];
 381                 $line = $user->lastName() . ';' . $user->firstName() . ';' . $user->promo() . ';' . $user->bestEmail();
 382                 if ($admin && $user->hasProfile()) {
 383                     $line .= ';' . $user->profile()->getMainJob()->company->name . ';' . $user->profile()->getMainJob()->description;
 384                 } else  {
 385                     $line .= ';;';
 386                 }
 387                 if ($all) {
 388                     foreach ($evt['moments'] as $moment) {
 389                         $line .= ';' . $participant[$moment['item_id']];
 390                     }
 391                 }
 392                 if ($admin && $evt['money']) {
 393                     $line .= ';' . $participant['montant'] . ';';
 394                     if ($evt['paiement_id']) {
 395                         $line .= $participant['telepayment'] . ';' . $participant['adminpaid'] . ';';
 396                     }
 397                     $line .= $participant['paid'];
 398                 } else {
 399                     $line .= ';' . $participant['nb'];
 400                 }
 401
 402                 echo utf8_decode($line) . "\n";
 403             }
 404         }
 405         exit();
 406     }
 407
 408     function handler_ical($page, $eid = null)
 409     {
 410         global $globals;
 411
 412         $this->load('xnetevents.inc.php');
 413         $evt = get_event_detail($eid);
 414         if (!$evt) {
 415             return PL_FORBIDDEN;
 416         }
 417         $evt['debut'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['debut']);
 418         $evt['fin'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['fin']);
 419
 420         foreach ($evt['moments'] as $m) {
 421             $evt['descriptif'] .= "\n\n** " . $m['titre'] . " **\n" . $m['details'];
 422         }
 423
 424         $page->changeTpl('xnetevents/calendar.tpl', NO_SKIN);
 425
 426         require_once('ical.inc.php');
 427         $page->assign('asso', $globals->asso());
 428         $page->assign('timestamp', time());
 429         $page->assign('admin', may_update());
 430
 431         if (may_update()) {
 432             $page->assign('participants', get_event_participants($evt, null, UserFilter::sortByPromo()));
 433         }
 434         $page->register_function('display_ical', 'display_ical');
 435         $page->assign_by_ref('e', $evt);
 436
 437         pl_content_headers("text/calendar");
 438     }
 439
 440     function handler_edit($page, $eid = null)
 441     {
 442         global $globals;
 443
 444         // get eid if the the given one is a short name
 445         if (!is_null($eid) && !is_numeric($eid)) {
 446             $res = XDB::query("SELECT eid
 447                                  FROM group_events
 448                                 WHERE asso_id = {?} AND short_name = {?}",
 449                               $globals->asso('id'), $eid);
 450             if ($res->numRows()) {
 451                 $eid = (int)$res->fetchOneCell();
 452             }
 453         }
 454
 455         // check the event is in our group
 456         if (!is_null($eid)) {
 457             $res = XDB::query("SELECT short_name
 458                                  FROM group_events
 459                                 WHERE eid = {?} AND asso_id = {?}",
 460                               $eid, $globals->asso('id'));
 461             if ($res->numRows()) {
 462                 $infos = $res->fetchOneAssoc();
 463             } else {
 464                 return PL_FORBIDDEN;
 465             }
 466         }
 467
 468         $page->changeTpl('xnetevents/edit.tpl');
 469
 470         $moments    = range(1, 4);
 471         $error      = false;
 472         $page->assign('moments', $moments);
 473
 474         if (Post::v('intitule')) {
 475             S::assert_xsrf_token();
 476
 477             $this->load('xnetevents.inc.php');
 478             $short_name = event_change_shortname($page, $eid,
 479                                                  $infos['short_name'],
 480                                                  Env::v('short_name', ''));
 481             if ($short_name != Env::v('short_name')) {
 482                 $error = true;
 483             }
 484             $evt = array(
 485                 'eid'              => $eid,
 486                 'asso_id'          => $globals->asso('id'),
 487                 'paiement_id'      => Post::v('paiement_id') > 0 ? Post::v('paiement_id') : null,
 488                 'debut'            => Post::v('deb_Year').'-'.Post::v('deb_Month')
 489                                       .'-'.Post::v('deb_Day').' '.Post::v('deb_Hour')
 490                                       .':'.Post::v('deb_Minute').':00',
 491                 'fin'              => Post::v('fin_Year').'-'.Post::v('fin_Month')
 492                                       .'-'.Post::v('fin_Day').' '.Post::v('fin_Hour')
 493                                       .':'.Post::v('fin_Minute').':00',
 494                 'short_name'       => $short_name,
 495             );
 496
 497             $trivial = array('intitule', 'descriptif', 'noinvite', 'subscription_notification',
 498                              'show_participants', 'accept_nonmembre', 'uid');
 499             foreach ($trivial as $k) {
 500                 $evt[$k] = Post::v($k);
 501             }
 502             if (!$eid) {
 503                 $evt['uid'] = S::v('uid');
 504             }
 505
 506             if (Post::v('deadline')) {
 507                 $evt['deadline_inscription'] = Post::v('inscr_Year').'-'
 508                                              . Post::v('inscr_Month').'-'
 509                                              . Post::v('inscr_Day');
 510             } else {
 511                 $evt['deadline_inscription'] = null;
 512             }
 513
 514             // Store the modifications in the database
 515             XDB::execute('INSERT INTO  group_events (eid, asso_id, uid, intitule, paiement_id,
 516                                                      descriptif, debut, fin, show_participants,
 517                                                      short_name, deadline_inscription, noinvite,
 518                                                      accept_nonmembre, subscription_notification)
 519                                VALUES  ({?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?}, {?})
 520               ON DUPLICATE KEY UPDATE  asso_id = VALUES(asso_id), uid = VALUES(uid), intitule = VALUES(intitule),
 521                                        paiement_id = VALUES(paiement_id), descriptif = VALUES(descriptif), debut = VALUES(debut),
 522                                        fin = VALUES(fin), show_participants = VALUES(show_participants), short_name = VALUES(short_name),
 523                                        deadline_inscription = VALUES(deadline_inscription), noinvite = VALUES(noinvite),
 524                                        accept_nonmembre = VALUES(accept_nonmembre), subscription_notification = VALUES(subscription_notification)',
 525                          $evt['eid'], $evt['asso_id'], $evt['uid'],
 526                          $evt['intitule'], $evt['paiement_id'], $evt['descriptif'],
 527                          $evt['debut'], $evt['fin'], $evt['show_participants'],
 528                          $evt['short_name'], $evt['deadline_inscription'],
 529                          $evt['noinvite'], $evt['accept_nonmembre'], $evt['subscription_notification']);
 530
 531             // if new event, get its id
 532             if (!$eid) {
 533                 $eid = XDB::insertId();
 534             }
 535
 536             foreach ($moments as $i) {
 537                 if (Post::v('titre' . $i)) {
 538                     $nb_moments++;
 539
 540                     $montant = strtr(Post::v('montant' . $i), ',', '.');
 541                     $money_defaut += (float)$montant;
 542                     XDB::execute('INSERT INTO  group_event_items (eid, item_id, titre, details, montant)
 543                                        VALUES  ({?}, {?}, {?}, {?}, {?})
 544                       ON DUPLICATE KEY UPDATE  titre = VALUES(titre), details = VALUES(details), montant = VALUES(montant)',
 545                                  $eid, $i, Post::v('titre' . $i), Post::v('details' . $i), $montant);
 546                 } else {
 547                     XDB::execute('DELETE FROM  group_event_items
 548                                         WHERE  eid = {?} AND item_id = {?}', $eid, $i);
 549                 }
 550             }
 551             // request for a new payment
 552             if (Post::v('paiement_id') == -1 && $money_defaut >= 0) {
 553                 $p = new PayReq(S::user(),
 554                                 $globals->asso('nom')." - ".Post::v('intitule'),
 555                                 Post::v('site'), $money_defaut,
 556                                 Post::v('confirmation'), 0, 999,
 557                                 $globals->asso('id'), $eid, Post::v('payment_public') == 'yes');
 558                 if ($p->accept()) {
 559                     $p->submit();
 560                 } else {
 561                     $page->assign('payment_message', Post::v('confirmation'));
 562                     $page->assign('payment_site', Post::v('site'));
 563                     $page->assign('payment_public', Post::v('payment_public') == 'yes');
 564                     $page->assign('error', true);
 565                     $error = true;
 566                 }
 567             }
 568
 569             // events with no sub-event: add a sub-event with default name
 570             if ($nb_moments == 0) {
 571                 XDB::execute("INSERT INTO group_event_items
 572                                    VALUES ({?}, {?}, 'Événement', '', 0)", $eid, 1);
 573             }
 574
 575             if (!$error) {
 576                 pl_redirect('events');
 577             }
 578         }
 579
 580         // get a list of all the payment for this asso
 581         $res = XDB::iterator("SELECT  id, text
 582                                 FROM  payments
 583                                WHERE  asso_id = {?} AND NOT FIND_IN_SET('old', flags)",
 584                              $globals->asso('id'));
 585         $paiements = array();
 586         while ($a = $res->next()) $paiements[$a['id']] = $a['text']; {
 587             $page->assign('paiements', $paiements);
 588         }
 589
 590         // when modifying an old event retreive the old datas
 591         if ($eid) {
 592             $res = XDB::query(
 593                     "SELECT  eid, intitule, descriptif, debut, fin, uid,
 594                              show_participants, paiement_id, short_name,
 595                              deadline_inscription, noinvite, accept_nonmembre, subscription_notification
 596                        FROM  group_events
 597                       WHERE eid = {?}", $eid);
 598             $evt = $res->fetchOneAssoc();
 599             // find out if there is already a request for a payment for this event
 600             $res = XDB::query("SELECT  stamp
 601                                  FROM  requests
 602                                 WHERE  type = 'paiements' AND data LIKE {?}",
 603                               PayReq::same_event($eid, $globals->asso('id')));
 604             $stamp = $res->fetchOneCell();
 605             if ($stamp) {
 606                 $evt['paiement_id']  = -2;
 607                 $evt['paiement_req'] = $stamp;
 608             }
 609             $page->assign('evt', $evt);
 610             // get all the different moments infos
 611             $res = XDB::iterator(
 612                     "SELECT  item_id, titre, details, montant
 613                        FROM  group_event_items AS ei
 614                  INNER JOIN  group_events AS e ON(e.eid = ei.eid)
 615                       WHERE  e.eid = {?}
 616                    ORDER BY item_id", $eid);
 617             $items = array();
 618             while ($item = $res->next()) {
 619                 $items[$item['item_id']] = $item;
 620             }
 621             $page->assign('items', $items);
 622         }
 623         $page->assign('url_ref', $eid);
 624     }
 625
 626     function handler_admin($page, $eid = null, $item_id = null)
 627     {
 628         global $globals;
 629
 630         $this->load('xnetevents.inc.php');
 631
 632         $evt = get_event_detail($eid, $item_id);
 633         if (!$evt) {
 634             return PL_NOT_FOUND;
 635         }
 636
 637         $page->changeTpl('xnetevents/admin.tpl');
 638         if (!$evt['show_participants'] && !may_update()) {
 639             return PL_FORBIDDEN;
 640         }
 641
 642         if (may_update() && Post::v('adm')) {
 643             S::assert_xsrf_token();
 644
 645             $member = User::getSilent(Post::v('mail'));
 646             if (!$member) {
 647                 $page->trigError("Membre introuvable");
 648             }
 649
 650             // change the price paid by a participant
 651             if (Env::v('adm') == 'prix' && $member) {
 652                 $amount = strtr(Env::v('montant'), ',', '.');
 653                 XDB::execute("UPDATE group_event_participants
 654                                  SET paid = paid + {?}
 655                                WHERE uid = {?} AND eid = {?} AND nb > 0
 656                             ORDER BY item_id ASC
 657                                LIMIT 1",
 658                              $amount, $member->uid, $evt['eid']);
 659                 subscribe_lists_event($member->uid, $evt['short_name'], 1, $amount);
 660             }
 661
 662             // change the number of personns coming with a participant
 663             if (Env::v('adm') == 'nbs' && $member) {
 664                 $res = XDB::query("SELECT SUM(paid)
 665                                      FROM group_event_participants
 666                                     WHERE uid = {?} AND eid = {?}",
 667                                   $member->uid, $evt['eid']);
 668
 669                 $paid = $res->fetchOneCell();
 670
 671                 // Ensure we have an integer
 672                 if ($paid == null) {
 673                     $paid = 0;
 674                 }
 675
 676                 $nbs  = Post::v('nb', array());
 677
 678                 $paid_inserted = false;
 679                 foreach ($nbs as $id => $nb) {
 680                     $nb = max(intval($nb), 0);
 681                     if (!$paid_inserted && $nb > 0) {
 682                         $item_paid = $paid;
 683                         $paid_inserted = true;
 684                     } else {
 685                         $item_paid = 0;
 686                     }
 687                     XDB::execute('INSERT INTO  group_event_participants (eid, uid, item_id, nb, flags, paid)
 688                                        VALUES  ({?}, {?}, {?}, {?}, {?}, {?})
 689                       ON DUPLICATE KEY UPDATE  nb = VALUES(nb), flags = VALUES(flags), paid = VALUES(paid)',
 690                                  $evt['eid'], $member->uid, $id, $nb, '', $item_paid);
 691                 }
 692
 693                 $res = XDB::query('SELECT  COUNT(uid) AS cnt, SUM(nb) AS nb
 694                                      FROM  group_event_participants
 695                                     WHERE  uid = {?} AND eid = {?}
 696                                  GROUP BY  uid',
 697                                   $member->uid, $evt['eid']);
 698                 $u = $res->fetchOneAssoc();
 699                 if ($paid == 0 && Post::v('cancel')) {
 700                     XDB::execute("DELETE FROM group_event_participants
 701                                         WHERE uid = {?} AND eid = {?}",
 702                                     $member->uid, $evt['eid']);
 703                     $u = 0;
 704                     subscribe_lists_event($member->uid, $evt['short_name'], -1, $paid);
 705                 } else {
 706                     $u = $u['cnt'] ? $u['nb'] : null;
 707                     subscribe_lists_event($member->uid, $evt['short_name'], ($u > 0 ? 1 : 0), $paid);
 708                 }
 709             }
 710
 711             $evt = get_event_detail($eid, $item_id);
 712         }
 713
 714         $page->assign_by_ref('evt', $evt);
 715         $page->assign('tout', is_null($item_id));
 716
 717         if (count($evt['moments'])) {
 718             $page->assign('moments', $evt['moments']);
 719         }
 720
 721         if ($evt['paiement_id']) {
 722             $infos = User::getBulkUsersWithUIDs(
 723                             XDB::fetchAllAssoc('SELECT  t.uid, t.amount
 724                                                   FROM  payment_transactions AS t
 725                                              LEFT JOIN  group_event_participants AS ep ON(ep.uid = t.uid AND ep.eid = {?})
 726                                                  WHERE  t.ref = {?} AND ep.uid IS NULL',
 727                                                $evt['eid'], $evt['paiement_id']),
 728                             'uid', 'user');
 729             $page->assign('oublis', count($infos));
 730             $page->assign('oubliinscription', $infos);
 731         }
 732
 733         $absents = User::getBulkUsersFromDB('SELECT  p.uid
 734                                                FROM  group_event_participants AS p
 735                                           LEFT JOIN  group_event_participants AS p2 ON (p2.uid = p.uid
 736                                                                                                AND p2.eid = p.eid
 737                                                                                                AND p2.nb != 0)
 738                                               WHERE  p.eid = {?} AND p2.eid IS NULL
 739                                            GROUP BY  p.uid', $evt['eid']);
 740
 741         $ofs = Env::i('offset');
 742         $part = get_event_participants($evt, $item_id, UserFilter::sortByName(),
 743                                        NB_PER_PAGE, $ofs * NB_PER_PAGE);
 744
 745         $nbp = ceil($evt['user_count'] / NB_PER_PAGE);
 746         if ($nbp > 1) {
 747             $links = array();
 748             if ($ofs) {
 749                 $links['précédent'] = $ofs - 1;
 750             }
 751             for ($i = 1 ; $i <= $nbp; $i++) {
 752                 $links[(string)$i] = $i - 1;
 753             }
 754             if ($ofs < $nbp - 1) {
 755                 $links['suivant'] = $ofs+1;
 756             }
 757             $page->assign('links', $links);
 758         }
 759
 760         $page->assign('absents', $absents);
 761         $page->assign('participants', $part);
 762     }
 763 }
 764
 765 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker fenc=utf-8:
 766 ?>