[Summary view]

Differences Between: [Versions 310 and 400] [Versions 310 and 401] [Versions 310 and 402] [Versions 310 and 403]

   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   * Web services protocols admin UI
  20   *
  21   * @package   webservice
  22   * @copyright 2009 Moodle Pty Ltd (http://moodle.com)
  23   * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  24   */
  25  
  26  require_once('../../config.php');
  27  require_once($CFG->libdir.'/adminlib.php');
  28  require_once($CFG->libdir.'/tablelib.php');
  29  
  30  $PAGE->set_url('/' . $CFG->admin . '/webservice/protocols.php');
  31  //TODO: disable the blocks here or better make the page layout default to no blocks!
  32  
  33  require_admin();
  34  
  35  $returnurl = $CFG->wwwroot . "/" . $CFG->admin . "/settings.php?section=webserviceprotocols";
  36  
  37  $action     = optional_param('action', '', PARAM_ALPHANUMEXT);
  38  $webservice = optional_param('webservice', '', PARAM_SAFEDIR);
  39  $confirm    = optional_param('confirm', 0, PARAM_BOOL);
  40  
  41  // get currently installed and enabled auth plugins
  42  $available_webservices = core_component::get_plugin_list('webservice');
  43  if (!empty($webservice) and empty($available_webservices[$webservice])) {
  44      redirect($returnurl);
  45  }
  46  
  47  $active_webservices = empty($CFG->webserviceprotocols) ? array() : explode(',', $CFG->webserviceprotocols);
  48  foreach ($active_webservices as $key=>$active) {
  49      if (empty($available_webservices[$active])) {
  50          unset($active_webservices[$key]);
  51      }
  52  }
  53  
  54  ////////////////////////////////////////////////////////////////////////////////
  55  // process actions
  56  
  57  if (!confirm_sesskey()) {
  58      redirect($returnurl);
  59  }
  60  
  61  switch ($action) {
  62  
  63      case 'disable':
  64          // remove from enabled list
  65          $key = array_search($webservice, $active_webservices);
  66          unset($active_webservices[$key]);
  67          break;
  68  
  69      case 'enable':
  70          // add to enabled list
  71          if (!in_array($webservice, $active_webservices)) {
  72              $active_webservices[] = $webservice;
  73              $active_webservices = array_unique($active_webservices);
  74          }
  75          break;
  76  
  77      default:
  78          break;
  79  }
  80  
  81  set_config('webserviceprotocols', implode(',', $active_webservices));
  82  
  83  redirect($returnurl);