Search moodle.org's
Developer Documentation

  • Bug fixes for general core bugs in 3.10.x will end 8 November 2021 (12 months).
  • Bug fixes for security issues in 3.10.x will end 9 May 2022 (18 months).
  • PHP version: minimum PHP 7.2.0 Note: minimum PHP version has increased since Moodle 3.8. PHP 7.3.x and 7.4.x are supported too.
  • Differences Between: [Versions 310 and 34] [Versions 310 and 35] [Versions 310 and 36] [Versions 310 and 37] [Versions 34 and 310] [Versions 35 and 310] [Versions 36 and 310] [Versions 37 and 310]

       1  <?php
       2  
       3  // This file is part of Moodle - http://moodle.org/
       4  //
       5  // Moodle is free software: you can redistribute it and/or modify
       6  // it under the terms of the GNU General Public License as published by
       7  // the Free Software Foundation, either version 3 of the License, or
       8  // (at your option) any later version.
       9  //
      10  // Moodle is distributed in the hope that it will be useful,
      11  // but WITHOUT ANY WARRANTY; without even the implied warranty of
      12  // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
      13  // GNU General Public License for more details.
      14  //
      15  // You should have received a copy of the GNU General Public License
      16  // along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
      17  
      18  
      19  /**
      20   * Page to allow the administrator to delete networked hosts, with a confirm message
      21   *
      22   * @package    core
      23   * @subpackage mnet
      24   * @copyright  2007 Donal McMullan
      25   * @copyright  2007 Martin Langhoff
      26   * @copyright  2010 Penny Leach
      27   * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
      28   */
      29  
      30  require(__DIR__.'/../../config.php');
      31  require_once($CFG->libdir . '/adminlib.php');
      32  
      33  $step   = optional_param('step', 'verify', PARAM_ALPHA);
      34  $hostid = required_param('hostid', PARAM_INT);
      35  
      36  
      37  $mnet = get_mnet_environment();
      38  
      39  $PAGE->set_url('/admin/mnet/delete.php');
      40  admin_externalpage_setup('mnetpeer' . $hostid);
      41  
      42  require_sesskey();
      43  
      44  $mnet_peer = new mnet_peer();
      45  $mnet_peer->set_id($hostid);
      46  
      47  if ('verify' == $step) {
      48      echo $OUTPUT->header();
      49      echo $OUTPUT->heading(get_string('deleteaserver', 'mnet'));
      50      if ($live_users = $mnet_peer->count_live_sessions() > 0) {
      51          echo $OUTPUT->notification(get_string('usersareonline', 'mnet', $live_users));
      52      }
      53      $yesurl = new moodle_url('/admin/mnet/delete.php', array('hostid' => $mnet_peer->id, 'step' => 'delete'));
      54      $nourl = new moodle_url('/admin/mnet/peers.php');
      55      echo $OUTPUT->confirm(get_string('reallydeleteserver', 'mnet')  . ': ' .  $mnet_peer->name, $yesurl, $nourl);
      56      echo $OUTPUT->footer();
      57  } elseif ('delete' == $step) {
      58      $mnet_peer->delete();
      59      redirect(new moodle_url('/admin/mnet/peers.php'), get_string('hostdeleted', 'mnet'), 5);
      60  }