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.
449 lines
19 KiB
449 lines
19 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/>.
|
||
|
|
||
|
/**
|
||
|
* External tool module external functions tests
|
||
|
*
|
||
|
* @package mod_lti
|
||
|
* @category external
|
||
|
* @copyright 2015 Juan Leyva <juan@moodle.com>
|
||
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
|
* @since Moodle 3.0
|
||
|
*/
|
||
|
|
||
|
defined('MOODLE_INTERNAL') || die();
|
||
|
|
||
|
global $CFG;
|
||
|
|
||
|
require_once($CFG->dirroot . '/webservice/tests/helpers.php');
|
||
|
require_once($CFG->dirroot . '/mod/lti/lib.php');
|
||
|
|
||
|
/**
|
||
|
* External tool module external functions tests
|
||
|
*
|
||
|
* @package mod_lti
|
||
|
* @category external
|
||
|
* @copyright 2015 Juan Leyva <juan@moodle.com>
|
||
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
|
* @since Moodle 3.0
|
||
|
*/
|
||
|
class mod_lti_external_testcase extends externallib_advanced_testcase {
|
||
|
|
||
|
/**
|
||
|
* Set up for every test
|
||
|
*/
|
||
|
public function setUp() {
|
||
|
global $DB;
|
||
|
$this->resetAfterTest();
|
||
|
$this->setAdminUser();
|
||
|
|
||
|
// Setup test data.
|
||
|
$this->course = $this->getDataGenerator()->create_course();
|
||
|
$this->lti = $this->getDataGenerator()->create_module('lti',
|
||
|
array('course' => $this->course->id, 'toolurl' => 'http://localhost/not/real/tool.php'));
|
||
|
$this->context = context_module::instance($this->lti->cmid);
|
||
|
$this->cm = get_coursemodule_from_instance('lti', $this->lti->id);
|
||
|
|
||
|
// Create users.
|
||
|
$this->student = self::getDataGenerator()->create_user();
|
||
|
$this->teacher = self::getDataGenerator()->create_user();
|
||
|
|
||
|
// Users enrolments.
|
||
|
$this->studentrole = $DB->get_record('role', array('shortname' => 'student'));
|
||
|
$this->teacherrole = $DB->get_record('role', array('shortname' => 'editingteacher'));
|
||
|
$this->getDataGenerator()->enrol_user($this->student->id, $this->course->id, $this->studentrole->id, 'manual');
|
||
|
$this->getDataGenerator()->enrol_user($this->teacher->id, $this->course->id, $this->teacherrole->id, 'manual');
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Test view_lti
|
||
|
*/
|
||
|
public function test_get_tool_launch_data() {
|
||
|
global $USER, $SITE;
|
||
|
|
||
|
$result = mod_lti_external::get_tool_launch_data($this->lti->id);
|
||
|
$result = external_api::clean_returnvalue(mod_lti_external::get_tool_launch_data_returns(), $result);
|
||
|
|
||
|
// Basic test, the function returns what it's expected.
|
||
|
self::assertEquals($this->lti->toolurl, $result['endpoint']);
|
||
|
self::assertCount(36, $result['parameters']);
|
||
|
|
||
|
// Check some parameters.
|
||
|
$parameters = array();
|
||
|
foreach ($result['parameters'] as $param) {
|
||
|
$parameters[$param['name']] = $param['value'];
|
||
|
}
|
||
|
self::assertEquals($this->lti->resourcekey, $parameters['oauth_consumer_key']);
|
||
|
self::assertEquals($this->course->fullname, $parameters['context_title']);
|
||
|
self::assertEquals($this->course->shortname, $parameters['context_label']);
|
||
|
self::assertEquals($USER->id, $parameters['user_id']);
|
||
|
self::assertEquals($USER->firstname, $parameters['lis_person_name_given']);
|
||
|
self::assertEquals($USER->lastname, $parameters['lis_person_name_family']);
|
||
|
self::assertEquals(fullname($USER), $parameters['lis_person_name_full']);
|
||
|
self::assertEquals($USER->username, $parameters['ext_user_username']);
|
||
|
self::assertEquals("phpunit", $parameters['tool_consumer_instance_name']);
|
||
|
self::assertEquals("PHPUnit test site", $parameters['tool_consumer_instance_description']);
|
||
|
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test get ltis by courses
|
||
|
*/
|
||
|
public function test_mod_lti_get_ltis_by_courses() {
|
||
|
global $DB;
|
||
|
|
||
|
// Create additional course.
|
||
|
$course2 = self::getDataGenerator()->create_course();
|
||
|
|
||
|
// Second lti.
|
||
|
$record = new stdClass();
|
||
|
$record->course = $course2->id;
|
||
|
$lti2 = self::getDataGenerator()->create_module('lti', $record);
|
||
|
|
||
|
// Execute real Moodle enrolment as we'll call unenrol() method on the instance later.
|
||
|
$enrol = enrol_get_plugin('manual');
|
||
|
$enrolinstances = enrol_get_instances($course2->id, true);
|
||
|
foreach ($enrolinstances as $courseenrolinstance) {
|
||
|
if ($courseenrolinstance->enrol == "manual") {
|
||
|
$instance2 = $courseenrolinstance;
|
||
|
break;
|
||
|
}
|
||
|
}
|
||
|
$enrol->enrol_user($instance2, $this->student->id, $this->studentrole->id);
|
||
|
|
||
|
self::setUser($this->student);
|
||
|
|
||
|
$returndescription = mod_lti_external::get_ltis_by_courses_returns();
|
||
|
|
||
|
// Create what we expect to be returned when querying the two courses.
|
||
|
// First for the student user.
|
||
|
$expectedfields = array('id', 'coursemodule', 'course', 'name', 'intro', 'introformat', 'introfiles', 'launchcontainer',
|
||
|
'showtitlelaunch', 'showdescriptionlaunch', 'icon', 'secureicon');
|
||
|
|
||
|
// Add expected coursemodule and data.
|
||
|
$lti1 = $this->lti;
|
||
|
$lti1->coursemodule = $lti1->cmid;
|
||
|
$lti1->introformat = 1;
|
||
|
$lti1->section = 0;
|
||
|
$lti1->visible = true;
|
||
|
$lti1->groupmode = 0;
|
||
|
$lti1->groupingid = 0;
|
||
|
$lti1->introfiles = [];
|
||
|
|
||
|
$lti2->coursemodule = $lti2->cmid;
|
||
|
$lti2->introformat = 1;
|
||
|
$lti2->section = 0;
|
||
|
$lti2->visible = true;
|
||
|
$lti2->groupmode = 0;
|
||
|
$lti2->groupingid = 0;
|
||
|
$lti2->introfiles = [];
|
||
|
|
||
|
foreach ($expectedfields as $field) {
|
||
|
$expected1[$field] = $lti1->{$field};
|
||
|
$expected2[$field] = $lti2->{$field};
|
||
|
}
|
||
|
|
||
|
$expectedltis = array($expected2, $expected1);
|
||
|
|
||
|
// Call the external function passing course ids.
|
||
|
$result = mod_lti_external::get_ltis_by_courses(array($course2->id, $this->course->id));
|
||
|
$result = external_api::clean_returnvalue($returndescription, $result);
|
||
|
|
||
|
$this->assertEquals($expectedltis, $result['ltis']);
|
||
|
$this->assertCount(0, $result['warnings']);
|
||
|
|
||
|
// Call the external function without passing course id.
|
||
|
$result = mod_lti_external::get_ltis_by_courses();
|
||
|
$result = external_api::clean_returnvalue($returndescription, $result);
|
||
|
$this->assertEquals($expectedltis, $result['ltis']);
|
||
|
$this->assertCount(0, $result['warnings']);
|
||
|
|
||
|
// Unenrol user from second course and alter expected ltis.
|
||
|
$enrol->unenrol_user($instance2, $this->student->id);
|
||
|
array_shift($expectedltis);
|
||
|
|
||
|
// Call the external function without passing course id.
|
||
|
$result = mod_lti_external::get_ltis_by_courses();
|
||
|
$result = external_api::clean_returnvalue($returndescription, $result);
|
||
|
$this->assertEquals($expectedltis, $result['ltis']);
|
||
|
|
||
|
// Call for the second course we unenrolled the user from, expected warning.
|
||
|
$result = mod_lti_external::get_ltis_by_courses(array($course2->id));
|
||
|
$this->assertCount(1, $result['warnings']);
|
||
|
$this->assertEquals('1', $result['warnings'][0]['warningcode']);
|
||
|
$this->assertEquals($course2->id, $result['warnings'][0]['itemid']);
|
||
|
|
||
|
// Now, try as a teacher for getting all the additional fields.
|
||
|
self::setUser($this->teacher);
|
||
|
|
||
|
$additionalfields = array('timecreated', 'timemodified', 'typeid', 'toolurl', 'securetoolurl',
|
||
|
'instructorchoicesendname', 'instructorchoicesendemailaddr', 'instructorchoiceallowroster',
|
||
|
'instructorchoiceallowsetting', 'instructorcustomparameters', 'instructorchoiceacceptgrades', 'grade',
|
||
|
'resourcekey', 'password', 'debuglaunch', 'servicesalt', 'visible', 'groupmode', 'groupingid');
|
||
|
|
||
|
foreach ($additionalfields as $field) {
|
||
|
$expectedltis[0][$field] = $lti1->{$field};
|
||
|
}
|
||
|
|
||
|
$result = mod_lti_external::get_ltis_by_courses();
|
||
|
$result = external_api::clean_returnvalue($returndescription, $result);
|
||
|
$this->assertEquals($expectedltis, $result['ltis']);
|
||
|
|
||
|
// Admin also should get all the information.
|
||
|
self::setAdminUser();
|
||
|
|
||
|
$result = mod_lti_external::get_ltis_by_courses(array($this->course->id));
|
||
|
$result = external_api::clean_returnvalue($returndescription, $result);
|
||
|
$this->assertEquals($expectedltis, $result['ltis']);
|
||
|
|
||
|
// Now, prohibit capabilities.
|
||
|
$this->setUser($this->student);
|
||
|
$contextcourse1 = context_course::instance($this->course->id);
|
||
|
// Prohibit capability = mod:lti:view on Course1 for students.
|
||
|
assign_capability('mod/lti:view', CAP_PROHIBIT, $this->studentrole->id, $contextcourse1->id);
|
||
|
// Empty all the caches that may be affected by this change.
|
||
|
accesslib_clear_all_caches_for_unit_testing();
|
||
|
course_modinfo::clear_instance_cache();
|
||
|
|
||
|
$ltis = mod_lti_external::get_ltis_by_courses(array($this->course->id));
|
||
|
$ltis = external_api::clean_returnvalue(mod_lti_external::get_ltis_by_courses_returns(), $ltis);
|
||
|
$this->assertCount(0, $ltis['ltis']);
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Test view_lti
|
||
|
*/
|
||
|
public function test_view_lti() {
|
||
|
global $DB;
|
||
|
|
||
|
// Test invalid instance id.
|
||
|
try {
|
||
|
mod_lti_external::view_lti(0);
|
||
|
$this->fail('Exception expected due to invalid mod_lti instance id.');
|
||
|
} catch (moodle_exception $e) {
|
||
|
$this->assertEquals('invalidrecord', $e->errorcode);
|
||
|
}
|
||
|
|
||
|
// Test not-enrolled user.
|
||
|
$usernotenrolled = self::getDataGenerator()->create_user();
|
||
|
$this->setUser($usernotenrolled);
|
||
|
try {
|
||
|
mod_lti_external::view_lti($this->lti->id);
|
||
|
$this->fail('Exception expected due to not enrolled user.');
|
||
|
} catch (moodle_exception $e) {
|
||
|
$this->assertEquals('requireloginerror', $e->errorcode);
|
||
|
}
|
||
|
|
||
|
// Test user with full capabilities.
|
||
|
$this->setUser($this->student);
|
||
|
|
||
|
// Trigger and capture the event.
|
||
|
$sink = $this->redirectEvents();
|
||
|
|
||
|
$result = mod_lti_external::view_lti($this->lti->id);
|
||
|
$result = external_api::clean_returnvalue(mod_lti_external::view_lti_returns(), $result);
|
||
|
|
||
|
$events = $sink->get_events();
|
||
|
$this->assertCount(1, $events);
|
||
|
$event = array_shift($events);
|
||
|
|
||
|
// Checking that the event contains the expected values.
|
||
|
$this->assertInstanceOf('\mod_lti\event\course_module_viewed', $event);
|
||
|
$this->assertEquals($this->context, $event->get_context());
|
||
|
$moodlelti = new \moodle_url('/mod/lti/view.php', array('id' => $this->cm->id));
|
||
|
$this->assertEquals($moodlelti, $event->get_url());
|
||
|
$this->assertEventContextNotUsed($event);
|
||
|
$this->assertNotEmpty($event->get_name());
|
||
|
|
||
|
// Test user with no capabilities.
|
||
|
// We need a explicit prohibit since this capability is only defined in authenticated user and guest roles.
|
||
|
assign_capability('mod/lti:view', CAP_PROHIBIT, $this->studentrole->id, $this->context->id);
|
||
|
// Empty all the caches that may be affected by this change.
|
||
|
accesslib_clear_all_caches_for_unit_testing();
|
||
|
course_modinfo::clear_instance_cache();
|
||
|
|
||
|
try {
|
||
|
mod_lti_external::view_lti($this->lti->id);
|
||
|
$this->fail('Exception expected due to missing capability.');
|
||
|
} catch (moodle_exception $e) {
|
||
|
$this->assertEquals('requireloginerror', $e->errorcode);
|
||
|
}
|
||
|
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool proxy
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_proxy() {
|
||
|
$capabilities = ['AA', 'BB'];
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy', $this->getExternalTestFileUrl('/test.html'), $capabilities, []);
|
||
|
$this->assertEquals('Test proxy', $proxy->name);
|
||
|
$this->assertEquals($this->getExternalTestFileUrl('/test.html'), $proxy->regurl);
|
||
|
$this->assertEquals(LTI_TOOL_PROXY_STATE_PENDING, $proxy->state);
|
||
|
$this->assertEquals(implode("\n", $capabilities), $proxy->capabilityoffered);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool proxy with duplicate url
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_proxy_duplicateurl() {
|
||
|
$this->expectException('moodle_exception');
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy 1', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy 2', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool proxy without sufficient capability
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_proxy_without_capability() {
|
||
|
self::setUser($this->teacher);
|
||
|
$this->expectException('required_capability_exception');
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test delete tool proxy
|
||
|
*/
|
||
|
public function test_mod_lti_delete_tool_proxy() {
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
$this->assertNotEmpty(lti_get_tool_proxy($proxy->id));
|
||
|
|
||
|
$proxy = mod_lti_external::delete_tool_proxy($proxy->id);
|
||
|
$this->assertEquals('Test proxy', $proxy->name);
|
||
|
$this->assertEquals($this->getExternalTestFileUrl('/test.html'), $proxy->regurl);
|
||
|
$this->assertEquals(LTI_TOOL_PROXY_STATE_PENDING, $proxy->state);
|
||
|
$this->assertEmpty(lti_get_tool_proxy($proxy->id));
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test get tool proxy registration request
|
||
|
*/
|
||
|
public function test_mod_lti_get_tool_proxy_registration_request() {
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
$request = mod_lti_external::get_tool_proxy_registration_request($proxy->id);
|
||
|
$this->assertEquals('ToolProxyRegistrationRequest', $request['lti_message_type']);
|
||
|
$this->assertEquals('LTI-2p0', $request['lti_version']);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test get tool types
|
||
|
*/
|
||
|
public function test_mod_lti_get_tool_types() {
|
||
|
// Create a tool proxy.
|
||
|
$proxy = mod_lti_external::create_tool_proxy('Test proxy', $this->getExternalTestFileUrl('/test.html'), array(), array());
|
||
|
|
||
|
// Create a tool type, associated with that proxy.
|
||
|
$type = new stdClass();
|
||
|
$data = new stdClass();
|
||
|
$type->state = LTI_TOOL_STATE_CONFIGURED;
|
||
|
$type->name = "Test tool";
|
||
|
$type->description = "Example description";
|
||
|
$type->toolproxyid = $proxy->id;
|
||
|
$type->baseurl = $this->getExternalTestFileUrl('/test.html');
|
||
|
$typeid = lti_add_type($type, $data);
|
||
|
|
||
|
$types = mod_lti_external::get_tool_types($proxy->id);
|
||
|
$this->assertEquals(1, count($types));
|
||
|
$type = $types[0];
|
||
|
$this->assertEquals('Test tool', $type['name']);
|
||
|
$this->assertEquals('Example description', $type['description']);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool type
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_type() {
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'), '', '');
|
||
|
$this->assertEquals('Example tool', $type['name']);
|
||
|
$this->assertEquals('Example tool description', $type['description']);
|
||
|
$this->assertEquals('https://download.moodle.org/unittest/test.jpg', $type['urls']['icon']);
|
||
|
$typeentry = lti_get_type($type['id']);
|
||
|
$this->assertEquals('http://www.example.com/lti/provider.php', $typeentry->baseurl);
|
||
|
$config = lti_get_type_config($type['id']);
|
||
|
$this->assertTrue(isset($config['sendname']));
|
||
|
$this->assertTrue(isset($config['sendemailaddr']));
|
||
|
$this->assertTrue(isset($config['acceptgrades']));
|
||
|
$this->assertTrue(isset($config['forcessl']));
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool type failure from non existant file
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_type_nonexistant_file() {
|
||
|
$this->expectException('moodle_exception');
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/doesntexist.xml'), '', '');
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test create tool type failure from xml that is not a cartridge
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_type_bad_file() {
|
||
|
$this->expectException('moodle_exception');
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/rsstest.xml'), '', '');
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test creating of tool types without sufficient capability
|
||
|
*/
|
||
|
public function test_mod_lti_create_tool_type_without_capability() {
|
||
|
self::setUser($this->teacher);
|
||
|
$this->expectException('required_capability_exception');
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'), '', '');
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test update tool type
|
||
|
*/
|
||
|
public function test_mod_lti_update_tool_type() {
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'), '', '');
|
||
|
$type = mod_lti_external::update_tool_type($type['id'], 'New name', 'New description', LTI_TOOL_STATE_PENDING);
|
||
|
$this->assertEquals('New name', $type['name']);
|
||
|
$this->assertEquals('New description', $type['description']);
|
||
|
$this->assertEquals('Pending', $type['state']['text']);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test delete tool type
|
||
|
*/
|
||
|
public function test_mod_lti_delete_tool_type() {
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'), '', '');
|
||
|
$this->assertNotEmpty(lti_get_type($type['id']));
|
||
|
$type = mod_lti_external::delete_tool_type($type['id']);
|
||
|
$this->assertEmpty(lti_get_type($type['id']));
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test delete tool type without sufficient capability
|
||
|
*/
|
||
|
public function test_mod_lti_delete_tool_type_without_capability() {
|
||
|
$type = mod_lti_external::create_tool_type($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'), '', '');
|
||
|
$this->assertNotEmpty(lti_get_type($type['id']));
|
||
|
$this->expectException('required_capability_exception');
|
||
|
self::setUser($this->teacher);
|
||
|
$type = mod_lti_external::delete_tool_type($type['id']);
|
||
|
}
|
||
|
|
||
|
/*
|
||
|
* Test is cartridge
|
||
|
*/
|
||
|
public function test_mod_lti_is_cartridge() {
|
||
|
$result = mod_lti_external::is_cartridge($this->getExternalTestFileUrl('/ims_cartridge_basic_lti_link.xml'));
|
||
|
$this->assertTrue($result['iscartridge']);
|
||
|
$result = mod_lti_external::is_cartridge($this->getExternalTestFileUrl('/test.html'));
|
||
|
$this->assertFalse($result['iscartridge']);
|
||
|
}
|
||
|
}
|