See Release Notes
Long Term Support Release
<?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/>. /** * Defines the editing form for the essay question type. * * @package qtype * @subpackage essay * @copyright 2007 Jamie Pratt me@jamiep.org * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ defined('MOODLE_INTERNAL') || die(); /** * Essay question type editing form. * * @copyright 2007 Jamie Pratt me@jamiep.org * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later */ class qtype_essay_edit_form extends question_edit_form { protected function definition_inner($mform) { $qtype = question_bank::get_qtype('essay'); $mform->addElement('header', 'responseoptions', get_string('responseoptions', 'qtype_essay')); $mform->setExpanded('responseoptions'); $mform->addElement('select', 'responseformat', get_string('responseformat', 'qtype_essay'), $qtype->response_formats());< $mform->setDefault('responseformat', 'editor');> $mform->setDefault('responseformat', $this->get_default_value('responseformat', 'editor'));$mform->addElement('select', 'responserequired', get_string('responserequired', 'qtype_essay'), $qtype->response_required_options());< $mform->setDefault('responserequired', 1); < $mform->disabledIf('responserequired', 'responseformat', 'eq', 'noinline');> $mform->setDefault('responserequired', $this->get_default_value('responserequired', 1)); > $mform->hideIf('responserequired', 'responseformat', 'eq', 'noinline');$mform->addElement('select', 'responsefieldlines', get_string('responsefieldlines', 'qtype_essay'), $qtype->response_sizes());< $mform->setDefault('responsefieldlines', 15); < $mform->disabledIf('responsefieldlines', 'responseformat', 'eq', 'noinline');> $mform->setDefault('responsefieldlines', $this->get_default_value('responsefieldlines', 10)); > $mform->hideIf('responsefieldlines', 'responseformat', 'eq', 'noinline'); > > // Create a text box that can be enabled/disabled for max/min word limits options. > $wordlimitoptions = ['size' => '6', 'maxlength' => '6']; > $mingrp[] = $mform->createElement('text', 'minwordlimit', '', $wordlimitoptions); > $mform->setType('minwordlimit', PARAM_INT); > $mingrp[] = $mform->createElement('checkbox', 'minwordenabled', '', get_string('enable')); > $mform->setDefault('minwordenabled', 0); > $mform->addGroup($mingrp, 'mingroup', get_string('minwordlimit', 'qtype_essay'), ' ', false); > $mform->addHelpButton('mingroup', 'minwordlimit', 'qtype_essay'); > $mform->disabledIf('minwordlimit', 'minwordenabled', 'notchecked'); > $mform->hideIf('mingroup', 'responserequired', 'eq', '0'); > $mform->hideIf('mingroup', 'responseformat', 'eq', 'noinline'); > > $maxgrp[] = $mform->createElement('text', 'maxwordlimit', '', $wordlimitoptions); > $mform->setType('maxwordlimit', PARAM_INT); > $maxgrp[] = $mform->createElement('checkbox', 'maxwordenabled', '', get_string('enable')); > $mform->setDefault('maxwordenabled', 0); > $mform->addGroup($maxgrp, 'maxgroup', get_string('maxwordlimit', 'qtype_essay'), ' ', false); > $mform->addHelpButton('maxgroup', 'maxwordlimit', 'qtype_essay'); > $mform->disabledIf('maxwordlimit', 'maxwordenabled', 'notchecked'); > $mform->hideIf('maxgroup', 'responserequired', 'eq', '0'); > $mform->hideIf('maxgroup', 'responseformat', 'eq', 'noinline');$mform->addElement('select', 'attachments', get_string('allowattachments', 'qtype_essay'), $qtype->attachment_options());< $mform->setDefault('attachments', 0);> $mform->setDefault('attachments', $this->get_default_value('attachments', 0));$mform->addElement('select', 'attachmentsrequired', get_string('attachmentsrequired', 'qtype_essay'), $qtype->attachments_required_options());< $mform->setDefault('attachmentsrequired', 0);> $mform->setDefault('attachmentsrequired', $this->get_default_value('attachmentsrequired', 0));$mform->addHelpButton('attachmentsrequired', 'attachmentsrequired', 'qtype_essay');< $mform->disabledIf('attachmentsrequired', 'attachments', 'eq', 0);> $mform->hideIf('attachmentsrequired', 'attachments', 'eq', 0);$mform->addElement('filetypes', 'filetypeslist', get_string('acceptedfiletypes', 'qtype_essay')); $mform->addHelpButton('filetypeslist', 'acceptedfiletypes', 'qtype_essay');< $mform->disabledIf('filetypeslist', 'attachments', 'eq', 0);> $mform->hideIf('filetypeslist', 'attachments', 'eq', 0); > > $mform->addElement('select', 'maxbytes', get_string('maxbytes', 'qtype_essay'), $qtype->max_file_size_options()); > $mform->setDefault('maxbytes', $this->get_default_value('maxbytes', 0)); > $mform->hideIf('maxbytes', 'attachments', 'eq', 0);$mform->addElement('header', 'responsetemplateheader', get_string('responsetemplateheader', 'qtype_essay')); $mform->addElement('editor', 'responsetemplate', get_string('responsetemplate', 'qtype_essay'), array('rows' => 10), array_merge($this->editoroptions, array('maxfiles' => 0))); $mform->addHelpButton('responsetemplate', 'responsetemplate', 'qtype_essay'); $mform->addElement('header', 'graderinfoheader', get_string('graderinfoheader', 'qtype_essay')); $mform->setExpanded('graderinfoheader'); $mform->addElement('editor', 'graderinfo', get_string('graderinfo', 'qtype_essay'), array('rows' => 10), $this->editoroptions); } protected function data_preprocessing($question) { $question = parent::data_preprocessing($question); if (empty($question->options)) { return $question; } $question->responseformat = $question->options->responseformat; $question->responserequired = $question->options->responserequired; $question->responsefieldlines = $question->options->responsefieldlines;> $question->minwordenabled = $question->options->minwordlimit ? 1 : 0; $question->attachments = $question->options->attachments; > $question->minwordlimit = $question->options->minwordlimit; $question->attachmentsrequired = $question->options->attachmentsrequired; > $question->maxwordenabled = $question->options->maxwordlimit ? 1 : 0; $question->filetypeslist = $question->options->filetypeslist; > $question->maxwordlimit = $question->options->maxwordlimit;> $question->maxbytes = $question->options->maxbytes;$draftid = file_get_submitted_draft_itemid('graderinfo'); $question->graderinfo = array(); $question->graderinfo['text'] = file_prepare_draft_area( $draftid, // Draftid $this->context->id, // context 'qtype_essay', // component 'graderinfo', // filarea !empty($question->id) ? (int) $question->id : null, // itemid $this->fileoptions, // options $question->options->graderinfo // text. ); $question->graderinfo['format'] = $question->options->graderinfoformat; $question->graderinfo['itemid'] = $draftid; $question->responsetemplate = array( 'text' => $question->options->responsetemplate, 'format' => $question->options->responsetemplateformat, ); return $question; } public function validation($fromform, $files) { $errors = parent::validation($fromform, $files); // Don't allow both 'no inline response' and 'no attachments' to be selected, // as these options would result in there being no input requested from the user. if ($fromform['responseformat'] == 'noinline' && !$fromform['attachments']) { $errors['attachments'] = get_string('mustattach', 'qtype_essay'); } // If 'no inline response' is set, force the teacher to require attachments; // otherwise there will be nothing to grade. if ($fromform['responseformat'] == 'noinline' && !$fromform['attachmentsrequired']) { $errors['attachmentsrequired'] = get_string('mustrequire', 'qtype_essay'); } // Don't allow the teacher to require more attachments than they allow; as this would // create a condition that it's impossible for the student to meet.< if ($fromform['attachments'] != -1 && $fromform['attachments'] < $fromform['attachmentsrequired'] ) {> if ($fromform['attachments'] > 0 && $fromform['attachments'] < $fromform['attachmentsrequired'] ) {$errors['attachmentsrequired'] = get_string('mustrequirefewer', 'qtype_essay'); }> if ($fromform['responserequired']) { return $errors; > if (isset($fromform['minwordenabled'])) { } > if (!is_numeric($fromform['minwordlimit'])) { > $errors['mingroup'] = get_string('err_numeric', 'form'); public function qtype() { > } return 'essay'; > if ($fromform['minwordlimit'] < 0) { } > $errors['mingroup'] = get_string('err_minwordlimitnegative', 'qtype_essay'); } > } > if (!$fromform['minwordlimit']) { > $errors['mingroup'] = get_string('err_minwordlimit', 'qtype_essay'); > } > } > if (isset($fromform['maxwordenabled'])) { > if (!is_numeric($fromform['maxwordlimit'])) { > $errors['maxgroup'] = get_string('err_numeric', 'form'); > } > if ($fromform['maxwordlimit'] < 0) { > $errors['maxgroup'] = get_string('err_maxwordlimitnegative', 'qtype_essay'); > } > if (!$fromform['maxwordlimit']) { > $errors['maxgroup'] = get_string('err_maxwordlimit', 'qtype_essay'); > } > } > if (isset($fromform['maxwordenabled']) && isset($fromform['minwordenabled'])) { > if ($fromform['maxwordlimit'] < $fromform['minwordlimit'] && > $fromform['maxwordlimit'] > 0 && $fromform['minwordlimit'] > 0) { > $errors['maxgroup'] = get_string('err_maxminmismatch', 'qtype_essay'); > } > } > }