+ $page->assign('telepayment', $evt['paiement_id']);
+ $page->assign('tout', !Env::v('item_id', false));
+ }
+
+ function handler_ical(&$page, $eid = null)
+ {
+ global $globals;
+
+ $this->load('xnetevents.inc.php');
+ $evt = get_event_detail($eid);
+ if (!$evt) {
+ return PL_FORBIDDEN;
+ }
+ $evt['debut'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['debut']);
+ $evt['fin'] = preg_replace('/(\d+)-(\d+)-(\d+) (\d+):(\d+):(\d+)/', "\\1\\2\\3T\\4\\5\\6", $evt['fin']);
+
+ foreach ($evt['moments'] as $m) {
+ $evt['descriptif'] .= "\n\n** " . $m['titre'] . " **\n" . $m['details'];
+ }
+
+ $page->changeTpl('xnetevents/calendar.tpl', NO_SKIN);
+
+ require_once('ical.inc.php');
+ $page->assign('asso', $globals->asso());
+ $page->assign('timestamp', time());
+ $page->assign('admin', may_update());
+
+ if (may_update()) {
+ $page->assign('participants', get_event_participants($evt, null, UserFilter::sortByPromo()));
+ }
+ $page->register_function('display_ical', 'display_ical');
+ $page->assign_by_ref('e', $evt);
+
+ pl_content_headers("text/calendar");
+ }
+
+ function handler_edit(&$page, $eid = null)
+ {
+ global $globals;
+
+ // get eid if the the given one is a short name
+ if (!is_null($eid) && !is_numeric($eid)) {
+ $res = XDB::query("SELECT eid
+ FROM group_events
+ WHERE asso_id = {?} AND short_name = {?}",
+ $globals->asso('id'), $eid);
+ if ($res->numRows()) {
+ $eid = (int)$res->fetchOneCell();
+ }
+ }
+
+ // check the event is in our group
+ if (!is_null($eid)) {
+ $res = XDB::query("SELECT short_name
+ FROM group_events
+ WHERE eid = {?} AND asso_id = {?}",
+ $eid, $globals->asso('id'));
+ if ($res->numRows()) {
+ $infos = $res->fetchOneAssoc();
+ } else {
+ return PL_FORBIDDEN;
+ }
+ }
+
+ $page->changeTpl('xnetevents/edit.tpl');
+
+ $moments = range(1, 4);
+ $error = false;
+ $page->assign('moments', $moments);
+
+ if (Post::v('intitule')) {
+ S::assert_xsrf_token();
+
+ $this->load('xnetevents.inc.php');
+ $short_name = event_change_shortname($page, $eid,
+ $infos['short_name'],
+ Env::v('short_name', ''));
+ if ($short_name != Env::v('short_name')) {
+ $error = true;
+ }
+ $evt = array(
+ 'eid' => $eid,
+ 'asso_id' => $globals->asso('id'),
+ 'paiement_id' => Post::v('paiement_id') > 0 ? Post::v('paiement_id') : null,
+ 'debut' => Post::v('deb_Year').'-'.Post::v('deb_Month')
+ .'-'.Post::v('deb_Day').' '.Post::v('deb_Hour')
+ .':'.Post::v('deb_Minute').':00',
+ 'fin' => Post::v('fin_Year').'-'.Post::v('fin_Month')
+ .'-'.Post::v('fin_Day').' '.Post::v('fin_Hour')
+ .':'.Post::v('fin_Minute').':00',
+ 'short_name' => $short_name,
+ );
+
+ $trivial = array('intitule', 'descriptif', 'noinvite',
+ 'show_participants', 'accept_nonmembre', 'organisateur_uid');
+ foreach ($trivial as $k) {
+ $evt[$k] = Post::v($k);
+ }
+ if (!$eid) {
+ $evt['organisateur_uid'] = S::v('uid');
+ }
+
+ if (Post::v('deadline')) {
+ $evt['deadline_inscription'] = Post::v('inscr_Year').'-'
+ . Post::v('inscr_Month').'-'
+ . Post::v('inscr_Day');
+ } else {
+ $evt['deadline_inscription'] = null;
+ }
+
+ // Store the modifications in the database
+ XDB::execute('REPLACE INTO group_events
+ SET eid={?}, asso_id={?}, organisateur_uid={?}, intitule={?},
+ paiement_id = {?}, descriptif = {?}, debut = {?},
+ fin = {?}, show_participants = {?}, short_name = {?},
+ deadline_inscription = {?}, noinvite = {?},
+ accept_nonmembre = {?}',
+ $evt['eid'], $evt['asso_id'], $evt['organisateur_uid'],
+ $evt['intitule'], $evt['paiement_id'], $evt['descriptif'],
+ $evt['debut'], $evt['fin'], $evt['show_participants'],
+ $evt['short_name'], $evt['deadline_inscription'],
+ $evt['noinvite'], $evt['accept_nonmembre']);
+
+ // if new event, get its id
+ if (!$eid) {
+ $eid = XDB::insertId();
+ }
+
+ $nb_moments = 0;
+ $money_defaut = 0;
+
+ foreach ($moments as $i) {
+ if (Post::v('titre'.$i)) {
+ $nb_moments++;
+
+ $montant = strtr(Post::v('montant'.$i), ',', '.');
+ $money_defaut += (float)$montant;
+ XDB::execute("
+ REPLACE INTO group_event_items
+ VALUES ({?}, {?}, {?}, {?}, {?})",
+ $eid, $i, Post::v('titre'.$i),
+ Post::v('details'.$i), $montant);
+ } else {
+ XDB::execute("DELETE FROM group_event_items
+ WHERE eid = {?} AND item_id = {?}", $eid, $i);
+ }
+ }
+ // request for a new payment
+ if (Post::v('paiement_id') == -1 && $money_defaut >= 0) {
+ require_once 'validations.inc.php';
+ $p = new PayReq(S::user(),
+ Post::v('intitule')." - ".$globals->asso('nom'),
+ Post::v('site'), $money_defaut,
+ Post::v('confirmation'), 0, 999,
+ $globals->asso('id'), $eid);
+ if ($p->accept()) {
+ $p->submit();
+ } else {
+ $page->assign('paiement_message', Post::v('confirmation'));
+ $page->assign('paiement_site', Post::v('site'));
+ $error = true;
+ }
+ }
+
+ // events with no sub-event: add a sub-event with no name
+ if ($nb_moments == 0) {
+ XDB::execute("INSERT INTO group_event_items
+ VALUES ({?}, {?}, '', '', 0)", $eid, 1);
+ }
+
+ if (!$error) {
+ pl_redirect('events');
+ }
+ }
+
+ // get a list of all the payment for this asso
+ $res = XDB::iterator("SELECT id, text
+ FROM {$globals->money->mpay_tprefix}paiements
+ WHERE asso_id = {?}", $globals->asso('id'));
+ $paiements = array();
+ while ($a = $res->next()) $paiements[$a['id']] = $a['text']; {
+ $page->assign('paiements', $paiements);
+ }
+
+ // when modifying an old event retreive the old datas
+ if ($eid) {
+ $res = XDB::query(
+ "SELECT eid, intitule, descriptif, debut, fin, organisateur_uid,
+ show_participants, paiement_id, short_name,
+ deadline_inscription, noinvite, accept_nonmembre
+ FROM group_events
+ WHERE eid = {?}", $eid);
+ $evt = $res->fetchOneAssoc();
+ // find out if there is already a request for a payment for this event
+ require_once 'validations.inc.php';
+ $res = XDB::query("SELECT stamp
+ FROM requests
+ WHERE type = 'paiements' AND data LIKE {?}",
+ PayReq::same_event($eid, $globals->asso('id')));
+ $stamp = $res->fetchOneCell();
+ if ($stamp) {
+ $evt['paiement_id'] = -2;
+ $evt['paiement_req'] = $stamp;
+ }
+ $page->assign('evt', $evt);
+ // get all the different moments infos
+ $res = XDB::iterator(
+ "SELECT item_id, titre, details, montant
+ FROM group_event_items AS ei
+ INNER JOIN group_events AS e ON(e.eid = ei.eid)
+ WHERE e.eid = {?}
+ ORDER BY item_id", $eid);
+ $items = array();
+ while ($item = $res->next()) {
+ $items[$item['item_id']] = $item;
+ }
+ $page->assign('items', $items);
+ }
+ $page->assign('url_ref', $eid);
+ }
+
+ function handler_admin(&$page, $eid = null, $item_id = null)
+ {
+ global $globals;
+
+ $this->load('xnetevents.inc.php');
+
+ $evt = get_event_detail($eid, $item_id);
+ if (!$evt) {
+ return PL_NOT_FOUND;
+ }
+
+ $page->changeTpl('xnetevents/admin.tpl');
+ if (!$evt['show_participants'] && !may_update()) {
+ return PL_FORBIDDEN;
+ }
+
+ if (may_update() && Post::v('adm')) {
+ S::assert_xsrf_token();
+
+ $member = get_infos(Post::v('mail'));
+ if (!$member) {
+ $page->trigError("Membre introuvable");
+ }
+
+ // change the price paid by a participant
+ if (Env::v('adm') == 'prix' && $member) {
+ XDB::execute("UPDATE group_event_participants
+ SET paid = paid + {?}
+ WHERE uid = {?} AND eid = {?} AND item_id = 1",
+ strtr(Env::v('montant'), ',', '.'),
+ $member['uid'], $evt['eid']);
+ }
+
+ // change the number of personns coming with a participant
+ if (Env::v('adm') == 'nbs' && $member) {
+ $res = XDB::query("SELECT paid
+ FROM group_event_participants
+ WHERE uid = {?} AND eid = {?}",
+ $member['uid'], $evt['eid']);
+
+ $paid = intval($res->fetchOneCell());
+ $nbs = Post::v('nb', array());
+
+ foreach ($nbs as $id => $nb) {
+ $nb = max(intval($nb), 0);
+ XDB::execute("REPLACE INTO group_event_participants
+ VALUES ({?}, {?}, {?}, {?}, {?}, {?})",
+ $evt['eid'], $member['uid'], $id, $nb, '', $id == 1 ? $paid : 0);
+ }
+
+ $res = XDB::query("SELECT COUNT(uid) AS cnt, SUM(nb) AS nb
+ FROM group_event_participants
+ WHERE uid = {?} AND eid = {?}
+ GROUP BY uid",
+ $member['uid'], $evt['eid']);
+ $u = $res->fetchOneAssoc();
+ $u = $u['cnt'] ? $u['nb'] : null;
+ subscribe_lists_event($u, $member['uid'], $evt, $paid);
+ }
+
+ $evt = get_event_detail($eid, $item_id);
+ }
+
+ $page->assign_by_ref('evt', $evt);
+ $page->assign('tout', is_null($item_id));
+
+ if (count($evt['moments'])) {
+ $page->assign('moments', $evt['moments']);
+ }
+
+ if ($evt['paiement_id']) {
+ $infos = User::getBulkUsersWithUIDs(
+ XDB::fetchAllAssoc('SELECT t.uid, t.montant
+ FROM ' . $globals->money->mpay_tprefix . 'transactions AS t
+ LEFT JOIN group_event_participants AS ep ON(ep.uid = t.uid AND ep.eid = {?})
+ WHERE t.ref = {?} AND ep.uid IS NULL',
+ $evt['eid'], $evt['paiement_id']),
+ 'uid', 'user');
+ $page->assign('oublis', count($infos));
+ $page->assign('oubliinscription', $infos);
+ }
+
+ $absents = User::getBulkUsersFromDB('SELECT p.uid
+ FROM group_event_participants AS p
+ LEFT JOIN group_event_participants AS p2 ON (p2.uid = p.uid
+ AND p2.eid = p.eid
+ AND p2.nb != 0)
+ WHERE p.eid = {?} AND p2.eid IS NULL
+ GROUP BY p.uid', $evt['eid']);
+
+ $ofs = Env::i('offset');
+ $tot = (Env::v('initiale') ? $tot : $nb_tot);
+ $nbp = ceil($tot / NB_PER_PAGE);
+ if ($nbp > 1) {
+ $links = array();
+ if ($ofs) {
+ $links['précédent'] = $ofs - 1;
+ }
+ for ($i = 1 ; $i <= $nbp; $i++) {
+ $links[(string)$i] = $i - 1;
+ }
+ if ($ofs < $nbp) {
+ $links['suivant'] = $ofs+1;
+ }
+ $page->assign('links', $links);
+ }
+
+ $page->assign('absents', $absents);
+ $page->assign('participants',
+ get_event_participants($evt, $item_id, UserFilter::sortByName(),
+ NB_PER_PAGE, $ofs * NB_PER_PAGE));