Updating LTI backup / restore

[moodle.git] / mod / lti / launch.php

<?php\r
// This file is part of BasicLTI4Moodle\r
//\r
// BasicLTI4Moodle is an IMS BasicLTI (Basic Learning Tools for Interoperability)\r
// consumer for Moodle 1.9 and Moodle 2.0. BasicLTI is a IMS Standard that allows web\r
// based learning tools to be easily integrated in LMS as native ones. The IMS BasicLTI\r
// specification is part of the IMS standard Common Cartridge 1.1 Sakai and other main LMS\r
// are already supporting or going to support BasicLTI. This project Implements the consumer\r
// for Moodle. Moodle is a Free Open source Learning Management System by Martin Dougiamas.\r
// BasicLTI4Moodle is a project iniciated and leaded by Ludo(Marc Alier) and Jordi Piguillem\r
// at the GESSI research group at UPC.\r
// SimpleLTI consumer for Moodle is an implementation of the early specification of LTI\r
// by Charles Severance (Dr Chuck) htp://dr-chuck.com , developed by Jordi Piguillem in a\r
// Google Summer of Code 2008 project co-mentored by Charles Severance and Marc Alier.\r
//\r
// BasicLTI4Moodle is copyright 2009 by Marc Alier Forment, Jordi Piguillem and Nikolas Galanis\r
// of the Universitat Politecnica de Catalunya http://www.upc.edu\r
// Contact info: Marc Alier Forment granludo @ gmail.com or marc.alier @ upc.edu\r
//\r
// Moodle is free software: you can redistribute it and/or modify\r
// it under the terms of the GNU General Public License as published by\r
// the Free Software Foundation, either version 3 of the License, or\r
// (at your option) any later version.\r
//\r
// Moodle is distributed in the hope that it will be useful,\r
// but WITHOUT ANY WARRANTY; without even the implied warranty of\r
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the\r
// GNU General Public License for more details.\r
//\r
// You should have received a copy of the GNU General Public License\r
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.\r
\r
/**\r
 * This file contains all necessary code to view a basiclti activity instance\r
 *\r
 * @package lti\r
 * @copyright 2009 Marc Alier, Jordi Piguillem, Nikolas Galanis\r
 *  marc.alier@upc.edu\r
 * @copyright 2009 Universitat Politecnica de Catalunya http://www.upc.edu\r
 *\r
 * @author Marc Alier\r
 * @author Jordi Piguillem\r
 * @author Nikolas Galanis\r
 *\r
 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later\r
 */\r
\r
require_once("../../config.php");\r
require_once($CFG->dirroot.'/mod/lti/lib.php');\r
require_once($CFG->dirroot.'/mod/lti/locallib.php');\r
\r
$id = optional_param('id', 0, PARAM_INT); // Course Module ID, or\r
    $object = optional_param('withobject', false, PARAM_BOOL); // Launch BasicLTI in an object\r
\r
if ($id) {\r
    if (! $cm = $DB->get_record("course_modules", array("id" => $id))) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course Module ID was incorrect');\r
    }\r
\r
    if (! $course = $DB->get_record("course", array("id" => $cm->course))) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course is misconfigured');\r
    }\r
\r
    if (! $basiclti = $DB->get_record("lti", array("id" => $cm->instance))) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course module is incorrect');\r
    }\r
\r
} else {\r
    if (! $basiclti = $DB->get_record("lti", array("id" => $a))) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course module is incorrect');\r
    }\r
    if (! $course = $DB->get_record("course", array("id" => $basiclti->course))) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course is misconfigured');\r
    }\r
    if (! $cm = get_coursemodule_from_instance("lti", $basiclti->id, $course->id)) {\r
        throw new moodle_exception('generalexceptionmessage', 'error', '', 'Course Module ID was incorrect');\r
    }\r
}\r
\r
require_login($course);\r
\r
add_to_log($course->id, "lti", "launch", "launch.php?id=$cm->id", "$basiclti->id");\r
\r
lti_view($basiclti, $object);\r
\r