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   * Prints the data deletion main page.
  19   *
  20   * @copyright 2018 onwards Jun Pataleta
  21   * @license http://www.gnu.org/copyleft/gpl.html GNU Public License
  22   * @package tool_dataprivacy
  23   */
  24  
  25  require_once(__DIR__ . '/../../../config.php');
  26  require_once($CFG->dirroot . '/' . $CFG->admin . '/tool/dataprivacy/lib.php');
  27  
  28  require_login(null, false);
  29  
  30  $filter = optional_param('filter', CONTEXT_COURSE, PARAM_INT);
  31  
  32  $url = new moodle_url('/admin/tool/dataprivacy/datadeletion.php');
  33  
  34  $title = get_string('datadeletion', 'tool_dataprivacy');
  35  
  36  \tool_dataprivacy\page_helper::setup($url, $title);
  37  
  38  echo $OUTPUT->header();
  39  echo $OUTPUT->heading($title);
  40  
  41  if (\tool_dataprivacy\api::is_site_dpo($USER->id)) {
  42      $table = new \tool_dataprivacy\output\expired_contexts_table($filter);
  43      $table->baseurl = $url;
  44      $table->baseurl->param('filter', $filter);
  45  
  46      $datadeletionpage = new \tool_dataprivacy\output\data_deletion_page($filter, $table);
  47  
  48      $output = $PAGE->get_renderer('tool_dataprivacy');
  49      echo $output->render($datadeletionpage);
  50  } else {
  51      $dponamestring = implode (',', tool_dataprivacy\api::get_dpo_role_names());
  52      $message = get_string('privacyofficeronly', 'tool_dataprivacy', $dponamestring);
  53      echo $OUTPUT->notification($message, 'error');
  54  }
  55  
  56  echo $OUTPUT->footer();