mirror of
https://github.com/moodle/moodle.git
synced 2025-08-04 16:36:37 +02:00
Merge branch 'MDL-76649' of https://github.com/timhunt/moodle
This commit is contained in:
commit
e0d857f39f
4 changed files with 73 additions and 20 deletions
|
@ -36,21 +36,33 @@ require_once($CFG->dirroot . '/mod/quiz/report/statistics/report.php');
|
|||
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||||
*/
|
||||
class recalculate extends \core\task\scheduled_task {
|
||||
/** @var int the maximum length of time one instance of this task will run. */
|
||||
const TIME_LIMIT = 3600;
|
||||
|
||||
public function get_name() {
|
||||
public function get_name(): string {
|
||||
return get_string('recalculatetask', 'quiz_statistics');
|
||||
}
|
||||
|
||||
public function execute() {
|
||||
public function execute(): void {
|
||||
global $DB;
|
||||
$stoptime = time() + self::TIME_LIMIT;
|
||||
$dateformat = get_string('strftimedatetimeshortaccurate', 'core_langconfig');
|
||||
|
||||
// TODO: MDL-75197, add quizid in quiz_statistics so that it is simpler to find quizzes for stats calculation.
|
||||
// Only calculate stats for quizzes which have recently finished attempt.
|
||||
$sql = "
|
||||
SELECT qa.quiz, MAX(qa.timefinish) as timefinish
|
||||
SELECT q.id AS quizid,
|
||||
q.name AS quizname,
|
||||
c.id AS courseid,
|
||||
c.shortname AS courseshortname,
|
||||
MAX(qa.timefinish) AS mostrecentattempttime,
|
||||
COUNT(1) AS numberofattempts
|
||||
FROM {quiz_attempts} qa
|
||||
JOIN {quiz} q ON q.id = qa.quiz
|
||||
JOIN {course} c ON c.id = q.course
|
||||
WHERE qa.preview = 0
|
||||
AND qa.state = :quizstatefinished
|
||||
GROUP BY qa.quiz
|
||||
GROUP BY q.id, q.name, c.id, c.shortname
|
||||
";
|
||||
|
||||
$params = [
|
||||
|
@ -59,30 +71,50 @@ class recalculate extends \core\task\scheduled_task {
|
|||
|
||||
$latestattempts = $DB->get_records_sql($sql, $params);
|
||||
|
||||
$anyexception = null;
|
||||
foreach ($latestattempts as $attempt) {
|
||||
if (time() >= $stoptime) {
|
||||
mtrace("This task has been running for more than " .
|
||||
format_time(self::TIME_LIMIT) . " so stopping this execution.");
|
||||
break;
|
||||
}
|
||||
|
||||
mtrace(" Examining quiz '$attempt->quizname' ($attempt->quizid) in course " .
|
||||
"$attempt->courseshortname ($attempt->courseid) with most recent attempt at " .
|
||||
userdate($attempt->mostrecentattempttime, $dateformat) . ".");
|
||||
$quizobj = quiz_settings::create($attempt->quiz);
|
||||
$quiz = $quizobj->get_quiz();
|
||||
// Hash code for question stats option in question bank.
|
||||
$qubaids = quiz_statistics_qubaids_condition($quiz->id, new \core\dml\sql_join(), $quiz->grademethod);
|
||||
|
||||
// Check if there is any existing question stats, and it has been calculated after latest quiz attempt.
|
||||
$records = $DB->get_records_select(
|
||||
'quiz_statistics',
|
||||
'hashcode = :hashcode AND timemodified > :timefinish',
|
||||
[
|
||||
'hashcode' => $qubaids->get_hash_code(),
|
||||
'timefinish' => $attempt->timefinish
|
||||
]
|
||||
);
|
||||
$lateststatstime = $DB->get_field('quiz_statistics', 'COALESCE(MAX(timemodified), 0)',
|
||||
['hashcode' => $qubaids->get_hash_code()]);
|
||||
|
||||
if (empty($records)) {
|
||||
if ($lateststatstime >= $attempt->mostrecentattempttime) {
|
||||
mtrace(" Statistics already calculated at " . userdate($lateststatstime, $dateformat) .
|
||||
" so nothing to do for this quiz.");
|
||||
continue;
|
||||
}
|
||||
|
||||
mtrace(" Calculating statistics for $attempt->numberofattempts attempts, starting at " .
|
||||
userdate(time(), $dateformat) . " ...");
|
||||
try {
|
||||
$report = new quiz_statistics_report();
|
||||
// Clear old cache.
|
||||
$report->clear_cached_data($qubaids);
|
||||
// Calculate new stats.
|
||||
$report->calculate_questions_stats_for_question_bank($quiz->id);
|
||||
mtrace(" Calculations completed at " . userdate(time(), $dateformat) . ".");
|
||||
|
||||
} catch (\Throwable $e) {
|
||||
// We don't want an exception from one quiz to stop processing of other quizzes.
|
||||
mtrace_exception($e);
|
||||
$anyexception = $e;
|
||||
}
|
||||
}
|
||||
return true;
|
||||
|
||||
if ($anyexception) {
|
||||
// If there was any error, ensure the task fails.
|
||||
throw $anyexception;
|
||||
}
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue