bin/cron/cron_validations.php

   1 #!/usr/bin/php5 -q
   2 <?php
   3 /***************************************************************************
   4  *  Copyright (C) 2003-2007 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(stamp), sum(stamp < NOW() - $M_PERIOD), sum(stamp < NOW() - $R_PERIOD) FROM x4dat.requests");
  33 list($nb,$nbold,$nbveryold) = $res->fetchOneRow();
  34
  35 if (empty($nb)) {
  36     exit;
  37 }
  38
  39 $plural = $nb == 1 ? "" : "s";
  40
  41 $mymail = new PlMailer();
  42 $mymail->setFrom('validation@' . $globals->mail->domain);
  43 $mymail->addTo("validation@" . $globals->mail->domain);
  44 $mymail->setSubject((empty($nbveryold)?"":"[urgent] ")."il y a $nb validation$plural non effectuée$plural");
  45
  46 $message =
  47         "il y a $nb validation$plural à effectuer \n"
  48         .(empty($nbold)?"":"dont $nbold depuis le dernier mail !!!\n")
  49         .(empty($nbveryold)?"":"et dont *$nbveryold* ".($nbveryold == 1 ? "est" : "sont")." en retard de plus de 6h !!!")
  50         ."\n"
  51         ."https://www.polytechnique.org/admin/validate\n\n"
  52         ."Par catégorie :\n";
  53 $res = XDB::iterRow("SELECT  type, count(*)
  54                        FROM  x4dat.requests
  55                    GROUP BY  type
  56                    ORDER BY  type");
  57 while (list($type, $nb) = $res->next()) {
  58     $message .= "- $type: $nb\n";
  59 }
  60
  61 $message = wordwrap($message,78);
  62 $mymail->setTxtBody($message);
  63 $mymail->send();
  64 // vim:set et sw=4 sts=4 sws=4 foldmethod=marker enc=utf-8:
  65 ?>