MDL-48931 navigation: Update grade lib for the user context header.
[moodle.git] / grade / lib.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/>.
17 /**
18  * Functions used by gradebook plugins and reports.
19  *
20  * @package   core_grades
21  * @copyright 2009 Petr Skoda and Nicolas Connault
22  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
23  */
25 require_once($CFG->libdir . '/gradelib.php');
26 require_once($CFG->dirroot . '/grade/export/lib.php');
28 /**
29  * This class iterates over all users that are graded in a course.
30  * Returns detailed info about users and their grades.
31  *
32  * @author Petr Skoda <skodak@moodle.org>
33  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
34  */
35 class graded_users_iterator {
37     /**
38      * The couse whose users we are interested in
39      */
40     protected $course;
42     /**
43      * An array of grade items or null if only user data was requested
44      */
45     protected $grade_items;
47     /**
48      * The group ID we are interested in. 0 means all groups.
49      */
50     protected $groupid;
52     /**
53      * A recordset of graded users
54      */
55     protected $users_rs;
57     /**
58      * A recordset of user grades (grade_grade instances)
59      */
60     protected $grades_rs;
62     /**
63      * Array used when moving to next user while iterating through the grades recordset
64      */
65     protected $gradestack;
67     /**
68      * The first field of the users table by which the array of users will be sorted
69      */
70     protected $sortfield1;
72     /**
73      * Should sortfield1 be ASC or DESC
74      */
75     protected $sortorder1;
77     /**
78      * The second field of the users table by which the array of users will be sorted
79      */
80     protected $sortfield2;
82     /**
83      * Should sortfield2 be ASC or DESC
84      */
85     protected $sortorder2;
87     /**
88      * Should users whose enrolment has been suspended be ignored?
89      */
90     protected $onlyactive = false;
92     /**
93      * Enable user custom fields
94      */
95     protected $allowusercustomfields = false;
97     /**
98      * List of suspended users in course. This includes users whose enrolment status is suspended
99      * or enrolment has expired or not started.
100      */
101     protected $suspendedusers = array();
103     /**
104      * Constructor
105      *
106      * @param object $course A course object
107      * @param array  $grade_items array of grade items, if not specified only user info returned
108      * @param int    $groupid iterate only group users if present
109      * @param string $sortfield1 The first field of the users table by which the array of users will be sorted
110      * @param string $sortorder1 The order in which the first sorting field will be sorted (ASC or DESC)
111      * @param string $sortfield2 The second field of the users table by which the array of users will be sorted
112      * @param string $sortorder2 The order in which the second sorting field will be sorted (ASC or DESC)
113      */
114     public function __construct($course, $grade_items=null, $groupid=0,
115                                           $sortfield1='lastname', $sortorder1='ASC',
116                                           $sortfield2='firstname', $sortorder2='ASC') {
117         $this->course      = $course;
118         $this->grade_items = $grade_items;
119         $this->groupid     = $groupid;
120         $this->sortfield1  = $sortfield1;
121         $this->sortorder1  = $sortorder1;
122         $this->sortfield2  = $sortfield2;
123         $this->sortorder2  = $sortorder2;
125         $this->gradestack  = array();
126     }
128     /**
129      * Initialise the iterator
130      *
131      * @return boolean success
132      */
133     public function init() {
134         global $CFG, $DB;
136         $this->close();
138         export_verify_grades($this->course->id);
139         $course_item = grade_item::fetch_course_item($this->course->id);
140         if ($course_item->needsupdate) {
141             // Can not calculate all final grades - sorry.
142             return false;
143         }
145         $coursecontext = context_course::instance($this->course->id);
147         list($relatedctxsql, $relatedctxparams) = $DB->get_in_or_equal($coursecontext->get_parent_context_ids(true), SQL_PARAMS_NAMED, 'relatedctx');
148         list($gradebookroles_sql, $params) = $DB->get_in_or_equal(explode(',', $CFG->gradebookroles), SQL_PARAMS_NAMED, 'grbr');
149         list($enrolledsql, $enrolledparams) = get_enrolled_sql($coursecontext, '', 0, $this->onlyactive);
151         $params = array_merge($params, $enrolledparams, $relatedctxparams);
153         if ($this->groupid) {
154             $groupsql = "INNER JOIN {groups_members} gm ON gm.userid = u.id";
155             $groupwheresql = "AND gm.groupid = :groupid";
156             // $params contents: gradebookroles
157             $params['groupid'] = $this->groupid;
158         } else {
159             $groupsql = "";
160             $groupwheresql = "";
161         }
163         if (empty($this->sortfield1)) {
164             // We must do some sorting even if not specified.
165             $ofields = ", u.id AS usrt";
166             $order   = "usrt ASC";
168         } else {
169             $ofields = ", u.$this->sortfield1 AS usrt1";
170             $order   = "usrt1 $this->sortorder1";
171             if (!empty($this->sortfield2)) {
172                 $ofields .= ", u.$this->sortfield2 AS usrt2";
173                 $order   .= ", usrt2 $this->sortorder2";
174             }
175             if ($this->sortfield1 != 'id' and $this->sortfield2 != 'id') {
176                 // User order MUST be the same in both queries,
177                 // must include the only unique user->id if not already present.
178                 $ofields .= ", u.id AS usrt";
179                 $order   .= ", usrt ASC";
180             }
181         }
183         $userfields = 'u.*';
184         $customfieldssql = '';
185         if ($this->allowusercustomfields && !empty($CFG->grade_export_customprofilefields)) {
186             $customfieldscount = 0;
187             $customfieldsarray = grade_helper::get_user_profile_fields($this->course->id, $this->allowusercustomfields);
188             foreach ($customfieldsarray as $field) {
189                 if (!empty($field->customid)) {
190                     $customfieldssql .= "
191                             LEFT JOIN (SELECT * FROM {user_info_data}
192                                 WHERE fieldid = :cf$customfieldscount) cf$customfieldscount
193                             ON u.id = cf$customfieldscount.userid";
194                     $userfields .= ", cf$customfieldscount.data AS customfield_{$field->shortname}";
195                     $params['cf'.$customfieldscount] = $field->customid;
196                     $customfieldscount++;
197                 }
198             }
199         }
201         $users_sql = "SELECT $userfields $ofields
202                         FROM {user} u
203                         JOIN ($enrolledsql) je ON je.id = u.id
204                              $groupsql $customfieldssql
205                         JOIN (
206                                   SELECT DISTINCT ra.userid
207                                     FROM {role_assignments} ra
208                                    WHERE ra.roleid $gradebookroles_sql
209                                      AND ra.contextid $relatedctxsql
210                              ) rainner ON rainner.userid = u.id
211                          WHERE u.deleted = 0
212                              $groupwheresql
213                     ORDER BY $order";
214         $this->users_rs = $DB->get_recordset_sql($users_sql, $params);
216         if (!$this->onlyactive) {
217             $context = context_course::instance($this->course->id);
218             $this->suspendedusers = get_suspended_userids($context);
219         } else {
220             $this->suspendedusers = array();
221         }
223         if (!empty($this->grade_items)) {
224             $itemids = array_keys($this->grade_items);
225             list($itemidsql, $grades_params) = $DB->get_in_or_equal($itemids, SQL_PARAMS_NAMED, 'items');
226             $params = array_merge($params, $grades_params);
228             $grades_sql = "SELECT g.* $ofields
229                              FROM {grade_grades} g
230                              JOIN {user} u ON g.userid = u.id
231                              JOIN ($enrolledsql) je ON je.id = u.id
232                                   $groupsql
233                              JOIN (
234                                       SELECT DISTINCT ra.userid
235                                         FROM {role_assignments} ra
236                                        WHERE ra.roleid $gradebookroles_sql
237                                          AND ra.contextid $relatedctxsql
238                                   ) rainner ON rainner.userid = u.id
239                               WHERE u.deleted = 0
240                               AND g.itemid $itemidsql
241                               $groupwheresql
242                          ORDER BY $order, g.itemid ASC";
243             $this->grades_rs = $DB->get_recordset_sql($grades_sql, $params);
244         } else {
245             $this->grades_rs = false;
246         }
248         return true;
249     }
251     /**
252      * Returns information about the next user
253      * @return mixed array of user info, all grades and feedback or null when no more users found
254      */
255     public function next_user() {
256         if (!$this->users_rs) {
257             return false; // no users present
258         }
260         if (!$this->users_rs->valid()) {
261             if ($current = $this->_pop()) {
262                 // this is not good - user or grades updated between the two reads above :-(
263             }
265             return false; // no more users
266         } else {
267             $user = $this->users_rs->current();
268             $this->users_rs->next();
269         }
271         // find grades of this user
272         $grade_records = array();
273         while (true) {
274             if (!$current = $this->_pop()) {
275                 break; // no more grades
276             }
278             if (empty($current->userid)) {
279                 break;
280             }
282             if ($current->userid != $user->id) {
283                 // grade of the next user, we have all for this user
284                 $this->_push($current);
285                 break;
286             }
288             $grade_records[$current->itemid] = $current;
289         }
291         $grades = array();
292         $feedbacks = array();
294         if (!empty($this->grade_items)) {
295             foreach ($this->grade_items as $grade_item) {
296                 if (!isset($feedbacks[$grade_item->id])) {
297                     $feedbacks[$grade_item->id] = new stdClass();
298                 }
299                 if (array_key_exists($grade_item->id, $grade_records)) {
300                     $feedbacks[$grade_item->id]->feedback       = $grade_records[$grade_item->id]->feedback;
301                     $feedbacks[$grade_item->id]->feedbackformat = $grade_records[$grade_item->id]->feedbackformat;
302                     unset($grade_records[$grade_item->id]->feedback);
303                     unset($grade_records[$grade_item->id]->feedbackformat);
304                     $grades[$grade_item->id] = new grade_grade($grade_records[$grade_item->id], false);
305                 } else {
306                     $feedbacks[$grade_item->id]->feedback       = '';
307                     $feedbacks[$grade_item->id]->feedbackformat = FORMAT_MOODLE;
308                     $grades[$grade_item->id] =
309                         new grade_grade(array('userid'=>$user->id, 'itemid'=>$grade_item->id), false);
310                 }
311             }
312         }
314         // Set user suspended status.
315         $user->suspendedenrolment = isset($this->suspendedusers[$user->id]);
316         $result = new stdClass();
317         $result->user      = $user;
318         $result->grades    = $grades;
319         $result->feedbacks = $feedbacks;
320         return $result;
321     }
323     /**
324      * Close the iterator, do not forget to call this function
325      */
326     public function close() {
327         if ($this->users_rs) {
328             $this->users_rs->close();
329             $this->users_rs = null;
330         }
331         if ($this->grades_rs) {
332             $this->grades_rs->close();
333             $this->grades_rs = null;
334         }
335         $this->gradestack = array();
336     }
338     /**
339      * Should all enrolled users be exported or just those with an active enrolment?
340      *
341      * @param bool $onlyactive True to limit the export to users with an active enrolment
342      */
343     public function require_active_enrolment($onlyactive = true) {
344         if (!empty($this->users_rs)) {
345             debugging('Calling require_active_enrolment() has no effect unless you call init() again', DEBUG_DEVELOPER);
346         }
347         $this->onlyactive  = $onlyactive;
348     }
350     /**
351      * Allow custom fields to be included
352      *
353      * @param bool $allow Whether to allow custom fields or not
354      * @return void
355      */
356     public function allow_user_custom_fields($allow = true) {
357         if ($allow) {
358             $this->allowusercustomfields = true;
359         } else {
360             $this->allowusercustomfields = false;
361         }
362     }
364     /**
365      * Add a grade_grade instance to the grade stack
366      *
367      * @param grade_grade $grade Grade object
368      *
369      * @return void
370      */
371     private function _push($grade) {
372         array_push($this->gradestack, $grade);
373     }
376     /**
377      * Remove a grade_grade instance from the grade stack
378      *
379      * @return grade_grade current grade object
380      */
381     private function _pop() {
382         global $DB;
383         if (empty($this->gradestack)) {
384             if (empty($this->grades_rs) || !$this->grades_rs->valid()) {
385                 return null; // no grades present
386             }
388             $current = $this->grades_rs->current();
390             $this->grades_rs->next();
392             return $current;
393         } else {
394             return array_pop($this->gradestack);
395         }
396     }
399 /**
400  * Print a selection popup form of the graded users in a course.
401  *
402  * @deprecated since 2.0
403  *
404  * @param int    $course id of the course
405  * @param string $actionpage The page receiving the data from the popoup form
406  * @param int    $userid   id of the currently selected user (or 'all' if they are all selected)
407  * @param int    $groupid id of requested group, 0 means all
408  * @param int    $includeall bool include all option
409  * @param bool   $return If true, will return the HTML, otherwise, will print directly
410  * @return null
411  */
412 function print_graded_users_selector($course, $actionpage, $userid=0, $groupid=0, $includeall=true, $return=false) {
413     global $CFG, $USER, $OUTPUT;
414     return $OUTPUT->render(grade_get_graded_users_select(substr($actionpage, 0, strpos($actionpage, '/')), $course, $userid, $groupid, $includeall));
417 function grade_get_graded_users_select($report, $course, $userid, $groupid, $includeall) {
418     global $USER, $CFG;
420     if (is_null($userid)) {
421         $userid = $USER->id;
422     }
423     $coursecontext = context_course::instance($course->id);
424     $defaultgradeshowactiveenrol = !empty($CFG->grade_report_showonlyactiveenrol);
425     $showonlyactiveenrol = get_user_preferences('grade_report_showonlyactiveenrol', $defaultgradeshowactiveenrol);
426     $showonlyactiveenrol = $showonlyactiveenrol || !has_capability('moodle/course:viewsuspendedusers', $coursecontext);
427     $menu = array(); // Will be a list of userid => user name
428     $menususpendedusers = array(); // Suspended users go to a separate optgroup.
429     $gui = new graded_users_iterator($course, null, $groupid);
430     $gui->require_active_enrolment($showonlyactiveenrol);
431     $gui->init();
432     $label = get_string('selectauser', 'grades');
433     if ($includeall) {
434         $menu[0] = get_string('allusers', 'grades');
435         $label = get_string('selectalloroneuser', 'grades');
436     }
437     while ($userdata = $gui->next_user()) {
438         $user = $userdata->user;
439         $userfullname = fullname($user);
440         if ($user->suspendedenrolment) {
441             $menususpendedusers[$user->id] = $userfullname;
442         } else {
443             $menu[$user->id] = $userfullname;
444         }
445     }
446     $gui->close();
448     if ($includeall) {
449         $menu[0] .= " (" . (count($menu) + count($menususpendedusers) - 1) . ")";
450     }
452     if (!empty($menususpendedusers)) {
453         $menu[] = array(get_string('suspendedusers') => $menususpendedusers);
454     }
455     $select = new single_select(new moodle_url('/grade/report/'.$report.'/index.php', array('id'=>$course->id)), 'userid', $menu, $userid);
456     $select->label = $label;
457     $select->formid = 'choosegradeuser';
458     return $select;
461 /**
462  * Hide warning about changed grades during upgrade to 2.8.
463  *
464  * @param int $courseid The current course id.
465  */
466 function hide_natural_aggregation_upgrade_notice($courseid) {
467     unset_config('show_sumofgrades_upgrade_' . $courseid);
470 /**
471  * Hide warning about changed grades during upgrade to 2.8.
472  *
473  * @param int $courseid The current course id.
474  */
475 function hide_aggregatesubcats_upgrade_notice($courseid) {
476     unset_config('show_aggregatesubcats_upgrade_' . $courseid);
479 /**
480  * Print warning about changed grades during upgrade to 2.8.
481  *
482  * @param int $courseid The current course id.
483  * @param context $context The course context.
484  * @param string $thispage The relative path for the current page. E.g. /grade/report/user/index.php
485  * @param boolean $return return as string
486  *
487  * @return nothing or string if $return true
488  */
489 function print_natural_aggregation_upgrade_notice($courseid, $context, $thispage, $return=false) {
490     global $OUTPUT;
491     $html = '';
493     $hidesubcatswarning = optional_param('seenaggregatesubcatsupgradedgrades', false, PARAM_BOOL) && confirm_sesskey();
494     $showsubcatswarning = get_config('core', 'show_aggregatesubcats_upgrade_' . $courseid);
495     $hidenaturalwarning = optional_param('seensumofgradesupgradedgrades', false, PARAM_BOOL) && confirm_sesskey();
496     $shownaturalwarning = get_config('core', 'show_sumofgrades_upgrade_' . $courseid);
498     // Do not do anything if they are not a teacher.
499     if ($hidesubcatswarning || $showsubcatswarning || $hidenaturalwarning || $shownaturalwarning) {
500         if (!has_capability('moodle/grade:manage', $context)) {
501             return '';
502         }
503     }
505     // Hide the warning if the user told it to go away.
506     if ($hidenaturalwarning) {
507         hide_natural_aggregation_upgrade_notice($courseid);
508     }
509     // Hide the warning if the user told it to go away.
510     if ($hidesubcatswarning) {
511         hide_aggregatesubcats_upgrade_notice($courseid);
512     }
514     if (!$hidenaturalwarning && $shownaturalwarning) {
515         $message = get_string('sumofgradesupgradedgrades', 'grades');
516         $hidemessage = get_string('upgradedgradeshidemessage', 'grades');
517         $urlparams = array( 'id' => $courseid,
518                             'seensumofgradesupgradedgrades' => true,
519                             'sesskey' => sesskey());
520         $goawayurl = new moodle_url($thispage, $urlparams);
521         $goawaybutton = $OUTPUT->single_button($goawayurl, $hidemessage, 'get');
522         $html .= $OUTPUT->notification($message, 'notifysuccess');
523         $html .= $goawaybutton;
524     }
526     if (!$hidesubcatswarning && $showsubcatswarning) {
527         $message = get_string('aggregatesubcatsupgradedgrades', 'grades');
528         $hidemessage = get_string('upgradedgradeshidemessage', 'grades');
529         $urlparams = array( 'id' => $courseid,
530                             'seenaggregatesubcatsupgradedgrades' => true,
531                             'sesskey' => sesskey());
532         $goawayurl = new moodle_url($thispage, $urlparams);
533         $goawaybutton = $OUTPUT->single_button($goawayurl, $hidemessage, 'get');
534         $html .= $OUTPUT->notification($message, 'notifysuccess');
535         $html .= $goawaybutton;
536     }
538     if ($return) {
539         return $html;
540     } else {
541         echo $html;
542     }
545 /**
546  * Print grading plugin selection popup form.
547  *
548  * @param array   $plugin_info An array of plugins containing information for the selector
549  * @param boolean $return return as string
550  *
551  * @return nothing or string if $return true
552  */
553 function print_grade_plugin_selector($plugin_info, $active_type, $active_plugin, $return=false) {
554     global $CFG, $OUTPUT, $PAGE;
556     $menu = array();
557     $count = 0;
558     $active = '';
560     foreach ($plugin_info as $plugin_type => $plugins) {
561         if ($plugin_type == 'strings') {
562             continue;
563         }
565         $first_plugin = reset($plugins);
567         $sectionname = $plugin_info['strings'][$plugin_type];
568         $section = array();
570         foreach ($plugins as $plugin) {
571             $link = $plugin->link->out(false);
572             $section[$link] = $plugin->string;
573             $count++;
574             if ($plugin_type === $active_type and $plugin->id === $active_plugin) {
575                 $active = $link;
576             }
577         }
579         if ($section) {
580             $menu[] = array($sectionname=>$section);
581         }
582     }
584     // finally print/return the popup form
585     if ($count > 1) {
586         $select = new url_select($menu, $active, null, 'choosepluginreport');
587         $select->set_label(get_string('gradereport', 'grades'), array('class' => 'accesshide'));
588         if ($return) {
589             return $OUTPUT->render($select);
590         } else {
591             echo $OUTPUT->render($select);
592         }
593     } else {
594         // only one option - no plugin selector needed
595         return '';
596     }
599 /**
600  * Print grading plugin selection tab-based navigation.
601  *
602  * @param string  $active_type type of plugin on current page - import, export, report or edit
603  * @param string  $active_plugin active plugin type - grader, user, cvs, ...
604  * @param array   $plugin_info Array of plugins
605  * @param boolean $return return as string
606  *
607  * @return nothing or string if $return true
608  */
609 function grade_print_tabs($active_type, $active_plugin, $plugin_info, $return=false) {
610     global $CFG, $COURSE;
612     if (!isset($currenttab)) { //TODO: this is weird
613         $currenttab = '';
614     }
616     $tabs = array();
617     $top_row  = array();
618     $bottom_row = array();
619     $inactive = array($active_plugin);
620     $activated = array($active_type);
622     $count = 0;
623     $active = '';
625     foreach ($plugin_info as $plugin_type => $plugins) {
626         if ($plugin_type == 'strings') {
627             continue;
628         }
630         // If $plugins is actually the definition of a child-less parent link:
631         if (!empty($plugins->id)) {
632             $string = $plugins->string;
633             if (!empty($plugin_info[$active_type]->parent)) {
634                 $string = $plugin_info[$active_type]->parent->string;
635             }
637             $top_row[] = new tabobject($plugin_type, $plugins->link, $string);
638             continue;
639         }
641         $first_plugin = reset($plugins);
642         $url = $first_plugin->link;
644         if ($plugin_type == 'report') {
645             $url = $CFG->wwwroot.'/grade/report/index.php?id='.$COURSE->id;
646         }
648         $top_row[] = new tabobject($plugin_type, $url, $plugin_info['strings'][$plugin_type]);
650         if ($active_type == $plugin_type) {
651             foreach ($plugins as $plugin) {
652                 $bottom_row[] = new tabobject($plugin->id, $plugin->link, $plugin->string);
653                 if ($plugin->id == $active_plugin) {
654                     $inactive = array($plugin->id);
655                 }
656             }
657         }
658     }
660     $tabs[] = $top_row;
661     $tabs[] = $bottom_row;
663     if ($return) {
664         return print_tabs($tabs, $active_plugin, $inactive, $activated, true);
665     } else {
666         print_tabs($tabs, $active_plugin, $inactive, $activated);
667     }
670 /**
671  * grade_get_plugin_info
672  *
673  * @param int    $courseid The course id
674  * @param string $active_type type of plugin on current page - import, export, report or edit
675  * @param string $active_plugin active plugin type - grader, user, cvs, ...
676  *
677  * @return array
678  */
679 function grade_get_plugin_info($courseid, $active_type, $active_plugin) {
680     global $CFG, $SITE;
682     $context = context_course::instance($courseid);
684     $plugin_info = array();
685     $count = 0;
686     $active = '';
687     $url_prefix = $CFG->wwwroot . '/grade/';
689     // Language strings
690     $plugin_info['strings'] = grade_helper::get_plugin_strings();
692     if ($reports = grade_helper::get_plugins_reports($courseid)) {
693         $plugin_info['report'] = $reports;
694     }
696     if ($settings = grade_helper::get_info_manage_settings($courseid)) {
697         $plugin_info['settings'] = $settings;
698     }
700     if ($scale = grade_helper::get_info_scales($courseid)) {
701         $plugin_info['scale'] = array('view'=>$scale);
702     }
704     if ($outcomes = grade_helper::get_info_outcomes($courseid)) {
705         $plugin_info['outcome'] = $outcomes;
706     }
708     if ($letters = grade_helper::get_info_letters($courseid)) {
709         $plugin_info['letter'] = $letters;
710     }
712     if ($imports = grade_helper::get_plugins_import($courseid)) {
713         $plugin_info['import'] = $imports;
714     }
716     if ($exports = grade_helper::get_plugins_export($courseid)) {
717         $plugin_info['export'] = $exports;
718     }
720     foreach ($plugin_info as $plugin_type => $plugins) {
721         if (!empty($plugins->id) && $active_plugin == $plugins->id) {
722             $plugin_info['strings']['active_plugin_str'] = $plugins->string;
723             break;
724         }
725         foreach ($plugins as $plugin) {
726             if (is_a($plugin, 'grade_plugin_info')) {
727                 if ($active_plugin == $plugin->id) {
728                     $plugin_info['strings']['active_plugin_str'] = $plugin->string;
729                 }
730             }
731         }
732     }
734     foreach ($plugin_info as $plugin_type => $plugins) {
735         if (!empty($plugins->id) && $active_plugin == $plugins->id) {
736             $plugin_info['strings']['active_plugin_str'] = $plugins->string;
737             break;
738         }
739         foreach ($plugins as $plugin) {
740             if (is_a($plugin, 'grade_plugin_info')) {
741                 if ($active_plugin == $plugin->id) {
742                     $plugin_info['strings']['active_plugin_str'] = $plugin->string;
743                 }
744             }
745         }
746     }
748     return $plugin_info;
751 /**
752  * A simple class containing info about grade plugins.
753  * Can be subclassed for special rules
754  *
755  * @package core_grades
756  * @copyright 2009 Nicolas Connault
757  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
758  */
759 class grade_plugin_info {
760     /**
761      * A unique id for this plugin
762      *
763      * @var mixed
764      */
765     public $id;
766     /**
767      * A URL to access this plugin
768      *
769      * @var mixed
770      */
771     public $link;
772     /**
773      * The name of this plugin
774      *
775      * @var mixed
776      */
777     public $string;
778     /**
779      * Another grade_plugin_info object, parent of the current one
780      *
781      * @var mixed
782      */
783     public $parent;
785     /**
786      * Constructor
787      *
788      * @param int $id A unique id for this plugin
789      * @param string $link A URL to access this plugin
790      * @param string $string The name of this plugin
791      * @param object $parent Another grade_plugin_info object, parent of the current one
792      *
793      * @return void
794      */
795     public function __construct($id, $link, $string, $parent=null) {
796         $this->id = $id;
797         $this->link = $link;
798         $this->string = $string;
799         $this->parent = $parent;
800     }
803 /**
804  * Prints the page headers, breadcrumb trail, page heading, (optional) dropdown navigation menu and
805  * (optional) navigation tabs for any gradebook page. All gradebook pages MUST use these functions
806  * in favour of the usual print_header(), print_header_simple(), print_heading() etc.
807  * !IMPORTANT! Use of tabs.php file in gradebook pages is forbidden unless tabs are switched off at
808  * the site level for the gradebook ($CFG->grade_navmethod = GRADE_NAVMETHOD_DROPDOWN).
809  *
810  * @param int     $courseid Course id
811  * @param string  $active_type The type of the current page (report, settings,
812  *                             import, export, scales, outcomes, letters)
813  * @param string  $active_plugin The plugin of the current page (grader, fullview etc...)
814  * @param string  $heading The heading of the page. Tries to guess if none is given
815  * @param boolean $return Whether to return (true) or echo (false) the HTML generated by this function
816  * @param string  $bodytags Additional attributes that will be added to the <body> tag
817  * @param string  $buttons Additional buttons to display on the page
818  * @param boolean $shownavigation should the gradebook navigation drop down (or tabs) be shown?
819  * @param string  $headerhelpidentifier The help string identifier if required.
820  * @param string  $headerhelpcomponent The component for the help string.
821  * @param stdClass $user The user object for use with the user context header.
822  *
823  * @return string HTML code or nothing if $return == false
824  */
825 function print_grade_page_head($courseid, $active_type, $active_plugin=null,
826                                $heading = false, $return=false,
827                                $buttons=false, $shownavigation=true, $headerhelpidentifier = null, $headerhelpcomponent = null,
828                                $user = null) {
829     global $CFG, $OUTPUT, $PAGE;
831     if ($active_type === 'preferences') {
832         // In Moodle 2.8 report preferences were moved under 'settings'. Allow backward compatibility for 3rd party grade reports.
833         $active_type = 'settings';
834     }
836     $plugin_info = grade_get_plugin_info($courseid, $active_type, $active_plugin);
838     // Determine the string of the active plugin
839     $stractive_plugin = ($active_plugin) ? $plugin_info['strings']['active_plugin_str'] : $heading;
840     $stractive_type = $plugin_info['strings'][$active_type];
842     if (empty($plugin_info[$active_type]->id) || !empty($plugin_info[$active_type]->parent)) {
843         $title = $PAGE->course->fullname.': ' . $stractive_type . ': ' . $stractive_plugin;
844     } else {
845         $title = $PAGE->course->fullname.': ' . $stractive_plugin;
846     }
848     if ($active_type == 'report') {
849         $PAGE->set_pagelayout('report');
850     } else {
851         $PAGE->set_pagelayout('admin');
852     }
853     $PAGE->set_title(get_string('grades') . ': ' . $stractive_type);
854     $PAGE->set_heading($title);
855     if ($buttons instanceof single_button) {
856         $buttons = $OUTPUT->render($buttons);
857     }
858     $PAGE->set_button($buttons);
859     if ($courseid != SITEID) {
860         grade_extend_settings($plugin_info, $courseid);
861     }
863     $returnval = $OUTPUT->header();
865     if (!$return) {
866         echo $returnval;
867     }
869     // Guess heading if not given explicitly
870     if (!$heading) {
871         $heading = $stractive_plugin;
872     }
874     if ($shownavigation) {
875         $navselector = null;
876         if ($courseid != SITEID &&
877                 ($CFG->grade_navmethod == GRADE_NAVMETHOD_COMBO || $CFG->grade_navmethod == GRADE_NAVMETHOD_DROPDOWN)) {
878             // It's absolutely essential that this grade plugin selector is shown after the user header. Just ask Fred.
879             $navselector = print_grade_plugin_selector($plugin_info, $active_type, $active_plugin, true);
880             if ($return) {
881                 $returnval .= $navselector;
882             } else if (!isset($user)) {
883                 echo $navselector;
884             }
885         }
887         $output = '';
888         // Add a help dialogue box if provided.
889         if (isset($headerhelpidentifier)) {
890             $output = $OUTPUT->heading_with_help($heading, $headerhelpidentifier, $headerhelpcomponent);
891         } else {
892             if (isset($user)) {
893                 $output = $OUTPUT->context_header(
894                         array(
895                             'heading' => fullname($user),
896                             'user' => $user,
897                             'usercontext' => context_user::instance($user->id)
898                         ), 2
899                     ) . $navselector;
900             } else {
901                 $output = $OUTPUT->heading($heading);
902             }
903         }
905         if ($return) {
906             $returnval .= $output;
907         } else {
908             echo $output;
909         }
911         if ($courseid != SITEID &&
912                 ($CFG->grade_navmethod == GRADE_NAVMETHOD_COMBO || $CFG->grade_navmethod == GRADE_NAVMETHOD_TABS)) {
913             $returnval .= grade_print_tabs($active_type, $active_plugin, $plugin_info, $return);
914         }
915     }
917     $returnval .= print_natural_aggregation_upgrade_notice($courseid,
918                                                            context_course::instance($courseid),
919                                                            $PAGE->url,
920                                                            $return);
922     if ($return) {
923         return $returnval;
924     }
927 /**
928  * Utility class used for return tracking when using edit and other forms in grade plugins
929  *
930  * @package core_grades
931  * @copyright 2009 Nicolas Connault
932  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
933  */
934 class grade_plugin_return {
935     public $type;
936     public $plugin;
937     public $courseid;
938     public $userid;
939     public $page;
941     /**
942      * Constructor
943      *
944      * @param array $params - associative array with return parameters, if null parameter are taken from _GET or _POST
945      */
946     public function grade_plugin_return($params = null) {
947         if (empty($params)) {
948             $this->type     = optional_param('gpr_type', null, PARAM_SAFEDIR);
949             $this->plugin   = optional_param('gpr_plugin', null, PARAM_PLUGIN);
950             $this->courseid = optional_param('gpr_courseid', null, PARAM_INT);
951             $this->userid   = optional_param('gpr_userid', null, PARAM_INT);
952             $this->page     = optional_param('gpr_page', null, PARAM_INT);
954         } else {
955             foreach ($params as $key=>$value) {
956                 if (property_exists($this, $key)) {
957                     $this->$key = $value;
958                 }
959             }
960         }
961     }
963     /**
964      * Returns return parameters as options array suitable for buttons.
965      * @return array options
966      */
967     public function get_options() {
968         if (empty($this->type)) {
969             return array();
970         }
972         $params = array();
974         if (!empty($this->plugin)) {
975             $params['plugin'] = $this->plugin;
976         }
978         if (!empty($this->courseid)) {
979             $params['id'] = $this->courseid;
980         }
982         if (!empty($this->userid)) {
983             $params['userid'] = $this->userid;
984         }
986         if (!empty($this->page)) {
987             $params['page'] = $this->page;
988         }
990         return $params;
991     }
993     /**
994      * Returns return url
995      *
996      * @param string $default default url when params not set
997      * @param array  $extras Extra URL parameters
998      *
999      * @return string url
1000      */
1001     public function get_return_url($default, $extras=null) {
1002         global $CFG;
1004         if (empty($this->type) or empty($this->plugin)) {
1005             return $default;
1006         }
1008         $url = $CFG->wwwroot.'/grade/'.$this->type.'/'.$this->plugin.'/index.php';
1009         $glue = '?';
1011         if (!empty($this->courseid)) {
1012             $url .= $glue.'id='.$this->courseid;
1013             $glue = '&amp;';
1014         }
1016         if (!empty($this->userid)) {
1017             $url .= $glue.'userid='.$this->userid;
1018             $glue = '&amp;';
1019         }
1021         if (!empty($this->page)) {
1022             $url .= $glue.'page='.$this->page;
1023             $glue = '&amp;';
1024         }
1026         if (!empty($extras)) {
1027             foreach ($extras as $key=>$value) {
1028                 $url .= $glue.$key.'='.$value;
1029                 $glue = '&amp;';
1030             }
1031         }
1033         return $url;
1034     }
1036     /**
1037      * Returns string with hidden return tracking form elements.
1038      * @return string
1039      */
1040     public function get_form_fields() {
1041         if (empty($this->type)) {
1042             return '';
1043         }
1045         $result  = '<input type="hidden" name="gpr_type" value="'.$this->type.'" />';
1047         if (!empty($this->plugin)) {
1048             $result .= '<input type="hidden" name="gpr_plugin" value="'.$this->plugin.'" />';
1049         }
1051         if (!empty($this->courseid)) {
1052             $result .= '<input type="hidden" name="gpr_courseid" value="'.$this->courseid.'" />';
1053         }
1055         if (!empty($this->userid)) {
1056             $result .= '<input type="hidden" name="gpr_userid" value="'.$this->userid.'" />';
1057         }
1059         if (!empty($this->page)) {
1060             $result .= '<input type="hidden" name="gpr_page" value="'.$this->page.'" />';
1061         }
1062     }
1064     /**
1065      * Add hidden elements into mform
1066      *
1067      * @param object &$mform moodle form object
1068      *
1069      * @return void
1070      */
1071     public function add_mform_elements(&$mform) {
1072         if (empty($this->type)) {
1073             return;
1074         }
1076         $mform->addElement('hidden', 'gpr_type', $this->type);
1077         $mform->setType('gpr_type', PARAM_SAFEDIR);
1079         if (!empty($this->plugin)) {
1080             $mform->addElement('hidden', 'gpr_plugin', $this->plugin);
1081             $mform->setType('gpr_plugin', PARAM_PLUGIN);
1082         }
1084         if (!empty($this->courseid)) {
1085             $mform->addElement('hidden', 'gpr_courseid', $this->courseid);
1086             $mform->setType('gpr_courseid', PARAM_INT);
1087         }
1089         if (!empty($this->userid)) {
1090             $mform->addElement('hidden', 'gpr_userid', $this->userid);
1091             $mform->setType('gpr_userid', PARAM_INT);
1092         }
1094         if (!empty($this->page)) {
1095             $mform->addElement('hidden', 'gpr_page', $this->page);
1096             $mform->setType('gpr_page', PARAM_INT);
1097         }
1098     }
1100     /**
1101      * Add return tracking params into url
1102      *
1103      * @param moodle_url $url A URL
1104      *
1105      * @return string $url with return tracking params
1106      */
1107     public function add_url_params(moodle_url $url) {
1108         if (empty($this->type)) {
1109             return $url;
1110         }
1112         $url->param('gpr_type', $this->type);
1114         if (!empty($this->plugin)) {
1115             $url->param('gpr_plugin', $this->plugin);
1116         }
1118         if (!empty($this->courseid)) {
1119             $url->param('gpr_courseid' ,$this->courseid);
1120         }
1122         if (!empty($this->userid)) {
1123             $url->param('gpr_userid', $this->userid);
1124         }
1126         if (!empty($this->page)) {
1127             $url->param('gpr_page', $this->page);
1128         }
1130         return $url;
1131     }
1134 /**
1135  * Function central to gradebook for building and printing the navigation (breadcrumb trail).
1136  *
1137  * @param string $path The path of the calling script (using __FILE__?)
1138  * @param string $pagename The language string to use as the last part of the navigation (non-link)
1139  * @param mixed  $id Either a plain integer (assuming the key is 'id') or
1140  *                   an array of keys and values (e.g courseid => $courseid, itemid...)
1141  *
1142  * @return string
1143  */
1144 function grade_build_nav($path, $pagename=null, $id=null) {
1145     global $CFG, $COURSE, $PAGE;
1147     $strgrades = get_string('grades', 'grades');
1149     // Parse the path and build navlinks from its elements
1150     $dirroot_length = strlen($CFG->dirroot) + 1; // Add 1 for the first slash
1151     $path = substr($path, $dirroot_length);
1152     $path = str_replace('\\', '/', $path);
1154     $path_elements = explode('/', $path);
1156     $path_elements_count = count($path_elements);
1158     // First link is always 'grade'
1159     $PAGE->navbar->add($strgrades, new moodle_url('/grade/index.php', array('id'=>$COURSE->id)));
1161     $link = null;
1162     $numberofelements = 3;
1164     // Prepare URL params string
1165     $linkparams = array();
1166     if (!is_null($id)) {
1167         if (is_array($id)) {
1168             foreach ($id as $idkey => $idvalue) {
1169                 $linkparams[$idkey] = $idvalue;
1170             }
1171         } else {
1172             $linkparams['id'] = $id;
1173         }
1174     }
1176     $navlink4 = null;
1178     // Remove file extensions from filenames
1179     foreach ($path_elements as $key => $filename) {
1180         $path_elements[$key] = str_replace('.php', '', $filename);
1181     }
1183     // Second level links
1184     switch ($path_elements[1]) {
1185         case 'edit': // No link
1186             if ($path_elements[3] != 'index.php') {
1187                 $numberofelements = 4;
1188             }
1189             break;
1190         case 'import': // No link
1191             break;
1192         case 'export': // No link
1193             break;
1194         case 'report':
1195             // $id is required for this link. Do not print it if $id isn't given
1196             if (!is_null($id)) {
1197                 $link = new moodle_url('/grade/report/index.php', $linkparams);
1198             }
1200             if ($path_elements[2] == 'grader') {
1201                 $numberofelements = 4;
1202             }
1203             break;
1205         default:
1206             // If this element isn't among the ones already listed above, it isn't supported, throw an error.
1207             debugging("grade_build_nav() doesn't support ". $path_elements[1] .
1208                     " as the second path element after 'grade'.");
1209             return false;
1210     }
1211     $PAGE->navbar->add(get_string($path_elements[1], 'grades'), $link);
1213     // Third level links
1214     if (empty($pagename)) {
1215         $pagename = get_string($path_elements[2], 'grades');
1216     }
1218     switch ($numberofelements) {
1219         case 3:
1220             $PAGE->navbar->add($pagename, $link);
1221             break;
1222         case 4:
1223             if ($path_elements[2] == 'grader' AND $path_elements[3] != 'index.php') {
1224                 $PAGE->navbar->add(get_string('pluginname', 'gradereport_grader'), new moodle_url('/grade/report/grader/index.php', $linkparams));
1225             }
1226             $PAGE->navbar->add($pagename);
1227             break;
1228     }
1230     return '';
1233 /**
1234  * General structure representing grade items in course
1235  *
1236  * @package core_grades
1237  * @copyright 2009 Nicolas Connault
1238  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1239  */
1240 class grade_structure {
1241     public $context;
1243     public $courseid;
1245     /**
1246     * Reference to modinfo for current course (for performance, to save
1247     * retrieving it from courseid every time). Not actually set except for
1248     * the grade_tree type.
1249     * @var course_modinfo
1250     */
1251     public $modinfo;
1253     /**
1254      * 1D array of grade items only
1255      */
1256     public $items;
1258     /**
1259      * Returns icon of element
1260      *
1261      * @param array &$element An array representing an element in the grade_tree
1262      * @param bool  $spacerifnone return spacer if no icon found
1263      *
1264      * @return string icon or spacer
1265      */
1266     public function get_element_icon(&$element, $spacerifnone=false) {
1267         global $CFG, $OUTPUT;
1268         require_once $CFG->libdir.'/filelib.php';
1270         $outputstr = '';
1272         // Object holding pix_icon information before instantiation.
1273         $icon = new stdClass();
1274         $icon->attributes = array(
1275             'class' => 'item itemicon'
1276         );
1277         $icon->component = 'moodle';
1279         $none = true;
1280         switch ($element['type']) {
1281             case 'item':
1282             case 'courseitem':
1283             case 'categoryitem':
1284                 $none = false;
1286                 $is_course   = $element['object']->is_course_item();
1287                 $is_category = $element['object']->is_category_item();
1288                 $is_scale    = $element['object']->gradetype == GRADE_TYPE_SCALE;
1289                 $is_value    = $element['object']->gradetype == GRADE_TYPE_VALUE;
1290                 $is_outcome  = !empty($element['object']->outcomeid);
1292                 if ($element['object']->is_calculated()) {
1293                     $icon->pix = 'i/calc';
1294                     $icon->title = s(get_string('calculatedgrade', 'grades'));
1296                 } else if (($is_course or $is_category) and ($is_scale or $is_value)) {
1297                     if ($category = $element['object']->get_item_category()) {
1298                         $aggrstrings = grade_helper::get_aggregation_strings();
1299                         $stragg = $aggrstrings[$category->aggregation];
1301                         $icon->pix = 'i/calc';
1302                         $icon->title = s($stragg);
1304                         switch ($category->aggregation) {
1305                             case GRADE_AGGREGATE_MEAN:
1306                             case GRADE_AGGREGATE_MEDIAN:
1307                             case GRADE_AGGREGATE_WEIGHTED_MEAN:
1308                             case GRADE_AGGREGATE_WEIGHTED_MEAN2:
1309                             case GRADE_AGGREGATE_EXTRACREDIT_MEAN:
1310                                 $icon->pix = 'i/agg_mean';
1311                                 break;
1312                             case GRADE_AGGREGATE_SUM:
1313                                 $icon->pix = 'i/agg_sum';
1314                                 break;
1315                         }
1316                     }
1318                 } else if ($element['object']->itemtype == 'mod') {
1319                     // Prevent outcomes displaying the same icon as the activity they are attached to.
1320                     if ($is_outcome) {
1321                         $icon->pix = 'i/outcomes';
1322                         $icon->title = s(get_string('outcome', 'grades'));
1323                     } else {
1324                         $icon->pix = 'icon';
1325                         $icon->component = $element['object']->itemmodule;
1326                         $icon->title = s(get_string('modulename', $element['object']->itemmodule));
1327                     }
1328                 } else if ($element['object']->itemtype == 'manual') {
1329                     if ($element['object']->is_outcome_item()) {
1330                         $icon->pix = 'i/outcomes';
1331                         $icon->title = s(get_string('outcome', 'grades'));
1332                     } else {
1333                         $icon->pix = 'i/manual_item';
1334                         $icon->title = s(get_string('manualitem', 'grades'));
1335                     }
1336                 }
1337                 break;
1339             case 'category':
1340                 $none = false;
1341                 $icon->pix = 'i/folder';
1342                 $icon->title = s(get_string('category', 'grades'));
1343                 break;
1344         }
1346         if ($none) {
1347             if ($spacerifnone) {
1348                 $outputstr = $OUTPUT->spacer() . ' ';
1349             }
1350         } else {
1351             $outputstr = $OUTPUT->pix_icon($icon->pix, $icon->title, $icon->component, $icon->attributes);
1352         }
1354         return $outputstr;
1355     }
1357     /**
1358      * Returns name of element optionally with icon and link
1359      *
1360      * @param array &$element An array representing an element in the grade_tree
1361      * @param bool  $withlink Whether or not this header has a link
1362      * @param bool  $icon Whether or not to display an icon with this header
1363      * @param bool  $spacerifnone return spacer if no icon found
1364      * @param bool  $withdescription Show description if defined by this item.
1365      * @param bool  $fulltotal If the item is a category total, returns $categoryname."total"
1366      *                         instead of "Category total" or "Course total"
1367      *
1368      * @return string header
1369      */
1370     public function get_element_header(&$element, $withlink = false, $icon = true, $spacerifnone = false,
1371         $withdescription = false, $fulltotal = false) {
1372         $header = '';
1374         if ($icon) {
1375             $header .= $this->get_element_icon($element, $spacerifnone);
1376         }
1378         $header .= $element['object']->get_name($fulltotal);
1380         if ($element['type'] != 'item' and $element['type'] != 'categoryitem' and
1381             $element['type'] != 'courseitem') {
1382             return $header;
1383         }
1385         if ($withlink && $url = $this->get_activity_link($element)) {
1386             $a = new stdClass();
1387             $a->name = get_string('modulename', $element['object']->itemmodule);
1388             $title = get_string('linktoactivity', 'grades', $a);
1390             $header = html_writer::link($url, $header, array('title' => $title));
1391         } else {
1392             $header = html_writer::span($header);
1393         }
1395         if ($withdescription) {
1396             $desc = $element['object']->get_description();
1397             if (!empty($desc)) {
1398                 $header .= '<div class="gradeitemdescription">' . s($desc) . '</div><div class="gradeitemdescriptionfiller"></div>';
1399             }
1400         }
1402         return $header;
1403     }
1405     private function get_activity_link($element) {
1406         global $CFG;
1407         /** @var array static cache of the grade.php file existence flags */
1408         static $hasgradephp = array();
1410         $itemtype = $element['object']->itemtype;
1411         $itemmodule = $element['object']->itemmodule;
1412         $iteminstance = $element['object']->iteminstance;
1413         $itemnumber = $element['object']->itemnumber;
1415         // Links only for module items that have valid instance, module and are
1416         // called from grade_tree with valid modinfo
1417         if ($itemtype != 'mod' || !$iteminstance || !$itemmodule || !$this->modinfo) {
1418             return null;
1419         }
1421         // Get $cm efficiently and with visibility information using modinfo
1422         $instances = $this->modinfo->get_instances();
1423         if (empty($instances[$itemmodule][$iteminstance])) {
1424             return null;
1425         }
1426         $cm = $instances[$itemmodule][$iteminstance];
1428         // Do not add link if activity is not visible to the current user
1429         if (!$cm->uservisible) {
1430             return null;
1431         }
1433         if (!array_key_exists($itemmodule, $hasgradephp)) {
1434             if (file_exists($CFG->dirroot . '/mod/' . $itemmodule . '/grade.php')) {
1435                 $hasgradephp[$itemmodule] = true;
1436             } else {
1437                 $hasgradephp[$itemmodule] = false;
1438             }
1439         }
1441         // If module has grade.php, link to that, otherwise view.php
1442         if ($hasgradephp[$itemmodule]) {
1443             $args = array('id' => $cm->id, 'itemnumber' => $itemnumber);
1444             if (isset($element['userid'])) {
1445                 $args['userid'] = $element['userid'];
1446             }
1447             return new moodle_url('/mod/' . $itemmodule . '/grade.php', $args);
1448         } else {
1449             return new moodle_url('/mod/' . $itemmodule . '/view.php', array('id' => $cm->id));
1450         }
1451     }
1453     /**
1454      * Returns URL of a page that is supposed to contain detailed grade analysis
1455      *
1456      * At the moment, only activity modules are supported. The method generates link
1457      * to the module's file grade.php with the parameters id (cmid), itemid, itemnumber,
1458      * gradeid and userid. If the grade.php does not exist, null is returned.
1459      *
1460      * @return moodle_url|null URL or null if unable to construct it
1461      */
1462     public function get_grade_analysis_url(grade_grade $grade) {
1463         global $CFG;
1464         /** @var array static cache of the grade.php file existence flags */
1465         static $hasgradephp = array();
1467         if (empty($grade->grade_item) or !($grade->grade_item instanceof grade_item)) {
1468             throw new coding_exception('Passed grade without the associated grade item');
1469         }
1470         $item = $grade->grade_item;
1472         if (!$item->is_external_item()) {
1473             // at the moment, only activity modules are supported
1474             return null;
1475         }
1476         if ($item->itemtype !== 'mod') {
1477             throw new coding_exception('Unknown external itemtype: '.$item->itemtype);
1478         }
1479         if (empty($item->iteminstance) or empty($item->itemmodule) or empty($this->modinfo)) {
1480             return null;
1481         }
1483         if (!array_key_exists($item->itemmodule, $hasgradephp)) {
1484             if (file_exists($CFG->dirroot . '/mod/' . $item->itemmodule . '/grade.php')) {
1485                 $hasgradephp[$item->itemmodule] = true;
1486             } else {
1487                 $hasgradephp[$item->itemmodule] = false;
1488             }
1489         }
1491         if (!$hasgradephp[$item->itemmodule]) {
1492             return null;
1493         }
1495         $instances = $this->modinfo->get_instances();
1496         if (empty($instances[$item->itemmodule][$item->iteminstance])) {
1497             return null;
1498         }
1499         $cm = $instances[$item->itemmodule][$item->iteminstance];
1500         if (!$cm->uservisible) {
1501             return null;
1502         }
1504         $url = new moodle_url('/mod/'.$item->itemmodule.'/grade.php', array(
1505             'id'         => $cm->id,
1506             'itemid'     => $item->id,
1507             'itemnumber' => $item->itemnumber,
1508             'gradeid'    => $grade->id,
1509             'userid'     => $grade->userid,
1510         ));
1512         return $url;
1513     }
1515     /**
1516      * Returns an action icon leading to the grade analysis page
1517      *
1518      * @param grade_grade $grade
1519      * @return string
1520      */
1521     public function get_grade_analysis_icon(grade_grade $grade) {
1522         global $OUTPUT;
1524         $url = $this->get_grade_analysis_url($grade);
1525         if (is_null($url)) {
1526             return '';
1527         }
1529         return $OUTPUT->action_icon($url, new pix_icon('t/preview',
1530             get_string('gradeanalysis', 'core_grades')));
1531     }
1533     /**
1534      * Returns the grade eid - the grade may not exist yet.
1535      *
1536      * @param grade_grade $grade_grade A grade_grade object
1537      *
1538      * @return string eid
1539      */
1540     public function get_grade_eid($grade_grade) {
1541         if (empty($grade_grade->id)) {
1542             return 'n'.$grade_grade->itemid.'u'.$grade_grade->userid;
1543         } else {
1544             return 'g'.$grade_grade->id;
1545         }
1546     }
1548     /**
1549      * Returns the grade_item eid
1550      * @param grade_item $grade_item A grade_item object
1551      * @return string eid
1552      */
1553     public function get_item_eid($grade_item) {
1554         return 'ig'.$grade_item->id;
1555     }
1557     /**
1558      * Given a grade_tree element, returns an array of parameters
1559      * used to build an icon for that element.
1560      *
1561      * @param array $element An array representing an element in the grade_tree
1562      *
1563      * @return array
1564      */
1565     public function get_params_for_iconstr($element) {
1566         $strparams = new stdClass();
1567         $strparams->category = '';
1568         $strparams->itemname = '';
1569         $strparams->itemmodule = '';
1571         if (!method_exists($element['object'], 'get_name')) {
1572             return $strparams;
1573         }
1575         $strparams->itemname = html_to_text($element['object']->get_name());
1577         // If element name is categorytotal, get the name of the parent category
1578         if ($strparams->itemname == get_string('categorytotal', 'grades')) {
1579             $parent = $element['object']->get_parent_category();
1580             $strparams->category = $parent->get_name() . ' ';
1581         } else {
1582             $strparams->category = '';
1583         }
1585         $strparams->itemmodule = null;
1586         if (isset($element['object']->itemmodule)) {
1587             $strparams->itemmodule = $element['object']->itemmodule;
1588         }
1589         return $strparams;
1590     }
1592     /**
1593      * Return a reset icon for the given element.
1594      *
1595      * @param array  $element An array representing an element in the grade_tree
1596      * @param object $gpr A grade_plugin_return object
1597      * @param bool $returnactionmenulink return the instance of action_menu_link instead of string
1598      * @return string|action_menu_link
1599      */
1600     public function get_reset_icon($element, $gpr, $returnactionmenulink = false) {
1601         global $CFG, $OUTPUT;
1603         // Limit to category items set to use the natural weights aggregation method, and users
1604         // with the capability to manage grades.
1605         if ($element['type'] != 'category' || $element['object']->aggregation != GRADE_AGGREGATE_SUM ||
1606                 !has_capability('moodle/grade:manage', $this->context)) {
1607             return $returnactionmenulink ? null : '';
1608         }
1610         $str = get_string('resetweights', 'grades', $this->get_params_for_iconstr($element));
1611         $url = new moodle_url('/grade/edit/tree/action.php', array(
1612             'id' => $this->courseid,
1613             'action' => 'resetweights',
1614             'eid' => $element['eid'],
1615             'sesskey' => sesskey(),
1616         ));
1618         if ($returnactionmenulink) {
1619             return new action_menu_link_secondary($gpr->add_url_params($url), new pix_icon('t/reset', $str),
1620                 get_string('resetweightsshort', 'grades'));
1621         } else {
1622             return $OUTPUT->action_icon($gpr->add_url_params($url), new pix_icon('t/reset', $str));
1623         }
1624     }
1626     /**
1627      * Return edit icon for give element
1628      *
1629      * @param array  $element An array representing an element in the grade_tree
1630      * @param object $gpr A grade_plugin_return object
1631      * @param bool $returnactionmenulink return the instance of action_menu_link instead of string
1632      * @return string|action_menu_link
1633      */
1634     public function get_edit_icon($element, $gpr, $returnactionmenulink = false) {
1635         global $CFG, $OUTPUT;
1637         if (!has_capability('moodle/grade:manage', $this->context)) {
1638             if ($element['type'] == 'grade' and has_capability('moodle/grade:edit', $this->context)) {
1639                 // oki - let them override grade
1640             } else {
1641                 return $returnactionmenulink ? null : '';
1642             }
1643         }
1645         static $strfeedback   = null;
1646         static $streditgrade = null;
1647         if (is_null($streditgrade)) {
1648             $streditgrade = get_string('editgrade', 'grades');
1649             $strfeedback  = get_string('feedback');
1650         }
1652         $strparams = $this->get_params_for_iconstr($element);
1654         $object = $element['object'];
1656         switch ($element['type']) {
1657             case 'item':
1658             case 'categoryitem':
1659             case 'courseitem':
1660                 $stredit = get_string('editverbose', 'grades', $strparams);
1661                 if (empty($object->outcomeid) || empty($CFG->enableoutcomes)) {
1662                     $url = new moodle_url('/grade/edit/tree/item.php',
1663                             array('courseid' => $this->courseid, 'id' => $object->id));
1664                 } else {
1665                     $url = new moodle_url('/grade/edit/tree/outcomeitem.php',
1666                             array('courseid' => $this->courseid, 'id' => $object->id));
1667                 }
1668                 break;
1670             case 'category':
1671                 $stredit = get_string('editverbose', 'grades', $strparams);
1672                 $url = new moodle_url('/grade/edit/tree/category.php',
1673                         array('courseid' => $this->courseid, 'id' => $object->id));
1674                 break;
1676             case 'grade':
1677                 $stredit = $streditgrade;
1678                 if (empty($object->id)) {
1679                     $url = new moodle_url('/grade/edit/tree/grade.php',
1680                             array('courseid' => $this->courseid, 'itemid' => $object->itemid, 'userid' => $object->userid));
1681                 } else {
1682                     $url = new moodle_url('/grade/edit/tree/grade.php',
1683                             array('courseid' => $this->courseid, 'id' => $object->id));
1684                 }
1685                 if (!empty($object->feedback)) {
1686                     $feedback = addslashes_js(trim(format_string($object->feedback, $object->feedbackformat)));
1687                 }
1688                 break;
1690             default:
1691                 $url = null;
1692         }
1694         if ($url) {
1695             if ($returnactionmenulink) {
1696                 return new action_menu_link_secondary($gpr->add_url_params($url),
1697                     new pix_icon('t/edit', $stredit),
1698                     get_string('editsettings'));
1699             } else {
1700                 return $OUTPUT->action_icon($gpr->add_url_params($url), new pix_icon('t/edit', $stredit));
1701             }
1703         } else {
1704             return $returnactionmenulink ? null : '';
1705         }
1706     }
1708     /**
1709      * Return hiding icon for give element
1710      *
1711      * @param array  $element An array representing an element in the grade_tree
1712      * @param object $gpr A grade_plugin_return object
1713      * @param bool $returnactionmenulink return the instance of action_menu_link instead of string
1714      * @return string|action_menu_link
1715      */
1716     public function get_hiding_icon($element, $gpr, $returnactionmenulink = false) {
1717         global $CFG, $OUTPUT;
1719         if (!$element['object']->can_control_visibility()) {
1720             return $returnactionmenulink ? null : '';
1721         }
1723         if (!has_capability('moodle/grade:manage', $this->context) and
1724             !has_capability('moodle/grade:hide', $this->context)) {
1725             return $returnactionmenulink ? null : '';
1726         }
1728         $strparams = $this->get_params_for_iconstr($element);
1729         $strshow = get_string('showverbose', 'grades', $strparams);
1730         $strhide = get_string('hideverbose', 'grades', $strparams);
1732         $url = new moodle_url('/grade/edit/tree/action.php', array('id' => $this->courseid, 'sesskey' => sesskey(), 'eid' => $element['eid']));
1733         $url = $gpr->add_url_params($url);
1735         if ($element['object']->is_hidden()) {
1736             $type = 'show';
1737             $tooltip = $strshow;
1739             // Change the icon and add a tooltip showing the date
1740             if ($element['type'] != 'category' and $element['object']->get_hidden() > 1) {
1741                 $type = 'hiddenuntil';
1742                 $tooltip = get_string('hiddenuntildate', 'grades',
1743                         userdate($element['object']->get_hidden()));
1744             }
1746             $url->param('action', 'show');
1748             if ($returnactionmenulink) {
1749                 $hideicon = new action_menu_link_secondary($url, new pix_icon('t/'.$type, $tooltip), get_string('show'));
1750             } else {
1751                 $hideicon = $OUTPUT->action_icon($url, new pix_icon('t/'.$type, $tooltip, 'moodle', array('alt'=>$strshow, 'class'=>'smallicon')));
1752             }
1754         } else {
1755             $url->param('action', 'hide');
1756             if ($returnactionmenulink) {
1757                 $hideicon = new action_menu_link_secondary($url, new pix_icon('t/hide', $strhide), get_string('hide'));
1758             } else {
1759                 $hideicon = $OUTPUT->action_icon($url, new pix_icon('t/hide', $strhide));
1760             }
1761         }
1763         return $hideicon;
1764     }
1766     /**
1767      * Return locking icon for given element
1768      *
1769      * @param array  $element An array representing an element in the grade_tree
1770      * @param object $gpr A grade_plugin_return object
1771      *
1772      * @return string
1773      */
1774     public function get_locking_icon($element, $gpr) {
1775         global $CFG, $OUTPUT;
1777         $strparams = $this->get_params_for_iconstr($element);
1778         $strunlock = get_string('unlockverbose', 'grades', $strparams);
1779         $strlock = get_string('lockverbose', 'grades', $strparams);
1781         $url = new moodle_url('/grade/edit/tree/action.php', array('id' => $this->courseid, 'sesskey' => sesskey(), 'eid' => $element['eid']));
1782         $url = $gpr->add_url_params($url);
1784         // Don't allow an unlocking action for a grade whose grade item is locked: just print a state icon
1785         if ($element['type'] == 'grade' && $element['object']->grade_item->is_locked()) {
1786             $strparamobj = new stdClass();
1787             $strparamobj->itemname = $element['object']->grade_item->itemname;
1788             $strnonunlockable = get_string('nonunlockableverbose', 'grades', $strparamobj);
1790             $action = html_writer::tag('span', $OUTPUT->pix_icon('t/locked', $strnonunlockable),
1791                     array('class' => 'action-icon'));
1793         } else if ($element['object']->is_locked()) {
1794             $type = 'unlock';
1795             $tooltip = $strunlock;
1797             // Change the icon and add a tooltip showing the date
1798             if ($element['type'] != 'category' and $element['object']->get_locktime() > 1) {
1799                 $type = 'locktime';
1800                 $tooltip = get_string('locktimedate', 'grades',
1801                         userdate($element['object']->get_locktime()));
1802             }
1804             if (!has_capability('moodle/grade:manage', $this->context) and !has_capability('moodle/grade:unlock', $this->context)) {
1805                 $action = '';
1806             } else {
1807                 $url->param('action', 'unlock');
1808                 $action = $OUTPUT->action_icon($url, new pix_icon('t/'.$type, $tooltip, 'moodle', array('alt'=>$strunlock, 'class'=>'smallicon')));
1809             }
1811         } else {
1812             if (!has_capability('moodle/grade:manage', $this->context) and !has_capability('moodle/grade:lock', $this->context)) {
1813                 $action = '';
1814             } else {
1815                 $url->param('action', 'lock');
1816                 $action = $OUTPUT->action_icon($url, new pix_icon('t/lock', $strlock));
1817             }
1818         }
1820         return $action;
1821     }
1823     /**
1824      * Return calculation icon for given element
1825      *
1826      * @param array  $element An array representing an element in the grade_tree
1827      * @param object $gpr A grade_plugin_return object
1828      * @param bool $returnactionmenulink return the instance of action_menu_link instead of string
1829      * @return string|action_menu_link
1830      */
1831     public function get_calculation_icon($element, $gpr, $returnactionmenulink = false) {
1832         global $CFG, $OUTPUT;
1833         if (!has_capability('moodle/grade:manage', $this->context)) {
1834             return $returnactionmenulink ? null : '';
1835         }
1837         $type   = $element['type'];
1838         $object = $element['object'];
1840         if ($type == 'item' or $type == 'courseitem' or $type == 'categoryitem') {
1841             $strparams = $this->get_params_for_iconstr($element);
1842             $streditcalculation = get_string('editcalculationverbose', 'grades', $strparams);
1844             $is_scale = $object->gradetype == GRADE_TYPE_SCALE;
1845             $is_value = $object->gradetype == GRADE_TYPE_VALUE;
1847             // show calculation icon only when calculation possible
1848             if (!$object->is_external_item() and ($is_scale or $is_value)) {
1849                 if ($object->is_calculated()) {
1850                     $icon = 't/calc';
1851                 } else {
1852                     $icon = 't/calc_off';
1853                 }
1855                 $url = new moodle_url('/grade/edit/tree/calculation.php', array('courseid' => $this->courseid, 'id' => $object->id));
1856                 $url = $gpr->add_url_params($url);
1857                 if ($returnactionmenulink) {
1858                     return new action_menu_link_secondary($url,
1859                         new pix_icon($icon, $streditcalculation),
1860                         get_string('editcalculation', 'grades'));
1861                 } else {
1862                     return $OUTPUT->action_icon($url, new pix_icon($icon, $streditcalculation));
1863                 }
1864             }
1865         }
1867         return $returnactionmenulink ? null : '';
1868     }
1871 /**
1872  * Flat structure similar to grade tree.
1873  *
1874  * @uses grade_structure
1875  * @package core_grades
1876  * @copyright 2009 Nicolas Connault
1877  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
1878  */
1879 class grade_seq extends grade_structure {
1881     /**
1882      * 1D array of elements
1883      */
1884     public $elements;
1886     /**
1887      * Constructor, retrieves and stores array of all grade_category and grade_item
1888      * objects for the given courseid. Full objects are instantiated. Ordering sequence is fixed if needed.
1889      *
1890      * @param int  $courseid The course id
1891      * @param bool $category_grade_last category grade item is the last child
1892      * @param bool $nooutcomes Whether or not outcomes should be included
1893      */
1894     public function grade_seq($courseid, $category_grade_last=false, $nooutcomes=false) {
1895         global $USER, $CFG;
1897         $this->courseid   = $courseid;
1898         $this->context    = context_course::instance($courseid);
1900         // get course grade tree
1901         $top_element = grade_category::fetch_course_tree($courseid, true);
1903         $this->elements = grade_seq::flatten($top_element, $category_grade_last, $nooutcomes);
1905         foreach ($this->elements as $key=>$unused) {
1906             $this->items[$this->elements[$key]['object']->id] =& $this->elements[$key]['object'];
1907         }
1908     }
1910     /**
1911      * Static recursive helper - makes the grade_item for category the last children
1912      *
1913      * @param array &$element The seed of the recursion
1914      * @param bool $category_grade_last category grade item is the last child
1915      * @param bool $nooutcomes Whether or not outcomes should be included
1916      *
1917      * @return array
1918      */
1919     public function flatten(&$element, $category_grade_last, $nooutcomes) {
1920         if (empty($element['children'])) {
1921             return array();
1922         }
1923         $children = array();
1925         foreach ($element['children'] as $sortorder=>$unused) {
1926             if ($nooutcomes and $element['type'] != 'category' and
1927                 $element['children'][$sortorder]['object']->is_outcome_item()) {
1928                 continue;
1929             }
1930             $children[] = $element['children'][$sortorder];
1931         }
1932         unset($element['children']);
1934         if ($category_grade_last and count($children) > 1) {
1935             $cat_item = array_shift($children);
1936             array_push($children, $cat_item);
1937         }
1939         $result = array();
1940         foreach ($children as $child) {
1941             if ($child['type'] == 'category') {
1942                 $result = $result + grade_seq::flatten($child, $category_grade_last, $nooutcomes);
1943             } else {
1944                 $child['eid'] = 'i'.$child['object']->id;
1945                 $result[$child['object']->id] = $child;
1946             }
1947         }
1949         return $result;
1950     }
1952     /**
1953      * Parses the array in search of a given eid and returns a element object with
1954      * information about the element it has found.
1955      *
1956      * @param int $eid Gradetree Element ID
1957      *
1958      * @return object element
1959      */
1960     public function locate_element($eid) {
1961         // it is a grade - construct a new object
1962         if (strpos($eid, 'n') === 0) {
1963             if (!preg_match('/n(\d+)u(\d+)/', $eid, $matches)) {
1964                 return null;
1965             }
1967             $itemid = $matches[1];
1968             $userid = $matches[2];
1970             //extra security check - the grade item must be in this tree
1971             if (!$item_el = $this->locate_element('ig'.$itemid)) {
1972                 return null;
1973             }
1975             // $gradea->id may be null - means does not exist yet
1976             $grade = new grade_grade(array('itemid'=>$itemid, 'userid'=>$userid));
1978             $grade->grade_item =& $item_el['object']; // this may speedup grade_grade methods!
1979             return array('eid'=>'n'.$itemid.'u'.$userid,'object'=>$grade, 'type'=>'grade');
1981         } else if (strpos($eid, 'g') === 0) {
1982             $id = (int) substr($eid, 1);
1983             if (!$grade = grade_grade::fetch(array('id'=>$id))) {
1984                 return null;
1985             }
1986             //extra security check - the grade item must be in this tree
1987             if (!$item_el = $this->locate_element('ig'.$grade->itemid)) {
1988                 return null;
1989             }
1990             $grade->grade_item =& $item_el['object']; // this may speedup grade_grade methods!
1991             return array('eid'=>'g'.$id,'object'=>$grade, 'type'=>'grade');
1992         }
1994         // it is a category or item
1995         foreach ($this->elements as $element) {
1996             if ($element['eid'] == $eid) {
1997                 return $element;
1998             }
1999         }
2001         return null;
2002     }
2005 /**
2006  * This class represents a complete tree of categories, grade_items and final grades,
2007  * organises as an array primarily, but which can also be converted to other formats.
2008  * It has simple method calls with complex implementations, allowing for easy insertion,
2009  * deletion and moving of items and categories within the tree.
2010  *
2011  * @uses grade_structure
2012  * @package core_grades
2013  * @copyright 2009 Nicolas Connault
2014  * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
2015  */
2016 class grade_tree extends grade_structure {
2018     /**
2019      * The basic representation of the tree as a hierarchical, 3-tiered array.
2020      * @var object $top_element
2021      */
2022     public $top_element;
2024     /**
2025      * 2D array of grade items and categories
2026      * @var array $levels
2027      */
2028     public $levels;
2030     /**
2031      * Grade items
2032      * @var array $items
2033      */
2034     public $items;
2036     /**
2037      * Constructor, retrieves and stores a hierarchical array of all grade_category and grade_item
2038      * objects for the given courseid. Full objects are instantiated. Ordering sequence is fixed if needed.
2039      *
2040      * @param int   $courseid The Course ID
2041      * @param bool  $fillers include fillers and colspans, make the levels var "rectangular"
2042      * @param bool  $category_grade_last category grade item is the last child
2043      * @param array $collapsed array of collapsed categories
2044      * @param bool  $nooutcomes Whether or not outcomes should be included
2045      */
2046     public function grade_tree($courseid, $fillers=true, $category_grade_last=false,
2047                                $collapsed=null, $nooutcomes=false) {
2048         global $USER, $CFG, $COURSE, $DB;
2050         $this->courseid   = $courseid;
2051         $this->levels     = array();
2052         $this->context    = context_course::instance($courseid);
2054         if (!empty($COURSE->id) && $COURSE->id == $this->courseid) {
2055             $course = $COURSE;
2056         } else {
2057             $course = $DB->get_record('course', array('id' => $this->courseid));
2058         }
2059         $this->modinfo = get_fast_modinfo($course);
2061         // get course grade tree
2062         $this->top_element = grade_category::fetch_course_tree($courseid, true);
2064         // collapse the categories if requested
2065         if (!empty($collapsed)) {
2066             grade_tree::category_collapse($this->top_element, $collapsed);
2067         }
2069         // no otucomes if requested
2070         if (!empty($nooutcomes)) {
2071             grade_tree::no_outcomes($this->top_element);
2072         }
2074         // move category item to last position in category
2075         if ($category_grade_last) {
2076             grade_tree::category_grade_last($this->top_element);
2077         }
2079         if ($fillers) {
2080             // inject fake categories == fillers
2081             grade_tree::inject_fillers($this->top_element, 0);
2082             // add colspans to categories and fillers
2083             grade_tree::inject_colspans($this->top_element);
2084         }
2086         grade_tree::fill_levels($this->levels, $this->top_element, 0);
2088     }
2090     /**
2091      * Static recursive helper - removes items from collapsed categories
2092      *
2093      * @param array &$element The seed of the recursion
2094      * @param array $collapsed array of collapsed categories
2095      *
2096      * @return void
2097      */
2098     public function category_collapse(&$element, $collapsed) {
2099         if ($element['type'] != 'category') {
2100             return;
2101         }
2102         if (empty($element['children']) or count($element['children']) < 2) {
2103             return;
2104         }
2106         if (in_array($element['object']->id, $collapsed['aggregatesonly'])) {
2107             $category_item = reset($element['children']); //keep only category item
2108             $element['children'] = array(key($element['children'])=>$category_item);
2110         } else {
2111             if (in_array($element['object']->id, $collapsed['gradesonly'])) { // Remove category item
2112                 reset($element['children']);
2113                 $first_key = key($element['children']);
2114                 unset($element['children'][$first_key]);
2115             }
2116             foreach ($element['children'] as $sortorder=>$child) { // Recurse through the element's children
2117                 grade_tree::category_collapse($element['children'][$sortorder], $collapsed);
2118             }
2119         }
2120     }
2122     /**
2123      * Static recursive helper - removes all outcomes
2124      *
2125      * @param array &$element The seed of the recursion
2126      *
2127      * @return void
2128      */
2129     public function no_outcomes(&$element) {
2130         if ($element['type'] != 'category') {
2131             return;
2132         }
2133         foreach ($element['children'] as $sortorder=>$child) {
2134             if ($element['children'][$sortorder]['type'] == 'item'
2135               and $element['children'][$sortorder]['object']->is_outcome_item()) {
2136                 unset($element['children'][$sortorder]);
2138             } else if ($element['children'][$sortorder]['type'] == 'category') {
2139                 grade_tree::no_outcomes($element['children'][$sortorder]);
2140             }
2141         }
2142     }
2144     /**
2145      * Static recursive helper - makes the grade_item for category the last children
2146      *
2147      * @param array &$element The seed of the recursion
2148      *
2149      * @return void
2150      */
2151     public function category_grade_last(&$element) {
2152         if (empty($element['children'])) {
2153             return;
2154         }
2155         if (count($element['children']) < 2) {
2156             return;
2157         }
2158         $first_item = reset($element['children']);
2159         if ($first_item['type'] == 'categoryitem' or $first_item['type'] == 'courseitem') {
2160             // the category item might have been already removed
2161             $order = key($element['children']);
2162             unset($element['children'][$order]);
2163             $element['children'][$order] =& $first_item;
2164         }
2165         foreach ($element['children'] as $sortorder => $child) {
2166             grade_tree::category_grade_last($element['children'][$sortorder]);
2167         }
2168     }
2170     /**
2171      * Static recursive helper - fills the levels array, useful when accessing tree elements of one level
2172      *
2173      * @param array &$levels The levels of the grade tree through which to recurse
2174      * @param array &$element The seed of the recursion
2175      * @param int   $depth How deep are we?
2176      * @return void
2177      */
2178     public function fill_levels(&$levels, &$element, $depth) {
2179         if (!array_key_exists($depth, $levels)) {
2180             $levels[$depth] = array();
2181         }
2183         // prepare unique identifier
2184         if ($element['type'] == 'category') {
2185             $element['eid'] = 'cg'.$element['object']->id;
2186         } else if (in_array($element['type'], array('item', 'courseitem', 'categoryitem'))) {
2187             $element['eid'] = 'ig'.$element['object']->id;
2188             $this->items[$element['object']->id] =& $element['object'];
2189         }
2191         $levels[$depth][] =& $element;
2192         $depth++;
2193         if (empty($element['children'])) {
2194             return;
2195         }
2196         $prev = 0;
2197         foreach ($element['children'] as $sortorder=>$child) {
2198             grade_tree::fill_levels($levels, $element['children'][$sortorder], $depth);
2199             $element['children'][$sortorder]['prev'] = $prev;
2200             $element['children'][$sortorder]['next'] = 0;
2201             if ($prev) {
2202                 $element['children'][$prev]['next'] = $sortorder;
2203             }
2204             $prev = $sortorder;
2205         }
2206     }
2208     /**
2209      * Static recursive helper - makes full tree (all leafes are at the same level)
2210      *
2211      * @param array &$element The seed of the recursion
2212      * @param int   $depth How deep are we?
2213      *
2214      * @return int
2215      */
2216     public function inject_fillers(&$element, $depth) {
2217         $depth++;
2219         if (empty($element['children'])) {
2220             return $depth;
2221         }
2222         $chdepths = array();
2223         $chids = array_keys($element['children']);
2224         $last_child  = end($chids);
2225         $first_child = reset($chids);
2227         foreach ($chids as $chid) {
2228             $chdepths[$chid] = grade_tree::inject_fillers($element['children'][$chid], $depth);
2229         }
2230         arsort($chdepths);
2232         $maxdepth = reset($chdepths);
2233         foreach ($chdepths as $chid=>$chd) {
2234             if ($chd == $maxdepth) {
2235                 continue;
2236             }
2237             for ($i=0; $i < $maxdepth-$chd; $i++) {
2238                 if ($chid == $first_child) {
2239                     $type = 'fillerfirst';
2240                 } else if ($chid == $last_child) {
2241                     $type = 'fillerlast';
2242                 } else {
2243                     $type = 'filler';
2244                 }
2245                 $oldchild =& $element['children'][$chid];
2246                 $element['children'][$chid] = array('object'=>'filler', 'type'=>$type,
2247                                                     'eid'=>'', 'depth'=>$element['object']->depth,
2248                                                     'children'=>array($oldchild));
2249             }
2250         }
2252         return $maxdepth;
2253     }
2255     /**
2256      * Static recursive helper - add colspan information into categories
2257      *
2258      * @param array &$element The seed of the recursion
2259      *
2260      * @return int
2261      */
2262     public function inject_colspans(&$element) {
2263         if (empty($element['children'])) {
2264             return 1;
2265         }
2266         $count = 0;
2267         foreach ($element['children'] as $key=>$child) {
2268             $count += grade_tree::inject_colspans($element['children'][$key]);
2269         }
2270         $element['colspan'] = $count;
2271         return $count;
2272     }
2274     /**
2275      * Parses the array in search of a given eid and returns a element object with
2276      * information about the element it has found.
2277      * @param int $eid Gradetree Element ID
2278      * @return object element
2279      */
2280     public function locate_element($eid) {
2281         // it is a grade - construct a new object
2282         if (strpos($eid, 'n') === 0) {
2283             if (!preg_match('/n(\d+)u(\d+)/', $eid, $matches)) {
2284                 return null;
2285             }
2287             $itemid = $matches[1];
2288             $userid = $matches[2];
2290             //extra security check - the grade item must be in this tree
2291             if (!$item_el = $this->locate_element('ig'.$itemid)) {
2292                 return null;
2293             }
2295             // $gradea->id may be null - means does not exist yet
2296             $grade = new grade_grade(array('itemid'=>$itemid, 'userid'=>$userid));
2298             $grade->grade_item =& $item_el['object']; // this may speedup grade_grade methods!
2299             return array('eid'=>'n'.$itemid.'u'.$userid,'object'=>$grade, 'type'=>'grade');
2301         } else if (strpos($eid, 'g') === 0) {
2302             $id = (int) substr($eid, 1);
2303             if (!$grade = grade_grade::fetch(array('id'=>$id))) {
2304                 return null;
2305             }
2306             //extra security check - the grade item must be in this tree
2307             if (!$item_el = $this->locate_element('ig'.$grade->itemid)) {
2308                 return null;
2309             }
2310             $grade->grade_item =& $item_el['object']; // this may speedup grade_grade methods!
2311             return array('eid'=>'g'.$id,'object'=>$grade, 'type'=>'grade');
2312         }
2314         // it is a category or item
2315         foreach ($this->levels as $row) {
2316             foreach ($row as $element) {
2317                 if ($element['type'] == 'filler') {
2318                     continue;
2319                 }
2320                 if ($element['eid'] == $eid) {
2321                     return $element;
2322                 }
2323             }
2324         }
2326         return null;
2327     }
2329     /**
2330      * Returns a well-formed XML representation of the grade-tree using recursion.
2331      *
2332      * @param array  $root The current element in the recursion. If null, starts at the top of the tree.
2333      * @param string $tabs The control character to use for tabs
2334      *
2335      * @return string $xml
2336      */
2337     public function exporttoxml($root=null, $tabs="\t") {
2338         $xml = null;
2339         $first = false;
2340         if (is_null($root)) {
2341             $root = $this->top_element;
2342             $xml = '<?xml version="1.0" encoding="UTF-8" ?>' . "\n";
2343             $xml .= "<gradetree>\n";
2344             $first = true;
2345         }
2347         $type = 'undefined';
2348         if (strpos($root['object']->table, 'grade_categories') !== false) {
2349             $type = 'category';
2350         } else if (strpos($root['object']->table, 'grade_items') !== false) {
2351             $type = 'item';
2352         } else if (strpos($root['object']->table, 'grade_outcomes') !== false) {
2353             $type = 'outcome';
2354         }
2356         $xml .= "$tabs<element type=\"$type\">\n";
2357         foreach ($root['object'] as $var => $value) {
2358             if (!is_object($value) && !is_array($value) && !empty($value)) {
2359                 $xml .= "$tabs\t<$var>$value</$var>\n";
2360             }
2361         }
2363         if (!empty($root['children'])) {
2364             $xml .= "$tabs\t<children>\n";
2365             foreach ($root['children'] as $sortorder => $child) {
2366                 $xml .= $this->exportToXML($child, $tabs."\t\t");
2367             }
2368             $xml .= "$tabs\t</children>\n";
2369         }
2371         $xml .= "$tabs</element>\n";
2373         if ($first) {
2374             $xml .= "</gradetree>";
2375         }
2377         return $xml;
2378     }
2380     /**
2381      * Returns a JSON representation of the grade-tree using recursion.
2382      *
2383      * @param array $root The current element in the recursion. If null, starts at the top of the tree.
2384      * @param string $tabs Tab characters used to indent the string nicely for humans to enjoy
2385      *
2386      * @return string
2387      */
2388     public function exporttojson($root=null, $tabs="\t") {
2389         $json = null;
2390         $first = false;
2391         if (is_null($root)) {
2392             $root = $this->top_element;
2393             $first = true;
2394         }
2396         $name = '';
2399         if (strpos($root['object']->table, 'grade_categories') !== false) {
2400             $name = $root['object']->fullname;
2401             if ($name == '?') {
2402                 $name = $root['object']->get_name();
2403             }
2404         } else if (strpos($root['object']->table, 'grade_items') !== false) {
2405             $name = $root['object']->itemname;
2406         } else if (strpos($root['object']->table, 'grade_outcomes') !== false) {
2407             $name = $root['object']->itemname;
2408         }
2410         $json .= "$tabs {\n";
2411         $json .= "$tabs\t \"type\": \"{$root['type']}\",\n";
2412         $json .= "$tabs\t \"name\": \"$name\",\n";
2414         foreach ($root['object'] as $var => $value) {
2415             if (!is_object($value) && !is_array($value) && !empty($value)) {
2416                 $json .= "$tabs\t \"$var\": \"$value\",\n";
2417             }
2418         }
2420         $json = substr($json, 0, strrpos($json, ','));
2422         if (!empty($root['children'])) {
2423             $json .= ",\n$tabs\t\"children\": [\n";
2424             foreach ($root['children'] as $sortorder => $child) {
2425                 $json .= $this->exportToJSON($child, $tabs."\t\t");
2426             }
2427             $json = substr($json, 0, strrpos($json, ','));
2428             $json .= "\n$tabs\t]\n";
2429         }
2431         if ($first) {
2432             $json .= "\n}";
2433         } else {
2434             $json .= "\n$tabs},\n";
2435         }
2437         return $json;
2438     }
2440     /**
2441      * Returns the array of levels
2442      *
2443      * @return array
2444      */
2445     public function get_levels() {
2446         return $this->levels;
2447     }
2449     /**
2450      * Returns the array of grade items
2451      *
2452      * @return array
2453      */
2454     public function get_items() {
2455         return $this->items;
2456     }
2458     /**
2459      * Returns a specific Grade Item
2460      *
2461      * @param int $itemid The ID of the grade_item object
2462      *
2463      * @return grade_item
2464      */
2465     public function get_item($itemid) {
2466         if (array_key_exists($itemid, $this->items)) {
2467             return $this->items[$itemid];
2468         } else {
2469             return false;
2470         }
2471     }
2474 /**
2475  * Local shortcut function for creating an edit/delete button for a grade_* object.
2476  * @param string $type 'edit' or 'delete'
2477  * @param int $courseid The Course ID
2478  * @param grade_* $object The grade_* object
2479  * @return string html
2480  */
2481 function grade_button($type, $courseid, $object) {
2482     global $CFG, $OUTPUT;
2483     if (preg_match('/grade_(.*)/', get_class($object), $matches)) {
2484         $objectidstring = $matches[1] . 'id';
2485     } else {
2486         throw new coding_exception('grade_button() only accepts grade_* objects as third parameter!');
2487     }
2489     $strdelete = get_string('delete');
2490     $stredit   = get_string('edit');
2492     if ($type == 'delete') {
2493         $url = new moodle_url('index.php', array('id' => $courseid, $objectidstring => $object->id, 'action' => 'delete', 'sesskey' => sesskey()));
2494     } else if ($type == 'edit') {
2495         $url = new moodle_url('edit.php', array('courseid' => $courseid, 'id' => $object->id));
2496     }
2498     return $OUTPUT->action_icon($url, new pix_icon('t/'.$type, ${'str'.$type}, '', array('class' => 'iconsmall')));
2502 /**
2503  * This method adds settings to the settings block for the grade system and its
2504  * plugins
2505  *
2506  * @global moodle_page $PAGE
2507  */
2508 function grade_extend_settings($plugininfo, $courseid) {
2509     global $PAGE;
2511     $gradenode = $PAGE->settingsnav->prepend(get_string('gradeadministration', 'grades'), null, navigation_node::TYPE_CONTAINER);
2513     $strings = array_shift($plugininfo);
2515     if ($reports = grade_helper::get_plugins_reports($courseid)) {
2516         foreach ($reports as $report) {
2517             $gradenode->add($report->string, $report->link, navigation_node::TYPE_SETTING, null, $report->id, new pix_icon('i/report', ''));
2518         }
2519     }
2521     if ($settings = grade_helper::get_info_manage_settings($courseid)) {
2522         $settingsnode = $gradenode->add($strings['settings'], null, navigation_node::TYPE_CONTAINER);
2523         foreach ($settings as $setting) {
2524             $settingsnode->add($setting->string, $setting->link, navigation_node::TYPE_SETTING, null, $setting->id, new pix_icon('i/settings', ''));
2525         }
2526     }
2528     if ($imports = grade_helper::get_plugins_import($courseid)) {
2529         $importnode = $gradenode->add($strings['import'], null, navigation_node::TYPE_CONTAINER);
2530         foreach ($imports as $import) {
2531             $importnode->add($import->string, $import->link, navigation_node::TYPE_SETTING, null, $import->id, new pix_icon('i/import', ''));
2532         }
2533     }
2535     if ($exports = grade_helper::get_plugins_export($courseid)) {
2536         $exportnode = $gradenode->add($strings['export'], null, navigation_node::TYPE_CONTAINER);
2537         foreach ($exports as $export) {
2538             $exportnode->add($export->string, $export->link, navigation_node::TYPE_SETTING, null, $export->id, new pix_icon('i/export', ''));
2539         }
2540     }
2542     if ($letters = grade_helper::get_info_letters($courseid)) {
2543         $letters = array_shift($letters);
2544         $gradenode->add($strings['letter'], $letters->link, navigation_node::TYPE_SETTING, null, $letters->id, new pix_icon('i/settings', ''));
2545     }
2547     if ($outcomes = grade_helper::get_info_outcomes($courseid)) {
2548         $outcomes = array_shift($outcomes);
2549         $gradenode->add($strings['outcome'], $outcomes->link, navigation_node::TYPE_SETTING, null, $outcomes->id, new pix_icon('i/outcomes', ''));
2550     }
2552     if ($scales = grade_helper::get_info_scales($courseid)) {
2553         $gradenode->add($strings['scale'], $scales->link, navigation_node::TYPE_SETTING, null, $scales->id, new pix_icon('i/scales', ''));
2554     }
2556     if ($gradenode->contains_active_node()) {
2557         // If the gradenode is active include the settings base node (gradeadministration) in
2558         // the navbar, typcially this is ignored.
2559         $PAGE->navbar->includesettingsbase = true;
2561         // If we can get the course admin node make sure it is closed by default
2562         // as in this case the gradenode will be opened
2563         if ($coursenode = $PAGE->settingsnav->get('courseadmin', navigation_node::TYPE_COURSE)){
2564             $coursenode->make_inactive();
2565             $coursenode->forceopen = false;
2566         }
2567     }
2570 /**
2571  * Grade helper class
2572  *
2573  * This class provides several helpful functions that work irrespective of any
2574  * current state.
2575  *
2576  * @copyright 2010 Sam Hemelryk
2577  * @license   http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
2578  */
2579 abstract class grade_helper {
2580     /**
2581      * Cached manage settings info {@see get_info_settings}
2582      * @var grade_plugin_info|false
2583      */
2584     protected static $managesetting = null;
2585     /**
2586      * Cached grade report plugins {@see get_plugins_reports}
2587      * @var array|false
2588      */
2589     protected static $gradereports = null;
2590     /**
2591      * Cached grade report plugins preferences {@see get_info_scales}
2592      * @var array|false
2593      */
2594     protected static $gradereportpreferences = null;
2595     /**
2596      * Cached scale info {@see get_info_scales}
2597      * @var grade_plugin_info|false
2598      */
2599     protected static $scaleinfo = null;
2600     /**
2601      * Cached outcome info {@see get_info_outcomes}
2602      * @var grade_plugin_info|false
2603      */
2604     protected static $outcomeinfo = null;
2605     /**
2606      * Cached leftter info {@see get_info_letters}
2607      * @var grade_plugin_info|false
2608      */
2609     protected static $letterinfo = null;
2610     /**
2611      * Cached grade import plugins {@see get_plugins_import}
2612      * @var array|false
2613      */
2614     protected static $importplugins = null;
2615     /**
2616      * Cached grade export plugins {@see get_plugins_export}
2617      * @var array|false
2618      */
2619     protected static $exportplugins = null;
2620     /**
2621      * Cached grade plugin strings
2622      * @var array
2623      */
2624     protected static $pluginstrings = null;
2625     /**
2626      * Cached grade aggregation strings
2627      * @var array
2628      */
2629     protected static $aggregationstrings = null;
2631     /**
2632      * Gets strings commonly used by the describe plugins
2633      *
2634      * report => get_string('view'),
2635      * scale => get_string('scales'),
2636      * outcome => get_string('outcomes', 'grades'),
2637      * letter => get_string('letters', 'grades'),
2638      * export => get_string('export', 'grades'),
2639      * import => get_string('import'),
2640      * preferences => get_string('mypreferences', 'grades'),
2641      * settings => get_string('settings')
2642      *
2643      * @return array
2644      */
2645     public static function get_plugin_strings() {
2646         if (self::$pluginstrings === null) {
2647             self::$pluginstrings = array(
2648                 'report' => get_string('view'),
2649                 'scale' => get_string('scales'),
2650                 'outcome' => get_string('outcomes', 'grades'),
2651                 'letter' => get_string('letters', 'grades'),
2652                 'export' => get_string('export', 'grades'),
2653                 'import' => get_string('import'),
2654                 'settings' => get_string('edittree', 'grades')
2655             );
2656         }
2657         return self::$pluginstrings;
2658     }
2660     /**
2661      * Gets strings describing the available aggregation methods.
2662      *
2663      * @return array
2664      */
2665     public static function get_aggregation_strings() {
2666         if (self::$aggregationstrings === null) {
2667             self::$aggregationstrings = array(
2668                 GRADE_AGGREGATE_MEAN             => get_string('aggregatemean', 'grades'),
2669                 GRADE_AGGREGATE_WEIGHTED_MEAN    => get_string('aggregateweightedmean', 'grades'),
2670                 GRADE_AGGREGATE_WEIGHTED_MEAN2   => get_string('aggregateweightedmean2', 'grades'),
2671                 GRADE_AGGREGATE_EXTRACREDIT_MEAN => get_string('aggregateextracreditmean', 'grades'),
2672                 GRADE_AGGREGATE_MEDIAN           => get_string('aggregatemedian', 'grades'),
2673                 GRADE_AGGREGATE_MIN              => get_string('aggregatemin', 'grades'),
2674                 GRADE_AGGREGATE_MAX              => get_string('aggregatemax', 'grades'),
2675                 GRADE_AGGREGATE_MODE             => get_string('aggregatemode', 'grades'),
2676                 GRADE_AGGREGATE_SUM              => get_string('aggregatesum', 'grades')
2677             );
2678         }
2679         return self::$aggregationstrings;
2680     }
2682     /**
2683      * Get grade_plugin_info object for managing settings if the user can
2684      *
2685      * @param int $courseid
2686      * @return grade_plugin_info[]
2687      */
2688     public static function get_info_manage_settings($courseid) {
2689         if (self::$managesetting !== null) {
2690             return self::$managesetting;
2691         }
2692         $context = context_course::instance($courseid);
2693         self::$managesetting = array();
2694         if ($courseid != SITEID && has_capability('moodle/grade:manage', $context)) {
2695             self::$managesetting['categoriesanditems'] = new grade_plugin_info('setup',
2696                 new moodle_url('/grade/edit/tree/index.php', array('id' => $courseid)),
2697                 get_string('categoriesanditems', 'grades'));
2698             self::$managesetting['coursesettings'] = new grade_plugin_info('coursesettings',
2699                 new moodle_url('/grade/edit/settings/index.php', array('id'=>$courseid)),
2700                 get_string('coursegradesettings', 'grades'));
2701         }
2702         if (self::$gradereportpreferences === null) {
2703             self::get_plugins_reports($courseid);
2704         }
2705         if (self::$gradereportpreferences) {
2706             self::$managesetting = array_merge(self::$managesetting, self::$gradereportpreferences);
2707         }
2708         return self::$managesetting;
2709     }
2710     /**
2711      * Returns an array of plugin reports as grade_plugin_info objects
2712      *
2713      * @param int $courseid
2714      * @return array
2715      */
2716     public static function get_plugins_reports($courseid) {
2717         global $SITE;
2719         if (self::$gradereports !== null) {
2720             return self::$gradereports;
2721         }
2722         $context = context_course::instance($courseid);
2723         $gradereports = array();
2724         $gradepreferences = array();
2725         foreach (core_component::get_plugin_list('gradereport') as $plugin => $plugindir) {
2726             //some reports make no sense if we're not within a course
2727             if ($courseid==$SITE->id && ($plugin=='grader' || $plugin=='user')) {
2728                 continue;
2729             }
2731             // Remove ones we can't see
2732             if (!has_capability('gradereport/'.$plugin.':view', $context)) {
2733                 continue;
2734             }
2736             $pluginstr = get_string('pluginname', 'gradereport_'.$plugin);
2737             $url = new moodle_url('/grade/report/'.$plugin.'/index.php', array('id'=>$courseid));
2738             $gradereports[$plugin] = new grade_plugin_info($plugin, $url, $pluginstr);
2740             // Add link to preferences tab if such a page exists
2741             if (file_exists($plugindir.'/preferences.php')) {
2742                 $url = new moodle_url('/grade/report/'.$plugin.'/preferences.php', array('id'=>$courseid));
2743                 $gradepreferences[$plugin] = new grade_plugin_info($plugin, $url,
2744                     get_string('mypreferences', 'grades') . ': ' . $pluginstr);
2745             }
2746         }
2747         if (count($gradereports) == 0) {
2748             $gradereports = false;
2749             $gradepreferences = false;
2750         } else if (count($gradepreferences) == 0) {
2751             $gradepreferences = false;
2752             asort($gradereports);
2753         } else {
2754             asort($gradereports);
2755             asort($gradepreferences);
2756         }
2757         self::$gradereports = $gradereports;
2758         self::$gradereportpreferences = $gradepreferences;
2759         return self::$gradereports;
2760     }
2762     /**
2763      * Get information on scales
2764      * @param int $courseid
2765      * @return grade_plugin_info
2766      */
2767     public static function get_info_scales($courseid) {
2768         if (self::$scaleinfo !== null) {
2769             return self::$scaleinfo;
2770         }
2771         if (has_capability('moodle/course:managescales', context_course::instance($courseid))) {
2772             $url = new moodle_url('/grade/edit/scale/index.php', array('id'=>$courseid));
2773             self::$scaleinfo = new grade_plugin_info('scale', $url, get_string('view'));
2774         } else {
2775             self::$scaleinfo = false;
2776         }
2777         return self::$scaleinfo;
2778     }
2779     /**
2780      * Get information on outcomes
2781      * @param int $courseid
2782      * @return grade_plugin_info
2783      */
2784     public static function get_info_outcomes($courseid) {
2785         global $CFG, $SITE;
2787         if (self::$outcomeinfo !== null) {
2788             return self::$outcomeinfo;
2789         }
2790         $context = context_course::instance($courseid);
2791         $canmanage = has_capability('moodle/grade:manage', $context);
2792         $canupdate = has_capability('moodle/course:update', $context);
2793         if (!empty($CFG->enableoutcomes) && ($canmanage || $canupdate)) {
2794             $outcomes = array();
2795             if ($canupdate) {
2796                 if ($courseid!=$SITE->id) {
2797                     $url = new moodle_url('/grade/edit/outcome/course.php', array('id'=>$courseid));
2798                     $outcomes['course'] = new grade_plugin_info('course', $url, get_string('outcomescourse', 'grades'));
2799                 }
2800                 $url = new moodle_url('/grade/edit/outcome/index.php', array('id'=>$courseid));
2801                 $outcomes['edit'] = new grade_plugin_info('edit', $url, get_string('editoutcomes', 'grades'));
2802                 $url = new moodle_url('/grade/edit/outcome/import.php', array('courseid'=>$courseid));
2803                 $outcomes['import'] = new grade_plugin_info('import', $url, get_string('importoutcomes', 'grades'));
2804             } else {
2805                 if ($courseid!=$SITE->id) {
2806                     $url = new moodle_url('/grade/edit/outcome/course.php', array('id'=>$courseid));
2807                     $outcomes['edit'] = new grade_plugin_info('edit', $url, get_string('outcomescourse', 'grades'));
2808                 }
2809             }
2810             self::$outcomeinfo = $outcomes;
2811         } else {
2812             self::$outcomeinfo = false;
2813         }
2814         return self::$outcomeinfo;
2815     }
2816     /**
2817      * Get information on letters
2818      * @param int $courseid
2819      * @return array
2820      */
2821     public static function get_info_letters($courseid) {
2822         global $SITE;
2823         if (self::$letterinfo !== null) {
2824             return self::$letterinfo;
2825         }
2826         $context = context_course::instance($courseid);
2827         $canmanage = has_capability('moodle/grade:manage', $context);
2828         $canmanageletters = has_capability('moodle/grade:manageletters', $context);
2829         if ($canmanage || $canmanageletters) {
2830             // Redirect to system context when report is accessed from admin settings MDL-31633
2831             if ($context->instanceid == $SITE->id) {
2832                 $param = array('edit' => 1);
2833             } else {
2834                 $param = array('edit' => 1,'id' => $context->id);
2835             }
2836             self::$letterinfo = array(
2837                 'view' => new grade_plugin_info('view', new moodle_url('/grade/edit/letter/index.php', array('id'=>$context->id)), get_string('view')),
2838                 'edit' => new grade_plugin_info('edit', new moodle_url('/grade/edit/letter/index.php', $param), get_string('edit'))
2839             );
2840         } else {
2841             self::$letterinfo = false;
2842         }
2843         return self::$letterinfo;
2844     }
2845     /**
2846      * Get information import plugins
2847      * @param int $courseid
2848      * @return array
2849      */
2850     public static function get_plugins_import($courseid) {
2851         global $CFG;
2853         if (self::$importplugins !== null) {
2854             return self::$importplugins;
2855         }
2856         $importplugins = array();
2857         $context = context_course::instance($courseid);
2859         if (has_capability('moodle/grade:import', $context)) {
2860             foreach (core_component::get_plugin_list('gradeimport') as $plugin => $plugindir) {
2861                 if (!has_capability('gradeimport/'.$plugin.':view', $context)) {
2862                     continue;
2863                 }
2864                 $pluginstr = get_string('pluginname', 'gradeimport_'.$plugin);
2865                 $url = new moodle_url('/grade/import/'.$plugin.'/index.php', array('id'=>$courseid));
2866                 $importplugins[$plugin] = new grade_plugin_info($plugin, $url, $pluginstr);
2867             }
2869             // Show key manager if grade publishing is enabled and the user has xml publishing capability.
2870             // XML is the only grade import plugin that has publishing feature.
2871             if ($CFG->gradepublishing && has_capability('gradeimport/xml:publish', $context)) {
2872                 $url = new moodle_url('/grade/import/keymanager.php', array('id'=>$courseid));
2873                 $importplugins['keymanager'] = new grade_plugin_info('keymanager', $url, get_string('keymanager', 'grades'));
2874             }
2875         }
2877         if (count($importplugins) > 0) {
2878             asort($importplugins);
2879             self::$importplugins = $importplugins;
2880         } else {
2881             self::$importplugins = false;
2882         }
2883         return self::$importplugins;
2884     }
2885     /**
2886      * Get information export plugins
2887      * @param int $courseid
2888      * @return array
2889      */
2890     public static function get_plugins_export($courseid) {
2891         global $CFG;
2893         if (self::$exportplugins !== null) {
2894             return self::$exportplugins;
2895         }
2896         $context = context_course::instance($courseid);
2897         $exportplugins = array();
2898         $canpublishgrades = 0;
2899         if (has_capability('moodle/grade:export', $context)) {
2900             foreach (core_component::get_plugin_list('gradeexport') as $plugin => $plugindir) {
2901                 if (!has_capability('gradeexport/'.$plugin.':view', $context)) {
2902                     continue;
2903                 }
2904                 // All the grade export plugins has grade publishing capabilities.
2905                 if (has_capability('gradeexport/'.$plugin.':publish', $context)) {
2906                     $canpublishgrades++;
2907                 }
2909                 $pluginstr = get_string('pluginname', 'gradeexport_'.$plugin);
2910                 $url = new moodle_url('/grade/export/'.$plugin.'/index.php', array('id'=>$courseid));
2911                 $exportplugins[$plugin] = new grade_plugin_info($plugin, $url, $pluginstr);
2912             }
2914             // Show key manager if grade publishing is enabled and the user has at least one grade publishing capability.
2915             if ($CFG->gradepublishing && $canpublishgrades != 0) {
2916                 $url = new moodle_url('/grade/export/keymanager.php', array('id'=>$courseid));
2917                 $exportplugins['keymanager'] = new grade_plugin_info('keymanager', $url, get_string('keymanager', 'grades'));
2918             }
2919         }
2920         if (count($exportplugins) > 0) {
2921             asort($exportplugins);
2922             self::$exportplugins = $exportplugins;
2923         } else {
2924             self::$exportplugins = false;
2925         }
2926         return self::$exportplugins;
2927     }
2929     /**
2930      * Returns the value of a field from a user record
2931      *
2932      * @param stdClass $user object
2933      * @param stdClass $field object
2934      * @return string value of the field
2935      */
2936     public static function get_user_field_value($user, $field) {
2937         if (!empty($field->customid)) {
2938             $fieldname = 'customfield_' . $field->shortname;
2939             if (!empty($user->{$fieldname}) || is_numeric($user->{$fieldname})) {
2940                 $fieldvalue = $user->{$fieldname};
2941             } else {
2942                 $fieldvalue = $field->default;
2943             }
2944         } else {
2945             $fieldvalue = $user->{$field->shortname};
2946         }
2947         return $fieldvalue;
2948     }
2950     /**
2951      * Returns an array of user profile fields to be included in export
2952      *
2953      * @param int $courseid
2954      * @param bool $includecustomfields
2955      * @return array An array of stdClass instances with customid, shortname, datatype, default and fullname fields
2956      */
2957     public static function get_user_profile_fields($courseid, $includecustomfields = false) {
2958         global $CFG, $DB;
2960         // Gets the fields that have to be hidden
2961         $hiddenfields = array_map('trim', explode(',', $CFG->hiddenuserfields));
2962         $context = context_course::instance($courseid);
2963         $canseehiddenfields = has_capability('moodle/course:viewhiddenuserfields', $context);
2964         if ($canseehiddenfields) {
2965             $hiddenfields = array();
2966         }
2968         $fields = array();
2969         require_once($CFG->dirroot.'/user/lib.php');                // Loads user_get_default_fields()
2970         require_once($CFG->dirroot.'/user/profile/lib.php');        // Loads constants, such as PROFILE_VISIBLE_ALL
2971         $userdefaultfields = user_get_default_fields();
2973         // Sets the list of profile fields
2974         $userprofilefields = array_map('trim', explode(',', $CFG->grade_export_userprofilefields));
2975         if (!empty($userprofilefields)) {
2976             foreach ($userprofilefields as $field) {
2977                 $field = trim($field);
2978                 if (in_array($field, $hiddenfields) || !in_array($field, $userdefaultfields)) {
2979                     continue;
2980                 }
2981                 $obj = new stdClass();
2982                 $obj->customid  = 0;
2983                 $obj->shortname = $field;
2984                 $obj->fullname  = get_string($field);
2985                 $fields[] = $obj;
2986             }
2987         }
2989         // Sets the list of custom profile fields
2990         $customprofilefields = array_map('trim', explode(',', $CFG->grade_export_customprofilefields));
2991         if ($includecustomfields && !empty($customprofilefields)) {
2992             list($wherefields, $whereparams) = $DB->get_in_or_equal($customprofilefields);
2993             $customfields = $DB->get_records_sql("SELECT f.*
2994                                                     FROM {user_info_field} f
2995                                                     JOIN {user_info_category} c ON f.categoryid=c.id
2996                                                     WHERE f.shortname $wherefields
2997                                                     ORDER BY c.sortorder ASC, f.sortorder ASC", $whereparams);
2998             if (!is_array($customfields)) {
2999                 continue;
3000             }
3002             foreach ($customfields as $field) {
3003                 // Make sure we can display this custom field
3004                 if (!in_array($field->shortname, $customprofilefields)) {
3005                     continue;
3006                 } else if (in_array($field->shortname, $hiddenfields)) {
3007                     continue;
3008                 } else if ($field->visible != PROFILE_VISIBLE_ALL && !$canseehiddenfields) {
3009                     continue;
3010                 }
3012                 $obj = new stdClass();
3013                 $obj->customid  = $field->id;
3014                 $obj->shortname = $field->shortname;
3015                 $obj->fullname  = format_string($field->name);
3016                 $obj->datatype  = $field->datatype;
3017                 $obj->default   = $field->defaultdata;
3018                 $fields[] = $obj;
3019             }
3020         }
3022         return $fields;
3023     }
3025     /**
3026      * This helper method gets a snapshot of all the weights for a course.
3027      * It is used as a quick method to see if any wieghts have been automatically adjusted.
3028      * @param int $courseid
3029      * @return array of itemid -> aggregationcoef2
3030      */
3031     public static function fetch_all_natural_weights_for_course($courseid) {
3032         global $DB;
3033         $result = array();
3035         $records = $DB->get_records('grade_items', array('courseid'=>$courseid), 'id', 'id, aggregationcoef2');
3036         foreach ($records as $record) {
3037             $result[$record->id] = $record->aggregationcoef2;
3038         }
3039         return $result;
3040     }