pending commit, finished during MQ/S download ...
[platal.git] / modules / xnetevents.php
index 964e83b..d290d5e 100644 (file)
@@ -47,7 +47,7 @@ class XnetEventsModule extends PLModule
 
             $eid = Post::get('del');
 
-            $res = $globals->xdb->query("SELECT asso_id, short_name FROM groupex.evenements
+            $res = XDB::query("SELECT asso_id, short_name FROM groupex.evenements
                                         WHERE eid = {?} AND asso_id = {?}",
                                         $eid, $globals->asso('id'));
 
@@ -58,36 +58,36 @@ class XnetEventsModule extends PLModule
 
             // deletes the event mailing aliases
             if ($tmp[1]) {
-                $globals->xdb->execute(
-                    "DELETE FROM virtual WHERE type = 'evt' AND alias = {?}",
-                    $tmp[1].'-absents');
-                $globals->xdb->execute(
-                    "DELETE FROM virtual WHERE type = 'evt' AND alias = {?}",
-                    $tmp[1].'-participants');
+                XDB::execute(
+                    "DELETE FROM virtual WHERE type = 'evt' AND alias LIKE {?}",
+                    $tmp[1].'-absents@%');
+                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);
+            XDB::execute("DELETE FROM groupex.evenements_items WHERE eid = {?}", $eid);
 
             // deletes the event participants
-            $globals->xdb->execute("DELETE FROM groupex.evenements_participants
+            XDB::execute("DELETE FROM groupex.evenements_participants
                                     WHERE eid = {?}", $eid);
 
             // deletes the event
-            $globals->xdb->execute("DELETE FROM groupex.evenements
+            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
+            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(
+        $evenements = XDB::iterator(
                 "SELECT  e.*, LEFT(10, e.debut) AS debut_day, LEFT(10, e.fin) AS fin_day,
                          IF(e.deadline_inscription, e.deadline_inscription >= LEFT(NOW(), 10),
                             1) AS inscr_open, e.deadline_inscription,
@@ -99,18 +99,18 @@ class XnetEventsModule extends PLModule
              LEFT JOIN  groupex.evenements_participants AS ep ON (ep.eid = e.eid AND ep.uid = {?})
                  WHERE  asso_id = {?}
               GROUP BY  e.eid
-              ORDER BY  debut", Session::get('uid'), $globals->asso('id'));
+              ORDER BY  debut", S::v('uid'), $globals->asso('id'));
 
         $evts = array();
 
         while ($e = $evenements->next()) {
-            $res = $globals->xdb->query(
+            $res = XDB::query(
                 "SELECT titre, details, montant, ei.item_id, nb
                    FROM groupex.evenements_items AS ei
               LEFT JOIN groupex.evenements_participants AS ep
                         ON (ep.eid = ei.eid AND ep.item_id = ei.item_id AND uid = {?})
                   WHERE ei.eid = {?}",
-                    Session::get('uid'), $e['eid']);
+                    S::v('uid'), $e['eid']);
             $e['moments'] = $res->fetchAllAssoc();
 
             $e['topay'] = 0;
@@ -118,10 +118,10 @@ class XnetEventsModule extends PLModule
                 $e['topay'] += $m['nb'] * $m['montant'];
             }
 
-            $query = $globals->xdb->query(
+            $query = XDB::query(
                 "SELECT montant
                    FROM {$globals->money->mpay_tprefix}transactions AS t
-                 WHERE ref = {?} AND uid = {?}", $e['paiement_id'], Session::get('uid'));
+                 WHERE ref = {?} AND uid = {?}", $e['paiement_id'], S::v('uid'));
             $montants = $query->fetchColumn();
 
             foreach ($montants as $m) {
@@ -138,8 +138,6 @@ class XnetEventsModule extends PLModule
 
     function handler_sub(&$page, $eid = null)
     {
-        global $globals;
-
         require_once dirname(__FILE__).'/xnetevents/xnetevents.inc.php';
 
         new_group_page('xnetevents/subscribe.tpl');
@@ -191,15 +189,17 @@ class XnetEventsModule extends PLModule
         // update actual inscriptions
         foreach ($subs as $j => $nb) {
             if ($nb > 0) {
-                $globals->xdb->execute(
+                XDB::execute(
                     "REPLACE INTO  groupex.evenements_participants
                            VALUES  ({?}, {?}, {?}, {?}, {?})",
-                    $eid, Session::getInt('uid'), $j, $nb, $evt['paid']);
+                    $eid, S::v('uid'), $j, $nb, $evt['paid']);
+                $page->assign('updated', true);
             } else {
-                $globals->xdb->execute(
+                XDB::execute(
                     "DELETE FROM  groupex.evenements_participants
                            WHERE  eid = {?} AND uid = {?} AND item_id = {?}",
-                    $eid, Session::getInt("uid"), $j);         
+                    $eid, S::v("uid"), $j);            
+                $page->assign('updated', true);
             }
         }
 
@@ -219,11 +219,11 @@ class XnetEventsModule extends PLModule
             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();
 
@@ -242,16 +242,9 @@ class XnetEventsModule extends PLModule
     {
         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
+            $res = XDB::query("SELECT short_name, asso_id
                                            FROM groupex.evenements
                                           WHERE eid = {?}", $eid);
             $infos = $res->fetchOneAssoc();
@@ -260,140 +253,77 @@ class XnetEventsModule extends PLModule
             }
         }
 
-        $get_form = true;
-
-        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;
-            }
+        new_groupadmin_page('xnetevents/edit.tpl');
 
-            //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' => S::v('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 
+            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), ',', '.');
-                    $globals->xdb->execute("
+
+                    $montant = strtr(Post::get('montant'.$i), ',', '.');
+                    $money_defaut += (float)$montant;
+                    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 
+                    XDB::execute("DELETE FROM groupex.evenements_items 
                                             WHERE eid = {?} AND item_id = {?}", $eid, $i);
                 }
             }
@@ -401,7 +331,7 @@ class XnetEventsModule extends PLModule
             // request for a new payment
             if (Post::get('paiement_id') == -1 && $money_defaut >= 0) {
                 require_once 'validations.inc.php';
-                $p = new PayReq(Session::get('uid'),
+                $p = new PayReq(S::v('uid'),
                                 Post::get('intitule')." - ".$globals->asso('nom'),
                                 Post::get('site'), $money_defaut,
                                 Post::get('confirmation'), 0, 999,
@@ -411,17 +341,18 @@ class XnetEventsModule extends PLModule
 
             // events with no sub-event: add a sub-event with no name
             if ($nb_moments == 0) {
-                $globals->xdb->execute("INSERT INTO groupex.evenements_items
+                XDB::execute("INSERT INTO groupex.evenements_items
                                         VALUES ({?}, {?}, '', '', 0)", $eid, 1);
             }
-        }
 
-        if (!$get_form) {
-            redirect("evenements.php");
+            if (is_null($evt['eid'])) {
+                global $platal;
+                redirect(smarty_function_rel().'/'.$platal->path.'/'.$eid);
+            }
         }
 
         // get a list of all the payment for this asso
-        $res = $globals->xdb->iterator("SELECT id, text
+        $res = XDB::iterator("SELECT id, text
                                         FROM {$globals->money->mpay_tprefix}paiements
                                         WHERE asso_id = {?}", $globals->asso('id'));
         $paiements = array();
@@ -431,17 +362,16 @@ class XnetEventsModule extends PLModule
 
         // when modifying an old event retreive the old datas
         if ($eid) {
-            $res = $globals->xdb->query(
+            $res = 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();
             // find out if there is already a request for a payment for this event
             require_once 'validations.inc.php';
-            $res = $globals->xdb->query("SELECT stamp FROM requests
+            $res = XDB::query("SELECT stamp FROM requests
                                          WHERE type = 'paiements' AND data LIKE {?}",
                                         PayReq::same_event($eid, $globals->asso('id')));
             $stamp = $res->fetchOneCell();
@@ -451,7 +381,7 @@ class XnetEventsModule extends PLModule
             }
             $page->assign('evt', $evt);
             // get all the different moments infos
-            $res = $globals->xdb->iterator(
+            $res = XDB::iterator(
                     "SELECT item_id, titre, details, montant
                        FROM groupex.evenements_items AS ei
                  INNER JOIN groupex.evenements AS e ON(e.eid = ei.eid)
@@ -490,7 +420,7 @@ class XnetEventsModule extends PLModule
 
             // change the price paid by a participant
             if (Env::get('adm') == 'prix' && $member) {
-                $globals->xdb->execute("UPDATE groupex.evenements_participants
+                XDB::execute("UPDATE groupex.evenements_participants
                                            SET paid = IF(paid + {?} > 0, paid + {?}, 0)
                                          WHERE uid = {?} AND eid = {?}",
                         strtr(Env::get('montant'), ',', '.'),
@@ -500,7 +430,7 @@ class XnetEventsModule extends PLModule
 
             // change the number of personns coming with a participant
             if (Env::get('adm') == 'nbs' && $member) {
-                $res = $globals->xdb->query("SELECT paid
+                $res = XDB::query("SELECT paid
                                                FROM groupex.evenements_participants
                                               WHERE uid = {?} AND eid = {?}",
                                             $member['uid'], $eid);
@@ -509,24 +439,20 @@ class XnetEventsModule extends PLModule
                 $nbs  = Post::getMixed('nb', array());
 
                 foreach ($nbs as $id => $nb) {
-                    $nb = intval($nb);
-
-                    if ($nb < 0) {
-                        $nb = 0;
-                    }
+                    $nb = max(intval($nb), 0);
 
                     if ($nb) {
-                        $globals->xdb->execute("REPLACE INTO groupex.evenements_participants
+                        XDB::execute("REPLACE INTO groupex.evenements_participants
                                                VALUES ({?}, {?}, {?}, {?}, {?})",
                                                $eid, $member['uid'], $id, $nb, $paid);
                     } else {
-                        $globals->xdb->execute("DELETE FROM groupex.evenements_participants
+                        XDB::execute("DELETE FROM groupex.evenements_participants
                                                WHERE uid = {?} AND eid = {?} AND item_id = {?}",
                                                $member['uid'], $eid, $id);
                     }
                 }
 
-                $res = $globals->xdb->query("SELECT uid FROM groupex.evenements_participants
+                $res = XDB::query("SELECT uid FROM groupex.evenements_participants
                                             WHERE uid = {?} AND eid = {?}",
                                             $member['uid'], $eid);
                 $u = $res->fetchOneCell();
@@ -538,15 +464,15 @@ class XnetEventsModule extends PLModule
 
         $page->assign('admin', may_update());
         $page->assign('evt', $evt);
-        $page->assign('tout', !Env::has('item_id'));
+        $page->assign('tout', is_null($item_id));
 
         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)):'';
-        $res = $globals->xdb->iterRow(
+        $whereitemid = is_null($item_id) ? '' : "AND ep.item_id = $item_id";
+        $res = 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)
@@ -587,7 +513,7 @@ class XnetEventsModule extends PLModule
         }
 
         if ($evt['paiement_id']) {
-            $res = $globals->xdb->iterator(
+            $res = 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