modules/xnetevents.php

   1 <?php
   2 /***************************************************************************
   3  *  Copyright (C) 2003-2009 Polytechnique.org                              *
   4  *  http://opensource.polytechnique.org/                                   *
   5  *                                                                         *
   6  *  This program is free software; you can redistribute it and/or modify   *
   7  *  it under the terms of the GNU General Public License as published by   *
   8  *  the Free Software Foundation; either version 2 of the License, or      *
   9  *  (at your option) any later version.                                    *
  10  *                                                                         *
  11  *  This program is distributed in the hope that it will be useful,        *
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  14  *  GNU General Public License for more details.                           *
  15  *                                                                         *
  16  *  You should have received a copy of the GNU General Public License      *
  17  *  along with this program; if not, write to the Free Software            *
  18  *  Foundation, Inc.,                                                      *
  19  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  20  ***************************************************************************/
  21
  22 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_MDP),
  30             '%grp/events/sub'   => $this->make_hook('sub',     AUTH_MDP),
  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),
  33             '%grp/events/edit'  => $this->make_hook('edit',    AUTH_MDP, 'groupadmin'),
  34             '%grp/events/admin' => $this->make_hook('admin',   AUTH_MDP, 'groupmember'),
  35         );
  36     }
  37
  38     function handler_events(&$page, $archive = null)
  39     {
  40         global $globals;
  41
  42         $page->changeTpl('xnetevents/index.tpl');
  43         $action = null;
  44         $archive = ($archive == 'archive' && may_update());
  45
  46         if (Post::has('del')) {
  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)) {
  58             if (!may_update()) {
  59                 return PL_FORBIDDEN;
  60             }
  61             S::assert_xsrf_token();
  62
  63             $res = XDB::query("SELECT asso_id, short_name FROM #groupex#.evenements
  64                                 WHERE eid = {?} AND asso_id = {?}",
  65                               $eid, $globals->asso('id'));
  66
  67             $tmp = $res->fetchOneRow();
  68             if (!$tmp) {
  69                 return PL_FORBIDDEN;
  70             }
  71         }
  72
  73         if ($action == 'del') {
  74             // deletes the event mailing aliases
  75             if ($tmp[1]) {
  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                 }
  81             }
  82
  83             // deletes the event items
  84             XDB::execute('DELETE FROM  #groupex#.evenements_items
  85                                 WHERE  eid = {?}', $eid);
  86
  87             // deletes the event participants
  88             XDB::execute('DELETE FROM  #groupex#.evenements_participants
  89                                 WHERE  eid = {?}', $eid);
  90
  91             // deletes the event
  92             XDB::execute('DELETE FROM  #groupex#.evenements
  93                                 WHERE  eid = {?} AND asso_id = {?}',
  94                          $eid, $globals->asso('id'));
  95
  96             // delete the requests for payments
  97             require_once 'validations.inc.php';
  98             XDB::execute("DELETE FROM  requests
  99                                 WHERE  type = 'paiements' AND data LIKE {?}",
 100                          PayReq::same_event($eid, $globals->asso('id')));
 101             $globals->updateNbValid();
 102         }
 103
 104         if ($action == 'archive') {
 105             XDB::execute("UPDATE #groupex#.evenements
 106                              SET archive = 1
 107                            WHERE eid = {?} AND asso_id = {?}",
 108                          $eid, $globals->asso('id'));
 109         }
 110
 111         if ($action == 'unarchive') {
 112             XDB::execute("UPDATE #groupex#.evenements
 113                              SET archive = 0
 114                            WHERE eid = {?} AND asso_id = {?}",
 115                          $eid, $globals->asso('id'));
 116         }
 117
 118         $page->assign('archive', $archive);
 119         $evenements = XDB::iterator(
 120                 "SELECT  e.*, LEFT(10, e.debut) AS first_day, LEFT(10, e.fin) AS last_day,
 121                          IF(e.deadline_inscription, e.deadline_inscription >= LEFT(NOW(), 10),
 122                             1) AS inscr_open, e.deadline_inscription,
 123                          u.nom, u.prenom, u.promo, a.alias,
 124                          MAX(ep.nb) IS NOT NULL AS inscrit, MAX(ep.paid) AS paid
 125                   FROM  #groupex#.evenements  AS e
 126             INNER JOIN  #x4dat#.auth_user_md5 AS u ON u.user_id = e.organisateur_uid
 127             INNER JOIN  #x4dat#.aliases       AS a ON (a.type = 'a_vie' AND a.id = u.user_id)
 128              LEFT JOIN  #groupex#.evenements_participants AS ep ON (ep.eid = e.eid AND ep.uid = {?})
 129                  WHERE  asso_id = {?}
 130                    AND  archive = " . ($archive ? "1 " : "0 ")
 131               . "GROUP BY  e.eid
 132                  ORDER BY  inscr_open DESC, debut DESC", S::v('uid'), $globals->asso('id'));
 133
 134         $evts = array();
 135         $undisplayed_events = 0;
 136         $this->load('xnetevents.inc.php');
 137
 138         while ($e = $evenements->next()) {
 139             if (!is_member() && !may_update() && !$e['accept_nonmembre']) {
 140                 $undisplayed_events ++;
 141                 continue;
 142             }
 143
 144             $e['show_participants'] = ($e['show_participants'] && (is_member() || may_update()));
 145             $res = XDB::query(
 146                 "SELECT titre, details, montant, ei.item_id, nb, ep.paid
 147                    FROM #groupex#.evenements_items AS ei
 148               LEFT JOIN #groupex#.evenements_participants AS ep
 149                         ON (ep.eid = ei.eid AND ep.item_id = ei.item_id AND uid = {?})
 150                   WHERE ei.eid = {?}",
 151                     S::v('uid'), $e['eid']);
 152             $e['moments'] = $res->fetchAllAssoc();
 153
 154             $e['topay'] = 0;
 155             $e['paid']  = $e['moments'][0]['paid'];
 156             foreach ($e['moments'] as $m) {
 157                 $e['topay'] += $m['nb'] * $m['montant'];
 158             }
 159
 160             $query = XDB::query(
 161                 "SELECT montant
 162                    FROM {$globals->money->mpay_tprefix}transactions AS t
 163                  WHERE ref = {?} AND uid = {?}", $e['paiement_id'], S::v('uid'));
 164             $montants = $query->fetchColumn();
 165
 166             foreach ($montants as $m) {
 167                 $p = strtr(substr($m, 0, strpos($m, 'EUR')), ',', '.');
 168                 $e['paid'] += trim($p);
 169             }
 170
 171             make_event_date($e);
 172
 173             if (Env::has('updated') && $e['eid'] == Env::i('updated')) {
 174                 $page->assign('updated', $e);
 175             }
 176             $evts[] = $e;
 177         }
 178
 179         $page->assign('evenements', $evts);
 180         $page->assign('undisplayed_events', $undisplayed_events);
 181     }
 182
 183     function handler_sub(&$page, $eid = null)
 184     {
 185         $this->load('xnetevents.inc.php');
 186         $page->changeTpl('xnetevents/subscribe.tpl');
 187
 188         $evt = get_event_detail($eid);
 189         if (is_null($evt)) {
 190             return PL_NOT_FOUND;
 191         }
 192         if ($evt === false) {
 193             global $globals, $platal;
 194             $url = $globals->asso('sub_url');
 195             if (empty($url)) {
 196                 $url = $platal->ns . 'subscribe';
 197             }
 198             $page->kill('Cet événement est reservé aux membres du groupe ' . $globals->asso('nom') .
 199                         '. Pour devenir membre, rends-toi sur la page de <a href="' . $url . '">demande d\'inscripton</a>.');
 200         }
 201
 202         if (!$evt['inscr_open']) {
 203             $page->kill('Les inscriptions pour cet événement sont closes');
 204         }
 205         if (!$evt['accept_nonmembre'] && !is_member() && !may_update()) {
 206             $page->kill('Cet événement est fermé aux non-membres du groupe');
 207         }
 208
 209         global $globals;
 210         $res = XDB::query("SELECT  stamp FROM requests
 211                             WHERE  type = 'paiements' AND data LIKE {?}",
 212                            PayReq::same_event($evt['eid'], $globals->asso('id')));
 213         $page->assign('validation', $res->numRows());
 214         $page->assign('event', $evt);
 215
 216         if (!Post::has('submit')) {
 217             return;
 218         } else {
 219             S::assert_xsrf_token();
 220         }
 221
 222         $moments = Post::v('moment',    array());
 223         $pers    = Post::v('personnes', array());
 224         $subs    = array();
 225
 226         foreach ($moments as $j => $v) {
 227             $subs[$j] = intval($v);
 228
 229             // retreive ohter field when more than one person
 230             if ($subs[$j] == 2) {
 231                 if (!isset($pers[$j]) || !is_numeric($pers[$j])
 232                 ||  $pers[$j] < 0)
 233                 {
 234                     $page->trigError("Tu dois choisir un nombre d'invités correct&nbsp;!");
 235                     return;
 236                 }
 237                 $subs[$j] = 1 + $pers[$j];
 238             }
 239         }
 240
 241         // impossible to unsubscribe if you already paid sthing
 242         if (!array_sum($subs) && $evt['paid'] != 0) {
 243             $page->trigError("Impossible de te désinscrire complètement " .
 244                             "parce que tu as fait un paiement par " .
 245                             "chèque ou par liquide. Contacte un " .
 246                             "administrateur du groupe si tu es sûr de " .
 247                             "ne pas venir.");
 248             return;
 249         }
 250
 251         // update actual inscriptions
 252         $updated = false;
 253         $total   = 0;
 254         $paid    = $evt['paid'] ? $evt['paid'] : 0;
 255         $telepaid= $evt['telepaid'] ? $evt['telepaid'] : 0;
 256         foreach ($subs as $j => $nb) {
 257             if ($nb >= 0) {
 258                 XDB::execute(
 259                     "REPLACE INTO  #groupex#.evenements_participants
 260                            VALUES  ({?}, {?}, {?}, {?}, {?}, {?})",
 261                     $eid, S::v('uid'), $j, $nb, Env::has('notify_payment') ? 'notify_payment' : '',
 262                     $j == 1 ? $paid - $telepaid : 0);
 263                 $updated = $eid;
 264             } else {
 265                 XDB::execute(
 266                     "DELETE FROM  #groupex#.evenements_participants
 267                            WHERE  eid = {?} AND uid = {?} AND item_id = {?}",
 268                     $eid, S::v("uid"), $j);
 269                 $updated = $eid;
 270             }
 271             $total += $nb;
 272         }
 273         if ($updated !== false) {
 274             $page->trigSuccess('Ton inscription à l\'événement a été mise à jour avec succès.');
 275             subscribe_lists_event($total, S::i('uid'), $evt, $paid);
 276         }
 277         $page->assign('event', get_event_detail($eid));
 278     }
 279
 280     function handler_csv(&$page, $eid = null, $item_id = null)
 281     {
 282         $this->load('xnetevents.inc.php');
 283
 284         if (!is_numeric($item_id)) {
 285             $item_id = null;
 286         }
 287
 288         $evt = get_event_detail($eid, $item_id);
 289         if (!$evt) {
 290             return PL_NOT_FOUND;
 291         }
 292
 293         pl_content_headers("text/x-csv");
 294         $page->changeTpl('xnetevents/csv.tpl', NO_SKIN);
 295
 296         $admin = may_update();
 297
 298         $tri = (Env::v('order') == 'alpha' ? 'promo, nom, prenom' : 'nom, prenom, promo');
 299
 300         $page->assign('participants',
 301                       get_event_participants($evt, $item_id, $tri));
 302
 303         $page->assign('admin', $admin);
 304         $page->assign('moments', $evt['moments']);
 305         $page->assign('money', $evt['money']);
 306         $page->assign('telepayment', $evt['paiement_id']);
 307         $page->assign('tout', !Env::v('item_id', false));
 308     }
 309
 310     function handler_ical(&$page, $eid = null)
 311     {
 312         global $globals;
 313
 314         $this->load('xnetevents.inc.php');
 315         $evt = get_event_detail($eid);
 316         if (!$evt) {
 317             return PL_FORBIDDEN;
 318         }
 319         $evt['debut'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['debut']);
 320         $evt['fin'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['fin']);
 321
 322         foreach ($evt['moments'] as $m) {
 323             $evt['descriptif'] .= "\n\n** " . $m['titre'] . " **\n" . $m['details'];
 324         }
 325
 326         $page->changeTpl('xnetevents/calendar.tpl', NO_SKIN);
 327
 328         require_once('ical.inc.php');
 329         $page->assign('asso', $globals->asso());
 330         $page->assign('timestamp', time());
 331         $page->assign('admin', may_update());
 332
 333         if (may_update()) {
 334             $page->assign('participants', get_event_participants($evt, null, 'promo, nom, prenom'));
 335         }
 336         $page->register_function('display_ical', 'display_ical');
 337         $page->assign_by_ref('e', $evt);
 338
 339         pl_content_headers("text/calendar");
 340     }
 341
 342     function handler_edit(&$page, $eid = null)
 343     {
 344         global $globals;
 345
 346         // get eid if the the given one is a short name
 347         if (!is_null($eid) && !is_numeric($eid)) {
 348             $res = XDB::query("SELECT eid
 349                                  FROM #groupex#.evenements
 350                                 WHERE asso_id = {?} AND short_name = {?}",
 351                               $globals->asso('id'), $eid);
 352             if ($res->numRows()) {
 353                 $eid = (int)$res->fetchOneCell();
 354             }
 355         }
 356
 357         // check the event is in our group
 358         if (!is_null($eid)) {
 359             $res = XDB::query("SELECT short_name
 360                                  FROM #groupex#.evenements
 361                                 WHERE eid = {?} AND asso_id = {?}",
 362                               $eid, $globals->asso('id'));
 363             if ($res->numRows()) {
 364                 $infos = $res->fetchOneAssoc();
 365             } else {
 366                 return PL_FORBIDDEN;
 367             }
 368         }
 369
 370         $page->changeTpl('xnetevents/edit.tpl');
 371
 372         $moments    = range(1, 4);
 373         $error      = false;
 374         $page->assign('moments', $moments);
 375
 376         if (Post::v('intitule')) {
 377             S::assert_xsrf_token();
 378
 379             $this->load('xnetevents.inc.php');
 380             $short_name = event_change_shortname($page, $eid,
 381                                                  $infos['short_name'],
 382                                                  Env::v('short_name', ''));
 383             if ($short_name != Env::v('short_name')) {
 384                 $error = true;
 385             }
 386             $evt = array(
 387                 'eid'              => $eid,
 388                 'asso_id'          => $globals->asso('id'),
 389                 'paiement_id'      => Post::v('paiement_id') > 0 ? Post::v('paiement_id') : null,
 390                 'debut'            => Post::v('deb_Year').'-'.Post::v('deb_Month')
 391                                       .'-'.Post::v('deb_Day').' '.Post::v('deb_Hour')
 392                                       .':'.Post::v('deb_Minute').':00',
 393                 'fin'              => Post::v('fin_Year').'-'.Post::v('fin_Month')
 394                                       .'-'.Post::v('fin_Day').' '.Post::v('fin_Hour')
 395                                       .':'.Post::v('fin_Minute').':00',
 396                 'short_name'       => $short_name,
 397             );
 398
 399             $trivial = array('intitule', 'descriptif', 'noinvite',
 400                              'show_participants', 'accept_nonmembre', 'organisateur_uid');
 401             foreach ($trivial as $k) {
 402                 $evt[$k] = Post::v($k);
 403             }
 404             if (!$eid) {
 405                 $evt['organisateur_uid'] = S::v('uid');
 406             }
 407
 408             if (Post::v('deadline')) {
 409                 $evt['deadline_inscription'] = Post::v('inscr_Year').'-'
 410                                              . Post::v('inscr_Month').'-'
 411                                              . Post::v('inscr_Day');
 412             } else {
 413                 $evt['deadline_inscription'] = null;
 414             }
 415
 416             // Store the modifications in the database
 417             XDB::execute('REPLACE INTO #groupex#.evenements
 418                 SET eid={?}, asso_id={?}, organisateur_uid={?}, intitule={?},
 419                     paiement_id = {?}, descriptif = {?}, debut = {?},
 420                     fin = {?}, show_participants = {?}, short_name = {?},
 421                     deadline_inscription = {?}, noinvite = {?},
 422                     accept_nonmembre = {?}',
 423                     $evt['eid'], $evt['asso_id'], $evt['organisateur_uid'],
 424                     $evt['intitule'], $evt['paiement_id'], $evt['descriptif'],
 425                     $evt['debut'], $evt['fin'], $evt['show_participants'],
 426                     $evt['short_name'], $evt['deadline_inscription'],
 427                     $evt['noinvite'], $evt['accept_nonmembre']);
 428
 429             // if new event, get its id
 430             if (!$eid) {
 431                 $eid = XDB::insertId();
 432             }
 433
 434             $nb_moments   = 0;
 435             $money_defaut = 0;
 436
 437             foreach ($moments as $i) {
 438                 if (Post::v('titre'.$i)) {
 439                     $nb_moments++;
 440
 441                     $montant = strtr(Post::v('montant'.$i), ',', '.');
 442                     $money_defaut += (float)$montant;
 443                     XDB::execute("
 444                         REPLACE INTO #groupex#.evenements_items
 445                         VALUES ({?}, {?}, {?}, {?}, {?})",
 446                         $eid, $i, Post::v('titre'.$i),
 447                         Post::v('details'.$i), $montant);
 448                 } else {
 449                     XDB::execute("DELETE FROM #groupex#.evenements_items
 450                                             WHERE eid = {?} AND item_id = {?}", $eid, $i);
 451                 }
 452             }
 453             // request for a new payment
 454             if (Post::v('paiement_id') == -1 && $money_defaut >= 0) {
 455                 require_once 'validations.inc.php';
 456                 $p = new PayReq(S::user(),
 457                                 Post::v('intitule')." - ".$globals->asso('nom'),
 458                                 Post::v('site'), $money_defaut,
 459                                 Post::v('confirmation'), 0, 999,
 460                                 $globals->asso('id'), $eid);
 461                 if ($p->accept()) {
 462                     $p->submit();
 463                 } else {
 464                     $page->assign('paiement_message', Post::v('confirmation'));
 465                     $page->assign('paiement_site', Post::v('site'));
 466                     $error = true;
 467                 }
 468             }
 469
 470             // events with no sub-event: add a sub-event with no name
 471             if ($nb_moments == 0) {
 472                 XDB::execute("INSERT INTO #groupex#.evenements_items
 473                                    VALUES ({?}, {?}, '', '', 0)", $eid, 1);
 474             }
 475
 476             if (!$error) {
 477                 pl_redirect('events');
 478             }
 479         }
 480
 481         // get a list of all the payment for this asso
 482         $res = XDB::iterator("SELECT id, text
 483                                 FROM {$globals->money->mpay_tprefix}paiements
 484                                WHERE asso_id = {?}", $globals->asso('id'));
 485         $paiements = array();
 486         while ($a = $res->next()) $paiements[$a['id']] = $a['text']; {
 487             $page->assign('paiements', $paiements);
 488         }
 489
 490         // when modifying an old event retreive the old datas
 491         if ($eid) {
 492             $res = XDB::query(
 493                     "SELECT  eid, intitule, descriptif, debut, fin, organisateur_uid,
 494                              show_participants, paiement_id, short_name,
 495                              deadline_inscription, noinvite, accept_nonmembre
 496                        FROM  #groupex#.evenements
 497                       WHERE eid = {?}", $eid);
 498             $evt = $res->fetchOneAssoc();
 499             // find out if there is already a request for a payment for this event
 500             require_once 'validations.inc.php';
 501             $res = XDB::query("SELECT stamp FROM requests
 502                                 WHERE type = 'paiements' AND data LIKE {?}",
 503                                PayReq::same_event($eid, $globals->asso('id')));
 504             $stamp = $res->fetchOneCell();
 505             if ($stamp) {
 506                 $evt['paiement_id']  = -2;
 507                 $evt['paiement_req'] = $stamp;
 508             }
 509             $page->assign('evt', $evt);
 510             // get all the different moments infos
 511             $res = XDB::iterator(
 512                     "SELECT  item_id, titre, details, montant
 513                        FROM  #groupex#.evenements_items AS ei
 514                  INNER JOIN  #groupex#.evenements AS e ON(e.eid = ei.eid)
 515                       WHERE  e.eid = {?}
 516                    ORDER BY item_id", $eid);
 517             $items = array();
 518             while ($item = $res->next()) {
 519                 $items[$item['item_id']] = $item;
 520             }
 521             $page->assign('items', $items);
 522         }
 523         $page->assign('url_ref', $eid);
 524     }
 525
 526     function handler_admin(&$page, $eid = null, $item_id = null)
 527     {
 528         global $globals;
 529
 530         $this->load('xnetevents.inc.php');
 531
 532         $evt = get_event_detail($eid, $item_id);
 533         if (!$evt) {
 534             return PL_NOT_FOUND;
 535         }
 536
 537         $page->changeTpl('xnetevents/admin.tpl');
 538         if (!$evt['show_participants'] && !may_update()) {
 539             return PL_FORBIDDEN;
 540         }
 541
 542         if (may_update() && Post::v('adm')) {
 543             S::assert_xsrf_token();
 544
 545             $member = get_infos(Post::v('mail'));
 546             if (!$member) {
 547                 $page->trigError("Membre introuvable");
 548             }
 549
 550             // change the price paid by a participant
 551             if (Env::v('adm') == 'prix' && $member) {
 552                 XDB::execute("UPDATE #groupex#.evenements_participants
 553                                  SET paid = paid + {?}
 554                                WHERE uid = {?} AND eid = {?} AND item_id = 1",
 555                         strtr(Env::v('montant'), ',', '.'),
 556                         $member['uid'], $evt['eid']);
 557             }
 558
 559             // change the number of personns coming with a participant
 560             if (Env::v('adm') == 'nbs' && $member) {
 561                 $res = XDB::query("SELECT paid
 562                                      FROM #groupex#.evenements_participants
 563                                     WHERE uid = {?} AND eid = {?}",
 564                                   $member['uid'], $evt['eid']);
 565
 566                 $paid = intval($res->fetchOneCell());
 567                 $nbs  = Post::v('nb', array());
 568
 569                 foreach ($nbs as $id => $nb) {
 570                     $nb = max(intval($nb), 0);
 571                     XDB::execute("REPLACE INTO #groupex#.evenements_participants
 572                                         VALUES ({?}, {?}, {?}, {?}, {?}, {?})",
 573                                   $evt['eid'], $member['uid'], $id, $nb, '', $id == 1 ? $paid : 0);
 574                 }
 575
 576                 $res = XDB::query("SELECT COUNT(uid) AS cnt, SUM(nb) AS nb
 577                                      FROM #groupex#.evenements_participants
 578                                     WHERE uid = {?} AND eid = {?}
 579                                  GROUP BY uid",
 580                                             $member['uid'], $evt['eid']);
 581                 $u = $res->fetchOneAssoc();
 582                 $u = $u['cnt'] ? $u['nb'] : null;
 583                 subscribe_lists_event($u, $member['uid'], $evt, $paid);
 584             }
 585
 586             $evt = get_event_detail($eid, $item_id);
 587         }
 588
 589         $page->assign_by_ref('evt', $evt);
 590         $page->assign('tout', is_null($item_id));
 591
 592         if (count($evt['moments'])) {
 593             $page->assign('moments', $evt['moments']);
 594         }
 595
 596         $tri = (Env::v('order') == 'alpha' ? 'promo, nom, prenom' : 'nom, prenom, promo');
 597         $whereitemid = is_null($item_id) ? '' : "AND ep.item_id = $item_id";
 598         $res = XDB::iterRow(
 599                     'SELECT  UPPER(SUBSTRING(IF(u.nom IS NULL, m.nom,
 600                                                 IF(u.nom_usage<>"", u.nom_usage, u.nom)), 1, 1)),
 601                              COUNT(DISTINCT ep.uid)
 602                        FROM  #groupex#.evenements_participants AS ep
 603                  INNER JOIN  #groupex#.evenements              AS e ON (ep.eid = e.eid)
 604                   LEFT JOIN  #groupex#.membres                 AS m ON ( ep.uid = m.uid AND e.asso_id = m.asso_id)
 605                   LEFT JOIN  #x4dat#.auth_user_md5             AS u ON ( u.user_id = ep.uid )
 606                       WHERE  ep.eid = {?} '.$whereitemid . '
 607                    GROUP BY  UPPER(SUBSTRING(IF(u.nom IS NULL,m.nom,u.nom), 1, 1))', $evt['eid']);
 608
 609         $alphabet = array();
 610         $nb_tot = 0;
 611         while (list($char, $nb) = $res->next()) {
 612             $alphabet[ord($char)] = $char;
 613             $nb_tot += $nb;
 614             if (Env::has('initiale') && $char == mb_strtoupper(Env::v('initiale'))) {
 615                 $tot = $nb;
 616             }
 617         }
 618         ksort($alphabet);
 619         $page->assign('alphabet', $alphabet);
 620
 621         if ($evt['paiement_id']) {
 622             $res = XDB::iterator(
 623                 "SELECT IF(u.nom_usage<>'', u.nom_usage, u.nom) AS nom, u.prenom,
 624                         u.promo, a.alias AS email, t.montant
 625                    FROM {$globals->money->mpay_tprefix}transactions AS t
 626              INNER JOIN #x4dat#.auth_user_md5             AS u ON(t.uid = u.user_id)
 627              INNER JOIN #x4dat#.aliases                   AS a ON (a.id = t.uid AND a.type='a_vie' )
 628               LEFT JOIN #groupex#.evenements_participants AS ep ON(ep.uid = t.uid AND ep.eid = {?})
 629                   WHERE t.ref = {?} AND ep.uid IS NULL",
 630                   $evt['eid'], $evt['paiement_id']);
 631             $page->assign('oublis', $res->total());
 632             $page->assign('oubliinscription', $res);
 633         }
 634
 635         $absents = XDB::iterator("SELECT  p.uid,
 636                                           IF(m.origine = 'X', IF(u.nom_usage != '', u.nom_usage, u.nom), m.nom) AS nom,
 637                                           IF(m.origine = 'X', u.prenom, u.prenom) AS prenom,
 638                                           IF(m.origine = 'X', u.promo, m.origine) AS promo,
 639                                           IF(m.origine = 'X', FIND_IN_SET('femme', u.flags), m.sexe) AS sexe,
 640                                           IF(m.origine = 'X', a.alias, m.email) AS email
 641                                     FROM  #groupex#.evenements_participants AS p
 642                               INNER JOIN  #groupex#.membres                 AS m USING(uid)
 643                                LEFT JOIN  #groupex#.evenements_participants AS p2 ON (p2.uid = m.uid AND p2.eid = p.eid
 644                                                                                       AND p2.nb != 0)
 645                                LEFT JOIN  #x4dat#.auth_user_md5             AS u ON (u.user_id = m.uid)
 646                                LEFT JOIN  #x4dat#.aliases                   AS a ON (a.id = u.user_id AND a.type = 'a_vie')
 647                                    WHERE  p.eid = {?} AND p2.eid IS NULL
 648                                        " . (Env::v('initiale') ? " AND IF(u.nom IS NULL, m.nom,
 649                                           IF(u.nom_usage<>'', u.nom_usage, u.nom)) LIKE '" . Env::v('initiale') . "%'"
 650                                          : "") . "
 651                                 GROUP BY  m.uid
 652                                 ORDER BY  nom, prenom, promo", $evt['eid']);
 653
 654         $ofs   = Env::i('offset');
 655         $tot   = (Env::v('initiale') ? $tot : $nb_tot);
 656         $nbp   = ceil($tot / NB_PER_PAGE);
 657         if ($nbp > 1) {
 658             $links = array();
 659             if ($ofs) {
 660                 $links['précédent'] = $ofs - 1;
 661             }
 662             for ($i = 1 ; $i <= $nbp; $i++) {
 663                 $links[(string)$i] = $i - 1;
 664             }
 665             if ($ofs < $nbp) {
 666                 $links['suivant'] = $ofs+1;
 667             }
 668             $page->assign('links', $links);
 669         }
 670
 671
 672         $page->assign('absents', $absents);
 673         $page->assign('participants',
 674                       get_event_participants($evt, $item_id, $tri,
 675                                              "LIMIT ".($ofs*NB_PER_PAGE).", ".NB_PER_PAGE));
 676     }
 677 }
 678
 679 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 680 ?>