[Summary view]

Differences Between: [Versions 310 and 401] [Versions 311 and 401] [Versions 39 and 401]

   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       * Return result
  43       * @return result
  44       */
  45      public function get_result() : result {
  46          global $DB, $CFG;
  47  
  48          $stats = $DB->get_record_sql('
  49              SELECT count(*) cnt,
  50                     MAX(? - nextruntime) age
  51                FROM {task_adhoc}', [time()]);
  52  
  53          $status = result::OK;
  54          $summary = get_string('adhocempty', 'tool_task');
  55          $details = '';
  56  
  57          if ($stats->cnt > 0) {
  58              // A large queue size by itself is not an issue, only when tasks
  59              // are not being processed in a timely fashion is it an issue.
  60              $status = result::INFO;
  61              $summary = get_string('adhocqueuesize', 'tool_task', $stats->cnt);
  62          }
  63  
  64          $max = $CFG->adhoctaskagewarn ?? 10 * MINSECS;
  65          if ($stats->age > $max) {
  66              $status = result::WARNING;
  67              $summary = get_string('adhocqueueold', 'tool_task', [
  68                  'age' => format_time($stats->age),
  69                  'max' => format_time($max),
  70              ]);
  71          }
  72  
  73          $max = $CFG->adhoctaskageerror ?? 4 * HOURSECS;
  74          if ($stats->age > $max) {
  75              $status = result::ERROR;
  76              $summary = get_string('adhocqueueold', 'tool_task', [
  77                  'age' => format_time($stats->age),
  78                  'max' => format_time($max),
  79              ]);
  80          }
  81  
  82          return new result($status, $summary, $details);
  83      }
  84  }