Search moodle.org's
Developer Documentation

See Release Notes

  • Bug fixes for general core bugs in 4.2.x will end 22 April 2024 (12 months).
  • Bug fixes for security issues in 4.2.x will end 7 October 2024 (18 months).
  • PHP version: minimum PHP 8.0.0 Note: minimum PHP version has increased since Moodle 4.1. PHP 8.1.x is supported too.
   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   * Profiling tool export utility.
  19   *
  20   * @package    tool_profiling
  21   * @copyright  2013 onwards Eloy Lafuente (stronk7) {@link http://stronk7.com}
  22   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  23   */
  24  
  25  require_once(__DIR__ . '/../../../config.php');
  26  require_once($CFG->libdir.'/adminlib.php');
  27  require_once($CFG->libdir . '/xhprof/xhprof_moodle.php');
  28  
  29  // Page parameters.
  30  $runid = required_param('runid', PARAM_ALPHANUM);
  31  $listurl = required_param('listurl', PARAM_PATH);
  32  
  33  admin_externalpage_setup('toolprofiling');
  34  
  35  $PAGE->navbar->add(get_string('export', 'tool_profiling'));
  36  
  37  // Calculate export variables.
  38  $tempdir = 'profiling';
  39  make_temp_directory($tempdir);
  40  $runids = array($runid);
  41  $filename = $runid . '.mpr';
  42  $filepath = $CFG->tempdir . '/' . $tempdir . '/' . $filename;
  43  
  44  // Generate the mpr file and send it.
  45  if (profiling_export_runs($runids, $filepath)) {
  46      send_file($filepath, $filename, 0, 0, false, false, '', true);
  47      unlink($filepath); // Delete once sent.
  48      die;
  49  }
  50  
  51  // Something wrong happened, notice it and done.
  52  $urlparams = array(
  53          'runid' => $runid,
  54          'listurl' => $listurl);
  55  $url = new moodle_url('/admin/tool/profiling/index.php', $urlparams);
  56  notice(get_string('exportproblem', 'tool_profiling', $urlparams), $url);