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
// This file is part of BasicLTI4Moodle
18
//
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.
30
//
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.
34
 
35
/**
36
 * This page lists all the instances of lti in a particular course
37
 *
38
 * @package mod_lti
39
 * @copyright  2009 Marc Alier, Jordi Piguillem, Nikolas Galanis
40
 *  marc.alier@upc.edu
41
 * @copyright  2009 Universitat Politecnica de Catalunya http://www.upc.edu
42
 * @author     Marc Alier
43
 * @author     Jordi Piguillem
44
 * @author     Nikolas Galanis
45
 * @author     Chris Scribner
46
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
47
 */
48
require_once("../../config.php");
49
require_once($CFG->dirroot.'/mod/lti/lib.php');
50
 
51
$id = required_param('id', PARAM_INT);   // Course id.
52
 
53
$course = $DB->get_record('course', array('id' => $id), '*', MUST_EXIST);
54
 
55
require_login($course);
56
$PAGE->set_pagelayout('incourse');
57
 
58
$params = array(
59
    'context' => context_course::instance($course->id)
60
);
61
$event = \mod_lti\event\course_module_instance_list_viewed::create($params);
62
$event->add_record_snapshot('course', $course);
63
$event->trigger();
64
 
65
$PAGE->set_url('/mod/lti/index.php', array('id' => $course->id));
66
$pagetitle = strip_tags($course->shortname.': '.get_string("modulenamepluralformatted", "lti"));
67
$PAGE->set_title($pagetitle);
68
$PAGE->set_heading($course->fullname);
69
 
70
echo $OUTPUT->header();
71
 
72
// Print the main part of the page.
73
echo $OUTPUT->heading(get_string("modulenamepluralformatted", "lti"));
74
 
75
// Get all the appropriate data.
76
if (! $basicltis = get_all_instances_in_course("lti", $course)) {
77
    notice(get_string('noltis', 'lti'), "../../course/view.php?id=$course->id");
78
    die;
79
}
80
 
81
// Print the list of instances (your module will probably extend this).
82
$timenow = time();
83
$strname = get_string("name");
84
$usesections = course_format_uses_sections($course->format);
85
 
86
$table = new html_table();
87
$table->attributes['class'] = 'generaltable mod_index';
88
 
89
if ($usesections) {
90
    $strsectionname = get_string('sectionname', 'format_'.$course->format);
91
    $table->head  = array ($strsectionname, $strname);
92
    $table->align = array ("center", "left");
93
} else {
94
    $table->head  = array ($strname);
95
}
96
 
97
foreach ($basicltis as $basiclti) {
98
    if (!$basiclti->visible) {
99
        // Show dimmed if the mod is hidden.
100
        $link = "<a class=\"dimmed\" href=\"view.php?id=$basiclti->coursemodule\">$basiclti->name</a>";
101
    } else {
102
        // Show normal if the mod is visible.
103
        $link = "<a href=\"view.php?id=$basiclti->coursemodule\">$basiclti->name</a>";
104
    }
105
 
106
    if ($usesections) {
107
        $table->data[] = array (get_section_name($course, $basiclti->section), $link);
108
    } else {
109
        $table->data[] = array ($link);
110
    }
111
}
112
 
113
echo "<br />";
114
 
115
echo html_writer::table($table);
116
 
117
// Finish the page.
118
echo $OUTPUT->footer();