3 // This file is part of Moodle - http://moodle.org/
5 // Moodle is free software: you can redistribute it and/or modify
6 // it under the terms of the GNU General Public License as published by
7 // the Free Software Foundation, either version 3 of the License, or
8 // (at your option) any later version.
10 // Moodle is distributed in the hope that it will be useful,
11 // but WITHOUT ANY WARRANTY; without even the implied warranty of
12 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 // GNU General Public License for more details.
15 // You should have received a copy of the GNU General Public License
16 // along with Moodle. If not, see <http://www.gnu.org/licenses/>.
19 * Action for adding a question page. Prints an HTML form.
22 * @copyright 2009 Sam Hemelryk
23 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
26 require_once("../../config.php");
27 require_once($CFG->dirroot
.'/mod/lesson/locallib.php');
28 require_once('editpage_form.php');
30 // first get the preceeding page
31 $pageid = required_param('pageid', PARAM_INT
);
32 $id = required_param('id', PARAM_INT
); // Course Module ID
33 $qtype = optional_param('qtype', 0, PARAM_INT
);
34 $edit = optional_param('edit', false, PARAM_BOOL
);
35 $returnto = optional_param('returnto', null, PARAM_URL
);
36 if (empty($returnto)) {
37 $returnto = new moodle_url('/mod/lesson/edit.php', array('id' => $id));
38 $returnto->set_anchor('lesson-' . $pageid);
41 $cm = get_coursemodule_from_id('lesson', $id, 0, false, MUST_EXIST
);
42 $course = $DB->get_record('course', array('id' => $cm->course
), '*', MUST_EXIST
);
43 $lesson = new lesson($DB->get_record('lesson', array('id' => $cm->instance
), '*', MUST_EXIST
));
45 require_login($course, false, $cm);
47 $context = context_module
::instance($cm->id
);
48 require_capability('mod/lesson:edit', $context);
50 $PAGE->set_url('/mod/lesson/editpage.php', array('pageid'=>$pageid, 'id'=>$id, 'qtype'=>$qtype));
51 $PAGE->set_pagelayout('admin');
54 $editpage = lesson_page
::load($pageid, $lesson);
55 $qtype = $editpage->qtype
;
61 $jumpto = lesson_page
::get_jumptooptions($pageid, $lesson);
62 $manager = lesson_page_type_manager
::get($lesson);
63 $editoroptions = array('noclean'=>true, 'maxfiles'=>EDITOR_UNLIMITED_FILES
, 'maxbytes'=>$CFG->maxbytes
);
65 // If the previous page was the Question type selection form, this form
66 // will have a different name (e.g. _qf__lesson_add_page_form_selection
67 // versus _qf__lesson_add_page_form_multichoice). This causes confusion
68 // in moodleform::_process_submission because the array key check doesn't
69 // tie up with the current form name, which in turn means the "submitted"
70 // check ends up evaluating as false, thus it's not possible to check whether
71 // the Question type selection was cancelled. For this reason, a dummy form
72 // is created here solely to check whether the selection was cancelled.
74 $mformdummy = $manager->get_page_form(0, array(
75 'editoroptions' => $editoroptions,
79 'maxbytes' => $PAGE->course
->maxbytes
,
80 'returnto' => $returnto
82 if ($mformdummy->is_cancelled()) {
88 $mform = $manager->get_page_form($qtype, array(
89 'editoroptions' => $editoroptions,
93 'maxbytes' => $PAGE->course
->maxbytes
,
94 'returnto' => $returnto
97 if ($mform->is_cancelled()) {
103 $data = $editpage->properties();
104 $data->pageid
= $editpage->id
;
106 $editoroptions['context'] = $context;
107 $data = file_prepare_standard_editor($data, 'contents', $editoroptions, $context, 'mod_lesson', 'page_contents', $editpage->id
);
110 $answers = $editpage->get_answers();
111 foreach ($answers as $answer) {
112 $answereditor = 'answer_editor['.$answerscount.']';
113 if (is_array($data->$answereditor)) {
114 $answerdata = $data->$answereditor;
115 if ($mform->get_answer_format() === LESSON_ANSWER_HTML
) {
116 $answerdraftid = file_get_submitted_draft_itemid($answereditor);
117 $answertext = file_prepare_draft_area($answerdraftid, $PAGE->cm
->context
->id
,
118 'mod_lesson', 'page_answers', $answer->id
, $editoroptions, $answerdata['text']);
119 $data->$answereditor = array('text' => $answertext, 'format' => $answerdata['format'], 'itemid' => $answerdraftid);
121 $data->$answereditor = $answerdata['text'];
125 $responseeditor = 'response_editor['.$answerscount.']';
126 if (is_array($data->$responseeditor)) {
127 $responsedata = $data->$responseeditor;
128 if ($mform->get_response_format() === LESSON_ANSWER_HTML
) {
129 $responsedraftid = file_get_submitted_draft_itemid($responseeditor);
130 $responsetext = file_prepare_draft_area($responsedraftid, $PAGE->cm
->context
->id
,
131 'mod_lesson', 'page_responses', $answer->id
, $editoroptions, $responsedata['text']);
132 $data->$responseeditor = array('text' => $responsetext, 'format' => $responsedata['format'],
133 'itemid' => $responsedraftid);
135 $data->$responseeditor = $responsedata['text'];
140 // Let the lesson pages make updates if required.
141 $data = $editpage->update_form_data($data);
143 $mform->set_data($data);
144 $PAGE->navbar
->add(get_string('edit'), new moodle_url('/mod/lesson/edit.php', array('id'=>$id)));
145 $PAGE->navbar
->add(get_string('editingquestionpage', 'lesson', get_string($mform->qtypestring
, 'lesson')));
147 // Give the page type being created a chance to override the creation process
148 // this is used by endofbranch, cluster, and endofcluster to skip the creation form.
149 // IT SHOULD ALWAYS CALL require_sesskey();
150 $mform->construction_override($pageid, $lesson);
152 $data = new stdClass
;
154 $data->pageid
= $pageid;
156 //TODO: the handling of form for the selection of question type is a bloody hack! (skodak)
157 $data->qtype
= $qtype;
159 $data = file_prepare_standard_editor($data, 'contents', $editoroptions, null);
160 $mform->set_data($data);
161 $PAGE->navbar
->add(get_string('addanewpage', 'lesson'), $PAGE->url
);
162 if ($qtype !== 'unknown') {
163 $PAGE->navbar
->add(get_string($mform->qtypestring
, 'lesson'));
167 if ($data = $mform->get_data()) {
170 $data->lessonid
= $data->id
;
171 $data->id
= $data->pageid
;
172 unset($data->pageid
);
174 $editpage->update($data, $context, $PAGE->course
->maxbytes
);
176 $editpage = lesson_page
::create($data, $lesson, $context, $PAGE->course
->maxbytes
);
181 $lessonoutput = $PAGE->get_renderer('mod_lesson');
182 echo $lessonoutput->header($lesson, $cm, '', false, null, get_string('edit', 'lesson'));
184 echo $lessonoutput->footer();