* 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA *
***************************************************************************/
+define('NB_PER_PAGE', 25);
+
class XnetEventsModule extends PLModule
{
function handlers()
new_group_page('xnetevents/index.tpl');
+ if (Post::has('del')) {
+ if (!may_update()) {
+ return PL_NOT_ALLOWED;
+ }
+
+ $eid = Post::get('del');
+
+ $res = $globals->xdb->query("SELECT asso_id, short_name FROM groupex.evenements
+ WHERE eid = {?} AND asso_id = {?}",
+ $eid, $globals->asso('id'));
+
+ $tmp = $res->fetchOneRow();
+ if (!$tmp) {
+ return PL_NOT_ALLOWED;
+ }
+
+ // deletes the event mailing aliases
+ if ($tmp[1]) {
+ $globals->xdb->execute(
+ "DELETE FROM virtual WHERE type = 'evt' AND alias LIKE {?}",
+ $tmp[1].'-absents@%');
+ $globals->xdb->execute(
+ "DELETE FROM virtual WHERE type = 'evt' AND alias LIKE {?}",
+ $tmp[1].'-participants@%');
+ }
+
+ // deletes the event items
+ $globals->xdb->execute("DELETE FROM groupex.evenements_items WHERE eid = {?}", $eid);
+
+ // deletes the event participants
+ $globals->xdb->execute("DELETE FROM groupex.evenements_participants
+ WHERE eid = {?}", $eid);
+
+ // deletes the event
+ $globals->xdb->execute("DELETE FROM groupex.evenements
+ WHERE eid = {?} AND asso_id = {?}",
+ $eid, $globals->asso('id'));
+
+ // delete the requests for payments
+ require_once 'validations.inc.php';
+ $globals->xdb->execute("DELETE FROM requests
+ WHERE type = 'paiements' AND data LIKE {?}",
+ PayReq::same_event($eid, $globals->asso('id')));
+ }
+
$page->assign('admin', may_update());
$evenements = $globals->xdb->iterator(
{
global $globals;
- require_once('xnet/evenements.php');
+ require_once dirname(__FILE__).'/xnetevents/xnetevents.inc.php';
new_group_page('xnetevents/subscribe.tpl');
"REPLACE INTO groupex.evenements_participants
VALUES ({?}, {?}, {?}, {?}, {?})",
$eid, Session::getInt('uid'), $j, $nb, $evt['paid']);
+ $page->assign('updated', true);
} else {
$globals->xdb->execute(
"DELETE FROM groupex.evenements_participants
WHERE eid = {?} AND uid = {?} AND item_id = {?}",
$eid, Session::getInt("uid"), $j);
+ $page->assign('updated', true);
}
}
function handler_csv(&$page, $eid = null, $item_id = null)
{
- require_once('xnet/evenements.php');
+ require_once dirname(__FILE__).'/xnetevents/xnetevents.inc.php';
if (!is_numeric($item_id)) {
$item_id = null;
return PL_NOT_FOUND;
}
- header('Content-type: text/x-csv');
+ header('Content-type: text/x-csv; encoding=iso-8859-1');
header('Pragma: ');
header('Cache-Control: ');
- new_nonhtml_page('xnet/groupe/evt-csv.tpl');
+ new_nonhtml_page('xnetevents/csv.tpl');
$admin = may_update();
$tri = (Env::get('order') == 'alpha' ? 'promo, nom, prenom' : 'nom, prenom, promo');
- if (Env::has('initiale')) {
- $ini = 'AND IF(u.nom IS NULL, m.nom,
- IF(u.nom_usage<>"", u.nom_usage, u.nom))
- LIKE "'.addslashes(Env::get('initiale')).'%"';
- } else {
- $ini = '';
- }
-
- $participants = get_event_participants($eid, $item_id, $ini, $tri, "",
- $evt['money'] && $admin,
- $evt['paiement_id']);
+ $page->assign('participants',
+ get_event_participants($evt, $item_id, $tri));
- $page->assign('participants', $participants);
$page->assign('admin', $admin);
$page->assign('moments', $evt['moments']);
$page->assign('money', $evt['money']);
{
global $globals;
- new_groupadmin_page('xnet/groupe/evt-modif.tpl');
-
- $page->assign('logged', logged());
- $page->assign('admin', may_update());
-
- $moments = range(1, 4);
- $page->assign('moments', $moments);
-
+ // check the event is in our group
if (!is_null($eid)) {
$res = $globals->xdb->query("SELECT short_name, asso_id
FROM groupex.evenements
}
}
- $get_form = true;
+ new_groupadmin_page('xnetevents/edit.tpl');
- if (Post::get('intitule')) {
- $get_form = false;
- $short_name = Env::get('short_name');
-
- // Quelques vérifications sur l'alias (caractères spéciaux)
- if ($short_name && !preg_match( "/^[a-zA-Z0-9\-.]{3,20}$/", $short_name)) {
- $page->trig("Le raccourci demandé n'est pas valide.
- Vérifie qu'il comporte entre 3 et 20 caractères
- et qu'il ne contient que des lettres non accentuées,
- des chiffres ou les caractères - et .");
- $short_name = $infos['short_name'];
- $get_form = true;
- }
-
- //vérifier que l'alias n'est pas déja pris
- if ($short_name && $short_name != $infos['short_name']) {
- $res = $globals->xdb->query('SELECT COUNT(*) FROM virtual WHERE alias LIKE {?}', $short_name."-%");
- if ($res->fetchOneCell() > 0) {
- $page->trig("Le raccourci demandé est déjà utilisé. Choisis en un autre.");
- $short_name = $infos['short_name'];
- $get_form = true;
- }
- }
+ $moments = range(1, 4);
+ $page->assign('moments', $moments);
- // if had a previous shortname change the old lists
- if ($short_name && $infos['short_name'] && $short_name != $infos['short_name']) {
- $globals->xdb->execute("UPDATE virtual
- SET alias = REPLACE(alias, {?}, {?})
- WHERE type = 'evt' AND alias LIKE {?}",
- $infos['short_name'], $short_name,
- $infos['short_name']."-%");
- }
- elseif ($short_name && !$infos['short_name']) {
- // if we have a first new short_name create the lists
- //
- $globals->xdb->execute("INSERT INTO virtual SET type = 'evt', alias = {?}",
- $short_name."-participants@".$globals->xnet->evts_domain);
-
- $res = $globals->xdb->query("SELECT LAST_INSERT_ID()");
- $globals->xdb->execute("INSERT INTO virtual_redirect (
- SELECT {?} AS vid, IF(u.nom IS NULL, m.email, CONCAT(a.alias, {?})) AS redirect
- FROM groupex.evenements_participants AS ep
- LEFT JOIN groupex.membres AS m ON (ep.uid = m.uid)
- LEFT JOIN auth_user_md5 AS u ON (u.user_id = ep.uid)
- LEFT JOIN aliases AS a ON (a.id = ep.uid AND a.type = 'a_vie')
- WHERE ep.eid = {?}
- GROUP BY ep.uid)",
- $res->fetchOneCell(), "@".$globals->mail->domain, $eid);
-
- $globals->xdb->execute("INSERT INTO virtual SET type = 'evt', alias = {?}",
- $short_name."-absents@".$globals->xnet->evts_domain);
-
- $res = $globals->xdb->query("SELECT LAST_INSERT_ID()");
- $globals->xdb->execute("INSERT INTO virtual_redirect (
- SELECT {?} AS vid, IF(u.nom IS NULL, m.email, CONCAT(a.alias, {?})) AS redirect
- FROM groupex.membres AS m
- LEFT JOIN groupex.evenements_participants AS ep ON (ep.uid = m.uid)
- LEFT JOIN auth_user_md5 AS u ON (u.user_id = m.uid)
- LEFT JOIN aliases AS a ON (a.id = m.uid AND a.type = 'a_vie')
- WHERE m.asso_id = {?} AND ep.uid IS NULL
- GROUP BY m.uid)",
- $res->fetchOneCell(), "@".$globals->mail->domain, $globals->asso('id'));
- }
- elseif (!$short_name && $infos['short_name']) {
- // if we delete the old short name, delete the lists
- $globals->xdb->execute("DELETE virtual, virtual_redirect FROM virtual
- LEFT JOIN virtual_redirect USING(vid)
- WHERE virtual.alias LIKE {?}",
- $infos['short_name']."-%");
+ if (Post::get('intitule')) {
+ require_once dirname(__FILE__).'/xnetevents/xnetevents.inc.php';
+ $short_name = event_change_shortname($page, $infos['short_name'],
+ Env::get('short_name', ''));
+
+ $evt = array(
+ 'eid' => $eid,
+ 'asso_id' => $globals->asso('id'),
+ 'organisateur_uid' => Session::get('uid'),
+ 'paiement_id' => Post::get('paiement_id') > 0 ? Post::get('paiement_id') : null,
+ 'debut' => Post::get('deb_Year').'-'.Post::get('deb_Month')
+ .'-'.Post::get('deb_Day').' '.Post::get('deb_Hour')
+ .':'.Post::get('deb_Minute').':00',
+ 'fin' => Post::get('fin_Year').'-'.Post::get('fin_Month')
+ .'-'.Post::get('fin_Day').' '.Post::get('fin_Hour')
+ .':'.Post::get('fin_Minute').':00',
+ 'short_name' => $short_name,
+ );
+
+ $trivial = array('intitule', 'descriptif', 'noinvite',
+ 'show_participants');
+ foreach ($trivial as $k) {
+ $evt[$k] = Post::get($k);
}
- $evt = array();
- $evt['eid'] = $eid;
- $evt['asso_id'] = $globals->asso('id');
- $evt['organisateur_uid'] = Session::get('uid');
- $evt['intitule'] = Post::get('intitule');
- $evt['paiement_id'] = (Post::get('paiement_id')>0) ? Post::get('paiement_id') : null;
- $evt['descriptif'] = Post::get('descriptif');
- $evt['debut'] = Post::get('deb_Year')."-".Post::get('deb_Month')
- . "-".Post::get('deb_Day')." ".Post::get('deb_Hour')
- . ":".Post::get('deb_Minute').":00";
- $evt['fin'] = Post::get('fin_Year')."-".Post::get('fin_Month')
- . "-".Post::get('fin_Day')." ".Post::get('fin_Hour')
- . ":".Post::get('fin_Minute').":00";
- $evt['membres_only'] = Post::get('membres_only');
- $evt['advertise'] = Post::get('advertise');
- $evt['show_participants'] = Post::get('show_participants');
- $evt['noinvite'] = Post::get('noinvite');
- if (!$short_name) {
- $short_name = '';
+ if (Post::get('deadline')) {
+ $evt['deadline_inscription'] = Post::get('inscr_Year').'-'
+ . Post::get('inscr_Month').'-'
+ . Post::get('inscr_Day');
+ } else {
+ $evt['deadline_inscription'] = null;
}
- $evt['short_name'] = $short_name;
- $evt['deadline_inscription'] = Post::get('deadline', 'off') == 'on' ? null
- : (Post::get('inscr_Year')."-".Post::get('inscr_Month')
- ."-".Post::get('inscr_Day'));
// Store the modifications in the database
- $globals->xdb->execute("REPLACE INTO groupex.evenements
+ $globals->xdb->execute('REPLACE INTO groupex.evenements
SET eid={?}, asso_id={?}, organisateur_uid={?}, intitule={?},
- paiement_id = {?}, descriptif = {?},
- debut = {?}, fin = {?},
- membres_only = {?}, advertise = {?}, show_participants = {?},
- short_name = {?}, deadline_inscription = {?}, noinvite = {?}",
- $evt['eid'], $evt['asso_id'], $evt['organisateur_uid'], $evt['intitule']
- , $evt['paiement_id'], $evt['descriptif'],
- $evt['debut'], $evt['fin'],
- $evt['membres_only'], $evt['advertise'], $evt['show_participants'],
- $evt['short_name'], $evt['deadline_inscription'], $evt['noinvite']);
+ paiement_id = {?}, descriptif = {?}, debut = {?},
+ fin = {?}, show_participants = {?}, short_name = {?},
+ deadline_inscription = {?}, noinvite = {?}',
+ $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']);
// if new event, get its id
if (!$eid) {
- $res = $globals->xdb->query("SELECT LAST_INSERT_ID()");
- $eid = $res->fetchOneCell();
- $evt['eid'] = $eid;
+ $eid = mysql_insert_id();
}
- $nb_moments = 0;
+ $nb_moments = 0;
$money_defaut = 0;
foreach ($moments as $i) {
if (Post::get('titre'.$i)) {
$nb_moments++;
- if (!($money_defaut > 0))
- $money_defaut = strtr(Post::get('montant'.$i), ',', '.');
+
+ $montant = strtr(Post::get('montant'.$i), ',', '.');
+ $money_defaut += (float)$montant;
$globals->xdb->execute("
REPLACE INTO groupex.evenements_items
VALUES ({?}, {?}, {?}, {?}, {?})",
$eid, $i, Post::get('titre'.$i),
- Post::get('details'.$i),
- strtr(Post::get('montant'.$i), ',', '.'));
+ Post::get('details'.$i), $montant);
} else {
$globals->xdb->execute("DELETE FROM groupex.evenements_items
WHERE eid = {?} AND item_id = {?}", $eid, $i);
$globals->xdb->execute("INSERT INTO groupex.evenements_items
VALUES ({?}, {?}, '', '', 0)", $eid, 1);
}
- }
-
- if (Env::has('sup') && $eid) {
- // deletes the event
- $globals->xdb->execute("DELETE FROM groupex.evenements
- WHERE eid = {?} AND asso_id = {?}",
- $eid, $globals->asso('id'));
- // deletes the event items
- $globals->xdb->execute("DELETE FROM groupex.evenements_items WHERE eid = {?}", $eid);
-
- // deletes the event participants
- $globals->xdb->execute("DELETE FROM groupex.evenements_participants
- WHERE eid = {?}", $eid);
-
- // deletes the event mailing aliases
- if ($infos['short_name']) {
- $globals->xdb->execute("DELETE FROM virtual
- WHERE type = 'evt' AND alias LIKE {?}",
- $infos['short_name']."-%");
+ if (is_null($evt['eid'])) {
+ global $platal;
+ redirect(smarty_function_rel().'/'.$platal->path.'/'.$eid);
}
-
- // delete the requests for payments
- require_once 'validations.inc.php';
- $globals->xdb->execute("DELETE FROM requests
- WHERE type = 'paiements' AND data LIKE {?}",
- PayReq::same_event($eid, $globals->asso('id')));
- redirect("evenements.php");
- }
-
- if (!$get_form) {
- redirect("evenements.php");
}
// get a list of all the payment for this asso
if ($eid) {
$res = $globals->xdb->query(
"SELECT eid, intitule, descriptif, debut, fin,
- membres_only, advertise, show_participants,
- paiement_id, short_name, deadline_inscription,
- noinvite
+ show_participants, paiement_id, short_name,
+ deadline_inscription, noinvite
FROM groupex.evenements
WHERE eid = {?}", $eid);
$evt = $res->fetchOneAssoc();
{
global $globals;
- define('NB_PER_PAGE', 25);
-
- require_once('xnet/evenements.php');
+ require_once dirname(__FILE__).'/xnetevents/xnetevents.inc.php';
$evt = get_event_detail($eid, $item_id);
-
- // the event doesn't exist or doesn't belong to this assoif (!$evt)
if (!$evt) {
return PL_NOT_FOUND;
}
if ($evt['show_participants']) {
- new_group_page('xnet/groupe/evt-admin.tpl');
+ new_group_page('xnetevents/admin.tpl');
} else {
- new_groupadmin_page('xnet/groupe/evt-admin.tpl');
+ new_groupadmin_page('xnetevents/admin.tpl');
}
- $admin = may_update();
-
- // select a member from his mail
- if ($admin && Env::get('adm') && Env::get('mail')) {
- if (strpos(Env::get('mail'), '@') === false) {
- $res = $globals->xdb->query(
- "SELECT m.uid
- FROM groupex.membres AS m
- INNER JOIN aliases AS a ON (a.id = m.uid)
- WHERE a.alias = {?} AND m.asso_id = {?}",
- Env::get('mail'), $globals->asso('id'));
- } else {
- $res = $globals->xdb->query(
- "SELECT m.uid
- FROM groupex.membres AS m
- WHERE m.email = {?} AND m.asso_id = {?}",
- Env::get('mail'), $globals->asso('id'));
+ if (may_update() && Post::get('adm')) {
+ $member = get_infos(Post::get('mail'));
+ if (!$member) {
+ $page->trig("Membre introuvable");
}
- $member = $res->fetchOneCell();
- if (!$member) $page->trig("Membre introuvable");
- }
- // change the price paid by a participant
- if ($admin && Env::get('adm') == 'prix' && $member) {
- $globals->xdb->execute("UPDATE groupex.evenements_participants SET paid = IF(paid + {?} > 0, paid + {?}, 0) WHERE uid = {?} AND eid = {?}",
+ // change the price paid by a participant
+ if (Env::get('adm') == 'prix' && $member) {
+ $globals->xdb->execute("UPDATE groupex.evenements_participants
+ SET paid = IF(paid + {?} > 0, paid + {?}, 0)
+ WHERE uid = {?} AND eid = {?}",
strtr(Env::get('montant'), ',', '.'),
strtr(Env::get('montant'), ',', '.'),
- $member, Env::get('eid'));
- }
+ $member['uid'], $eid);
+ }
- // change the number of personns coming with a participant
- if ($admin && Env::get('adm') == 'nbs' && $member) {
- $res = $globals->xdb->query("SELECT paid FROM groupex.evenements_participants WHERE uid = {?} AND eid = {?}", $member, Env::get('eid'));
- $paid = $res->fetchOneCell();
- $participate = false;
- foreach ($evt['moments'] as $m) if (Env::has('nb'.$m['item_id'])) {
- $nb = Env::getInt('nb'.$m['item_id'], 0);
- if ($nb < 0) $nb = 0;
- if ($nb) {
- $participate = true;
- if (!$paid) $paid = 0;
- $globals->xdb->execute("REPLACE INTO groupex.evenements_participants VALUES ({?}, {?}, {?}, {?}, {?})",
- Env::get('eid'), $member, $m['item_id'], $nb, $paid);
- } else {
- $globals->xdb->execute("DELETE FROM groupex.evenements_participants WHERE uid = {?} AND eid = {?} AND item_id = {?}", $member, Env::get('eid'), $m['item_id']);
+ // change the number of personns coming with a participant
+ if (Env::get('adm') == 'nbs' && $member) {
+ $res = $globals->xdb->query("SELECT paid
+ FROM groupex.evenements_participants
+ WHERE uid = {?} AND eid = {?}",
+ $member['uid'], $eid);
+
+ $paid = intval($res->fetchOneCell());
+ $nbs = Post::getMixed('nb', array());
+
+ foreach ($nbs as $id => $nb) {
+ $nb = max(intval($nb), 0);
+
+ if ($nb) {
+ $globals->xdb->execute("REPLACE INTO groupex.evenements_participants
+ VALUES ({?}, {?}, {?}, {?}, {?})",
+ $eid, $member['uid'], $id, $nb, $paid);
+ } else {
+ $globals->xdb->execute("DELETE FROM groupex.evenements_participants
+ WHERE uid = {?} AND eid = {?} AND item_id = {?}",
+ $member['uid'], $eid, $id);
+ }
}
- }
- if ($participate) {
- subscribe_lists_event(true, $member, $evt['participant_list'], $evt['absent_list']);
- } else {
- $res = $globals->xdb->query(
- "SELECT uid FROM groupex.evenements_participants
- WHERE uid = {?} AND eid = {?}", $member, $eid);
+
+ $res = $globals->xdb->query("SELECT uid FROM groupex.evenements_participants
+ WHERE uid = {?} AND eid = {?}",
+ $member['uid'], $eid);
$u = $res->fetchOneCell();
- subscribe_lists_event($u, $member, $evt['participant_list'], $evt['absent_list']);
+ subscribe_lists_event($u, $member['uid'], $evt);
}
+
$evt = get_event_detail($eid, $item_id);
}
- $page->assign('admin', $admin);
+ $page->assign('admin', may_update());
$page->assign('evt', $evt);
- $page->assign('url_page', Env::get('PHP_SELF')."?eid=".Env::get('eid').(Env::has('item_id')?("&item_id=".Env::getInt('item_id')):''));
- $page->assign('tout', !Env::has('item_id'));
+ $page->assign('tout', is_null($item_id));
- if (count($evt['moments'])) $page->assign('moments', $evt['moments']);
- $page->assign('money', $evt['money']);
+ if (count($evt['moments'])) {
+ $page->assign('moments', $evt['moments']);
+ }
$tri = (Env::get('order') == 'alpha' ? 'promo, nom, prenom' : 'nom, prenom, promo');
- $whereitemid = Env::has('item_id')?('AND ep.item_id = '.Env::getInt('item_id', 1)):'';
+ $whereitemid = is_null($item_id) ? '' : "AND ep.item_id = $item_id";
$res = $globals->xdb->iterRow(
- 'SELECT UPPER(SUBSTRING(IF(u.nom IS NULL,m.nom,IF(u.nom_usage<>"", u.nom_usage, u.nom)), 1, 1)), COUNT(DISTINCT ep.uid)
+ 'SELECT UPPER(SUBSTRING(IF(u.nom IS NULL, m.nom,
+ IF(u.nom_usage<>"", u.nom_usage, u.nom)), 1, 1)),
+ COUNT(DISTINCT ep.uid)
FROM groupex.evenements_participants AS ep
INNER JOIN groupex.evenements AS e ON (ep.eid = e.eid)
LEFT JOIN groupex.membres AS m ON ( ep.uid = m.uid AND e.asso_id = m.asso_id)
LEFT JOIN auth_user_md5 AS u ON ( u.user_id = ep.uid )
WHERE ep.eid = {?} '.$whereitemid.'
- GROUP BY UPPER(SUBSTRING(IF(u.nom IS NULL,m.nom,u.nom), 1, 1))', Env::get('eid'));
+ GROUP BY UPPER(SUBSTRING(IF(u.nom IS NULL,m.nom,u.nom), 1, 1))', $eid);
$alphabet = array();
$nb_tot = 0;
$page->assign('links', $links);
}
- $ini = Env::has('initiale') ? 'AND IF(u.nom IS NULL,m.nom,IF(u.nom_usage<>"", u.nom_usage, u.nom)) LIKE "'.addslashes(Env::get('initiale')).'%"' : '';
-
- $participants = get_event_participants(Env::get('eid'), Env::get('item_id'), $ini, $tri, "LIMIT ".($ofs*NB_PER_PAGE).", ".NB_PER_PAGE, $evt['money'] && $admin, $evt['paiement_id']);
-
if ($evt['paiement_id']) {
- $res = $globals->xdb->iterator(
+ $res = $globals->xdb->iterator(
"SELECT IF(u.nom_usage<>'', u.nom_usage, u.nom) AS nom, u.prenom,
u.promo, a.alias AS email, t.montant
FROM {$globals->money->mpay_tprefix}transactions AS t
LEFT JOIN groupex.evenements_participants AS ep ON(ep.uid = t.uid AND ep.eid = {?})
WHERE t.ref = {?} AND ep.uid IS NULL",
$evt['eid'], $evt['paiement_id']);
- $page->assign('oublis', $res->total());
- $page->assign('oubliinscription', $res);
+ $page->assign('oublis', $res->total());
+ $page->assign('oubliinscription', $res);
}
- $page->assign('participants', $participants);
+ $page->assign('participants',
+ get_event_participants($evt, $item_id, $tri,
+ "LIMIT ".($ofs*NB_PER_PAGE).", ".NB_PER_PAGE));
}
}