bin/cron/cron_validations.php

   1 #!/usr/bin/php5 -q
   2 <?php
   3 /***************************************************************************
   4  *  Copyright (C) 2003-2009 Polytechnique.org                              *
   5  *  http://opensource.polytechnique.org/                                   *
   6  *                                                                         *
   7  *  This program is free software; you can redistribute it and/or modify   *
   8  *  it under the terms of the GNU General Public License as published by   *
   9  *  the Free Software Foundation; either version 2 of the License, or      *
  10  *  (at your option) any later version.                                    *
  11  *                                                                         *
  12  *  This program is distributed in the hope that it will be useful,        *
  13  *  but WITHOUT ANY WARRANTY; without even the implied warranty of         *
  14  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the          *
  15  *  GNU General Public License for more details.                           *
  16  *                                                                         *
  17  *  You should have received a copy of the GNU General Public License      *
  18  *  along with this program; if not, write to the Free Software            *
  19  *  Foundation, Inc.,                                                      *
  20  *  59 Temple Place, Suite 330, Boston, MA  02111-1307  USA                *
  21  ***************************************************************************/
  22 /* vim: set sw=4 ts=4 sts=4 tw=100:
  23  * vérifie qu'il n'y a pas de validations en cours, et maile si c'est le cas
  24 */
  25
  26 $M_PERIOD = "INTERVAL 3 HOUR"; // période d'envoi des mails de 3h
  27 $R_PERIOD = "INTERVAL 6 HOUR"; // période de réponse moyenne de 6h
  28
  29 require('connect.db.inc.php');
  30 require('plmailer.php');
  31
  32 $res = XDB::query("SELECT  count(r.stamp), UNIX_TIMESTAMP(MIN(r.stamp)),
  33                            sum(r.stamp < NOW() - $M_PERIOD), sum(r.stamp < NOW() - $R_PERIOD)
  34                      FROM  x4dat.requests AS r");
  35 list($nb, $age, $nbold, $nbveryold) = $res->fetchOneRow();
  36
  37 $age = (time() - intval($age)) / 86400;
  38 $head = "";
  39 if ($age > 15) {
  40     $head = "[autodestruction du serveur] ";
  41 } elseif ($age > 7) {
  42     $head = "[armageddon imminent] ";
  43 } elseif ($age > 5) {
  44     $head = "[guerre nucléaire] ";
  45 } elseif ($age > 3) {
  46     $head = "[ET Téléphone maison] ";
  47 } elseif ($age > 1) {
  48     $head = "[réveil !] ";
  49 } elseif (!empty($nbveryold)) {
  50     $head = "[urgent] ";
  51 }
  52
  53
  54 if (empty($nb)) {
  55     exit;
  56 }
  57
  58 $plural = $nb == 1 ? "" : "s";
  59
  60 $mymail = new PlMailer();
  61 $mymail->setFrom('validation@' . $globals->mail->domain);
  62 $mymail->addTo("validation@" . $globals->mail->domain);
  63 $mymail->setSubject($head . "il y a $nb validation$plural non effectuée$plural");
  64
  65 $message =
  66         "il y a $nb validation$plural à effectuer \n"
  67         .(empty($nbold)?"":"dont $nbold depuis le dernier mail !!!\n")
  68         .(empty($nbveryold)?"":"et dont *$nbveryold* ".($nbveryold == 1 ? "est" : "sont")." en retard de plus de 6h !!!")
  69         ."\n"
  70         ."https://www.polytechnique.org/admin/validate\n\n"
  71         ."Par catégorie :\n";
  72 $res = XDB::iterRow("SELECT  type, count(*)
  73                        FROM  x4dat.requests
  74                    GROUP BY  type
  75                    ORDER BY  type");
  76 while (list($type, $nb) = $res->next()) {
  77     $message .= "- $type: $nb\n";
  78 }
  79
  80 $message = wordwrap($message,78);
  81 $mymail->setTxtBody($message);
  82 $mymail->send();
  83 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
  84 ?>