s/a\.uid/$UID/ && s/p\.pid/$PID/
[platal.git] / bin / cron / rapports_inscription.php
index c9d09fd..8800584 100755 (executable)
@@ -1,56 +1,58 @@
-#!/usr/bin/php4 -q
+#!/usr/bin/php5 -q
 <?php
-require('./connect.db.inc.php');
-$MESSAGE = '';
+require 'connect.db.inc.php';
+$message = '';
 
 // ---------------------------------------
 
-$res = XDB::iterRow(
-        "SELECT  a.alias, u.promo, email
-           FROM  auth_user_md5  AS u
-      LEFT JOIN  aliases        AS a ON( u.user_id=a.id AND a.type='a_vie' )
-      LEFT JOIN  emails         AS e ON( e.uid = u.user_id AND NOT FIND_IN_SET('filter',e.flags) )
-          WHERE  u.date_ins > {?}
-       GROUP BY  alias
-       ORDER BY  promo", date("Ymd000000", strtotime ("last Monday")));
-if ($a = $res->total()) {
-    $MESSAGE.="$a INSCRIPTIONS CONFIRMEES:\n";
-    while (list($usern,$promo,$mail) = $res->next()) {
-       $MESSAGE.="X$promo, $usern, $mail\n";
+$res = XDB::iterRow("SELECT  al.alias, pd.promo, e.email  //a.alias, u.promo, email
+                       FROM  accounts AS a
+                 INNER JOIN  account_profile AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
+                 INNER JOIN  profile_display AS pd ON (ap.pid = pd.pid)
+                  LEFT JOIN  aliases         AS al ON (a.uid =a.uid AND al.type = 'a_vie')
+                  LEFT JOIN  emails          AS e ON (a.uid = e.uid AND NOT FIND_IN_SET('filter', e.flags))
+                      WHERE  a.registration_date > {?}
+                   GROUP BY  al.alias
+                   ORDER BY  pd.promo",
+       date("Ymd000000", strtotime('last Monday')));
+if ($count = $res->total()) {
+    $message .= "$count INSCRIPTIONS CONFIRMÉES :\n";
+    while (list($forlife, $promo, $email) = $res->next()) {
+             $message .= "$promo, $forlife, $email\n";
     }
 }
 
 // ---------------------------------------
 
-$res = XDB::iterRow(
-        "SELECT  forlife, email, date
-           FROM  register_pending
-          WHERE  hash != 'INSCRIT'
-       ORDER BY  date");
-if ($b = $res->total()) {
-    $MESSAGE.="\n$b INSCRIPTIONS NON CONFIRMEES:\n";
-    while (list($usern, $mail, $quand) = $res->next()) {       
-       $MESSAGE.="$quand, $usern,\n            $mail\n";
+$res = XDB::iterRow("SELECT  a.hruid, r.email, r.date
+                       FROM  register_pending AS r
+                 INNER JOIN  accounts         AS a ON (a.uid = r.uid)
+                      WHERE  r.hash != 'INSCRIT'
+                   ORDER BY  r.date");
+if ($count = $res->total()) {
+    $message .= "\n$count INSCRIPTIONS NON CONFIRMÉES :\n";
+    while (list($forlife, $email, $date) = $res->next()) {     
+             $message .= "$date, $forlife,\n            $email\n";
     }
 }
 
 // ---------------------------------------
 
-$res = XDB::query('SELECT COUNT(DISTINCT uid), COUNT(*) FROM register_marketing');
+$res = XDB::query('SELECT  COUNT(DISTINCT uid), COUNT(*)
+                     FROM  register_marketing');
 list($a, $b) = $res->fetchOneRow();
-$MESSAGE .= "\n$c INSCRIPTIONS SOLICITÉES :\n";
-$MESSAGE .= "    $a utilisateurs\n    $b adresses mails\n";
+$message .= "\nINSCRIPTIONS SOLICITÉES :\n";
+$message .= "    $a utilisateurs\n    $b adresses email\n";
 
 // ---------------------------------------
 
-$MESSAGE .= "\n\n";
+$message .= "\n\n";
 
-require_once('diogenes/diogenes.hermes.inc.php');
-$mailer = new HermesMailer();
-$mailer->setSubject("$a confirmées, $b en attente et $c sollicitées");
-$mailer->setFrom('register@polytechnique.org');
-$mailer->addTo('register@polytechnique.org');
-$mailer->addCc('jean-michel.yolin+register@polytechnique.org');
-$mailer->setTxtBody($MESSAGE);
+$mailer = new PlMailer();
+$mailer->setSubject('Rapport des inscriptions de la semaine');
+$mailer->setFrom($globals->register->notif);
+$mailer->addTo($globals->register->notif);
+$mailer->setTxtBody($message);
 $mailer->send();
+// vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
 ?>