Workshop: fixed checking of examples assessment before own assessment
[moodle.git] / mod / workshop / assessment.php
CommitLineData
0968b1a3 1<?php
53fad4b9
DM
2
3// This file is part of Moodle - http://moodle.org/
4//
0968b1a3
DM
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.
53fad4b9 14//
0968b1a3
DM
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/>.
53fad4b9 17
0968b1a3 18/**
407b1e91 19 * Assess a submission or view the single assessment
0968b1a3 20 *
407b1e91
DM
21 * Assessment id parameter must be passed. The script displays the submission and
22 * the assessment form. If the current user is the reviewer and the assessing is
23 * allowed, new assessment can be saved.
24 * If the assessing is not allowed (for example, the assessment period is over
25 * or the current user is eg a teacher), the assessment form is opened
26 * in a non-editable mode.
27 * The capability 'mod/workshop:peerassess' is intentionally not checked here.
28 * The user is considered as a reviewer if the corresponding assessment record
29 * has been prepared for him/her (during the allocation). So even a user without the
30 * peerassess capability (like a 'teacher', for example) can become a reviewer.
0968b1a3
DM
31 *
32 * @package mod-workshop
33 * @copyright 2009 David Mudrak <david.mudrak@gmail.com>
34 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
35 */
36
37require_once(dirname(dirname(dirname(__FILE__))).'/config.php');
0968b1a3
DM
38require_once(dirname(__FILE__).'/locallib.php');
39
407b1e91
DM
40$asid = required_param('asid', PARAM_INT); // assessment id
41$assessment = $DB->get_record('workshop_assessments', array('id' => $asid), '*', MUST_EXIST);
becec954 42$submission = $DB->get_record('workshop_submissions', array('id' => $assessment->submissionid, 'example' => 0), '*', MUST_EXIST);
407b1e91
DM
43$workshop = $DB->get_record('workshop', array('id' => $submission->workshopid), '*', MUST_EXIST);
44$course = $DB->get_record('course', array('id' => $workshop->course), '*', MUST_EXIST);
45$cm = get_coursemodule_from_instance('workshop', $workshop->id, $course->id, false, MUST_EXIST);
0968b1a3
DM
46
47require_login($course, false, $cm);
a39d7d87
DM
48if (isguestuser()) {
49 print_error('guestsarenotallowed');
50}
51$workshop = new workshop($workshop, $cm, $course);
6e309973 52
407b1e91
DM
53$PAGE->set_url($workshop->assess_url($assessment->id));
54$PAGE->set_title($workshop->name);
55$PAGE->set_heading($course->fullname);
56$PAGE->navbar->add(get_string('assessingsubmission', 'workshop'));
407b1e91
DM
57
58$canviewallassessments = has_capability('mod/workshop:viewallassessments', $workshop->context);
59$canviewallsubmissions = has_capability('mod/workshop:viewallsubmissions', $workshop->context);
090a7907 60$canoverridegrades = (($workshop->phase == workshop::PHASE_EVALUATION) and has_capability('mod/workshop:overridegrades', $workshop->context));
407b1e91
DM
61$isreviewer = ($USER->id == $assessment->reviewerid);
62$isauthor = ($USER->id == $submission->authorid);
63
64if ($isreviewer or $isauthor or ($canviewallassessments and $canviewallsubmissions)) {
65 // such a user can continue
66} else {
67 print_error('nopermissions', '', $workshop->view_url());
68}
69
70// only the reviewer is allowed to modify the assessment
71if ($isreviewer and $workshop->assessing_allowed()) {
77f43e7d 72 $assessmenteditable = true;
407b1e91 73} else {
77f43e7d 74 $assessmenteditable = false;
0968b1a3 75}
0968b1a3 76
cff28ef0
DM
77// check that all required examples have been assessed by the user
78if ($assessmenteditable and $workshop->useexamples and $workshop->examplesmode == workshop::EXAMPLES_BEFORE_ASSESSMENT
79 and !has_capability('mod/workshop:manageexamples', $workshop->context)) {
80 // the reviewer must have submitted their own submission
81 $reviewersubmission = $workshop->get_submission_by_author($assessment->reviewerid);
82 if (!$reviewersubmission) {
83 // no money, no love
84 $assessmenteditable = false;
85 echo $OUTPUT->header();
86 echo $OUTPUT->heading(get_string('exampleneedsubmission', 'workshop'), 2);
87 echo $OUTPUT->footer();
88 exit;
89 } else {
90 $examples = $workshop->get_examples_for_reviewer($assessment->reviewerid);
91 foreach ($examples as $exampleid => $example) {
92 if (is_null($example->grade)) {
93 $assessmenteditable = false;
94 echo $OUTPUT->header();
95 echo $OUTPUT->heading(get_string('exampleneedassessed', 'workshop'), 2);
96 echo $OUTPUT->footer();
97 exit;
98 }
99 }
100 }
101}
102
05e69e56
DM
103// load the grading strategy logic
104$strategy = $workshop->grading_strategy_instance();
105
e554671d 106// load the assessment form and process the submitted data eventually
77f43e7d 107$mform = $strategy->get_assessment_form($PAGE->url, 'assessment', $assessment, $assessmenteditable);
05e69e56
DM
108if ($mform->is_cancelled()) {
109 redirect($workshop->view_url());
77f43e7d 110} elseif ($assessmenteditable and ($data = $mform->get_data())) {
05e69e56 111 $rawgrade = $strategy->save_assessment($assessment, $data);
2fe703ed 112 if (!is_null($rawgrade) and isset($data->saveandclose)) {
407b1e91 113 redirect($workshop->view_url());
05e69e56 114 } else {
407b1e91
DM
115 // either it is not possible to calculate the $rawgrade
116 // or the reviewer has chosen "Save and continue"
05e69e56
DM
117 redirect($PAGE->url);
118 }
119}
120
e554671d 121// load the form to override gradinggrade and process the submitted data eventually
77f43e7d 122if ($canoverridegrades) {
e554671d 123 $feedbackform = $workshop->get_feedbackreviewer_form($PAGE->url, $assessment);
77f43e7d 124 if ($data = $feedbackform->get_data()) {
e554671d 125 $data = file_postupdate_standard_editor($data, 'feedbackreviewer', array(), $workshop->context);
7a789aa8 126 $record = new stdclass();
e554671d
DM
127 $record->id = $assessment->id;
128 $record->gradinggradeover = $workshop->raw_grade_value($data->gradinggradeover, $workshop->gradinggrade);
129 $record->gradinggradeoverby = $USER->id;
130 $record->feedbackreviewer = $data->feedbackreviewer;
131 $record->feedbackreviewerformat = $data->feedbackreviewerformat;
132 $DB->update_record('workshop_assessments', $record);
133 redirect($workshop->view_url());
77f43e7d
DM
134 }
135}
136
407b1e91 137// output starts here
39861053 138echo $OUTPUT->header();
77f43e7d 139echo $OUTPUT->heading(get_string('assessedsubmission', 'workshop'), 2);
a39d7d87 140
6adbcb80 141$wsoutput = $PAGE->get_renderer('mod_workshop'); // workshop renderer
407b1e91
DM
142$submission = $workshop->get_submission_by_id($submission->id); // reload so can be passed to the renderer
143echo $wsoutput->submission_full($submission, has_capability('mod/workshop:viewauthornames', $workshop->context));
a39d7d87 144
77f43e7d
DM
145if ($isreviewer) {
146 echo $OUTPUT->heading(get_string('assessmentbyyourself', 'workshop'), 2);
147} elseif (has_capability('mod/workshop:viewreviewernames', $workshop->context)) {
148 $assessment = $workshop->get_assessment_by_id($assessment->id); // extend the current record with user details
7a789aa8 149 $reviewer = new stdclass();
77f43e7d
DM
150 $reviewer->firstname = $assessment->reviewerfirstname;
151 $reviewer->lastname = $assessment->reviewerlastname;
152 echo $OUTPUT->heading(get_string('assessmentbyknown', 'workshop', fullname($reviewer)), 2);
153} else {
154 echo $OUTPUT->heading(get_string('assessmentbyunknown', 'workshop'), 2);
155}
77f43e7d 156
e554671d 157$mform->display();
77f43e7d
DM
158if ($canoverridegrades) {
159 $feedbackform->display();
77f43e7d 160}
d84d06ce 161echo $OUTPUT->footer();