mirror of
https://github.com/moodle/moodle.git
synced 2025-03-03 15:29:08 +01:00
1fcf0ca8a5
dirname() is a slow function compared with __DIR__ and using '/../'. Moodle has a large number of legacy files that are included each time a page loads and is not able to use an autoloader as it is functional code. This allows those required includes to perform as best as possible in this situation.
125 lines
4.7 KiB
PHP
125 lines
4.7 KiB
PHP
<?php
|
|
// This file is part of Moodle - http://moodle.org/
|
|
//
|
|
// Moodle is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Moodle is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU General Public License
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* Question behaviour that is like the deferred feedback model, but with
|
|
* certainty based marking. That is, in addition to the other controls, there are
|
|
* where the student can indicate how certain they are that their answer is right.
|
|
*
|
|
* @package qbehaviour
|
|
* @subpackage deferredcbm
|
|
* @copyright 2009 The Open University
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
|
*/
|
|
|
|
|
|
defined('MOODLE_INTERNAL') || die();
|
|
|
|
require_once(__DIR__ . '/../deferredfeedback/behaviour.php');
|
|
|
|
|
|
/**
|
|
* Question behaviour for deferred feedback with certainty based marking.
|
|
*
|
|
* The student enters their response during the attempt, along with a certainty,
|
|
* that is, how sure they are that they are right, and it is saved. Later,
|
|
* when the whole attempt is finished, their answer is graded. Their degree
|
|
* of certainty affects their score.
|
|
*
|
|
* @copyright 2009 The Open University
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
|
*/
|
|
class qbehaviour_deferredcbm extends qbehaviour_deferredfeedback {
|
|
const IS_ARCHETYPAL = true;
|
|
|
|
public function get_min_fraction() {
|
|
return question_cbm::adjust_fraction(0, question_cbm::HIGH);
|
|
}
|
|
|
|
public function get_max_fraction() {
|
|
return question_cbm::adjust_fraction(1, question_cbm::HIGH);
|
|
}
|
|
|
|
public function get_expected_data() {
|
|
if ($this->qa->get_state()->is_active()) {
|
|
return array('certainty' => PARAM_INT);
|
|
}
|
|
return parent::get_expected_data();
|
|
}
|
|
|
|
public function get_right_answer_summary() {
|
|
$summary = parent::get_right_answer_summary();
|
|
return question_cbm::summary_with_certainty($summary, question_cbm::HIGH);
|
|
}
|
|
|
|
public function get_correct_response() {
|
|
if ($this->qa->get_state()->is_active()) {
|
|
return array('certainty' => question_cbm::HIGH);
|
|
}
|
|
return array();
|
|
}
|
|
|
|
protected function get_our_resume_data() {
|
|
$lastcertainty = $this->qa->get_last_behaviour_var('certainty');
|
|
if ($lastcertainty) {
|
|
return array('-certainty' => $lastcertainty);
|
|
} else {
|
|
return array();
|
|
}
|
|
}
|
|
|
|
protected function is_same_response(question_attempt_step $pendingstep) {
|
|
return parent::is_same_response($pendingstep) &&
|
|
$this->qa->get_last_behaviour_var('certainty') ==
|
|
$pendingstep->get_behaviour_var('certainty');
|
|
}
|
|
|
|
protected function is_complete_response(question_attempt_step $pendingstep) {
|
|
return parent::is_complete_response($pendingstep) &&
|
|
$pendingstep->has_behaviour_var('certainty');
|
|
}
|
|
|
|
public function process_finish(question_attempt_pending_step $pendingstep) {
|
|
$status = parent::process_finish($pendingstep);
|
|
if ($status == question_attempt::KEEP) {
|
|
$fraction = $pendingstep->get_fraction();
|
|
if ($this->qa->get_last_step()->has_behaviour_var('certainty')) {
|
|
$certainty = $this->qa->get_last_step()->get_behaviour_var('certainty');
|
|
} else {
|
|
$certainty = question_cbm::default_certainty();
|
|
$pendingstep->set_behaviour_var('_assumedcertainty', $certainty);
|
|
}
|
|
if (!is_null($fraction)) {
|
|
$pendingstep->set_behaviour_var('_rawfraction', $fraction);
|
|
$pendingstep->set_fraction(question_cbm::adjust_fraction($fraction, $certainty));
|
|
}
|
|
$pendingstep->set_new_response_summary(
|
|
question_cbm::summary_with_certainty($pendingstep->get_new_response_summary(),
|
|
$this->qa->get_last_step()->get_behaviour_var('certainty')));
|
|
}
|
|
return $status;
|
|
}
|
|
|
|
public function summarise_action(question_attempt_step $step) {
|
|
$summary = parent::summarise_action($step);
|
|
if ($step->has_behaviour_var('certainty')) {
|
|
$summary = question_cbm::summary_with_certainty($summary,
|
|
$step->get_behaviour_var('certainty'));
|
|
}
|
|
return $summary;
|
|
}
|
|
}
|