bin/cron/registrations.php

   1 #!/usr/bin/php5 -q
   2 <?php
   3
   4 require 'connect.db.inc.php';
   5
   6 $message = '';
   7
   8 $res = XDB::iterRow("SELECT  DATE(a.registration_date), a.hruid, GROUP_CONCAT(DISTINCT r.redirect SEPARATOR ', ')
   9                        FROM  accounts               AS a
  10                  INNER JOIN  account_profiles       AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
  11                  INNER JOIN  profile_display        AS pd ON (ap.pid = pd.pid)
  12                   LEFT JOIN  email_source_account   AS s  ON (a.uid = s.uid)
  13                   LEFT JOIN  email_redirect_account AS r  ON (a.uid = r.uid)
  14                       WHERE  a.registration_date > {?}
  15                    GROUP BY  a.hruid
  16                    ORDER BY  pd.promo",
  17        date("Ymd000000", strtotime('last Monday')));
  18 if ($count = $res->total()) {
  19     $message .= "$count INSCRIPTIONS CONFIRMÉES CETTE SEMAINE :\n";
  20     while (list($date, $hruid, $email, $redirect) = $res->next()) {
  21               $message .= "$date, $hruid, $email, $redirect\n";
  22     }
  23 }
  24
  25 $res = XDB::iterRow("SELECT  r.date, a.hruid, r.email
  26                        FROM  register_pending AS r
  27                  INNER JOIN  accounts         AS a ON (a.uid = r.uid)
  28                  INNER JOIN  account_profiles AS ap ON (ap.uid = a.uid AND FIND_IN_SET('owner', ap.perms))
  29                  INNER JOIN  profile_display  AS pd ON (ap.pid = pd.pid)
  30                       WHERE  r.hash != 'INSCRIT'
  31                    GROUP BY  a.hruid
  32                    ORDER BY  pd.promo");
  33 if ($count = $res->total()) {
  34     $message .= "\n$count INSCRIPTIONS NON CONFIRMÉES :\n";
  35     while (list($date, $hruid, $email) = $res->next()) {
  36               $message .= "$date, $hruid, $email\n";
  37     }
  38 }
  39
  40 $res = XDB::query('SELECT  COUNT(DISTINCT uid), COUNT(*)
  41                      FROM  register_marketing');
  42 list($a, $b) = $res->fetchOneRow();
  43 $message .= "\nINSCRIPTIONS SOLLICITÉES :\n";
  44 $message .= "    $a utilisateurs\n    $b adresses email\n";
  45
  46 $message .= "\n\n";
  47
  48 $mailer = new PlMailer();
  49 $mailer->setSubject('Rapport des inscriptions de la semaine');
  50 $mailer->setFrom($globals->register->notif);
  51 $mailer->addTo($globals->register->notif);
  52 $mailer->setTxtBody($message);
  53 $mailer->send();
  54
  55 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
  56 ?>