MDL-64506 templates: Move BS2 btns' to BS4 btns'
[moodle.git] / question / behaviour / rendererbase.php
1 <?php
2 // This file is part of Moodle - http://moodle.org/
3 //
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.
8 //
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.
13 //
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/>.
17 /**
18  * Defines the renderer base class for question behaviours.
19  *
20  * @package    moodlecore
21  * @subpackage questionbehaviours
22  * @copyright  2009 The Open University
23  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
24  */
27 defined('MOODLE_INTERNAL') || die();
30 /**
31  * Renderer base class for question behaviours.
32  *
33  * The methods in this class are mostly called from {@link core_question_renderer}
34  * which coordinates the overall output of questions.
35  *
36  * @copyright  2009 The Open University
37  * @license    http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
38  */
39 abstract class qbehaviour_renderer extends plugin_renderer_base {
40     /**
41      * Generate some HTML (which may be blank) that appears in the question
42      * formulation area, afer the question type generated output.
43      *
44      * For example.
45      * immediatefeedback and interactive mode use this to show the Submit button,
46      * and CBM use this to display the certainty choices.
47      *
48      * @param question_attempt $qa a question attempt.
49      * @param question_display_options $options controls what should and should not be displayed.
50      * @return string HTML fragment.
51      */
52     public function controls(question_attempt $qa, question_display_options $options) {
53         return '';
54     }
56     /**
57      * Generate some HTML (which may be blank) that appears in the outcome area,
58      * after the question-type generated output.
59      *
60      * For example, the CBM models use this to display an explanation of the score
61      * adjustment that was made based on the certainty selected.
62      *
63      * @param question_attempt $qa a question attempt.
64      * @param question_display_options $options controls what should and should not be displayed.
65      * @return string HTML fragment.
66      */
67     public function feedback(question_attempt $qa, question_display_options $options) {
68         return '';
69     }
71     public function manual_comment_fields(question_attempt $qa, question_display_options $options) {
72         global $CFG;
74         require_once($CFG->dirroot.'/lib/filelib.php');
75         require_once($CFG->dirroot.'/repository/lib.php');
77         $inputname = $qa->get_behaviour_field_name('comment');
78         $id = $inputname . '_id';
79         list($commenttext, $commentformat, $commentstep) = $qa->get_current_manual_comment();
81         $editor = editors_get_preferred_editor($commentformat);
82         $strformats = format_text_menu();
83         $formats = $editor->get_supported_formats();
84         foreach ($formats as $fid) {
85             $formats[$fid] = $strformats[$fid];
86         }
88         $draftitemareainputname = $qa->get_behaviour_field_name('comment:itemid');
89         $draftitemid = optional_param($draftitemareainputname, false, PARAM_INT);
91         if (!$draftitemid && $commentstep === null) {
92             $commenttext = '';
93             $draftitemid = file_get_unused_draft_itemid();
94         } else if (!$draftitemid) {
95             list($draftitemid, $commenttext) = $commentstep->prepare_response_files_draft_itemid_with_text(
96                     'bf_comment', $options->context->id, $commenttext);
97         }
99         $editor->set_text($commenttext);
100         $editor->use_editor($id, question_utils::get_editor_options($options->context),
101                 question_utils::get_filepicker_options($options->context, $draftitemid));
103         $commenteditor = html_writer::tag('div', html_writer::tag('textarea', s($commenttext),
104                 array('id' => $id, 'name' => $inputname, 'rows' => 10, 'cols' => 60)));
106         $attributes = ['type'  => 'hidden', 'name'  => $draftitemareainputname, 'value' => $draftitemid];
107         $commenteditor .= html_writer::empty_tag('input', $attributes);
109         $editorformat = '';
110         if (count($formats) == 1) {
111             reset($formats);
112             $editorformat .= html_writer::empty_tag('input', array('type' => 'hidden',
113                     'name' => $inputname . 'format', 'value' => key($formats)));
114         } else {
115             $editorformat = html_writer::start_tag('div', array('class' => 'fitem'));
116             $editorformat .= html_writer::start_tag('div', array('class' => 'fitemtitle'));
117             $editorformat .= html_writer::tag('label', get_string('format'), array('for'=>'menu'.$inputname.'format'));
118             $editorformat .= html_writer::end_tag('div');
119             $editorformat .= html_writer::start_tag('div', array('class' => 'felement fhtmleditor'));
120             $editorformat .= html_writer::select($formats, $inputname.'format', $commentformat, '');
121             $editorformat .= html_writer::end_tag('div');
122             $editorformat .= html_writer::end_tag('div');
123         }
125         $comment = html_writer::tag('div', html_writer::tag('div',
126                 html_writer::tag('label', get_string('comment', 'question'),
127                 array('for' => $id)), array('class' => 'fitemtitle')) .
128                 html_writer::tag('div', $commenteditor, array('class' => 'felement fhtmleditor', 'data-fieldtype' => "editor")),
129                 array('class' => 'fitem'));
130         $comment .= $editorformat;
132         $mark = '';
133         if ($qa->get_max_mark()) {
134             $currentmark = $qa->get_current_manual_mark();
135             $maxmark = $qa->get_max_mark();
137             $fieldsize = strlen($qa->format_max_mark($options->markdp)) - 1;
138             $markfield = $qa->get_behaviour_field_name('mark');
140             $attributes = array(
141                 'type' => 'text',
142                 'size' => $fieldsize,
143                 'name' => $markfield,
144                 'id'=> $markfield
145             );
146             if (!is_null($currentmark)) {
147                 $attributes['value'] = $currentmark;
148             }
150             $markrange = html_writer::empty_tag('input', array(
151                 'type' => 'hidden',
152                 'name' => $qa->get_behaviour_field_name('maxmark'),
153                 'value' => $maxmark,
154             )) . html_writer::empty_tag('input', array(
155                 'type' => 'hidden',
156                 'name' => $qa->get_control_field_name('minfraction'),
157                 'value' => $qa->get_min_fraction(),
158             )) . html_writer::empty_tag('input', array(
159                 'type' => 'hidden',
160                 'name' => $qa->get_control_field_name('maxfraction'),
161                 'value' => $qa->get_max_fraction(),
162             ));
164             $error = $qa->validate_manual_mark($currentmark);
165             $errorclass = '';
166             if ($error !== '') {
167                 $erroclass = ' error';
168                 $error = html_writer::tag('span', $error,
169                         array('class' => 'error')) . html_writer::empty_tag('br');
170             }
172             $a = new stdClass();
173             $a->max = $qa->format_max_mark($options->markdp);
174             $a->mark = html_writer::empty_tag('input', $attributes);
175             $mark = html_writer::tag('div', html_writer::tag('div',
176                         html_writer::tag('label', get_string('mark', 'question'),
177                         array('for' => $markfield)),
178                     array('class' => 'fitemtitle')) .
179                     html_writer::tag('div', $error . get_string('xoutofmax', 'question', $a) .
180                         $markrange, array('class' => 'felement ftext' . $errorclass)
181                     ), array('class' => 'fitem'));
182         }
184         return html_writer::tag('fieldset', html_writer::tag('div', $comment . $mark,
185                 array('class' => 'fcontainer clearfix')), array('class' => 'hidden'));
186     }
188     public function manual_comment_view(question_attempt $qa, question_display_options $options) {
189         $output = '';
190         if ($qa->has_manual_comment()) {
191             $output .= get_string('commentx', 'question', $qa->get_behaviour()->format_comment(null, null, $options->context));
192         }
193         if ($options->manualcommentlink) {
194             $url = new moodle_url($options->manualcommentlink, array('slot' => $qa->get_slot()));
195             $link = $this->output->action_link($url, get_string('commentormark', 'question'),
196                     new popup_action('click', $url, 'commentquestion',
197                     array('width' => 600, 'height' => 800)));
198             $output .= html_writer::tag('div', $link, array('class' => 'commentlink'));
199         }
200         return $output;
201     }
203     /**
204      * Display the manual comment, and a link to edit it, if appropriate.
205      *
206      * @param question_attempt $qa a question attempt.
207      * @param question_display_options $options controls what should and should not be displayed.
208      * @return string HTML fragment.
209      */
210     public function manual_comment(question_attempt $qa, question_display_options $options) {
211         if ($options->manualcomment == question_display_options::EDITABLE) {
212             return $this->manual_comment_fields($qa, $options);
214         } else if ($options->manualcomment == question_display_options::VISIBLE) {
215             return $this->manual_comment_view($qa, $options);
217         } else {
218             return '';
219         }
220     }
222     /**
223      * Several behaviours need a submit button, so put the common code here.
224      * The button is disabled if the question is displayed read-only.
225      * @param question_display_options $options controls what should and should not be displayed.
226      * @return string HTML fragment.
227      */
228     protected function submit_button(question_attempt $qa, question_display_options $options) {
229         if (!$qa->get_state()->is_active()) {
230             return '';
231         }
232         $attributes = array(
233             'type' => 'submit',
234             'id' => $qa->get_behaviour_field_name('submit'),
235             'name' => $qa->get_behaviour_field_name('submit'),
236             'value' => get_string('check', 'question'),
237             'class' => 'submit btn btn-secondary',
238         );
239         if ($options->readonly) {
240             $attributes['disabled'] = 'disabled';
241         }
242         $output = html_writer::empty_tag('input', $attributes);
243         if (!$options->readonly) {
244             $this->page->requires->js_init_call('M.core_question_engine.init_submit_button',
245                     array($attributes['id'], $qa->get_slot()));
246         }
247         return $output;
248     }
250     /**
251      * Return any HTML that needs to be included in the page's <head> when
252      * questions using this model are used.
253      * @param $qa the question attempt that will be displayed on the page.
254      * @return string HTML fragment.
255      */
256     public function head_code(question_attempt $qa) {
257         return '';
258     }
260     /**
261      * Generate the display of the marks for this question.
262      * @param question_attempt $qa the question attempt to display.
263      * @param core_question_renderer $qoutput the renderer for standard parts of questions.
264      * @param question_display_options $options controls what should and should not be displayed.
265      * @return HTML fragment.
266      */
267     public function mark_summary(question_attempt $qa, core_question_renderer $qoutput,
268             question_display_options $options) {
269         return $qoutput->standard_mark_summary($qa, $this, $options);
270     }
272     /**
273      * Generate the display of the available marks for this question.
274      * @param question_attempt $qa the question attempt to display.
275      * @param core_question_renderer $qoutput the renderer for standard parts of questions.
276      * @param question_display_options $options controls what should and should not be displayed.
277      * @return HTML fragment.
278      */
279     public function marked_out_of_max(question_attempt $qa, core_question_renderer $qoutput,
280             question_display_options $options) {
281         return $qoutput->standard_marked_out_of_max($qa, $options);
282     }
284     /**
285      * Generate the display of the marks for this question out of the available marks.
286      * @param question_attempt $qa the question attempt to display.
287      * @param core_question_renderer $qoutput the renderer for standard parts of questions.
288      * @param question_display_options $options controls what should and should not be displayed.
289      * @return HTML fragment.
290      */
291     public function mark_out_of_max(question_attempt $qa, core_question_renderer $qoutput,
292             question_display_options $options) {
293         return $qoutput->standard_mark_out_of_max($qa, $options);
294     }