Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
// This file is part of Moodle - http://moodle.org/
3
//
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.
8
//
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.
13
//
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/>.
16
 
17
/**
18
 * Redirect the user based on their capabilities to either a scorm activity or to scorm reports
19
 *
20
 * @package   mod_scorm
21
 * @category  grade
22
 * @copyright 2010 onwards Dan Marsden
23
 * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24
 */
25
 
26
require_once("../../config.php");
27
 
28
$id = required_param('id', PARAM_INT); // Course module ID.
29
 
30
if (! $cm = get_coursemodule_from_id('scorm', $id)) {
31
    throw new \moodle_exception('invalidcoursemodule');
32
}
33
 
34
if (! $scorm = $DB->get_record('scorm', array('id' => $cm->instance))) {
35
    throw new \moodle_exception('invalidcoursemodule');
36
}
37
 
38
if (! $course = $DB->get_record('course', array('id' => $scorm->course))) {
39
    throw new \moodle_exception('coursemisconf');
40
}
41
 
42
require_login($course, false, $cm);
43
 
44
if (has_capability('mod/scorm:viewreport', context_module::instance($cm->id))) {
45
    redirect('report.php?id='.$cm->id);
46
} else {
47
    redirect('view.php?id='.$cm->id);
48
}