2 // This file is part of Moodle - http://moodle.org/
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.
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.
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/>.
17 // This file is part of BasicLTI4Moodle
19 // BasicLTI4Moodle is an IMS BasicLTI (Basic Learning Tools for Interoperability)
20 // consumer for Moodle 1.9 and Moodle 2.0. BasicLTI is a IMS Standard that allows web
21 // based learning tools to be easily integrated in LMS as native ones. The IMS BasicLTI
22 // specification is part of the IMS standard Common Cartridge 1.1 Sakai and other main LMS
23 // are already supporting or going to support BasicLTI. This project Implements the consumer
24 // for Moodle. Moodle is a Free Open source Learning Management System by Martin Dougiamas.
25 // BasicLTI4Moodle is a project iniciated and leaded by Ludo(Marc Alier) and Jordi Piguillem
26 // at the GESSI research group at UPC.
27 // SimpleLTI consumer for Moodle is an implementation of the early specification of LTI
28 // by Charles Severance (Dr Chuck) htp://dr-chuck.com , developed by Jordi Piguillem in a
29 // Google Summer of Code 2008 project co-mentored by Charles Severance and Marc Alier.
31 // BasicLTI4Moodle is copyright 2009 by Marc Alier Forment, Jordi Piguillem and Nikolas Galanis
32 // of the Universitat Politecnica de Catalunya http://www.upc.edu
33 // Contact info: Marc Alier Forment granludo @ gmail.com or marc.alier @ upc.edu.
36 * This file contains the script used to clone Moodle admin setting page.
38 * It is used to create a new form used to pre-configure lti activities
41 * @copyright 2009 Marc Alier, Jordi Piguillem, Nikolas Galanis
43 * @copyright 2009 Universitat Politecnica de Catalunya http://www.upc.edu
45 * @author Jordi Piguillem
46 * @author Nikolas Galanis
47 * @author Chris Scribner
48 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
51 require_once('../../config.php');
52 require_once($CFG->libdir
.'/adminlib.php');
53 require_once($CFG->dirroot
.'/mod/lti/edit_form.php');
54 require_once($CFG->dirroot
.'/mod/lti/locallib.php');
56 $action = optional_param('action', null, PARAM_ALPHANUMEXT
);
57 $id = optional_param('id', null, PARAM_INT
);
58 $tab = optional_param('tab', '', PARAM_ALPHAEXT
);
59 $returnto = optional_param('returnto', '', PARAM_ALPHA
);
61 if ($returnto == 'toolconfigure') {
62 $returnurl = new moodle_url($CFG->wwwroot
. '/mod/lti/toolconfigure.php');
65 // No guest autologin.
66 require_login(0, false);
70 // Check this is not for a tool created from a tool proxy.
72 $type = lti_get_type_type_config($id);
73 if (!empty($type->toolproxyid
)) {
74 $sesskey = required_param('sesskey', PARAM_RAW
);
75 $params = array('action' => $action, 'id' => $id, 'sesskey' => $sesskey, 'tab' => $tab);
76 if (!empty($returnto)) {
77 $params['returnto'] = $returnto;
79 $redirect = new moodle_url('/mod/lti/toolssettings.php', $params);
83 $type = new stdClass();
84 // Assign a default empty value for the lti_icon.
86 $type->lti_secureicon
= '';
88 $type->lti_clientid
= null;
91 $pageurl = new moodle_url('/mod/lti/typessettings.php');
93 $pageurl->param('id', $id);
95 if (!empty($returnto)) {
96 $pageurl->param('returnto', $returnto);
98 $PAGE->set_url($pageurl);
100 admin_externalpage_setup('managemodules'); // Hacky solution for printing the admin page.
102 $redirect = "$CFG->wwwroot/$CFG->admin/settings.php?section=modsettinglti&tab={$tab}";
103 if (!empty($returnurl)) {
104 $redirect = $returnurl;
107 if ($action == 'accept') {
108 lti_set_state_for_type($id, LTI_TOOL_STATE_CONFIGURED
);
110 } else if ($action == 'reject') {
111 lti_set_state_for_type($id, LTI_TOOL_STATE_REJECTED
);
113 } else if ($action == 'delete') {
114 lti_delete_type($id);
118 if (lti_request_is_using_ssl() && !empty($type->lti_secureicon
)) {
119 $type->oldicon
= $type->lti_secureicon
;
121 $type->oldicon
= $type->lti_icon
;
124 $form = new mod_lti_edit_types_form($pageurl,
125 (object)array('isadmin' => true, 'istool' => false, 'id' => $id, 'clientid' => $type->lti_clientid
));
127 if ($data = $form->get_data()) {
128 $type = new stdClass();
131 lti_load_type_if_cartridge($data);
132 lti_update_type($type, $data);
136 $type->state
= LTI_TOOL_STATE_CONFIGURED
;
137 lti_load_type_if_cartridge($data);
138 lti_add_type($type, $data);
142 } else if ($form->is_cancelled()) {
146 $PAGE->set_title("$SITE->shortname: " . get_string('toolsetup', 'lti'));
147 $PAGE->set_primary_active_tab('siteadminnode');
148 $PAGE->set_secondary_active_tab('ltitoolconfigure');
149 $PAGE->navbar
->add(get_string('manage_external_tools', 'lti'), new moodle_url('/mod/lti/toolconfigure.php'));
150 $PAGE->navbar
->add(get_string('toolsetup', 'lti'), $PAGE->url
);
152 echo $OUTPUT->header();
153 echo $OUTPUT->heading(get_string('toolsetup', 'lti'));
154 echo $OUTPUT->box_start('generalbox');
156 if ($action == 'update') {
157 $form->set_data($type);
161 echo $OUTPUT->box_end();
162 echo $OUTPUT->footer();