Proyectos de Subversion Moodle

Rev

| Ultima modificación | Ver Log |

Rev Autor Línea Nro. Línea
1 efrain 1
<?php
2
 
3
// This file is part of Moodle - http://moodle.org/
4
//
5
// Moodle is free software: you can redistribute it and/or modify
6
// it under the terms of the GNU General Public License as published by
7
// the Free Software Foundation, either version 3 of the License, or
8
// (at your option) any later version.
9
//
10
// Moodle is distributed in the hope that it will be useful,
11
// but WITHOUT ANY WARRANTY; without even the implied warranty of
12
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13
// GNU General Public License for more details.
14
//
15
// You should have received a copy of the GNU General Public License
16
// along with Moodle.  If not, see <http://www.gnu.org/licenses/>.
17
 
18
/**
19
 * Various workshop maintainance utilities
20
 *
21
 * @package    mod_workshop
22
 * @copyright  2010 David Mudrak <david.mudrak@gmail.com>
23
 * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24
 */
25
 
26
require(__DIR__.'/../../config.php');
27
require_once(__DIR__.'/locallib.php');
28
 
29
$id         = required_param('id', PARAM_INT); // course_module ID
30
$tool       = required_param('tool', PARAM_ALPHA);
31
 
32
$cm         = get_coursemodule_from_id('workshop', $id, 0, false, MUST_EXIST);
33
$course     = $DB->get_record('course', array('id' => $cm->course), '*', MUST_EXIST);
34
$workshop   = $DB->get_record('workshop', array('id' => $cm->instance), '*', MUST_EXIST);
35
 
36
require_login($course, false, $cm);
37
$workshop = new workshop($workshop, $cm, $course);
38
require_sesskey();
39
 
40
$params = array(
41
    'context' => $workshop->context,
42
    'courseid' => $course->id,
43
    'other' => array('workshopid' => $workshop->id)
44
);
45
 
46
switch ($tool) {
47
case 'clearaggregatedgrades':
48
    require_capability('mod/workshop:overridegrades', $workshop->context);
49
    $workshop->clear_submission_grades();
50
    $workshop->clear_grading_grades();
51
    $event = \mod_workshop\event\assessment_evaluations_reset::create($params);
52
    $event->trigger();
53
    break;
54
 
55
case 'clearassessments':
56
    require_capability('mod/workshop:overridegrades', $workshop->context);
57
    $workshop->clear_assessments();
58
    $event = \mod_workshop\event\assessments_reset::create($params);
59
    $event->trigger();
60
    break;
61
}
62
 
63
redirect($workshop->view_url());