mod/lti/grade.php

   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 file contains submissions-specific code for the lti module
  37  *
  38  * @package    mod
  39  * @subpackage lti
  40  * @copyright  2009 Marc Alier, Jordi Piguillem, Nikolas Galanis
  41  *  marc.alier@upc.edu
  42  * @copyright  2009 Universitat Politecnica de Catalunya http://www.upc.edu
  43  * @author     Marc Alier
  44  * @author     Jordi Piguillem
  45  * @author     Nikolas Galanis
  46  * @author     Chris Scribner
  47  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
  48  */
  49
  50 require_once("../../config.php");
  51 require_once($CFG->dirroot.'/mod/lti/lib.php');
  52 require_once($CFG->libdir.'/plagiarismlib.php');
  53
  54 $id   = optional_param('id', 0, PARAM_INT);          // Course module ID
  55 $l    = optional_param('l', 0, PARAM_INT);           // lti instance ID
  56 $mode = optional_param('mode', 'all', PARAM_ALPHA);  // What mode are we in?
  57 $download = optional_param('download' , 'none', PARAM_ALPHA); //ZIP download asked for?
  58
  59 if ($l) {  // Two ways to specify the module
  60     $lti = $DB->get_record('lti', array('id' => $l), '*', MUST_EXIST);
  61     $cm = get_coursemodule_from_instance('lti', $lti->id, $lti->course, false, MUST_EXIST);
  62
  63 } else {
  64     $cm = get_coursemodule_from_id('lti', $id, 0, false, MUST_EXIST);
  65     $lti = $DB->get_record('lti', array('id' => $cm->instance), '*', MUST_EXIST);
  66 }
  67
  68 $course = $DB->get_record('course', array('id' => $cm->course), '*', MUST_EXIST);
  69
  70 require_login($course, false, $cm);
  71 $context = context_module::instance($cm->id);
  72 require_capability('mod/lti:grade', $context);
  73
  74 $url = new moodle_url('/mod/lti/grade.php', array('id' => $cm->id));
  75 if ($mode !== 'all') {
  76     $url->param('mode', $mode);
  77 }
  78 $PAGE->set_url($url);
  79
  80 $module = array(
  81     'name'      => 'mod_lti_submissions',
  82     'fullpath'  => '/mod/lti/submissions.js',
  83     'requires'  => array('base', 'yui2-datatable'),
  84     'strings'   => array(),
  85 );
  86
  87 $PAGE->requires->js_init_call('M.mod_lti.submissions.init', array(), true, $module);
  88
  89 $submissionquery = '
  90     SELECT s.id, u.firstname, u.lastname, u.id AS userid, s.datesubmitted, s.gradepercent
  91     FROM {lti_submission} s
  92     INNER JOIN {user} u ON s.userid = u.id
  93     WHERE s.ltiid = :ltiid
  94     ORDER BY s.datesubmitted DESC
  95 ';
  96
  97 $submissions = $DB->get_records_sql($submissionquery, array('ltiid' => $lti->id));
  98
  99 $html = '
 100 <noscript>
 101     <!-- If javascript is disabled, we need to show the table using CSS.
 102         The table starts out hidden to avoid flickering as it loads -->
 103     <style type="text/css">
 104         #lti_submissions_table_container { display: block !important; }
 105     </style>
 106 </noscript>
 107
 108 <div id="lti_submissions_table_container" style="display:none">
 109     <table id="lti_submissions_table">
 110         <thead>
 111             <tr>
 112                 <th>User</th>
 113                 <th>Date</th>
 114                 <th>Grade</th>
 115             </tr>
 116         </thead>
 117         <tbody>
 118             <!--table body-->
 119         </tbody>
 120     </table>
 121 </div>
 122 ';
 123
 124 $rowtemplate = '
 125 <tr>
 126     <td>
 127         <!--firstname--> <!--lastname-->
 128     </td>
 129     <td>
 130         <!--datesubmitted-->
 131     </td>
 132     <td>
 133         <!--gradepercent-->
 134     </td>
 135 </tr>
 136 ';
 137
 138 $rows = '';
 139
 140 foreach ($submissions as $submission) {
 141     $row = $rowtemplate;
 142
 143     foreach ($submission as $key => $value) {
 144         if ($key === 'datesubmitted') {
 145             $value = userdate($value);
 146         }
 147
 148         $row = str_replace('<!--' . $key . '-->', $value, $row);
 149     }
 150
 151     $rows .= $row;
 152 }
 153
 154 $table = str_replace('<!--table body-->', $rows, $html);
 155
 156 $title = get_string('submissionsfor', 'lti', $lti->name);
 157
 158 $PAGE->set_title($title);
 159 $PAGE->set_heading($course->fullname);
 160
 161 echo $OUTPUT->header();
 162 echo $OUTPUT->heading(format_string($lti->name, true, array('context' => $context)));
 163 echo $OUTPUT->heading(get_string('submissions', 'lti'), 3);
 164
 165 echo $table;
 166
 167 echo $OUTPUT->footer();