���ѧۧݧ�ӧ�� �ާ֧ߧ֧էا֧� - ���֧էѧܧ�ڧ��ӧѧ�� - /home3/cpr76684/public_html/questiontype.php.tar
���ѧ٧ѧ�
home3/cpr76684/public_html/Aem/question/type/match/questiontype.php 0000644 00000020376 15152042247 0021206 0 ustar 00 <?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 type class for the matching question type. * * @package qtype_match * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com} * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ defined('MOODLE_INTERNAL') || die(); require_once($CFG->libdir . '/questionlib.php'); require_once($CFG->dirroot . '/question/engine/lib.php'); /** * The matching question type class. * * @copyright 1999 onwards Martin Dougiamas {@link http://moodle.com} * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ class qtype_match extends question_type { public function get_question_options($question) { global $DB; parent::get_question_options($question); $question->options = $DB->get_record('qtype_match_options', array('questionid' => $question->id)); $question->options->subquestions = $DB->get_records('qtype_match_subquestions', array('questionid' => $question->id), 'id ASC'); return true; } public function save_defaults_for_new_questions(stdClass $fromform): void { parent::save_defaults_for_new_questions($fromform); $this->set_default_value('shuffleanswers', $fromform->shuffleanswers); } public function save_question_options($question) { global $DB; $context = $question->context; $result = new stdClass(); $oldsubquestions = $DB->get_records('qtype_match_subquestions', array('questionid' => $question->id), 'id ASC'); // Insert all the new question & answer pairs. foreach ($question->subquestions as $key => $questiontext) { if ($questiontext['text'] == '' && trim($question->subanswers[$key]) == '') { continue; } if ($questiontext['text'] != '' && trim($question->subanswers[$key]) == '') { $result->notice = get_string('nomatchinganswer', 'qtype_match', $questiontext); } // Update an existing subquestion if possible. $subquestion = array_shift($oldsubquestions); if (!$subquestion) { $subquestion = new stdClass(); $subquestion->questionid = $question->id; $subquestion->questiontext = ''; $subquestion->answertext = ''; $subquestion->id = $DB->insert_record('qtype_match_subquestions', $subquestion); } $subquestion->questiontext = $this->import_or_save_files($questiontext, $context, 'qtype_match', 'subquestion', $subquestion->id); $subquestion->questiontextformat = $questiontext['format']; $subquestion->answertext = trim($question->subanswers[$key]); $DB->update_record('qtype_match_subquestions', $subquestion); } // Delete old subquestions records. $fs = get_file_storage(); foreach ($oldsubquestions as $oldsub) { $fs->delete_area_files($context->id, 'qtype_match', 'subquestion', $oldsub->id); $DB->delete_records('qtype_match_subquestions', array('id' => $oldsub->id)); } // Save the question options. $options = $DB->get_record('qtype_match_options', array('questionid' => $question->id)); if (!$options) { $options = new stdClass(); $options->questionid = $question->id; $options->correctfeedback = ''; $options->partiallycorrectfeedback = ''; $options->incorrectfeedback = ''; $options->id = $DB->insert_record('qtype_match_options', $options); } $options->shuffleanswers = $question->shuffleanswers; $options = $this->save_combined_feedback_helper($options, $question, $context, true); $DB->update_record('qtype_match_options', $options); $this->save_hints($question, true); if (!empty($result->notice)) { return $result; } return true; } protected function initialise_question_instance(question_definition $question, $questiondata) { parent::initialise_question_instance($question, $questiondata); $question->shufflestems = $questiondata->options->shuffleanswers; $this->initialise_combined_feedback($question, $questiondata, true); $question->stems = array(); $question->choices = array(); $question->right = array(); foreach ($questiondata->options->subquestions as $matchsub) { $key = array_search($matchsub->answertext, $question->choices, true); if ($key === false) { $key = $matchsub->id; $question->choices[$key] = $matchsub->answertext; } if ($matchsub->questiontext !== '') { $question->stems[$matchsub->id] = $matchsub->questiontext; $question->stemformat[$matchsub->id] = $matchsub->questiontextformat; $question->right[$matchsub->id] = $key; } } } protected function make_hint($hint) { return question_hint_with_parts::load_from_record($hint); } public function delete_question($questionid, $contextid) { global $DB; $DB->delete_records('qtype_match_options', array('questionid' => $questionid)); $DB->delete_records('qtype_match_subquestions', array('questionid' => $questionid)); parent::delete_question($questionid, $contextid); } public function get_random_guess_score($questiondata) { $q = $this->make_question($questiondata); return 1 / count($q->choices); } public function get_possible_responses($questiondata) { $subqs = array(); $q = $this->make_question($questiondata); foreach ($q->stems as $stemid => $stem) { $responses = array(); foreach ($q->choices as $choiceid => $choice) { $responses[$choiceid] = new question_possible_response( $q->html_to_text($stem, $q->stemformat[$stemid]) . ': ' . $choice, ($choiceid == $q->right[$stemid]) / count($q->stems)); } $responses[null] = question_possible_response::no_response(); $subqs[$stemid] = $responses; } return $subqs; } public function move_files($questionid, $oldcontextid, $newcontextid) { global $DB; $fs = get_file_storage(); parent::move_files($questionid, $oldcontextid, $newcontextid); $subquestionids = $DB->get_records_menu('qtype_match_subquestions', array('questionid' => $questionid), 'id', 'id,1'); foreach ($subquestionids as $subquestionid => $notused) { $fs->move_area_files_to_new_context($oldcontextid, $newcontextid, 'qtype_match', 'subquestion', $subquestionid); } $this->move_files_in_combined_feedback($questionid, $oldcontextid, $newcontextid); $this->move_files_in_hints($questionid, $oldcontextid, $newcontextid); } protected function delete_files($questionid, $contextid) { global $DB; $fs = get_file_storage(); parent::delete_files($questionid, $contextid); $subquestionids = $DB->get_records_menu('qtype_match_subquestions', array('questionid' => $questionid), 'id', 'id,1'); foreach ($subquestionids as $subquestionid => $notused) { $fs->delete_area_files($contextid, 'qtype_match', 'subquestion', $subquestionid); } $this->delete_files_in_combined_feedback($questionid, $contextid); $this->delete_files_in_hints($questionid, $contextid); } } home3/cpr76684/public_html/Aem/question/type/essay/questiontype.php 0000644 00000020567 15152050730 0021234 0 ustar 00 <?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 type class for the essay question type. * * @package qtype * @subpackage essay * @copyright 2005 Mark Nielsen * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ defined('MOODLE_INTERNAL') || die(); require_once($CFG->libdir . '/questionlib.php'); /** * The essay question type. * * @copyright 2005 Mark Nielsen * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ class qtype_essay extends question_type { public function is_manual_graded() { return true; } public function response_file_areas() { return array('attachments', 'answer'); } public function get_question_options($question) { global $DB; $question->options = $DB->get_record('qtype_essay_options', array('questionid' => $question->id), '*', MUST_EXIST); parent::get_question_options($question); } public function save_defaults_for_new_questions(stdClass $fromform): void { parent::save_defaults_for_new_questions($fromform); $this->set_default_value('responseformat', $fromform->responseformat); $this->set_default_value('responserequired', $fromform->responserequired); $this->set_default_value('responsefieldlines', $fromform->responsefieldlines); $this->set_default_value('attachments', $fromform->attachments); $this->set_default_value('attachmentsrequired', $fromform->attachmentsrequired); $this->set_default_value('maxbytes', $fromform->maxbytes); } public function save_question_options($formdata) { global $DB; $context = $formdata->context; $options = $DB->get_record('qtype_essay_options', array('questionid' => $formdata->id)); if (!$options) { $options = new stdClass(); $options->questionid = $formdata->id; $options->id = $DB->insert_record('qtype_essay_options', $options); } $options->responseformat = $formdata->responseformat; $options->responserequired = $formdata->responserequired; $options->responsefieldlines = $formdata->responsefieldlines; $options->minwordlimit = isset($formdata->minwordenabled) ? $formdata->minwordlimit : null; $options->maxwordlimit = isset($formdata->maxwordenabled) ? $formdata->maxwordlimit : null; $options->attachments = $formdata->attachments; if ((int)$formdata->attachments === 0 && $formdata->attachmentsrequired > 0) { // Adjust the value for the field 'attachmentsrequired' when the field 'attachments' is set to 'No'. $options->attachmentsrequired = 0; } else { $options->attachmentsrequired = $formdata->attachmentsrequired; } if (!isset($formdata->filetypeslist)) { $options->filetypeslist = null; } else { $options->filetypeslist = $formdata->filetypeslist; } $options->maxbytes = $formdata->maxbytes ?? 0; $options->graderinfo = $this->import_or_save_files($formdata->graderinfo, $context, 'qtype_essay', 'graderinfo', $formdata->id); $options->graderinfoformat = $formdata->graderinfo['format']; $options->responsetemplate = $formdata->responsetemplate['text']; $options->responsetemplateformat = $formdata->responsetemplate['format']; $DB->update_record('qtype_essay_options', $options); } protected function initialise_question_instance(question_definition $question, $questiondata) { parent::initialise_question_instance($question, $questiondata); $question->responseformat = $questiondata->options->responseformat; $question->responserequired = $questiondata->options->responserequired; $question->responsefieldlines = $questiondata->options->responsefieldlines; $question->minwordlimit = $questiondata->options->minwordlimit; $question->maxwordlimit = $questiondata->options->maxwordlimit; $question->attachments = $questiondata->options->attachments; $question->attachmentsrequired = $questiondata->options->attachmentsrequired; $question->graderinfo = $questiondata->options->graderinfo; $question->graderinfoformat = $questiondata->options->graderinfoformat; $question->responsetemplate = $questiondata->options->responsetemplate; $question->responsetemplateformat = $questiondata->options->responsetemplateformat; $filetypesutil = new \core_form\filetypes_util(); $question->filetypeslist = $filetypesutil->normalize_file_types($questiondata->options->filetypeslist); $question->maxbytes = $questiondata->options->maxbytes; } public function delete_question($questionid, $contextid) { global $DB; $DB->delete_records('qtype_essay_options', array('questionid' => $questionid)); parent::delete_question($questionid, $contextid); } /** * @return array the different response formats that the question type supports. * internal name => human-readable name. */ public function response_formats() { return array( 'editor' => get_string('formateditor', 'qtype_essay'), 'editorfilepicker' => get_string('formateditorfilepicker', 'qtype_essay'), 'plain' => get_string('formatplain', 'qtype_essay'), 'monospaced' => get_string('formatmonospaced', 'qtype_essay'), 'noinline' => get_string('formatnoinline', 'qtype_essay'), ); } /** * @return array the choices that should be offerd when asking if a response is required */ public function response_required_options() { return array( 1 => get_string('responseisrequired', 'qtype_essay'), 0 => get_string('responsenotrequired', 'qtype_essay'), ); } /** * @return array the choices that should be offered for the input box size. */ public function response_sizes() { $choices = [ 2 => get_string('nlines', 'qtype_essay', 2), 3 => get_string('nlines', 'qtype_essay', 3), ]; for ($lines = 5; $lines <= 40; $lines += 5) { $choices[$lines] = get_string('nlines', 'qtype_essay', $lines); } return $choices; } /** * @return array the choices that should be offered for the number of attachments. */ public function attachment_options() { return array( 0 => get_string('no'), 1 => '1', 2 => '2', 3 => '3', -1 => get_string('unlimited'), ); } /** * @return array the choices that should be offered for the number of required attachments. */ public function attachments_required_options() { return array( 0 => get_string('attachmentsoptional', 'qtype_essay'), 1 => '1', 2 => '2', 3 => '3' ); } /** * Return array of the choices that should be offered for the maximum file sizes. * @return array|lang_string[]|string[] */ public function max_file_size_options() { global $CFG, $COURSE; return get_max_upload_sizes($CFG->maxbytes, $COURSE->maxbytes); } public function move_files($questionid, $oldcontextid, $newcontextid) { parent::move_files($questionid, $oldcontextid, $newcontextid); $fs = get_file_storage(); $fs->move_area_files_to_new_context($oldcontextid, $newcontextid, 'qtype_essay', 'graderinfo', $questionid); } protected function delete_files($questionid, $contextid) { parent::delete_files($questionid, $contextid); $fs = get_file_storage(); $fs->delete_area_files($contextid, 'qtype_essay', 'graderinfo', $questionid); } }
| ver. 1.4 |
Github
|
.
| PHP 7.4.33 | ���֧ߧ֧�ѧ�ڧ� ����ѧߧڧ��: 0 |
proxy
|
phpinfo
|
���ѧ����ۧܧ�