[Summary view]

Differences Between: [Versions 311 and 400] [Versions 311 and 401] [Versions 311 and 402] [Versions 311 and 403]

   1  <?php
   2  // This file is part of Moodle - http://moodle.org/
   3  //
   4  // Moodle is free software: you can redistribute it and/or modify
   5  // it under the terms of the GNU General Public License as published by
   6  // the Free Software Foundation, either version 3 of the License, or
   7  // (at your option) any later version.
   8  //
   9  // Moodle is distributed in the hope that it will be useful,
  10  // but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12  // GNU General Public License for more details.
  13  //
  14  // You should have received a copy of the GNU General Public License
  15  // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
  16  
  17  /**
  18   * Ad hoc queue checks
  19   *
  20   * @package    tool_task
  21   * @copyright  2020 Brendan Heywood (brendan@catalyst-au.net)
  22   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  23   */
  24  
  25  namespace tool_task\check;
  26  
  27  defined('MOODLE_INTERNAL') || die();
  28  
  29  use core\check\check;
  30  use core\check\result;
  31  
  32  /**
  33   * Ad hoc queue checks
  34   *
  35   * @package    tool_task
  36   * @copyright  2020 Brendan Heywood (brendan@catalyst-au.net)
  37   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  38   */
  39  class adhocqueue extends check {
  40  
  41      /**
  42       * Constructor
  43       */
  44      public function __construct() {
  45          global $CFG;
  46          $this->id = 'adhocqueue';
  47          $this->name = get_string('checkadhocqueue', 'tool_task');
  48      }
  49  
  50      /**
  51       * Return result
  52       * @return result
  53       */
  54      public function get_result() : result {
  55          global $DB, $CFG;
  56  
  57          $stats = $DB->get_record_sql('
  58              SELECT count(*) cnt,
  59                     MAX(? - nextruntime) age
  60                FROM {task_adhoc}', [time()]);
  61  
  62          $status = result::OK;
  63          $summary = get_string('adhocempty', 'tool_task');
  64          $details = '';
  65  
  66          if ($stats->cnt > 0) {
  67              // A large queue size by itself is not an issue, only when tasks
  68              // are not being processed in a timely fashion is it an issue.
  69              $status = result::INFO;
  70              $summary = get_string('adhocqueuesize', 'tool_task', $stats->cnt);
  71          }
  72  
  73          $max = $CFG->adhoctaskagewarn ?? 10 * MINSECS;
  74          if ($stats->age > $max) {
  75              $status = result::WARNING;
  76              $summary = get_string('adhocqueueold', 'tool_task', [
  77                  'age' => format_time($stats->age),
  78                  'max' => format_time($max),
  79              ]);
  80          }
  81  
  82          $max = $CFG->adhoctaskageerror ?? 4 * HOURSECS;
  83          if ($stats->age > $max) {
  84              $status = result::ERROR;
  85              $summary = get_string('adhocqueueold', 'tool_task', [
  86                  'age' => format_time($stats->age),
  87                  'max' => format_time($max),
  88              ]);
  89          }
  90  
  91          return new result($status, $summary, $details);
  92      }
  93  }