2 // This file is part of Moodle - http://moodle.org/
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.
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.
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/>.
18 * Library of interface functions and constants.
20 * @package mod_h5pactivity
21 * @copyright 2020 Ferran Recio <ferran@moodle.com>
22 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
25 defined('MOODLE_INTERNAL') ||
die();
27 use mod_h5pactivity\local\manager
;
28 use mod_h5pactivity\local\grader
;
29 use mod_h5pactivity\xapi\handler
;
32 * Checks if H5P activity supports a specific feature.
34 * @uses FEATURE_GROUPS
35 * @uses FEATURE_GROUPINGS
36 * @uses FEATURE_MOD_INTRO
37 * @uses FEATURE_SHOW_DESCRIPTION
38 * @uses FEATURE_COMPLETION_TRACKS_VIEWS
39 * @uses FEATURE_COMPLETION_HAS_RULES
40 * @uses FEATURE_MODEDIT_DEFAULT_COMPLETION
41 * @uses FEATURE_GRADE_HAS_GRADE
42 * @uses FEATURE_GRADE_OUTCOMES
43 * @uses FEATURE_BACKUP_MOODLE2
44 * @param string $feature FEATURE_xx constant for requested feature
45 * @return mixed True if module supports feature, false if not, null if doesn't know or string for the module purpose.
47 function h5pactivity_supports(string $feature) {
51 case FEATURE_GROUPINGS
:
53 case FEATURE_MOD_INTRO
:
55 case FEATURE_SHOW_DESCRIPTION
:
57 case FEATURE_COMPLETION_TRACKS_VIEWS
:
59 case FEATURE_MODEDIT_DEFAULT_COMPLETION
:
61 case FEATURE_GRADE_HAS_GRADE
:
63 case FEATURE_GRADE_OUTCOMES
:
65 case FEATURE_BACKUP_MOODLE2
:
67 case FEATURE_MOD_PURPOSE
:
68 return MOD_PURPOSE_INTERACTIVECONTENT
;
75 * Saves a new instance of the mod_h5pactivity into the database.
77 * Given an object containing all the necessary data, (defined by the form
78 * in mod_form.php) this function will create a new instance and return the id
79 * number of the instance.
81 * @param stdClass $data An object from the form.
82 * @param mod_h5pactivity_mod_form $mform The form.
83 * @return int The id of the newly inserted record.
85 function h5pactivity_add_instance(stdClass
$data, mod_h5pactivity_mod_form
$mform = null): int {
88 $data->timecreated
= time();
89 $data->timemodified
= $data->timecreated
;
90 $cmid = $data->coursemodule
;
92 $data->id
= $DB->insert_record('h5pactivity', $data);
94 // We need to use context now, so we need to make sure all needed info is already in db.
95 $DB->set_field('course_modules', 'instance', $data->id
, ['id' => $cmid]);
96 h5pactivity_set_mainfile($data);
98 // Extra fields required in grade related functions.
99 $data->cmid
= $data->coursemodule
;
100 h5pactivity_grade_item_update($data);
105 * Updates an instance of the mod_h5pactivity in the database.
107 * Given an object containing all the necessary data (defined in mod_form.php),
108 * this function will update an existing instance with new data.
110 * @param stdClass $data An object from the form in mod_form.php.
111 * @param mod_h5pactivity_mod_form $mform The form.
112 * @return bool True if successful, false otherwise.
114 function h5pactivity_update_instance(stdClass
$data, mod_h5pactivity_mod_form
$mform = null): bool {
117 $data->timemodified
= time();
118 $data->id
= $data->instance
;
120 h5pactivity_set_mainfile($data);
122 // Update gradings if grading method or tracking are modified.
123 $data->cmid
= $data->coursemodule
;
124 $moduleinstance = $DB->get_record('h5pactivity', ['id' => $data->id
]);
125 if (($moduleinstance->grademethod
!= $data->grademethod
)
126 ||
$data->enabletracking
!= $moduleinstance->enabletracking
) {
127 h5pactivity_update_grades($data);
129 h5pactivity_grade_item_update($data);
132 return $DB->update_record('h5pactivity', $data);
136 * Removes an instance of the mod_h5pactivity from the database.
138 * @param int $id Id of the module instance.
139 * @return bool True if successful, false on failure.
141 function h5pactivity_delete_instance(int $id): bool {
144 $activity = $DB->get_record('h5pactivity', ['id' => $id]);
149 if ($cm = get_coursemodule_from_instance('h5pactivity', $activity->id
)) {
150 $context = context_module
::instance($cm->id
);
151 $xapihandler = handler
::create('mod_h5pactivity');
152 $xapihandler->wipe_states($context->id
);
155 // Remove activity record, and all associated attempt data.
156 $attemptids = $DB->get_fieldset_select('h5pactivity_attempts', 'id', 'h5pactivityid = ?', [$id]);
158 $DB->delete_records_list('h5pactivity_attempts_results', 'attemptid', $attemptids);
159 $DB->delete_records_list('h5pactivity_attempts', 'id', $attemptids);
162 $DB->delete_records('h5pactivity', ['id' => $id]);
164 h5pactivity_grade_item_delete($activity);
170 * Checks if scale is being used by any instance of mod_h5pactivity.
172 * This is used to find out if scale used anywhere.
174 * @param int $scaleid ID of the scale.
175 * @return bool True if the scale is used by any mod_h5pactivity instance.
177 function h5pactivity_scale_used_anywhere(int $scaleid): bool {
180 if ($scaleid and $DB->record_exists('h5pactivity', ['grade' => -$scaleid])) {
188 * Creates or updates grade item for the given mod_h5pactivity instance.
190 * Needed by {@link grade_update_mod_grades()}.
192 * @param stdClass $moduleinstance Instance object with extra cmidnumber and modname property.
193 * @param mixed $grades optional array/object of grade(s); 'reset' means reset grades in gradebook
194 * @return int int 0 if ok, error code otherwise
196 function h5pactivity_grade_item_update(stdClass
$moduleinstance, $grades = null): int {
197 $idnumber = $moduleinstance->idnumber ??
'';
198 $grader = new grader($moduleinstance, $idnumber);
199 return $grader->grade_item_update($grades);
203 * Delete grade item for given mod_h5pactivity instance.
205 * @param stdClass $moduleinstance Instance object.
206 * @return int Returns GRADE_UPDATE_OK, GRADE_UPDATE_FAILED, GRADE_UPDATE_MULTIPLE or GRADE_UPDATE_ITEM_LOCKED
208 function h5pactivity_grade_item_delete(stdClass
$moduleinstance): ?
int {
209 $idnumber = $moduleinstance->idnumber ??
'';
210 $grader = new grader($moduleinstance, $idnumber);
211 return $grader->grade_item_delete();
215 * Update mod_h5pactivity grades in the gradebook.
217 * Needed by {@link grade_update_mod_grades()}.
219 * @param stdClass $moduleinstance Instance object with extra cmidnumber and modname property.
220 * @param int $userid Update grade of specific user only, 0 means all participants.
222 function h5pactivity_update_grades(stdClass
$moduleinstance, int $userid = 0): void
{
223 $idnumber = $moduleinstance->idnumber ??
'';
224 $grader = new grader($moduleinstance, $idnumber);
225 $grader->update_grades($userid);
229 * Rescale all grades for this activity and push the new grades to the gradebook.
231 * @param stdClass $course Course db record
232 * @param stdClass $cm Course module db record
233 * @param float $oldmin
234 * @param float $oldmax
235 * @param float $newmin
236 * @param float $newmax
237 * @return bool true if reescale is successful
239 function h5pactivity_rescale_activity_grades(stdClass
$course, stdClass
$cm, float $oldmin,
240 float $oldmax, float $newmin, float $newmax): bool {
242 $manager = manager
::create_from_coursemodule($cm);
243 $grader = $manager->get_grader();
244 $grader->update_grades();
249 * Implementation of the function for printing the form elements that control
250 * whether the course reset functionality affects the H5P activity.
252 * @param MoodleQuickForm $mform form passed by reference
254 function h5pactivity_reset_course_form_definition(&$mform): void
{
255 $mform->addElement('header', 'h5pactivityheader', get_string('modulenameplural', 'mod_h5pactivity'));
256 $mform->addElement('advcheckbox', 'reset_h5pactivity', get_string('deleteallattempts', 'mod_h5pactivity'));
260 * Course reset form defaults.
262 * @param stdClass $course the course object
265 function h5pactivity_reset_course_form_defaults(stdClass
$course): array {
266 return ['reset_h5pactivity' => 1];
271 * This function is used by the reset_course_userdata function in moodlelib.
273 * This function will remove all H5P attempts in the database
274 * and clean up any related data.
276 * @param stdClass $data the data submitted from the reset course.
277 * @return array of reseting status
279 function h5pactivity_reset_userdata(stdClass
$data): array {
281 $componentstr = get_string('modulenameplural', 'mod_h5pactivity');
283 if (!empty($data->reset_h5pactivity
)) {
284 $params = ['courseid' => $data->courseid
];
285 $sql = "SELECT a.id FROM {h5pactivity} a WHERE a.course=:courseid";
286 if ($activities = $DB->get_records_sql($sql, $params)) {
287 $xapihandler = handler
::create('mod_h5pactivity');
288 foreach ($activities as $activity) {
289 $cm = get_coursemodule_from_instance('h5pactivity',
294 mod_h5pactivity\local\attempt
::delete_all_attempts ($cm);
295 $context = context_module
::instance($cm->id
);
296 $xapihandler->wipe_states($context->id
);
299 // Remove all grades from gradebook.
300 if (empty($data->reset_gradebook_grades
)) {
301 h5pactivity_reset_gradebook($data->courseid
, 'reset');
304 'component' => $componentstr,
305 'item' => get_string('deleteallattempts', 'mod_h5pactivity'),
313 * Removes all grades from gradebook
315 * @param int $courseid Coude ID
316 * @param string $type optional type (default '')
318 function h5pactivity_reset_gradebook(int $courseid, string $type=''): void
{
321 $sql = "SELECT a.*, cm.idnumber as cmidnumber, a.course as courseid
322 FROM {h5pactivity} a, {course_modules} cm, {modules} m
323 WHERE m.name='h5pactivity' AND m.id=cm.module AND cm.instance=a.id AND a.course=?";
325 if ($activities = $DB->get_records_sql($sql, [$courseid])) {
326 foreach ($activities as $activity) {
327 h5pactivity_grade_item_update($activity, 'reset');
333 * Return a list of page types
335 * @param string $pagetype current page type
336 * @param stdClass|null $parentcontext Block's parent context
337 * @param stdClass $currentcontext Current context of block
338 * @return array array of page types and it's names
340 function h5pactivity_page_type_list(string $pagetype, ?stdClass
$parentcontext, stdClass
$currentcontext): array {
342 'mod-h5pactivity-*' => get_string('page-mod-h5pactivity-x', 'h5pactivity'),
344 return $modulepagetype;
348 * Check if the module has any update that affects the current user since a given time.
350 * @param cm_info $cm course module data
351 * @param int $from the time to check updates from
352 * @param array $filter if we need to check only specific updates
353 * @return stdClass an object with the different type of areas indicating if they were updated or not
355 function h5pactivity_check_updates_since(cm_info
$cm, int $from, array $filter = []): stdClass
{
358 $updates = course_check_module_updates_since($cm, $from, ['package'], $filter);
360 $updates->tracks
= (object) ['updated' => false];
361 $select = 'h5pactivityid = ? AND userid = ? AND timemodified > ?';
362 $params = [$cm->instance
, $USER->id
, $from];
363 $tracks = $DB->get_records_select('h5pactivity_attempts', $select, $params, '', 'id');
364 if (!empty($tracks)) {
365 $updates->tracks
->updated
= true;
366 $updates->tracks
->itemids
= array_keys($tracks);
369 // Now, teachers should see other students updates.
370 if (has_capability('mod/h5pactivity:reviewattempts', $cm->context
)) {
371 $select = 'h5pactivityid = ? AND timemodified > ?';
372 $params = [$cm->instance
, $from];
374 if (groups_get_activity_groupmode($cm) == SEPARATEGROUPS
) {
375 $groupusers = array_keys(groups_get_activity_shared_group_members($cm));
376 if (empty($groupusers)) {
379 list($insql, $inparams) = $DB->get_in_or_equal($groupusers);
380 $select .= ' AND userid ' . $insql;
381 $params = array_merge($params, $inparams);
384 $updates->usertracks
= (object) ['updated' => false];
385 $tracks = $DB->get_records_select('h5pactivity_attempts', $select, $params, '', 'id');
386 if (!empty($tracks)) {
387 $updates->usertracks
->updated
= true;
388 $updates->usertracks
->itemids
= array_keys($tracks);
395 * Returns the lists of all browsable file areas within the given module context.
397 * The file area 'intro' for the activity introduction field is added automatically
398 * by {@link file_browser::get_file_info_context_module()}.
400 * @param stdClass $course course object
401 * @param stdClass $cm course module object
402 * @param stdClass $context context object
403 * @return string[] array of pair file area => human file area name
405 function h5pactivity_get_file_areas(stdClass
$course, stdClass
$cm, stdClass
$context): array {
407 $areas['package'] = get_string('areapackage', 'mod_h5pactivity');
412 * File browsing support for data module.
414 * @param file_browser $browser
415 * @param array $areas
416 * @param stdClass $course
417 * @param stdClass $cm
418 * @param context $context
419 * @param string $filearea
420 * @param int|null $itemid
421 * @param string|null $filepath
422 * @param string|null $filename
423 * @return file_info_stored|null file_info_stored instance or null if not found
425 function h5pactivity_get_file_info(file_browser
$browser, array $areas, stdClass
$course,
426 stdClass
$cm, context
$context, string $filearea, ?
int $itemid = null,
427 ?
string $filepath = null, ?
string $filename = null): ?file_info_stored
{
430 if (!has_capability('moodle/course:managefiles', $context)) {
434 $fs = get_file_storage();
436 if ($filearea === 'package') {
437 $filepath = is_null($filepath) ?
'/' : $filepath;
438 $filename = is_null($filename) ?
'.' : $filename;
440 $urlbase = $CFG->wwwroot
.'/pluginfile.php';
441 if (!$storedfile = $fs->get_file($context->id
, 'mod_h5pactivity', 'package', 0, $filepath, $filename)) {
442 if ($filepath === '/' and $filename === '.') {
443 $storedfile = new virtual_root_file($context->id
, 'mod_h5pactivity', 'package', 0);
449 return new file_info_stored($browser, $context, $storedfile, $urlbase, $areas[$filearea], false, true, false, false);
455 * Serves the files from the mod_h5pactivity file areas.
457 * @param mixed $course course or id of the course
458 * @param mixed $cm course module or id of the course module
459 * @param context $context
460 * @param string $filearea
462 * @param bool $forcedownload
463 * @param array $options additional options affecting the file serving
464 * @return bool false if file not found, does not return if found - just send the file
466 function h5pactivity_pluginfile($course, $cm, context
$context,
467 string $filearea, array $args, bool $forcedownload, array $options = []): bool {
468 if ($context->contextlevel
!= CONTEXT_MODULE
) {
472 require_login($course, true, $cm);
476 if ($filearea === 'package') {
477 $revision = (int)array_shift($args); // Prevents caching problems - ignored here.
478 $relativepath = implode('/', $args);
479 $fullpath = "/$context->id/mod_h5pactivity/package/0/$relativepath";
481 if (empty($fullpath)) {
484 $fs = get_file_storage();
485 $file = $fs->get_file_by_hash(sha1($fullpath));
489 send_stored_file($file, $lifetime, 0, false, $options);
493 * Saves draft files as the activity package.
495 * @param stdClass $data an object from the form
497 function h5pactivity_set_mainfile(stdClass
$data): void
{
498 $fs = get_file_storage();
499 $cmid = $data->coursemodule
;
500 $context = context_module
::instance($cmid);
502 if (!empty($data->packagefile
)) {
503 $fs = get_file_storage();
504 $fs->delete_area_files($context->id
, 'mod_h5pactivity', 'package');
505 file_save_draft_area_files($data->packagefile
, $context->id
, 'mod_h5pactivity', 'package',
506 0, ['subdirs' => 0, 'maxfiles' => 1]);
511 * Register the ability to handle drag and drop file uploads
512 * @return array containing details of the files / types the mod can handle
514 function h5pactivity_dndupload_register(): array {
518 'extension' => 'h5p',
519 'message' => get_string('dnduploadh5pactivity', 'h5pactivity')
526 * Handle a file that has been uploaded
527 * @param object $uploadinfo details of the file / content that has been uploaded
528 * @return int instance id of the newly created mod
530 function h5pactivity_dndupload_handle($uploadinfo): int {
533 $context = context_module
::instance($uploadinfo->coursemodule
);
534 file_save_draft_area_files($uploadinfo->draftitemid
, $context->id
, 'mod_h5pactivity', 'package', 0);
535 $fs = get_file_storage();
536 $files = $fs->get_area_files($context->id
, 'mod_h5pactivity', 'package', 0, 'sortorder, itemid, filepath, filename', false);
537 $file = reset($files);
539 // Create a default h5pactivity object to pass to h5pactivity_add_instance()!
540 $h5p = get_config('h5pactivity');
542 $h5p->introformat
= FORMAT_HTML
;
543 $h5p->course
= $uploadinfo->course
->id
;
544 $h5p->coursemodule
= $uploadinfo->coursemodule
;
545 $h5p->grade
= $CFG->gradepointdefault
;
547 // Add some special handling for the H5P options checkboxes.
548 $factory = new \core_h5p\factory
();
549 $core = $factory->get_core();
550 if (isset($uploadinfo->displayopt
)) {
551 $config = (object) $uploadinfo->displayopt
;
553 $config = \core_h5p\helper
::decode_display_options($core);
555 $h5p->displayoptions
= \core_h5p\helper
::get_display_options($core, $config);
557 $h5p->cmidnumber
= '';
558 $h5p->name
= $uploadinfo->displayname
;
559 $h5p->reference
= $file->get_filename();
561 return h5pactivity_add_instance($h5p, null);
565 * Print recent activity from all h5pactivities in a given course
567 * This is used by the recent activity block
568 * @param mixed $course the course to print activity for
569 * @param bool $viewfullnames boolean to determine whether to show full names or not
570 * @param int $timestart the time the rendering started
571 * @return bool true if activity was printed, false otherwise.
573 function h5pactivity_print_recent_activity($course, bool $viewfullnames, int $timestart): bool {
574 global $CFG, $DB, $OUTPUT, $USER;
576 $dbparams = [$timestart, $course->id
, 'h5pactivity'];
578 $userfieldsapi = \core_user\fields
::for_userpic();
579 $namefields = $userfieldsapi->get_sql('u', false, '', 'userid', false)->selects
;;
581 $sql = "SELECT h5pa.id, h5pa.timemodified, cm.id as cmid, $namefields
582 FROM {h5pactivity_attempts} h5pa
583 JOIN {h5pactivity} h5p ON h5p.id = h5pa.h5pactivityid
584 JOIN {course_modules} cm ON cm.instance = h5p.id
585 JOIN {modules} md ON md.id = cm.module
586 JOIN {user} u ON u.id = h5pa.userid
587 WHERE h5pa.timemodified >= ?
590 ORDER BY h5pa.timemodified ASC";
592 if (!$submissions = $DB->get_records_sql($sql, $dbparams)) {
596 $modinfo = get_fast_modinfo($course);
598 $recentactivity = h5pactivity_fetch_recent_activity($submissions, $course->id
);
600 if (empty($recentactivity)) {
604 $cms = $modinfo->get_cms();
606 echo $OUTPUT->heading(get_string('newsubmissions', 'h5pactivity') . ':', 6);
608 foreach ($recentactivity as $submission) {
609 $cm = $cms[$submission->cmid
];
610 $link = $CFG->wwwroot
.'/mod/h5pactivity/view.php?id='.$cm->id
;
611 print_recent_activity_note($submission->timemodified
,
623 * Returns all h5pactivities since a given time.
625 * @param array $activities The activity information is returned in this array
626 * @param int $index The current index in the activities array
627 * @param int $timestart The earliest activity to show
628 * @param int $courseid Limit the search to this course
629 * @param int $cmid The course module id
630 * @param int $userid Optional user id
631 * @param int $groupid Optional group id
634 function h5pactivity_get_recent_mod_activity(array &$activities, int &$index, int $timestart, int $courseid,
635 int $cmid, int $userid=0, int $groupid=0) {
636 global $CFG, $DB, $USER;
638 $course = get_course($courseid);
639 $modinfo = get_fast_modinfo($course);
641 $cm = $modinfo->get_cm($cmid);
644 $userselect = 'AND u.id = :userid';
645 $params['userid'] = $userid;
651 $groupselect = 'AND gm.groupid = :groupid';
652 $groupjoin = 'JOIN {groups_members} gm ON gm.userid=u.id';
653 $params['groupid'] = $groupid;
659 $params['cminstance'] = $cm->instance
;
660 $params['timestart'] = $timestart;
661 $params['cmid'] = $cmid;
663 $userfieldsapi = \core_user\fields
::for_userpic();
664 $userfields = $userfieldsapi->get_sql('u', false, '', 'userid', false)->selects
;
666 $sql = "SELECT h5pa.id, h5pa.timemodified, cm.id as cmid, $userfields
667 FROM {h5pactivity_attempts} h5pa
668 JOIN {h5pactivity} h5p ON h5p.id = h5pa.h5pactivityid
669 JOIN {course_modules} cm ON cm.instance = h5p.id
670 JOIN {modules} md ON md.id = cm.module
671 JOIN {user} u ON u.id = h5pa.userid $groupjoin
672 WHERE h5pa.timemodified >= :timestart
673 AND h5p.id = :cminstance $userselect $groupselect
675 ORDER BY h5pa.timemodified ASC";
677 if (!$submissions = $DB->get_records_sql($sql, $params)) {
681 $cmcontext = context_module
::instance($cm->id
);
682 $grader = has_capability('mod/h5pactivity:reviewattempts', $cmcontext);
683 $viewfullnames = has_capability('moodle/site:viewfullnames', $cmcontext);
685 $recentactivity = h5pactivity_fetch_recent_activity($submissions, $courseid);
687 if (empty($recentactivity)) {
692 require_once($CFG->libdir
.'/gradelib.php');
694 foreach ($recentactivity as $id => $submission) {
695 $userids[] = $submission->userid
;
697 $grades = grade_get_grades($courseid, 'mod', 'h5pactivity', $cm->instance
, $userids);
700 $aname = format_string($cm->name
, true);
701 foreach ($recentactivity as $submission) {
702 $activity = new stdClass();
704 $activity->type
= 'h5pactivity';
705 $activity->cmid
= $cm->id
;
706 $activity->name
= $aname;
707 $activity->sectionnum
= $cm->sectionnum
;
708 $activity->timestamp
= $submission->timemodified
;
709 $activity->user
= new stdClass();
711 $activity->grade
= $grades->items
[0]->grades
[$submission->userid
]->str_long_grade
;
714 $userfields = explode(',', implode(',', \core_user\fields
::get_picture_fields()));
715 foreach ($userfields as $userfield) {
716 if ($userfield == 'id') {
717 // Aliased in SQL above.
718 $activity->user
->{$userfield} = $submission->userid
;
720 $activity->user
->{$userfield} = $submission->{$userfield};
723 $activity->user
->fullname
= fullname($submission, $viewfullnames);
725 $activities[$index++
] = $activity;
732 * Print recent activity from all h5pactivities in a given course
734 * This is used by course/recent.php
735 * @param stdClass $activity
736 * @param int $courseid
737 * @param bool $detail
738 * @param array $modnames
740 function h5pactivity_print_recent_mod_activity(stdClass
$activity, int $courseid, bool $detail, array $modnames) {
745 $modinfo['modname'] = $activity->name
;
746 $modinfo['modurl'] = new moodle_url('/mod/h5pactivity/view.php', ['id' => $activity->cmid
]);
747 $modinfo['modicon'] = $OUTPUT->image_icon('monologo', $modnames[$activity->type
], 'h5pactivity');
750 $userpicture = $OUTPUT->user_picture($activity->user
);
752 $template = ['userpicture' => $userpicture,
753 'submissiontimestamp' => $activity->timestamp
,
754 'modinfo' => $modinfo,
755 'userurl' => new moodle_url('/user/view.php', array('id' => $activity->user
->id
, 'course' => $courseid)),
756 'fullname' => $activity->user
->fullname
];
757 if (isset($activity->grade
)) {
758 $template['grade'] = get_string('gradenoun_h5p', 'h5pactivity', $activity->grade
);
761 echo $OUTPUT->render_from_template('mod_h5pactivity/reviewattempts', $template);
765 * Fetches recent activity for course module.
767 * @param array $submissions The activity submissions
768 * @param int $courseid Limit the search to this course
769 * @return array $recentactivity recent activity in a course.
771 function h5pactivity_fetch_recent_activity(array $submissions, int $courseid): array {
774 $course = get_course($courseid);
775 $modinfo = get_fast_modinfo($course);
777 $recentactivity = [];
780 $cms = $modinfo->get_cms();
782 foreach ($submissions as $submission) {
783 if (!array_key_exists($submission->cmid
, $cms)) {
786 $cm = $cms[$submission->cmid
];
787 if (!$cm->uservisible
) {
791 if ($USER->id
== $submission->userid
) {
792 $recentactivity[$submission->userid
] = $submission;
796 $cmcontext = context_module
::instance($cm->id
);
797 // The act of submitting of attempt may be considered private -
798 // only graders will see it if specified.
799 if (!array_key_exists($cm->id
, $grader)) {
800 $grader[$cm->id
] = has_capability('mod/h5pactivity:reviewattempts', $cmcontext);
802 if (!$grader[$cm->id
]) {
809 $groupmode = groups_get_activity_groupmode($cm, $course);
810 $accessallgroups = has_capability('moodle/site:accessallgroups', $cmcontext);
812 if ($groupmode == SEPARATEGROUPS
&& !$accessallgroups) {
815 // Shortcut - guest user does not belong into any group.
819 if (!isset($groups[$cm->groupingid
])) {
820 $groups[$cm->groupingid
] = $modinfo->get_groups($cm->groupingid
);
821 if (!$groups[$cm->groupingid
]) {
826 if (!isset($usersgroups[$cm->groupingid
][$submission->userid
])) {
827 $usersgroups[$cm->groupingid
][$submission->userid
] =
828 groups_get_all_groups($course->id
, $submission->userid
, $cm->groupingid
, 'g.*', false, true);
831 if (is_array($usersgroups[$cm->groupingid
][$submission->userid
])) {
832 $usersgroupstmp = array_keys($usersgroups[$cm->groupingid
][$submission->userid
]);
833 $intersect = array_intersect($usersgroupstmp, $groups[$cm->groupingid
]);
834 if (empty($intersect)) {
840 $recentactivity[$submission->userid
] = $submission;
843 return $recentactivity;
847 * Extends the settings navigation with the H5P activity settings
849 * This function is called when the context for the page is an H5P activity. This is not called by AJAX
850 * so it is safe to rely on the $PAGE.
852 * @param settings_navigation $settingsnav The settings navigation object
853 * @param navigation_node $h5pactivitynode The node to add module settings to
855 function h5pactivity_extend_settings_navigation(settings_navigation
$settingsnav,
856 navigation_node
$h5pactivitynode = null) {
859 $manager = manager
::create_from_coursemodule($settingsnav->get_page()->cm
);
862 if ($manager->can_view_all_attempts()) {
863 $attemptsreporturl = new moodle_url('/mod/h5pactivity/report.php',
864 ['a' => $settingsnav->get_page()->cm
->instance
]);
865 $h5pactivitynode->add(get_string('attempts_report', 'h5pactivity'), $attemptsreporturl,
866 settings_navigation
::TYPE_SETTING
, '', 'attemptsreport');
867 } else if ($manager->can_view_own_attempts() && $manager->count_attempts($USER->id
)) {
868 $attemptsreporturl = new moodle_url('/mod/h5pactivity/report.php',
869 ['a' => $settingsnav->get_page()->cm
->instance
, 'userid' => $USER->id
]);
870 $h5pactivitynode->add(get_string('attempts_report', 'h5pactivity'), $attemptsreporturl,
871 settings_navigation
::TYPE_SETTING
, '', 'attemptsreport');
876 * Whether the activity is branded.
877 * This information is used, for instance, to decide if a filter should be applied to the icon or not.
879 * @return bool True if the activity is branded, false otherwise.
881 function h5pactivity_is_branded(): bool {