Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 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
 * Task API status 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
defined('MOODLE_INTERNAL') || die();
26
 
27
/**
28
 * Add cron related service status checks
29
 *
30
 * @return array of check objects
31
 */
32
function tool_task_status_checks(): array {
33
    return [
34
        new \tool_task\check\cronrunning(),
35
        new \tool_task\check\maxfaildelay(),
36
        new \tool_task\check\adhocqueue(),
37
        new \tool_task\check\longrunningtasks(),
38
    ];
39
}
40
 
41
/**
42
 * Function used to handle mtrace by outputting the text to normal browser window.
43
 *
44
 * @param string $message Message to output
45
 * @param string $eol End of line character
46
 */
47
function tool_task_mtrace_wrapper(string $message, string $eol): void {
48
    $message = s($message);
49
 
50
    // We autolink urls and emails here but can't use format_text as it does
51
    // more than we need and has side effects which are not useful in this context.
52
    $urlpattern = '/(http|https|ftp|ftps)\:\/\/[a-zA-Z0-9\-\.]+\.[a-zA-Z]{2,3}(\/\S*)?/';
53
    $message = preg_replace_callback($urlpattern, function($matches) {
54
        $url = $matches[0];
55
        return html_writer::link($url, $url, ['target' => '_blank']);
56
    }, $message);
57
 
58
    $emailpattern = '/[a-zA-Z0-9._-]+@[a-zA-Z0-9.-]+\.[a-zA-Z]{2,4}/';
59
    $message = preg_replace_callback($emailpattern, function($matches) {
60
        $email = $matches[0];
61
        return html_writer::link('mailto:' . $email, $email);
62
    }, $message);
63
 
64
    echo $message . $eol;
65
}