<?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/>.
//
// This file is part of BasicLTI4Moodle
//
// BasicLTI4Moodle is an IMS BasicLTI (Basic Learning Tools for Interoperability)
// consumer for Moodle 1.9 and Moodle 2.0. BasicLTI is a IMS Standard that allows web
// based learning tools to be easily integrated in LMS as native ones. The IMS BasicLTI
// specification is part of the IMS standard Common Cartridge 1.1 Sakai and other main LMS
// are already supporting or going to support BasicLTI. This project Implements the consumer
// for Moodle. Moodle is a Free Open source Learning Management System by Martin Dougiamas.
// BasicLTI4Moodle is a project iniciated and leaded by Ludo(Marc Alier) and Jordi Piguillem
// at the GESSI research group at UPC.
// SimpleLTI consumer for Moodle is an implementation of the early specification of LTI
// by Charles Severance (Dr Chuck) htp://dr-chuck.com , developed by Jordi Piguillem in a
// Google Summer of Code 2008 project co-mentored by Charles Severance and Marc Alier.
//
// BasicLTI4Moodle is copyright 2009 by Marc Alier Forment, Jordi Piguillem and Nikolas Galanis
// of the Universitat Politecnica de Catalunya http://www.upc.edu
// Contact info: Marc Alier Forment granludo @ gmail.com or marc.alier @ upc.edu.
/**
* This file contains the script used to clone Moodle admin setting page.
*
* It is used to create a new form used to pre-configure lti activities
*
* @package mod_lti
* @copyright 2009 Marc Alier, Jordi Piguillem, Nikolas Galanis
* marc.alier@upc.edu
* @copyright 2009 Universitat Politecnica de Catalunya http://www.upc.edu
* @author Marc Alier
* @author Jordi Piguillem
* @author Nikolas Galanis
* @author Chris Scribner
* @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->dirroot.'/mod/lti/edit_form.php');
require_once($CFG->dirroot.'/mod/lti/locallib.php');
$action = optional_param('action', null, PARAM_ALPHANUMEXT);
$id = optional_param('id', null, PARAM_INT);
$tab = optional_param('tab', '', PARAM_ALPHAEXT);
$returnto = optional_param('returnto', '', PARAM_ALPHA);
if ($returnto == 'toolconfigure') {
$returnurl = new moodle_url($CFG->wwwroot . '/mod/lti/toolconfigure.php');
}
// No guest autologin.
require_login(0, false);
require_sesskey();
// Check this is not for a tool created from a tool proxy.
if (!empty($id)) {
$type = lti_get_type_type_config($id);
if (!empty($type->toolproxyid)) {
$sesskey = required_param('sesskey', PARAM_RAW);
$params = array('action' => $action, 'id' => $id, 'sesskey' => $sesskey, 'tab' => $tab);
if (!empty($returnto)) {
$params['returnto'] = $returnto;
}
$redirect = new moodle_url('/mod/lti/toolssettings.php', $params);
redirect($redirect);
}
> $type->lti_coursecategories = '';
} else {
> if ($records = $DB->get_fieldset_select('lti_types_categories', 'categoryid', 'typeid = :typeid',
$type = new stdClass();
> ['typeid' => $id])) {
// Assign a default empty value for the lti_icon.
> $type->lti_coursecategories = implode(',', $records);
$type->lti_icon = '';
> }
$type->lti_secureicon = '';
$type->lti_clientid = null;
> $type->lti_coursecategories = '';
}
$pageurl = new moodle_url('/mod/lti/typessettings.php');
if (!empty($id)) {
$pageurl->param('id', $id);
}
if (!empty($returnto)) {
$pageurl->param('returnto', $returnto);
}
$PAGE->set_url($pageurl);
admin_externalpage_setup('managemodules'); // Hacky solution for printing the admin page.
$redirect = "$CFG->wwwroot/$CFG->admin/settings.php?section=modsettinglti&tab={$tab}";
if (!empty($returnurl)) {
$redirect = $returnurl;
}
if ($action == 'accept') {
lti_set_state_for_type($id, LTI_TOOL_STATE_CONFIGURED);
redirect($redirect);
} else if ($action == 'reject') {
lti_set_state_for_type($id, LTI_TOOL_STATE_REJECTED);
redirect($redirect);
} else if ($action == 'delete') {
lti_delete_type($id);
redirect($redirect);
}
if (lti_request_is_using_ssl() && !empty($type->lti_secureicon)) {
$type->oldicon = $type->lti_secureicon;
} else {
$type->oldicon = $type->lti_icon;
}
< $form = new mod_lti_edit_types_form($pageurl,
< (object)array('isadmin' => true, 'istool' => false, 'id' => $id, 'clientid' => $type->lti_clientid));
> $form = new mod_lti_edit_types_form(
> $pageurl,
> (object) [
> 'isadmin' => true,
> 'istool' => false,
> 'id' => $id,
> 'clientid' => $type->lti_clientid,
> 'coursecategories' => $type->lti_coursecategories,
> 'iscoursetool' => !empty($id) && $type->course !== get_site()->id
> ]
> );
if ($data = $form->get_data()) {
$type = new stdClass();
if (!empty($id)) {
$type->id = $id;
lti_load_type_if_cartridge($data);
lti_update_type($type, $data);
redirect($redirect);
} else {
$type->state = LTI_TOOL_STATE_CONFIGURED;
lti_load_type_if_cartridge($data);
lti_add_type($type, $data);
redirect($redirect);
}
} else if ($form->is_cancelled()) {
redirect($redirect);
}
< $PAGE->set_title("$SITE->shortname: " . get_string('toolsetup', 'lti'));
< $PAGE->navbar->add(get_string('lti_administration', 'lti'), $CFG->wwwroot.'/'.$CFG->admin.'/settings.php?section=modsettinglti');
> $PAGE->set_title(get_string('toolsetup', 'lti'));
> $PAGE->set_primary_active_tab('siteadminnode');
> $PAGE->set_secondary_active_tab('ltitoolconfigure');
> $PAGE->navbar->add(get_string('manage_external_tools', 'lti'), new moodle_url('/mod/lti/toolconfigure.php'));
> $PAGE->navbar->add(get_string('toolsetup', 'lti'), $PAGE->url);
> $PAGE->requires->js_call_amd('mod_lti/coursecategory', 'init', [$type->lti_coursecategories]);
echo $OUTPUT->header();
echo $OUTPUT->heading(get_string('toolsetup', 'lti'));
echo $OUTPUT->box_start('generalbox');
if ($action == 'update') {
$form->set_data($type);
}
$form->display();
echo $OUTPUT->box_end();
echo $OUTPUT->footer();