3 // This file is part of Moodle - http://moodle.org/
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.
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.
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/>.
19 * Web services protocols admin UI
22 * @copyright 2009 Moodle Pty Ltd (http://moodle.com)
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
26 require_once('../../config.php');
27 require_once($CFG->libdir
.'/adminlib.php');
28 require_once($CFG->libdir
.'/tablelib.php');
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!
34 require_capability('moodle/site:config', context_system
::instance());
36 $returnurl = $CFG->wwwroot
. "/" . $CFG->admin
. "/settings.php?section=webserviceprotocols";
38 $action = optional_param('action', '', PARAM_ALPHANUMEXT
);
39 $webservice = optional_param('webservice', '', PARAM_SAFEDIR
);
40 $confirm = optional_param('confirm', 0, PARAM_BOOL
);
42 // get currently installed and enabled auth plugins
43 $available_webservices = get_plugin_list('webservice');
44 if (!empty($webservice) and empty($available_webservices[$webservice])) {
48 $active_webservices = empty($CFG->webserviceprotocols
) ?
array() : explode(',', $CFG->webserviceprotocols
);
49 foreach ($active_webservices as $key=>$active) {
50 if (empty($available_webservices[$active])) {
51 unset($active_webservices[$key]);
55 ////////////////////////////////////////////////////////////////////////////////
58 if (!confirm_sesskey()) {
64 die('TODO: not implemented yet');
68 // remove from enabled list
69 $key = array_search($webservice, $active_webservices);
70 unset($active_webservices[$key]);
74 // add to enabled list
75 if (!in_array($webservice, $active_webservices)) {
76 $active_webservices[] = $webservice;
77 $active_webservices = array_unique($active_webservices);
85 set_config('webserviceprotocols', implode(',', $active_webservices));