Merge branch 'master' of /home/git/platal into profile_edit
[platal.git] / modules / xnetevents / xnetevents.inc.php
index c71b83d..73af616 100644 (file)
@@ -1,6 +1,6 @@
 <?php
 /***************************************************************************
- *  Copyright (C) 2003-2006 Polytechnique.org                              *
+ *  Copyright (C) 2003-2007 Polytechnique.org                              *
  *  http://opensource.polytechnique.org/                                   *
  *                                                                         *
  *  This program is free software; you can redistribute it and/or modify   *
@@ -40,15 +40,15 @@ function get_event_detail($eid, $item_id = false)
       LEFT JOIN        groupex.evenements_participants AS ep ON(e.eid = ep.eid AND ei.item_id = ep.item_id)
       LEFT JOIN virtual AS al ON(al.type = 'evt' AND al.alias = CONCAT(short_name, {?}))
       LEFT JOIN virtual AS pl ON(pl.type = 'evt' AND pl.alias = CONCAT(short_name, {?}))
-          WHERE        e.eid = {?} AND ei.item_id = {?} AND e.asso_id = {?} 
+          WHERE        (e.eid = {?} OR e.short_name = {?}) AND ei.item_id = {?} AND e.asso_id = {?}
        GROUP BY ei.item_id",
        '-absents@'.$globals->xnet->evts_domain,
        '-participants@'.$globals->xnet->evts_domain,
-       $eid, $item_id ? $item_id : 1, $globals->asso('id'));
+       $eid, $eid, $item_id ? $item_id : 1, $globals->asso('id'));
 
     $evt = $res->fetchOneAssoc();
 
-    if (!$evt) {
+    if (!$evt || ($evt['accept_nonmembre'] == 0 && !is_member() && !may_update())) {
         return null;
     }
 
@@ -61,14 +61,14 @@ function get_event_detail($eid, $item_id = false)
              LEFT JOIN groupex.evenements_participants AS ep
                        ON (e.eid = ep.eid AND ei.item_id = ep.item_id)
                  WHERE e.eid = {?}
-              GROUP BY ep.uid", $eid);
+              GROUP BY ep.uid", $evt['eid']);
         $evt['nb_tot'] = array_sum($res->fetchColumn());
         $evt['titre'] = '';
         $evt['item_id'] = 0;
     }
 
     $res = XDB::query(
-        "SELECT titre, details, montant, ei.item_id, nb
+        "SELECT titre, details, montant, ei.item_id, nb, ep.paid
            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 = {?})
@@ -77,10 +77,13 @@ function get_event_detail($eid, $item_id = false)
     $evt['moments'] = $res->fetchAllAssoc();
 
     $evt['topay'] = 0;
+    $evt['paid'] = 0;
     foreach ($evt['moments'] as $m) {
         $evt['topay'] += $m['nb'] * $m['montant'];
-        if ($m['montant'])
+        if ($m['montant']) {
             $evt['money'] = true;
+        }
+        $evt['paid']  = $m['paid'];
     }
 
     $req = XDB::query(
@@ -89,7 +92,6 @@ function get_event_detail($eid, $item_id = false)
          WHERE ref = {?} AND uid = {?}", $evt['paiement_id'], S::v('uid'));
     $montants = $req->fetchColumn();
 
-    $evt['paid'] = 0;
     foreach ($montants as $m) {
         $p = strtr(substr($m, 0, strpos($m, 'EUR')), ',', '.');
         $evt['paid'] += trim($p);
@@ -117,24 +119,24 @@ function get_event_participants($evt, $item_id, $tri, $limit = '') {
     $pay_id = $evt['paiement_id'];
 
     $query =
-        "SELECT  IF(u.nom IS NULL,m.nom,IF(u.nom_usage<>'', u.nom_usage, u.nom)) AS nom,
-                   IF(u.nom IS NULL,m.prenom,u.prenom) AS prenom,
-                   IF(u.nom IS NULL,'extérieur',u.promo) AS promo,
-                   IF(u.nom IS NULL,m.email,a.alias) AS email,
-                   IF(u.nom IS NULL,0,FIND_IN_SET('femme', u.flags)) AS femme,
+          "SELECT  IF(m.origine != 'X',m.nom,IF(u.nom_usage<>'', u.nom_usage, u.nom)) AS nom,
+                   IF(m.origine != 'X',m.prenom,u.prenom) AS prenom,
+                   IF(m.origine != 'X','extérieur',u.promo) AS promo,
+                   IF(m.origine != 'X' OR u.perms = 'pending',m.email,a.alias) AS email,
+                   IF(m.origine != 'X',m.sexe,FIND_IN_SET('femme', u.flags)) AS femme,
                    m.perms='admin' AS admin,
-                   NOT(u.nom IS NULL) AS x,
-                  ep.uid, ep.paid, SUM(nb) AS nb 
-               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 )
-          LEFT JOIN  aliases         AS a ON ( a.id = ep.uid AND a.type='a_vie' )
-              WHERE  ep.eid = {?}
+                   (m.origine = 'X') AS x,
+                  ep.uid, SUM(ep.paid) AS paid, SUM(nb) AS nb
+             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 )
+        LEFT JOIN  aliases         AS a ON ( a.id = ep.uid AND a.type='a_vie' )
+            WHERE  ep.eid = {?} AND ep.nb > 0
                     ".(($item_id)?" AND item_id = $item_id":"")."
                     $where
-          GROUP BY  ep.uid
-          ORDER BY  $tri $limit";
+         GROUP BY  ep.uid
+         ORDER BY  $tri $limit";
 
     if ($item_id) {
         $res = XDB::query($query, $eid);
@@ -146,6 +148,7 @@ function get_event_participants($evt, $item_id, $tri, $limit = '') {
     $user = 0;
 
     while ($u = $res->next()) {
+        $u['adminpaid'] = $u['paid'];
         $u['montant'] = 0;
        if ($money && $pay_id) {
             $res_ = XDB::query(
@@ -159,6 +162,7 @@ function get_event_participants($evt, $item_id, $tri, $limit = '') {
                     $u['paid'] += trim($p);
             }
        }
+        $u['telepayment'] = $u['paid'] - $u['adminpaid'];
         $res_ = XDB::iterator(
             "SELECT ep.nb, ep.item_id, ei.montant
                FROM groupex.evenements_participants AS ep
@@ -176,36 +180,54 @@ function get_event_participants($evt, $item_id, $tri, $limit = '') {
 // }}}
 
 //  {{{ function subscribe_lists_event()
-function subscribe_lists_event($participate, $uid, $evt) {
+function subscribe_lists_event($participate, $uid, $evt)
+{
+    require_once('user.func.inc.php');
     global $globals,$page;
 
     $participant_list = $evt['participant_list'];
     $absent_list      = $evt['absent_list'];
 
-    $email = S::v('forlife');
+    $email = get_user_forlife($uid);
 
     if ($email) {
         $email .= '@'.$globals->mail->domain;
     } else {
-        $res = XDB::query("SELECT email FROM groupex.membres WHERE uid = {?} AND asso_id = {?}", S::v('uid'), $globals->asso('id'));
+        $res = XDB::query("SELECT email
+                             FROM groupex.membres
+                            WHERE uid = {?} AND asso_id = {?}",
+                            S::v('uid'), $globals->asso('id'));
         $email = $res->fetchOneCell();
     }
 
-    $subscribe = $participate ? $participant_list : (is_member()?$absent_list:0);
-    $unsubscri = $participate ? $absent_list : $participant_list;
-
-    if ($subscribe) {
-        XDB::execute(
-            "REPLACE INTO virtual_redirect VALUES({?},{?})",
-                $subscribe, $email);
+    function subscribe($list, $email)
+    {
+        if ($list && $email) {
+            XDB::execute("REPLACE INTO virtual_redirect
+                                VALUES ({?},{?})",
+                         $list, $email);
+        }
     }
 
-    if ($unsubscri) {
-        XDB::execute(
-            "DELETE FROM virtual_redirect WHERE vid = {?} AND redirect = {?}",
-                $unsubscri, $email);
+    function unsubscribe($list, $email)
+    {
+        if ($list && $email) {
+            XDB::execute("DELETE FROM virtual_redirect
+                                WHERE vid = {?} AND redirect = {?}",
+                         $list, $email);
+        }
     }
 
+    if (is_null($participate)) {
+        unsubscribe($participant_list, $email);
+        subscribe($absent_list, $email);
+    } elseif ($participate) {
+        subscribe($participant_list, $email);
+        unsubscribe($absent_list, $email);
+    } else {
+        unsubscribe($participant_list, $email);
+        unsubscribe($absent_list, $email);
+    }
 }
 // }}}
 
@@ -213,22 +235,26 @@ function event_change_shortname(&$page, $old, $new)
 {
     global $globals;
 
-    // Quelques vérifications sur l'alias (caractères spéciaux)
-    if ($old && !preg_match( "/^[a-zA-Z0-9\-.]{3,20}$/", $old)) {
-        $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 .");
+    if (is_null($old)) {
+        $old = '';
+    }
+    // Quelques vérifications sur l'alias (caractères spéciaux)
+    if ($new && !preg_match( "/^[a-zA-Z0-9\-.]{3,20}$/", $new)) {
+        $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 .");
         return $old;
     }
 
-    //vérifier que l'alias n'est pas déja pris
+    //vérifier que l'alias n'est pas déja pris
     if ($new && $old != $new) {
-        $res = XDB::query('SELECT COUNT(*) FROM virtual
-                                    WHERE alias LIKE {?}',
-                                    $new.'-absents@%');
+        $res = XDB::query('SELECT COUNT(*)
+                             FROM groupex.evenements
+                            WHERE short_name = {?}',
+                           $new);
         if ($res->fetchOneCell() > 0) {
-            $page->trig("Le raccourci demandé est déjà utilisé. Choisis en un autre.");
+            $page->trig("Le raccourci demandé est déjà utilisé. Choisis en un autre.");
             return $old;
         }
     }
@@ -242,10 +268,9 @@ function event_change_shortname(&$page, $old, $new)
         foreach (array('-absents@', '-participants@') as $v) {
             $v .= $globals->xnet->evts_domain;
             XDB::execute("UPDATE virtual SET alias = {?}
-                                     WHERE type = 'evt' AND alias = {?}",
-                                     $new.$v, $old.$v);
+                           WHERE type = 'evt' AND alias = {?}",
+                         $new.$v, $old.$v);
         }
-
         return $new;
     }
 
@@ -255,7 +280,7 @@ function event_change_shortname(&$page, $old, $new)
         XDB::execute("INSERT INTO virtual SET type = 'evt', alias = {?}",
                 $new.'-participants@'.$globals->xnet->evts_domain);
 
-        $lastid = mysql_insert_id();
+        $lastid = XDB::insertId();
         XDB::execute(
           "INSERT INTO virtual_redirect (
                 SELECT {?} AS vid, IF(u.nom IS NULL, m.email, CONCAT(a.alias, {?})) AS redirect
@@ -270,7 +295,7 @@ function event_change_shortname(&$page, $old, $new)
         XDB::execute("INSERT INTO virtual SET type = 'evt', alias = {?}",
                 $new.'-absents@'.$globals->xnet->evts_domain);
 
-        $lastid = mysql_insert_id();
+        $lastid = XDB::insertId();
         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
@@ -300,5 +325,5 @@ function event_change_shortname(&$page, $old, $new)
     return $old;
 }
 
-// vim:set et sw=4 sts=4 sws=4 foldmethod=marker:
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 ?>