You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
85 lines
2.7 KiB
85 lines
2.7 KiB
2 years ago
|
<?php
|
||
|
|
|
||
|
|
// This file is part of Moodle - http://moodle.org/
|
||
|
|
//
|
||
|
|
// Moodle is free software: you can redistribute it and/or modify
|
||
|
|
// it under the terms of the GNU General Public License as published by
|
||
|
|
// the Free Software Foundation, either version 3 of the License, or
|
||
|
|
// (at your option) any later version.
|
||
|
|
//
|
||
|
|
// Moodle is distributed in the hope that it will be useful,
|
||
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
|
|
// GNU General Public License for more details.
|
||
|
|
//
|
||
|
|
// You should have received a copy of the GNU General Public License
|
||
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
||
|
|
|
||
|
|
/**
|
||
|
|
* Web services protocols admin UI
|
||
|
|
*
|
||
|
|
* @package webservice
|
||
|
|
* @copyright 2009 Moodle Pty Ltd (http://moodle.com)
|
||
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
|
|
*/
|
||
|
|
|
||
|
|
require_once('../../config.php');
|
||
|
|
require_once($CFG->libdir.'/adminlib.php');
|
||
|
|
require_once($CFG->libdir.'/tablelib.php');
|
||
|
|
|
||
|
|
$PAGE->set_url('/' . $CFG->admin . '/webservice/protocols.php');
|
||
|
|
//TODO: disable the blocks here or better make the page layout default to no blocks!
|
||
|
|
|
||
|
|
require_login();
|
||
|
|
require_capability('moodle/site:config', context_system::instance());
|
||
|
|
|
||
|
|
$returnurl = $CFG->wwwroot . "/" . $CFG->admin . "/settings.php?section=webserviceprotocols";
|
||
|
|
|
||
|
|
$action = optional_param('action', '', PARAM_ALPHANUMEXT);
|
||
|
|
$webservice = optional_param('webservice', '', PARAM_SAFEDIR);
|
||
|
|
$confirm = optional_param('confirm', 0, PARAM_BOOL);
|
||
|
|
|
||
|
|
// get currently installed and enabled auth plugins
|
||
|
|
$available_webservices = core_component::get_plugin_list('webservice');
|
||
|
|
if (!empty($webservice) and empty($available_webservices[$webservice])) {
|
||
|
|
redirect($returnurl);
|
||
|
|
}
|
||
|
|
|
||
|
|
$active_webservices = empty($CFG->webserviceprotocols) ? array() : explode(',', $CFG->webserviceprotocols);
|
||
|
|
foreach ($active_webservices as $key=>$active) {
|
||
|
|
if (empty($available_webservices[$active])) {
|
||
|
|
unset($active_webservices[$key]);
|
||
|
|
}
|
||
|
|
}
|
||
|
|
|
||
|
|
////////////////////////////////////////////////////////////////////////////////
|
||
|
|
// process actions
|
||
|
|
|
||
|
|
if (!confirm_sesskey()) {
|
||
|
|
redirect($returnurl);
|
||
|
|
}
|
||
|
|
|
||
|
|
switch ($action) {
|
||
|
|
|
||
|
|
case 'disable':
|
||
|
|
// remove from enabled list
|
||
|
|
$key = array_search($webservice, $active_webservices);
|
||
|
|
unset($active_webservices[$key]);
|
||
|
|
break;
|
||
|
|
|
||
|
|
case 'enable':
|
||
|
|
// add to enabled list
|
||
|
|
if (!in_array($webservice, $active_webservices)) {
|
||
|
|
$active_webservices[] = $webservice;
|
||
|
|
$active_webservices = array_unique($active_webservices);
|
||
|
|
}
|
||
|
|
break;
|
||
|
|
|
||
|
|
default:
|
||
|
|
break;
|
||
|
|
}
|
||
|
|
|
||
|
|
set_config('webserviceprotocols', implode(',', $active_webservices));
|
||
|
|
|
||
|
|
redirect($returnurl);
|