| 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 |  * Show current cache usage (number of items, size of caches).
 | 
        
           |  |  | 19 |  *
 | 
        
           |  |  | 20 |  * @package core_cache
 | 
        
           |  |  | 21 |  * @copyright 2021 The Open University
 | 
        
           |  |  | 22 |  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 | 
        
           |  |  | 23 |  */
 | 
        
           |  |  | 24 |   | 
        
           |  |  | 25 | require_once('../config.php');
 | 
        
           |  |  | 26 |   | 
        
           |  |  | 27 | require_once($CFG->dirroot . '/lib/adminlib.php');
 | 
        
           |  |  | 28 |   | 
        
           |  |  | 29 | admin_externalpage_setup('cacheusage');
 | 
        
           | 1441 | ariadna | 30 | $adminhelper = \core_cache\factory::instance()->get_administration_display_helper();
 | 
        
           | 1 | efrain | 31 | raise_memory_limit(MEMORY_EXTRA);
 | 
        
           |  |  | 32 |   | 
        
           |  |  | 33 | $samples = optional_param('samples', 50, PARAM_INT);
 | 
        
           |  |  | 34 |   | 
        
           |  |  | 35 | // Just for safety reasons, stop people choosing a stupid number.
 | 
        
           |  |  | 36 | if ($samples > 1000) {
 | 
        
           |  |  | 37 |     $samples = 1000;
 | 
        
           |  |  | 38 | }
 | 
        
           |  |  | 39 |   | 
        
           |  |  | 40 | // Get the actual data.
 | 
        
           |  |  | 41 | $usage = $adminhelper->get_usage($samples);
 | 
        
           |  |  | 42 |   | 
        
           |  |  | 43 | // Set up the renderer and organise data to render.
 | 
        
           |  |  | 44 | $renderer = $PAGE->get_renderer('core_cache');
 | 
        
           |  |  | 45 | [$table, $summarytable] = $renderer->usage_tables($usage);
 | 
        
           |  |  | 46 | $form = new \core_cache\output\usage_samples_form();
 | 
        
           |  |  | 47 |   | 
        
           |  |  | 48 | echo $OUTPUT->header();
 | 
        
           |  |  | 49 | echo $renderer->usage_page($table, $summarytable, $form);
 | 
        
           |  |  | 50 | echo $OUTPUT->footer();
 |