MDL-8857
[moodle-linuxchix.git] / mod / workshop / view.php
blob688b930f271c477afe477c77f442edf61de443a8
1 <?php // $Id$
3 /*************************************************
4 ACTIONS handled are:
6 displayfinalgrade (for students)
7 notavailable (for students)
8 studentsview
9 submitexample
10 teachersview
11 showdescription
12 showallsubmissions
14 ************************************************/
16 require("../../config.php");
17 require("lib.php");
18 require("locallib.php");
20 $id = required_param('id', PARAM_INT); // Course Module ID
21 $action = optional_param('action', '', PARAM_ALPHA);
22 $sort = optional_param('sort', 'lastname', PARAM_ALPHA);
23 $dir = optional_param('dir', 'ASC', PARAM_ALPHA);
25 $timenow = time();
27 // get some useful stuff...
28 if (! $cm = get_coursemodule_from_id('workshop', $id)) {
29 error("Course Module ID was incorrect");
31 if (! $course = get_record("course", "id", $cm->course)) {
32 error("Course is misconfigured");
34 if (! $workshop = get_record("workshop", "id", $cm->instance)) {
35 error("Course module is incorrect");
38 require_login($course->id, false, $cm);
39 $context = get_context_instance(CONTEXT_MODULE, $cm->id);
41 $strworkshops = get_string("modulenameplural", "workshop");
42 $strworkshop = get_string("modulename", "workshop");
43 $straction = ($action) ? '-> '.get_string($action, 'workshop') : '';
45 // ...and if necessary set default action
46 if (workshop_is_teacher($workshop)) {
47 if (empty($action)) { // no action specified, either go straight to elements page else the admin page
48 // has the assignment any elements
49 if (count_records("workshop_elements", "workshopid", $workshop->id) >= $workshop->nelements) {
50 $action = "teachersview";
52 else {
53 redirect("assessments.php?action=editelements&id=$cm->id");
56 } else { // it's a student then
57 if (!$cm->visible) {
58 notice(get_string("activityiscurrentlyhidden"));
60 if ($timenow < $workshop->submissionstart) {
61 $action = 'notavailable';
62 } else if (!$action) {
63 if ($timenow < $workshop->assessmentend) {
64 $action = 'studentsview';
65 } else {
66 $action = 'displayfinalgrade';
71 // ...display header...
72 print_header_simple(format_string($workshop->name), "",
73 "<a href=\"index.php?id=$course->id\">$strworkshops</a> ->
74 <a href=\"view.php?id=$cm->id\">".format_string($workshop->name,true)."</a> $straction",
75 "", "", true, update_module_button($cm->id, $course->id, $strworkshop), navmenu($course, $cm));
78 // ...log activity...
79 add_to_log($course->id, "workshop", "view", "view.php?id=$cm->id", $workshop->id, $cm->id);
81 if ($action == 'studentsview' and !workshop_is_student($workshop)) {
82 $action = 'showdescription';
85 /****************** display final grade (for students) ************************************/
86 if ($action == 'displayfinalgrade' ) {
87 require_capability('mod/workshop:participate', $context);
89 print_heading("<b><a href=\"view.php?id=$cm->id&amp;action=showdescription\">".
90 get_string("showdescription", 'workshop')."</a></b>");
91 // show the final grades as stored in the tables...
92 if ($submissions = workshop_get_user_submissions($workshop, $USER)) { // any submissions from user?
93 print_heading(get_string("displayoffinalgrades", "workshop"));
94 echo "<div class=\"boxaligncenter\"><table border=\"1\" width=\"90%\"><tr>";
95 echo "<td><b>".get_string("submissions", "workshop")."</b></td>";
96 if ($workshop->wtype) {
97 echo "<td align=\"center\"><b>".get_string("assessmentsdone", "workshop")."</b></td>";
98 echo "<td align=\"center\"><b>".get_string("gradeforassessments", "workshop")."</b></td>";
100 echo "<td align=\"center\"><b>".get_string("teacherassessments", "workshop",
101 $course->teacher)."</b></td>";
102 if ($workshop->wtype) {
103 echo "<td align=\"center\"><b>".get_string("studentassessments", "workshop",
104 $course->student)."</b></td>";
106 echo "<td align=\"center\"><b>".get_string("gradeforsubmission", "workshop")."</b></td>";
107 echo "<td align=\"center\"><b>".get_string("overallgrade", "workshop")."</b></td></tr>\n";
108 foreach ($submissions as $submission) {
109 $grade = workshop_submission_grade($workshop, $submission);
110 echo "<tr><td>".workshop_print_submission_title($workshop, $submission)."</td>\n";
111 if ($workshop->wtype) {
112 echo "<td align=\"center\">".workshop_print_user_assessments($workshop, $USER, $gradinggrade)."</td>";
113 echo "<td align=\"center\">$gradinggrade</td>";
115 echo "<td align=\"center\">".workshop_print_submission_assessments($workshop,
116 $submission, "teacher")."</td>";
117 if ($workshop->wtype) {
118 echo "<td align=\"center\">".workshop_print_submission_assessments($workshop,
119 $submission, "student")."</td>";
121 echo "<td align=\"center\">$grade</td>";
122 echo "<td align=\"center\">".number_format($gradinggrade + $grade, 1)."</td></tr>\n";
124 echo "</table></div><br clear=\"all\" />\n";
125 workshop_print_key($workshop);
126 } else {
127 print_heading(get_string('nowork', 'workshop'));
129 if ($workshop->showleaguetable) {
130 workshop_print_league_table($workshop);
135 /****************** assignment not available (for students)***********************/
136 elseif ($action == 'notavailable') {
137 print_heading(get_string("notavailable", "workshop"));
140 /****************** student's view could be in 1 of 4 stages ***********************/
141 elseif ($action == 'studentsview') {
142 require_capability('mod/workshop:participate', $context);
144 // is a password needed?
145 if ($workshop->usepassword) {
146 $correctpass = false;
147 if (isset($_POST['userpassword'])) {
148 if ($workshop->password == md5(trim($_POST['userpassword']))) {
149 $USER->workshoploggedin[$workshop->id] = true;
150 $correctpass = true;
152 } elseif (isset($USER->workshoploggedin[$workshop->id])) {
153 $correctpass = true;
156 if (!$correctpass) {
157 print_simple_box_start("center");
158 echo "<form id=\"password\" method=\"post\" action=\"view.php\">\n";
159 echo "<input type=\"hidden\" name=\"id\" value=\"$cm->id\" />\n";
160 echo "<table cellpadding=\"7px\">";
161 if (isset($_POST['userpassword'])) {
162 echo "<tr align=\"center\" style='color:#DF041E;'><td>".get_string("wrongpassword", "workshop").
163 "</td></tr>";
165 echo "<tr align=\"center\"><td>".get_string("passwordprotectedworkshop", "workshop", format_string($workshop->name)).
166 "</td></tr>";
167 echo "<tr align=\"center\"><td>".get_string("enterpassword", "workshop").
168 " <input type=\"password\" name=\"userpassword\" /></td></tr>";
170 echo "<tr align=\"center\"><td>";
171 echo "<input type=\"button\" value=\"".get_string("cancel").
172 "\" onclick=\"parent.location='../../course/view.php?id=$course->id';\"> ";
173 echo "<input type=\"button\" value=\"".get_string("continue").
174 "\" onclick=\"document.password.submit();\" />";
175 echo "</td></tr></table>";
176 print_simple_box_end();
177 exit();
180 workshop_print_assignment_info($workshop);
182 // if the student has not yet submitted show the full description
183 if (!record_exists('workshop_submissions', 'workshopid', $workshop->id, 'userid', $USER->id)) {
184 print_box(format_text($workshop->description, $workshop->format), 'generalbox', 'intro');
185 } else {
186 print_heading("<b><a href=\"view.php?id=$cm->id&amp;action=showdescription\">".
187 get_string("showdescription", 'workshop')."</a></b>");
190 // in Stage 1? - are there any teacher's submissions? and...
191 // ...has student assessed the required number of the teacher's submissions
192 if ($workshop->ntassessments and (!workshop_test_user_assessments($workshop, $USER))) {
193 print_heading(get_string("pleaseassesstheseexamplesfromtheteacher", "workshop",
194 $course->teacher));
195 workshop_list_teacher_submissions($workshop, $USER);
197 // in stage 2? - submit own first attempt
198 else {
199 if ($workshop->ntassessments) {
200 // show assessment of the teacher's examples, there may be feedback from teacher
201 print_heading(get_string("yourassessmentsofexamplesfromtheteacher", "workshop",
202 $course->teacher));
203 workshop_list_teacher_submissions($workshop, $USER);
205 // has user submitted anything yet?
206 if (!workshop_get_user_submissions($workshop, $USER)) {
207 if ($timenow < $workshop->submissionend) {
208 // print upload form
209 print_heading(get_string("submitassignmentusingform", "workshop").":");
210 workshop_print_upload_form($workshop);
211 } else {
212 print_heading(get_string("submissionsnolongerallowed", "workshop"));
215 // in stage 3? - grade other student's submissions, resubmit and list all submissions
216 else {
217 // is self assessment used in this workshop?
218 if ($workshop->includeself) {
219 // prints a table if there are any submissions which have not been self assessed yet
220 workshop_list_self_assessments($workshop, $USER);
222 // if peer assessments are being done then show some to assess...
223 if ($workshop->nsassessments and ($workshop->assessmentstart < $timenow and $workshop->assessmentend > $timenow)) {
224 workshop_list_student_submissions($workshop, $USER);
226 // ..and any they have already done (and have gone cold)...
227 if (workshop_count_user_assessments($workshop, $USER, "student")) {
228 print_heading(get_string("yourassessments", "workshop"));
229 workshop_list_assessed_submissions($workshop, $USER);
231 // list any assessments by teachers
232 if (workshop_count_teacher_assessments_by_user($workshop, $USER) and ($timenow > $workshop->releasegrades)) {
233 print_heading(get_string("assessmentsby", "workshop", $course->teachers));
234 workshop_list_teacher_assessments_by_user($workshop, $USER);
236 // ... and show peer assessments
237 if (workshop_count_peer_assessments($workshop, $USER)) {
238 print_heading(get_string("assessmentsby", "workshop", $course->students));
239 workshop_list_peer_assessments($workshop, $USER);
241 // list previous submissions
242 print_heading(get_string("yoursubmissions", "workshop"));
243 workshop_list_user_submissions($workshop, $USER);
245 // are resubmissions allowed and the workshop is in submission/assessment phase?
246 if ($workshop->resubmit and ($timenow > $workshop->assessmentstart and $timenow < $workshop->submissionend)) {
247 // see if there are any cold assessments of the last submission
248 // if there are then print upload form
249 if ($submissions = workshop_get_user_submissions($workshop, $USER)) {
250 foreach ($submissions as $submission) {
251 $lastsubmission = $submission;
252 break;
254 $n = 0; // number of cold assessments (not include self assessments)
255 if ($assessments = workshop_get_assessments($lastsubmission)) {
256 foreach ($assessments as $assessment) {
257 if ($assessment->userid <> $USER->id) {
258 $n++;
262 if ($n) {
263 echo "<hr size=\"1\" noshade=\"noshade\" />";
264 print_heading(get_string("submitrevisedassignment", "workshop").":");
265 workshop_print_upload_form($workshop);
266 echo "<hr size=\"1\" noshade=\"noshade\" />";
275 /****************** submission of example by teacher only***********************/
276 elseif ($action == 'submitexample') {
278 require_capability('mod/workshop:manage', $context);
280 // list previous submissions from teacher
281 workshop_list_user_submissions($workshop, $USER);
283 echo "<hr size=\"1\" noshade=\"noshade\" />";
285 // print upload form
286 print_heading(get_string("submitexampleassignment", "workshop").":");
287 workshop_print_upload_form($workshop);
289 print_heading("<a $CFG->frametarget href=\"view.php?id=$cm->id\">".get_string("cancel")."</a>");
293 /****************** teacher's view - display admin page ************/
294 elseif ($action == 'teachersview') {
296 require_capability('mod/workshop:manage', $context);
298 // automatically grade assessments if workshop has examples and/or peer assessments
299 if ($workshop->gradingstrategy and ($workshop->ntassessments or $workshop->nsassessments)) {
300 workshop_grade_assessments($workshop);
303 /// Check to see if groups are being used in this workshop
304 setup_and_print_groups($course, groupmode($course, $cm), "view.php?id=$cm->id");
305 $currentgroup = get_current_group($course->id);
307 /// Print admin links
308 echo "<table width=\"100%\"><tr><td>";
309 echo "<a href=\"submissions.php?id=$cm->id&amp;action=adminlist\">".
310 get_string("administration")."</a>\n";
312 echo '</td></tr>';
314 echo '<tr><td>';
315 workshop_print_assignment_info($workshop);
316 print_heading("<a href=\"view.php?id=$cm->id&amp;action=showdescription\">".
317 get_string("showdescription", 'workshop')."</a>");
318 echo '</td></tr>';
320 /// Print grade tables /////////////////////////////////////////////////
322 // display the teacher's submissions
323 if ($workshop->ntassessments) {
324 $table->head = array(get_string("examplesubmissions", "workshop"),
325 get_string("assessmentsby", "workshop", $course->teachers),
326 get_string("assessmentsby", "workshop", $course->students));
327 $table->data = array();
328 if ($submissions = workshop_get_teacher_submissions($workshop)) {
329 foreach ($submissions as $submission) {
330 $teacherassessments = workshop_print_submission_assessments($workshop, $submission, "teacher");
331 // If not yet assessed, show assess link
332 if ($teacherassessments == '&nbsp;') {
333 $teacherassessments = '<a href="assess.php?id='.
334 $cm->id.'&amp;sid='.$submission->id.'">'.get_string('assess', 'workshop').'</a>';
336 $title = workshop_print_submission_title($workshop, $submission).
337 " <a href=\"submissions.php?action=editsubmission&amp;id=$cm->id&amp;sid=$submission->id\">".
338 "<img src=\"$CFG->pixpath/t/edit.gif\" ".
339 'class="iconsmall" alt="'.get_string('edit').'" /></a>'.
340 " <a href=\"submissions.php?action=confirmdelete&amp;id=$cm->id&amp;sid=$submission->id\">".
341 "<img src=\"$CFG->pixpath/t/delete.gif\" ".
342 'class="iconsmall" alt="'.get_string('delete', 'workshop').'" /></a>';
343 $table->data[] = array($title, $teacherassessments,
344 workshop_print_submission_assessments($workshop, $submission, "student"));
347 // Put in a submission link
348 $table->data[] = array("<b><a href=\"view.php?id=$cm->id&amp;action=submitexample\">".
349 get_string("submitexampleassignment", "workshop")."</a></b>".
350 helpbutton("submissionofexamples", get_string("submitexampleassignment", "workshop"), "workshop", true, false, '', true),
351 '&nbsp;', '&nbsp;');
352 print_table($table);
353 workshop_print_key($workshop);
356 // Get all the students
357 if (!$users = workshop_get_students($workshop)) {
358 echo ('</table>');
359 print_heading(get_string("nostudentsyet"));
360 print_footer($course);
361 exit;
364 /// Now prepare table with student assessments and submissions
365 $tablesort->data = array();
366 $tablesort->sortdata = array();
367 foreach ($users as $user) {
368 // skip if student not in group
369 if ($currentgroup) {
370 if (!ismember($currentgroup, $user->id)) {
371 continue;
374 if ($submissions = workshop_get_user_submissions($workshop, $user)) {
375 foreach ($submissions as $submission) {
376 $data = array();
377 $sortdata = array();
379 $data[] = "<a name=\"userid$user->id\" href=\"{$CFG->wwwroot}/user/view.php?id=$user->id&amp;course=$course->id\">".
380 fullname($user).'</a>';
381 $sortdata['firstname'] = $user->firstname;
382 $sortdata['lastname'] = $user->lastname;
384 if ($workshop->wtype) {
385 $data[] = workshop_print_user_assessments($workshop, $user, $gradinggrade);
387 $data[] = $gradinggrade;
388 $sortdata['agrade'] = $gradinggrade;
391 $data[] = workshop_print_submission_title($workshop, $submission).
392 " <a href=\"submissions.php?action=adminamendtitle&amp;id=$cm->id&amp;sid=$submission->id\">".
393 "<img src=\"$CFG->pixpath/t/edit.gif\" ".
394 'class="iconsmall" alt="'.get_string('amendtitle', 'workshop').'" /></a>'.
395 " <a href=\"submissions.php?action=confirmdelete&amp;id=$cm->id&amp;sid=$submission->id\">".
396 "<img src=\"$CFG->pixpath/t/delete.gif\" ".
397 'class="iconsmall" alt="'.get_string('delete', 'workshop').'" /></a>';
398 $sortdata['title'] = $submission->title;
400 $data[] = userdate($submission->timecreated, get_string('datestr', 'workshop'));
401 $sortdata['date'] = $submission->timecreated;
403 if (($tmp = workshop_print_submission_assessments($workshop, $submission, "teacher")) == '&nbsp;') {
404 $data[] = '<a href="assess.php?id='.
405 $cm->id.'&amp;sid='.$submission->id.'">'.get_string('assess', 'workshop').'</a>';
406 $sortdata['tassmnt'] = -1;
407 } else {
408 $data[] = $tmp;
409 $sortdata['tassmnt'] = 1; // GWD still have to fix this
412 if ($workshop->wtype) {
413 $data[] = workshop_print_submission_assessments($workshop, $submission, "student");
416 $grade = workshop_submission_grade($workshop, $submission);
417 $data[] = $grade;
418 $sortdata['sgrade'] = $grade;
420 if ($workshop->wtype) {
421 $data[] = number_format($gradinggrade + $grade, 1);
422 $sortdata['ograde'] = $gradinggrade + $grade;
425 $tablesort->data[] = $data;
426 $tablesort->sortdata[] = $sortdata;
431 function workshop_sortfunction($a, $b) {
432 global $sort, $dir;
433 if ($dir == 'ASC') {
434 return ($a[$sort] > $b[$sort]);
435 } else {
436 return ($a[$sort] < $b[$sort]);
439 uasort($tablesort->sortdata, 'workshop_sortfunction');
440 $table->data = array();
441 foreach($tablesort->sortdata as $key => $row) {
442 $table->data[] = $tablesort->data[$key];
445 if ($workshop->wtype) {
446 $table->align = array ('left', 'center', 'center', 'left', 'center', 'center', 'center', 'center', 'center', 'center');
447 $columns = array('firstname', 'lastname', 'agrade', 'title', 'date', 'tassmnt', 'sgrade', 'ograde');
448 } else {
449 $table->align = array ('left', 'left', 'center', 'center', 'center', 'center');
450 $columns = array('firstname', 'lastname', 'title', 'date', 'tassmnt', 'ograde');
452 $table->width = "95%";
454 foreach ($columns as $column) {
455 $string[$column] = get_string("$column", 'workshop');
456 if ($sort != $column) {
457 $columnicon = '';
458 $columndir = 'ASC';
459 } else {
460 $columndir = $dir == 'ASC' ? 'DESC':'ASC';
461 if ($column == 'lastaccess') {
462 $columnicon = $dir == 'ASC' ? 'up':'down';
463 } else {
464 $columnicon = $dir == 'ASC' ? 'down':'up';
466 $columnicon = " <img src=\"$CFG->pixpath/t/$columnicon.gif\" alt=\"$columnicon\" />";
469 $$column = "<a href=\"view.php?id=$id&amp;sort=$column&amp;dir=$columndir\">".$string[$column]."</a>$columnicon";
472 if ($workshop->wtype) {
473 $table->head = array ("$firstname / $lastname", get_string("assmnts", "workshop"), $agrade,
474 $title, $date, $tassmnt, get_string('passmnts', 'workshop'), $sgrade, $ograde);
475 } else {
476 $table->head = array ("$firstname / $lastname", $title, $date, $tassmnt, $ograde);
479 echo '<tr><td>';
480 print_table($table);
481 echo '</td></tr>';
482 echo '<tr><td>';
483 workshop_print_key($workshop);
484 echo '</td></tr>';
486 // grading grade analysis
487 unset($table);
488 $table->head = array (get_string("count", "workshop"), get_string("mean", "workshop"),
489 get_string("standarddeviation", "workshop"), get_string("maximum", "workshop"),
490 get_string("minimum", "workshop"));
491 $table->align = array ("center", "center", "center", "center", "center");
492 $table->size = array ("*", "*", "*", "*", "*");
493 $table->cellpadding = 2;
494 $table->cellspacing = 0;
495 if ($currentgroup) {
496 $stats = get_record_sql("SELECT COUNT(*) as count, AVG(gradinggrade) AS mean,
497 STDDEV(gradinggrade) AS stddev, MIN(gradinggrade) AS min, MAX(gradinggrade) AS max
498 FROM {$CFG->prefix}groups_members g, {$CFG->prefix}workshop_assessments a
499 WHERE g.groupid = $currentgroup AND a.userid = g.userid AND a.timegraded > 0
500 AND a.workshopid = $workshop->id");
501 } else { // no group/all participants
502 $stats = get_record_sql("SELECT COUNT(*) as count, AVG(gradinggrade) AS mean,
503 STDDEV(gradinggrade) AS stddev, MIN(gradinggrade) AS min, MAX(gradinggrade) AS max
504 FROM {$CFG->prefix}workshop_assessments a
505 WHERE a.timegraded > 0 AND a.workshopid = $workshop->id");
507 $table->data[] = array($stats->count, number_format($stats->mean * $workshop->gradinggrade / 100, 1),
508 number_format($stats->stddev * $workshop->gradinggrade /100, 1),
509 number_format($stats->max * $workshop->gradinggrade / 100, 1),
510 number_format($stats->min* $workshop->gradinggrade / 100, 1));
511 echo '<tr><td>';
512 print_heading(get_string("gradinggrade", "workshop")." ".get_string("analysis", "workshop"));
513 print_table($table);
514 echo '</td></tr>';
516 if ($workshop->showleaguetable and time() > $workshop->assessmentend) {
517 workshop_print_league_table($workshop);
518 if ($workshop->anonymous) {
519 echo "<p>".get_string("namesnotshowntostudents", "workshop", $course->students)."</p>\n";
522 echo '</table>';
526 /****************** show description ************/
527 elseif ($action == 'showdescription') {
528 workshop_print_assignment_info($workshop);
529 print_box(format_text($workshop->description, $workshop->format), 'generalbox', 'intro');
530 if (isset($_SERVER["HTTP_REFERER"])) {
531 print_continue(htmlentities($_SERVER["HTTP_REFERER"]));
532 } else {
533 print_continue("$CFG->wwwroot/course/view.php?id=$cm->id");
538 /****************** teacher's view - list all submissions ************/
539 elseif ($action == 'allsubmissions') {
540 require_capability('mod/workshop:manage', $context);
542 if ($submissions = get_records('workshop_submissions', 'workshopid', $workshop->id)) {
543 foreach($submissions as $submission) {
544 $user = get_record('user', 'id', $submission->userid);
545 print_heading('"'.$submission->title.'" '.get_string('by', 'workshop').' '.fullname($user));
546 workshop_print_submission($workshop, $submission);
552 /*************** no man's land **************************************/
553 else {
554 error("Fatal Error: Unknown Action: ".$action."\n");
558 print_footer($course);