quiz editing / question bank: MDL-18355 Convert the add question drop-down to be...
[moodle.git] / question / editlib.php
1 <?php // $Id$
3 ///////////////////////////////////////////////////////////////////////////
4 //                                                                       //
5 // NOTICE OF COPYRIGHT                                                   //
6 //                                                                       //
7 // Moodle - Modular Object-Oriented Dynamic Learning Environment         //
8 //          http://moodle.org                                            //
9 //                                                                       //
10 // Copyright (C) 1999 onwards Martin Dougiamas and others                //
11 //                                                                       //
12 // This program is free software; you can redistribute it and/or modify  //
13 // it under the terms of the GNU General Public License as published by  //
14 // the Free Software Foundation; either version 2 of the License, or     //
15 // (at your option) any later version.                                   //
16 //                                                                       //
17 // This program is distributed in the hope that it will be useful,       //
18 // but WITHOUT ANY WARRANTY; without even the implied warranty of        //
19 // MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the         //
20 // GNU General Public License for more details:                          //
21 //                                                                       //
22 //          http://www.gnu.org/copyleft/gpl.html                         //
23 //                                                                       //
24 ///////////////////////////////////////////////////////////////////////////
26 /**
27  * Functions used to show question editing interface
28  *
29  * @license http://www.gnu.org/copyleft/gpl.html GNU Public License
30  * @package questionbank
31  *//** */
33 require_once($CFG->libdir.'/questionlib.php');
35 define('DEFAULT_QUESTIONS_PER_PAGE', 20);
37 function get_module_from_cmid($cmid) {
38     global $CFG, $DB;
39     if (!$cmrec = $DB->get_record_sql("SELECT cm.*, md.name as modname
40                                FROM {course_modules} cm,
41                                     {modules} md
42                                WHERE cm.id = ? AND
43                                      md.id = cm.module", array($cmid))){
44         print_error('invalidcoursemodule');
45     } elseif (!$modrec =$DB->get_record($cmrec->modname, array('id' => $cmrec->instance))) {
46         print_error('invalidcoursemodule');
47     }
48     $modrec->instance = $modrec->id;
49     $modrec->cmid = $cmrec->id;
50     $cmrec->name = $modrec->name;
52     return array($modrec, $cmrec);
53 }
54 /**
55 * Function to read all questions for category into big array
56 *
57 * @param int $category category number
58 * @param bool $noparent if true only questions with NO parent will be selected
59 * @param bool $recurse include subdirectories
60 * @param bool $export set true if this is called by questionbank export
61 * @author added by Howard Miller June 2004
62 */
63 function get_questions_category( $category, $noparent=false, $recurse=true, $export=true ) {
65     global $QTYPES, $DB;
67     // questions will be added to an array
68     $qresults = array();
70     // build sql bit for $noparent
71     $npsql = '';
72     if ($noparent) {
73       $npsql = " and parent='0' ";
74     }
76     // get (list) of categories
77     if ($recurse) {
78         $categorylist = question_categorylist( $category->id );
79     }
80     else {
81         $categorylist = $category->id;
82     }
84     // get the list of questions for the category
85     list ($usql, $params) = $DB->get_in_or_equal(explode(',', $categorylist));
86     if ($questions = $DB->get_records_select("question","category $usql $npsql", $params, "qtype, name ASC")) {
88         // iterate through questions, getting stuff we need
89         foreach($questions as $question) {
90             $questiontype = $QTYPES[$question->qtype];
91             $question->export_process = $export;
92             $questiontype->get_question_options( $question );
93             $qresults[] = $question;
94         }
95     }
97     return $qresults;
98 }
100 /**
101  * @param integer $categoryid a category id.
102  * @return boolean whether this is the only top-level category in a context.
103  */
104 function question_is_only_toplevel_category_in_context($categoryid) {
105     global $DB;
106     return 1 == $DB->count_records_sql("
107             SELECT count(*)
108               FROM {question_categories} c1,
109                    {question_categories} c2
110              WHERE c2.id = ?
111                AND c1.contextid = c2.contextid
112                AND c1.parent = 0 AND c2.parent = 0", array($categoryid));
115 /**
116  * Check whether this user is allowed to delete this category.
117  *
118  * @param integer $todelete a category id.
119  */
120 function question_can_delete_cat($todelete) {
121     global $DB;
122     if (question_is_only_toplevel_category_in_context($todelete)) {
123         print_error('cannotdeletecate', 'question');
124     } else {
125         $contextid = $DB->get_field('question_categories', 'contextid', array('id' => $todelete));
126         require_capability('moodle/question:managecategory', get_context_instance_by_id($contextid));
127     }
130 abstract class question_bank_column_base {
131     /**
132      * @var question_bank_view
133      */
134     protected $qbank;
136     /**
137      * Constructor.
138      * @param $qbank the question_bank_view we are helping to render.
139      */
140     public function __construct(question_bank_view $qbank) {
141         $this->qbank = $qbank;
142         $this->init();
143         require_js(array('yui_yahoo','yui_event'));
144         require_js('question/qbank.js');
145     }
147     /**
148      * A chance for subclasses to initialise themselves, for example to load lang strings,
149      * without having to override the constructor.
150      */
151     protected function init() {
152     }
154     public function is_extra_row() {
155         return false;
156     }
158     /**
159      * Output the column header cell.
160      * @param integer $currentsort 0 for none. 1 for normal sort, -1 for reverse sort.
161      */
162     public function display_header() {
163         echo '<th class="header ' . $this->get_classes() . '" scope="col">';
164         $sortable = $this->is_sortable();
165         $name = $this->get_name();
166         $title = $this->get_title();
167         $tip = $this->get_title_tip();
168         if (is_array($sortable)) {
169             if ($title) {
170                 echo '<div class="title">' . $title . '</div>';
171             }
172             $links = array();
173             foreach ($sortable as $subsort => $details) {
174                 $links[] = $this->make_sort_link($name . '_' . $subsort,
175                         $details['title'], '', !empty($details['reverse']));
176             }
177             echo '<div class="sorters">' . implode(' / ', $links) . '</div>';
178         } else if ($sortable) {
179             echo $this->make_sort_link($name, $title, $tip);
180         } else {
181             if ($tip) {
182                 echo '<span title="' . $tip . '">';
183             }
184             echo $title;
185             if ($tip) {
186                 echo '</span>';
187             }
188         }
189         echo "</th>\n";
190     }
192     /**
193      * Title for this column. Not used if is_sortable returns an array.
194      * @param object $question the row from the $question table, augmented with extra information.
195      * @param string $rowclasses CSS class names that should be applied to this row of output.
196      */
197     abstract protected function get_title();
199     /**
200      * @return string a fuller version of the name. Use this when get_title() returns
201      * something very short, and you want a longer version as a tool tip.
202      */
203     protected function get_title_tip() {
204         return '';
205     }
207     /**
208      * Get a link that changes the sort order, and indicates the current sort state.
209      * @param $name internal name used for this type of sorting.
210      * @param $currentsort the current sort order -1, 0, 1 for descending, none, ascending.
211      * @param $title the link text.
212      * @param $defaultreverse whether the default sort order for this column is descending, rather than ascending.
213      * @return string HTML fragment.
214      */
215     protected function make_sort_link($sort, $title, $tip, $defaultreverse = false) {
216         $currentsort = $this->qbank->get_primary_sort_order($sort);
217         $newsortreverse = $defaultreverse;
218         if ($currentsort) {
219             $newsortreverse = $currentsort > 0;
220         }
221         if (!$tip) {
222             $tip = $title;
223         }
224         if ($newsortreverse) {
225             $tip = get_string('sortbyxreverse', '', $tip);
226         } else {
227             $tip = get_string('sortbyx', '', $tip);
228         }
229         $link = '<a href="' . $this->qbank->new_sort_url($sort, $newsortreverse) . '" title="' . $tip . '">';
230         $link .= $title;
231         if ($currentsort) {
232             $link .= $this->get_sort_icon($currentsort < 0);
233         }
234         $link .= '</a>';
235         return $link;
236     }
238     /**
239      * Get an icon representing the corrent sort state.
240      * @param $reverse sort is descending, not ascending.
241      * @return string HTML image tag.
242      */
243     protected function get_sort_icon($reverse) {
244         global $CFG;
245         if ($reverse) {
246             return ' <img src="' . $CFG->pixpath . '/t/up.gif" alt="' . get_string('desc') . '" />';
247         } else {
248             return ' <img src="' . $CFG->pixpath . '/t/down.gif" alt="' . get_string('asc') . '" />';
249         }
250     }
252     /**
253      * Output this column.
254      * @param object $question the row from the $question table, augmented with extra information.
255      * @param string $rowclasses CSS class names that should be applied to this row of output.
256      */
257     public function display($question, $rowclasses) {
258         $this->display_start($question, $rowclasses);
259         $this->display_content($question, $rowclasses);
260         $this->display_end($question, $rowclasses);
261     }
263     protected function display_start($question, $rowclasses) {
264         echo '<td class="' . $this->get_classes() . '">';
265     }
267     /**
268      * @return string the CSS classes to apply to every cell in this column.
269      */
270     protected function get_classes() {
271         $classes = $this->get_extra_classes();
272         $classes[] = $this->get_name();
273         return implode(' ', $classes);
274     }
276     /**
277      * @param object $question the row from the $question table, augmented with extra information.
278      * @return string internal name for this column. Used as a CSS class name,
279      *     and to store information about the current sort. Must match PARAM_ALPHA.
280      */
281     abstract public function get_name();
283     /**
284      * @return array any extra class names you would like applied to every cell in this column.
285      */
286     public function get_extra_classes() {
287         return array();
288     }
290     /**
291      * Output the contents of this column.
292      * @param object $question the row from the $question table, augmented with extra information.
293      * @param string $rowclasses CSS class names that should be applied to this row of output.
294      */
295     abstract protected function display_content($question, $rowclasses);
297     protected function display_end($question, $rowclasses) {
298         echo "</td>\n";
299     }
301     /**
302      * Return an array 'table_alias' => 'JOIN clause' to bring in any data that
303      * this column required.
304      *
305      * The return values for all the columns will be checked. It is OK if two
306      * columns join in the same table with the same alias and identical JOIN clauses.
307      * If to columns try to use the same alias with different joins, you get an error.
308      * The only table included by default is the question table, which is aliased to 'q'.
309      *
310      * It is importnat that your join simply adds additional data (or NULLs) to the
311      * existing rows of the query. It must not cause additional rows.
312      *
313      * @return array 'table_alias' => 'JOIN clause'
314      */
315     public function get_extra_joins() {
316         return array();
317     }
319     /**
320      * @return array fields required. use table alias 'q' for the question table, or one of the
321      * ones from get_extra_joins. Every field requested must specify a table prefix.
322      */
323     public function get_required_fields() {
324         return array();
325     }
327     /**
328      * Can this column be sorted on? You can return either:
329      *  + false for no (the default),
330      *  + a field name, if sorting this column corresponds to sorting on that datbase field.
331      *  + an array of subnames to sort on as follows
332      *  return array(
333      *      'firstname' => array('field' => 'uc.firstname', 'title' => get_string('firstname')),
334      *      'lastname' => array('field' => 'uc.lastname', 'field' => get_string('lastname')),
335      *  );
336      * As well as field, and field, you can also add 'revers' => 1 if you want the default sort
337      * order to be DESC.
338      * @return mixed as above.
339      */
340     public function is_sortable() {
341         return false;
342     }
344     /**
345      * Helper method for building sort clauses.
346      * @param boolean $reverse whether the normal direction should be reversed.
347      * @param string $normaldir 'ASC' or 'DESC'
348      * @return string 'ASC' or 'DESC'
349      */
350     protected function sortorder($reverse) {
351         if ($reverse) {
352             return ' DESC';
353         } else {
354             return ' ASC';
355         }
356     }
358     /**
359      * @param $reverse Whether to sort in the reverse of the default sort order.
360      * @param $subsort if is_sortable returns an array of subnames, then this will be
361      *      one of those. Otherwise will be empty.
362      * @return string some SQL to go in the order by clause.
363      */
364     public function sort_expression($reverse, $subsort) {
365         $sortable = $this->is_sortable();
366         if (is_array($sortable)) {
367             if (array_key_exists($subsort, $sortable)) {
368                 return $sortable[$subsort]['field'] . $this->sortorder($reverse, !empty($sortable[$subsort]['reverse']));
369             } else {
370                 throw new coding_exception('Unexpected $subsort type: ' . $subsort);
371             }
372         } else if ($sortable) {
373             return $sortable . $this->sortorder($reverse);
374         } else {
375             throw new coding_exception('sort_expression called on a non-sortable column.');
376         }
377     }
380 /**
381  * A column with a checkbox for each question with name q{questionid}.
382  */
383 class question_bank_checkbox_column extends question_bank_column_base {
384     protected $strselect;
385     protected $firstrow = true;
387     public function init() {
388         $this->strselect = get_string('select', 'quiz');
389     }
391     public function get_name() {
392         return 'checkbox';
393     }
395     protected function get_title() {
396         return '<input type="checkbox" disabled="disabled" id="qbheadercheckbox" />';
397     }
399     protected function get_title_tip() {
400         return get_string('selectquestionsforbulk', 'question');
401     }
403     protected function display_content($question, $rowclasses) {
404         echo '<input title="' . $this->strselect . '" type="checkbox" name="q' .
405                 $question->id . '" id="checkq' . $question->id . '" value="1"/>';
406         if ($this->firstrow) {
407             print_js_call('question_bank.init_checkbox_column', array(get_string('selectall'),
408                     get_string('deselectall'), 'checkq' . $question->id));
409             $this->firstrow = false;
410         }
411     }
413     public function get_required_fields() {
414         return array('q.id');
415     }
418 /**
419  * A column type for the name of the question type.
420  */
421 class question_bank_question_type_column extends question_bank_column_base {
422     public function get_name() {
423         return 'qtype';
424     }
426     protected function get_title() {
427         return get_string('qtypeveryshort', 'question');
428     }
430     protected function get_title_tip() {
431         return get_string('questiontype', 'question');
432     }
434     protected function display_content($question, $rowclasses) {
435         echo print_question_icon($question);
436     }
438     public function get_required_fields() {
439         return array('q.qtype');
440     }
442     public function is_sortable() {
443         return 'q.qtype';
444     }
447 /**
448  * A column type for the name of the question name.
449  */
450 class question_bank_question_name_column extends question_bank_column_base {
451     protected $checkboxespresent = null;
453     public function get_name() {
454         return 'questionname';
455     }
457     protected function get_title() {
458         return get_string('question');
459     }
461     protected function label_for($question) {
462         if (is_null($this->checkboxespresent)) {
463             $this->checkboxespresent = $this->qbank->has_column('checkbox');
464         }
465         if ($this->checkboxespresent) {
466             return 'checkq' . $question->id;
467         } else {
468             return '';
469         }
470     }
472     protected function display_content($question, $rowclasses) {
473         $labelfor = $this->label_for($question);
474         if ($labelfor) {
475             echo '<label for="' . $labelfor . '">';
476         }
477         echo format_string($question->name);
478         if ($labelfor) {
479             echo '</label>';
480         }
481     }
483     public function get_required_fields() {
484         return array('q.id', 'q.name');
485     }
487     public function is_sortable() {
488         return 'q.name';
489     }
492 /**
493  * A column type for the name of the question creator.
494  */
495 class question_bank_creator_name_column extends question_bank_column_base {
496     public function get_name() {
497         return 'creatorname';
498     }
500     protected function get_title() {
501         return get_string('createdby', 'question');
502     }
504     protected function display_content($question, $rowclasses) {
505         if (!empty($question->creatorfirstname) && !empty($question->creatorlastname)) {
506             $u = new stdClass;
507             $u->firstname = $question->creatorfirstname;
508             $u->lastname = $question->creatorlastname;
509             echo fullname($u);
510         }
511     }
513     public function get_extra_joins() {
514         return array('uc' => 'LEFT JOIN {user} uc ON uc.id = q.createdby');
515     }
517     public function get_required_fields() {
518         return array('uc.firstname AS creatorfirstname', 'uc.lastname AS creatorlastname');
519     }
521     public function is_sortable() {
522         return array(
523             'firstname' => array('field' => 'uc.firstname', 'title' => get_string('firstname')),
524             'lastname' => array('field' => 'uc.lastname', 'title' => get_string('lastname')),
525         );
526     }
529 /**
530  * A column type for the name of the question last modifier.
531  */
532 class question_bank_modifier_name_column extends question_bank_column_base {
533     public function get_name() {
534         return 'modifiername';
535     }
537     protected function get_title() {
538         return get_string('lastmodifiedby', 'question');
539     }
541     protected function display_content($question, $rowclasses) {
542         if (!empty($question->modifierfirstname) && !empty($question->modifierlastname)) {
543             $u = new stdClass;
544             $u->firstname = $question->modifierfirstname;
545             $u->lastname = $question->modifierlastname;
546             echo fullname($u);
547         }
548     }
550     public function get_extra_joins() {
551         return array('um' => 'LEFT JOIN {user} um ON um.id = q.modifiedby');
552     }
554     public function get_required_fields() {
555         return array('um.firstname AS modifierfirstname', 'um.lastname AS modifierlastname');
556     }
558     public function is_sortable() {
559         return array(
560             'firstname' => array('field' => 'um.firstname', 'title' => get_string('firstname')),
561             'lastname' => array('field' => 'um.lastname', 'title' => get_string('lastname')),
562         );
563     }
566 /**
567  * A base class for actions that are an icon that lets you manipulate the question in some way.
568  */
569 abstract class question_bank_action_column_base extends question_bank_column_base {
571     protected function get_title() {
572         return '&#160;';
573     }
575     public function get_extra_classes() {
576         return array('iconcol');
577     }
579     protected function print_icon($icon, $title, $url) {
580         global $CFG;
581         echo '<a title="' . $title . '" href="' . $url . '">
582                 <img src="' . $CFG->pixpath . '/' . $icon . '" class="iconsmall" alt="' . $title . '" /></a>';
583     }
585     public function get_required_fields() {
586         return array('q.id');
587     }
590 class question_bank_edit_action_column extends question_bank_action_column_base {
591     protected $stredit;
592     protected $strview;
594     public function init() {
595         parent::init();
596         $this->stredit = get_string('edit');
597         $this->strview = get_string('view');
598     }
600     public function get_name() {
601         return 'editaction';
602     }
604     protected function display_content($question, $rowclasses) {
605         if (question_has_capability_on($question, 'edit') ||
606                 question_has_capability_on($question, 'move')) {
607             $this->print_icon('t/edit.gif', $this->stredit, $this->qbank->edit_question_url($question->id));
608         } else {
609             $this->print_icon('i/info.gif', $this->strview, $this->qbank->edit_question_url($question->id));
610         }
611     }
614 class question_bank_preview_action_column extends question_bank_action_column_base {
615     protected $strpreview;
617     public function init() {
618         parent::init();
619         $this->strpreview = get_string('preview');
620     }
622     public function get_name() {
623         return 'previewaction';
624     }
626     protected function display_content($question, $rowclasses) {
627         global $CFG;
628         if (question_has_capability_on($question, 'use')) {
629             link_to_popup_window($this->qbank->preview_question_url($question->id), 'questionpreview',
630                     ' <img src="' . $CFG->pixpath . '/t/preview.gif" class="iconsmall" alt="' . $this->strpreview . '" />',
631                     0, 0, $this->strpreview, QUESTION_PREVIEW_POPUP_OPTIONS);
632         }
633     }
635     public function get_required_fields() {
636         return array('q.id');
637     }
640 class question_bank_move_action_column extends question_bank_action_column_base {
641     protected $strmove;
643     public function init() {
644         parent::init();
645         $this->strmove = get_string('move');
646     }
648     public function get_name() {
649         return 'moveaction';
650     }
652     protected function display_content($question, $rowclasses) {
653         if (question_has_capability_on($question, 'move')) {
654             $this->print_icon('t/move.gif', $this->strmove, $this->qbank->move_question_url($question->id));
655         }
656     }
659 /**
660  * action to delete (or hide) a question, or restore a previously hidden question.
661  */
662 class question_bank_delete_action_column extends question_bank_action_column_base {
663     protected $strdelete;
664     protected $strrestore;
666     public function init() {
667         parent::init();
668         $this->strdelete = get_string('delete');
669         $this->strrestore = get_string('restore');
670     }
672     public function get_name() {
673         return 'deleteaction';
674     }
676     protected function display_content($question, $rowclasses) {
677         if (question_has_capability_on($question, 'edit')) {
678             if ($question->hidden) {
679                 $this->print_icon('t/restore.gif', $this->strrestore, $this->qbank->base_url()->out(false, array('unhide' => $question->id)));
680             } else {
681                 $this->print_icon('t/delete.gif', $this->strdelete,
682                         $this->qbank->base_url()->out(false, array('deleteselected' => $question->id, 'q' . $question->id => 1)));
683             }
684         }
685     }
687     public function get_required_fields() {
688         return array('q.id', 'q.hidden');
689     }
692 /**
693  * Base class for 'columns' that are actually displayed as a row following the main question row.
694  */
695 abstract class question_bank_row_base extends question_bank_column_base {
696     public function is_extra_row() {
697         return true;
698     }
700     protected function display_start($question, $rowclasses) {
701         if ($rowclasses) {
702             echo '<tr class="' . $rowclasses . '">' . "\n";
703         } else {
704             echo "<tr>\n";
705         }
706         echo '<td colspan="' . $this->qbank->get_column_count() . '" class="' . $this->get_name() . '">';
707     }
709     protected function display_end($question, $rowclasses) {
710         echo "</td></tr>\n";
711     }
714 /**
715  * A column type for the name of the question name.
716  */
717 class question_bank_question_text_row extends question_bank_row_base {
718     protected $formatoptions;
720     protected function init() {
721         $this->formatoptions = new stdClass;
722         $this->formatoptions->noclean = true;
723         $this->formatoptions->para = false;
724     }
726     public function get_name() {
727         return 'questiontext';
728     }
730     protected function get_title() {
731         return get_string('questiontext', 'question');
732     }
734     protected function display_content($question, $rowclasses) {
735         $text = format_text($question->questiontext, $question->questiontextformat,
736                 $this->formatoptions, $this->qbank->get_courseid());
737         if ($text == '') {
738             $text = '&#160;';
739         }
740         echo $text;
741     }
743     public function get_required_fields() {
744         return array('q.questiontext', 'q.questiontextformat');
745     }
748 /**
749  * This class prints a view of the question bank, including
750  *  + Some controls to allow users to to select what is displayed.
751  *  + A list of questions as a table.
752  *  + Further controls to do things with the questions.
753  *
754  * This class gives a basic view, and provides plenty of hooks where subclasses
755  * can override parts of the display.
756  *
757  * The list of questions presented as a table is generated by creating a list of
758  * question_bank_column objects, one for each 'column' to be displayed. These
759  * manage
760  *  + outputting the contents of that column, given a $question object, but also
761  *  + generating the right fragments of SQL to ensure the necessary data is present,
762  *    and sorted in the right order.
763  *  + outputting table headers.
764  */
765 class question_bank_view {
766     const MAX_SORTS = 3;
768     protected $baseurl;
769     protected $editquestionurl;
770     protected $quizorcourseid;
771     protected $contexts;
772     protected $cm;
773     protected $course;
774     protected $knowncolumntypes;
775     protected $visiblecolumns;
776     protected $extrarows;
777     protected $requiredcolumns;
778     protected $sort;
779     protected $countsql;
780     protected $loadsql;
781     protected $sqlparams;
783     public function __construct($contexts, $pageurl, $course, $cm = null) {
784         global $CFG;
786         $this->contexts = $contexts;
787         $this->baseurl = $pageurl;
788         $this->course = $course;
789         $this->cm = $cm;
791         if (!empty($cm) && $cm->modname == 'quiz') {
792             $this->quizorcourseid = '&amp;quizid=' . $cm->instance;
793         } else {
794             $this->quizorcourseid = '&amp;courseid=' .$this->course->id;
795         }
797         // Create the url of the new question page to forward to.
798         $this->editquestionurl = new moodle_url("$CFG->wwwroot/question/question.php",
799                 array('returnurl' => $pageurl->out()));
800         if ($cm !== null){
801             $this->editquestionurl->param('cmid', $cm->id);
802         } else {
803             $this->editquestionurl->param('courseid', $this->course->id);
804         }
806         $this->init_column_types();
807         $this->init_columns($this->wanted_columns());
808         $this->init_sort();
809     }
811     protected function wanted_columns() {
812         $columns = array('checkbox', 'qtype', 'questionname', 'creatorname',
813                 'modifiername', 'editaction', 'previewaction', 'moveaction', 'deleteaction');
814         if (optional_param('qbshowtext', false, PARAM_BOOL)) {
815             $columns[] = 'questiontext';
816         }
817         return $columns;
818     }
820     protected function known_field_types() {
821         return array(
822             new question_bank_checkbox_column($this),
823             new question_bank_question_type_column($this),
824             new question_bank_question_name_column($this),
825             new question_bank_creator_name_column($this),
826             new question_bank_modifier_name_column($this),
827             new question_bank_edit_action_column($this),
828             new question_bank_preview_action_column($this),
829             new question_bank_move_action_column($this),
830             new question_bank_delete_action_column($this),
831             new question_bank_question_text_row($this),
832         );
833     }
835     protected function init_column_types() {
836         $this->knowncolumntypes = array();
837         foreach ($this->known_field_types() as $col) {
838             $this->knowncolumntypes[$col->get_name()] = $col;
839         }
840     }
842     protected function init_columns($wanted) {
843         $this->visiblecolumns = array();
844         $this->extrarows = array();
845         foreach ($wanted as $colname) {
846             if (!isset($this->knowncolumntypes[$colname])) {
847                 throw new coding_exception('Unknown column type ' . $colname . ' requested in init columns.');
848             }
849             $column = $this->knowncolumntypes[$colname];
850             if ($column->is_extra_row()) {
851                 $this->extrarows[$colname] = $column;
852             } else {
853                 $this->visiblecolumns[$colname] = $column;
854             }
855         }
856         $this->requiredcolumns = array_merge($this->visiblecolumns, $this->extrarows);
857     }
859     /**
860      * @param string $colname a column internal name.
861      * @return boolean is this column included in the output?
862      */
863     public function has_column($colname) {
864         return isset($this->visiblecolumns[$colname]);
865     }
867     /**
868      * @return integer The number of columns in the table.
869      */
870     public function get_column_count() {
871         return count($this->visiblecolumns);
872     }
874     public function get_courseid() {
875         return $this->course->id;
876     }
878     protected function init_sort() {
879         $this->init_sort_from_params();
880         if (empty($this->sort)) {
881             $this->sort = $this->default_sort();
882         }
883     }
885     /**
886      * Deal with a sort name of the forum columnname, or colname_subsort by
887      * breaking it up, validating the bits that are presend, and returning them.
888      * If there is no subsort, then $subsort is returned as ''.
889      * @return array array($colname, $subsort).
890      */
891     protected function parse_subsort($sort) {
892     /// Do the parsing.
893         if (strpos($sort, '_') !== false) {
894             list($colname, $subsort) = explode('_', $sort, 2);
895         } else {
896             $colname = $sort;
897             $subsort = '';
898         }
899     /// Validate the column name.
900         if (!isset($this->knowncolumntypes[$colname]) || !$this->knowncolumntypes[$colname]->is_sortable()) {
901             for ($i = 1; $i <= question_bank_view::MAX_SORTS; $i++) {
902                 $this->baseurl->remove_params('qbs' . $i);
903             }
904             throw new moodle_exception('unknownsortcolumn', '', $link = $this->baseurl->out(), $colname);
905         }
906     /// Validate the subsort, if present.
907         if ($subsort) {
908             $subsorts = $this->knowncolumntypes[$colname]->is_sortable();
909             if (!is_array($subsorts) || !isset($subsorts[$subsort])) {
910                 throw new moodle_exception('unknownsortcolumn', '', $link = $this->baseurl->out(), $sort);
911             }
912         }
913         return array($colname, $subsort);
914     }
916     protected function init_sort_from_params() {
917         $this->sort = array();
918         for ($i = 1; $i <= question_bank_view::MAX_SORTS; $i++) {
919             if (!$sort = optional_param('qbs' . $i, '', PARAM_ALPHAEXT)) {
920                 break;
921             }
922             // Work out the appropriate order.
923             $order = 1;
924             if ($sort[0] == '-') {
925                 $order = -1;
926                 $sort = substr($sort, 1);
927                 if (!$sort) {
928                     break;
929                 }
930             }
931             // Deal with subsorts.
932             list($colname, $subsort) = $this->parse_subsort($sort);
933             $this->requiredcolumns[$colname] = $this->knowncolumntypes[$colname];
934             $this->sort[$sort] = $order;
935         }
936     }
938     protected function sort_to_params($sorts) {
939         $params = array();
940         $i = 0;
941         foreach ($sorts as $sort => $order) {
942             $i += 1;
943             if ($order < 0) {
944                 $sort = '-' . $sort;
945             }
946             $params['qbs' . $i] = $sort;
947         }
948         return $params;
949     }
951     protected function default_sort() {
952         return array('qtype' => 1, 'questionname' => 1);
953     }
955     /**
956      * @param $sort a column or column_subsort name.
957      * @return integer the current sort order for this column -1, 0, 1
958      */
959     public function get_primary_sort_order($sort) {
960         $order = reset($this->sort);
961         $primarysort = key($this->sort);
962         if ($sort == $primarysort) {
963             return $order;
964         } else {
965             return 0;
966         }
967     }
969     /**
970      * Get a URL to redisplay the page with a new sort for the question bank.
971      * @param string $sort the column, or column_subsort to sort on.
972      * @param boolean $newsortreverse whether to sort in reverse order.
973      * @return string The new URL.
974      */
975     public function new_sort_url($sort, $newsortreverse) {
976         if ($newsortreverse) {
977             $order = -1;
978         } else {
979             $order = 1;
980         }
981         // Tricky code to add the new sort at the start, removing it from where it was before, if it was present.
982         $newsort = array_reverse($this->sort);
983         if (isset($newsort[$sort])) {
984             unset($newsort[$sort]);
985         }
986         $newsort[$sort] = $order;
987         $newsort = array_reverse($newsort);
988         if (count($newsort) > question_bank_view::MAX_SORTS) {
989             $newsort = array_slice($newsort, 0, question_bank_view::MAX_SORTS, true);
990         }
991         return $this->baseurl->out(false, $this->sort_to_params($newsort));
992     }
994     protected function build_query_sql($category, $recurse, $showhidden) {
995         global $DB;
997     /// Get the required tables.
998         $joins = array();
999         foreach ($this->requiredcolumns as $column) {
1000             $extrajoins = $column->get_extra_joins();
1001             foreach ($extrajoins as $prefix => $join) {
1002                 if (isset($joins[$prefix]) && $joins[$prefix] != $join) {
1003                     throw new coding_exception('Join ' . $join . ' conflicts with previous join ' . $joins[$prefix]);
1004                 }
1005                 $joins[$prefix] = $join;
1006             }
1007         }
1009     /// Get the required fields.
1010         $fields = array('q.hidden', 'q.category');
1011         foreach ($this->visiblecolumns as $column) {
1012             $fields = array_merge($fields, $column->get_required_fields());
1013         }
1014         foreach ($this->extrarows as $row) {
1015             $fields = array_merge($fields, $row->get_required_fields());
1016         }
1017         $fields = array_unique($fields);
1019     /// Build the order by clause.
1020         $sorts = array();
1021         foreach ($this->sort as $sort => $order) {
1022             list($colname, $subsort) = $this->parse_subsort($sort);
1023             $sorts[] = $this->knowncolumntypes[$colname]->sort_expression($order < 0, $subsort);
1024         }
1026     /// Build the where clause.
1027         $tests = array('parent = 0');
1029         if ($showhidden) {
1030             $tests[] = 'hidden = 0';
1031         }
1033         if ($recurse) {
1034             $categoryids = explode(',', question_categorylist($category->id));
1035         } else {
1036             $categoryids = array($category->id);
1037         }
1038         list($catidtest, $params) = $DB->get_in_or_equal($categoryids, SQL_PARAMS_NAMED, 'cat0000');
1039         $tests[] = 'q.category ' . $catidtest;
1040         $this->sqlparams = $params;
1042     /// Build the SQL.
1043         $sql = ' FROM {question} q ' . implode(' ', $joins);
1044         $sql .= ' WHERE ' . implode(' AND ', $tests);
1045         $this->countsql = 'SELECT count(1)' . $sql;
1046         $this->loadsql = 'SELECT ' . implode(', ', $fields) . $sql . ' ORDER BY ' . implode(', ', $sorts);
1047         $this->sqlparams = $params;
1048     }
1050     protected function get_question_count() {
1051         global $DB;
1052         return $DB->count_records_sql($this->countsql, $this->sqlparams);
1053     }
1055     protected function load_page_questions($page, $perpage) {
1056         global $DB;
1057         $questions = $DB->get_recordset_sql($this->loadsql, $this->sqlparams, $page*$perpage, $perpage);
1058         if (!$questions->valid()) {
1059         /// No questions on this page. Reset to page 0.
1060             $questions = $DB->get_recordset_sql($this->loadsql, $this->sqlparams, 0, $perpage);
1061         }
1062         return $questions;
1063     }
1065     public function base_url() {
1066         return $this->baseurl;
1067     }
1069     public function edit_question_url($questionid) {
1070         return $this->editquestionurl->out(false, array('id' => $questionid));
1071     }
1073     public function move_question_url($questionid) {
1074         return $this->editquestionurl->out(false, array('id' => $questionid, 'movecontext' => 1));
1075     }
1077     public function preview_question_url($questionid) {
1078         global $CFG;
1079         return $CFG->wwwroot . '/question/preview.php?id=' . $questionid . '&amp;courseid=' . $this->course->id;
1080     }
1082     /**
1083      * Shows the question bank editing interface.
1084      *
1085      * The function also processes a number of actions:
1086      *
1087      * Actions affecting the question pool:
1088      * move           Moves a question to a different category
1089      * deleteselected Deletes the selected questions from the category
1090      * Other actions:
1091      * category      Chooses the category
1092      * displayoptions Sets display options
1093      */
1094     public function display($tabname, $page, $perpage, $sortorder,
1095             $sortorderdecoded, $cat, $recurse, $showhidden, $showquestiontext){
1097         if ($this->process_actions_needing_ui()) {
1098             return;
1099         }
1101         // Category selection form
1102         print_heading(get_string('questionbank', 'question'), '', 2);
1104         $this->display_category_form($this->contexts->having_one_edit_tab_cap($tabname),
1105                 $this->baseurl, $cat);
1106         $this->display_options($recurse, $showhidden, $showquestiontext);
1108         if (!$category = $this->get_current_category($cat)) {
1109             return;
1110         }
1111         $this->print_category_info($category);
1113         // continues with list of questions
1114         $this->display_question_list($this->contexts->having_one_edit_tab_cap($tabname), $this->baseurl, $cat, $this->cm,
1115                 $recurse, $page, $perpage, $showhidden, $sortorder, $sortorderdecoded, $showquestiontext,
1116                 $this->contexts->having_cap('moodle/question:add'));
1117     }
1119     protected function print_choose_category_message($categoryandcontext) {
1120         echo "<p style=\"text-align:center;\"><b>";
1121         print_string("selectcategoryabove", "quiz");
1122         echo "</b></p>";
1123     }
1125     protected function get_current_category($categoryandcontext) {
1126         global $DB;
1127         list($categoryid, $contextid) = explode(',', $categoryandcontext);
1128         if (!$categoryid) {
1129             $this->print_choose_category_message($categoryandcontext);
1130             return false;
1131         }
1133         if (!$category = $DB->get_record('question_categories',
1134                 array('id' => $categoryid, 'contextid' => $contextid))) {
1135             print_box_start('generalbox questionbank');
1136             notify('Category not found!');
1137             print_box_end();
1138             return false;
1139         }
1141         return $category;
1142     }
1144     protected function print_category_info($category) {
1145         $formatoptions = new stdClass;
1146         $formatoptions->noclean = true;
1147         echo '<div class="boxaligncenter">';
1148         echo format_text($category->info, FORMAT_MOODLE, $formatoptions, $this->course->id);
1149         echo "</div>\n";
1150     }
1152     /**
1153      * prints a form to choose categories
1154      */
1155     protected function display_category_form($contexts, $pageurl, $current) {
1156         global $CFG;
1158     /// Get all the existing categories now
1159         echo '<div class="choosecategory">';
1160         $catmenu = question_category_options($contexts, false, 0, true);
1161         popup_form('edit.php?'.$pageurl->get_query_string().'&amp;category=',
1162                 $catmenu, 'catmenu', $current, '', '', '', false, 'self',
1163                 get_string('selectacategory', 'question'));
1164         echo "</div>\n";
1165     }
1167     protected function display_options($recurse = 1, $showhidden = false, $showquestiontext = false) {
1168         echo '<form method="get" action="edit.php" id="displayoptions">';
1169         echo "<fieldset class='invisiblefieldset'>";
1170         echo $this->baseurl->hidden_params_out(array('recurse', 'showhidden', 'showquestiontext'));
1171         $this->display_category_form_checkbox('recurse', get_string('recurse', 'quiz'));
1172         $this->display_category_form_checkbox('showhidden', get_string('showhidden', 'quiz'));
1173         $this->display_category_form_checkbox('qbshowtext', get_string('showquestiontext', 'quiz'));
1174         echo '<noscript><div class="centerpara"><input type="submit" value="'. get_string('go') .'" />';
1175         echo '</div></noscript></fieldset></form>';
1176     }
1178     /**
1179      * Print a single option checkbox. Used by the preceeding.
1180      */
1181     protected function display_category_form_checkbox($name, $label) {
1182         echo '<div><input type="hidden" id="' . $name . '_off" name="' . $name . '" value="0" />';
1183         echo '<input type="checkbox" id="' . $name . '_on" name="' . $name . '" value="1"';
1184         if (optional_param($name, false, PARAM_BOOL)) {
1185             echo ' checked="checked"';
1186         }
1187         echo ' onchange="getElementById(\'displayoptions\').submit(); return true;" />';
1188         echo '<label for="' . $name . '_on">' . $label . '</label>';
1189         echo "</div>\n";
1190     }
1192     protected function create_new_question_form($category, $canadd) {
1193         global $CFG;
1194         echo '<div class="createnewquestion">';
1195         if ($canadd) {
1196             create_new_question_button($category->id, $this->editquestionurl->params(),
1197                     get_string('createnewquestion', 'question'));
1198         } else {
1199             print_string('nopermissionadd', 'question');
1200         }
1201         echo '</div>';
1202     }
1204     /**
1205     * Prints the table of questions in a category with interactions
1206     *
1207     * @param object $course   The course object
1208     * @param int $categoryid  The id of the question category to be displayed
1209     * @param int $cm      The course module record if we are in the context of a particular module, 0 otherwise
1210     * @param int $recurse     This is 1 if subcategories should be included, 0 otherwise
1211     * @param int $page        The number of the page to be displayed
1212     * @param int $perpage     Number of questions to show per page
1213     * @param boolean $showhidden   True if also hidden questions should be displayed
1214     * @param boolean $showquestiontext whether the text of each question should be shown in the list
1215     */
1216     protected function display_question_list($contexts, $pageurl, $categoryandcontext,
1217             $cm = null, $recurse=1, $page=0, $perpage=100, $showhidden=false,
1218             $sortorder='typename', $sortorderdecoded='qtype, name ASC',
1219             $showquestiontext = false, $addcontexts = array()) {
1220         global $CFG, $DB;
1222         $category = $this->get_current_category($categoryandcontext);
1224         $cmoptions = new stdClass;
1225         $cmoptions->hasattempts = !empty($this->quizhasattempts);
1227         $strselectall = get_string("selectall", "quiz");
1228         $strselectnone = get_string("selectnone", "quiz");
1229         $strdelete = get_string("delete");
1231         list($categoryid, $contextid) = explode(',', $categoryandcontext);
1232         $catcontext = get_context_instance_by_id($contextid);
1234         $canadd = has_capability('moodle/question:add', $catcontext);
1235         $caneditall =has_capability('moodle/question:editall', $catcontext);
1236         $canuseall =has_capability('moodle/question:useall', $catcontext);
1237         $canmoveall =has_capability('moodle/question:moveall', $catcontext);
1239         $this->create_new_question_form($category, $canadd);
1241         $this->build_query_sql($category, $recurse, $showhidden);
1242         $totalnumber = $this->get_question_count();
1243         if ($totalnumber == 0) {
1244             return;
1245         }
1247         $questions = $this->load_page_questions($page, $perpage);
1249         echo '<div class="categorypagingbarcontainer">';
1250         print_paging_bar($totalnumber, $page, $perpage, $pageurl, 'qpage');
1251         echo '</div>';
1253         echo '<form method="post" action="edit.php">';
1254         echo '<fieldset class="invisiblefieldset" style="display: block;">';
1255         echo '<input type="hidden" name="sesskey" value="'.sesskey().'" />';
1256         echo $pageurl->hidden_params_out();
1258         echo '<div class="categoryquestionscontainer">';
1259         $this->start_table();
1260         $rowcount = 0;
1261         foreach ($questions as $question) {
1262             $this->print_table_row($question, $rowcount);
1263             $rowcount += 1;
1264         }
1265         $this->end_table();
1266         echo "</div>\n";
1268         echo '<div class="categorypagingbarcontainer pagingbottom">';
1269         $paging = print_paging_bar($totalnumber, $page, $perpage, $pageurl, 'qpage', false, true);
1270         if ($totalnumber > DEFAULT_QUESTIONS_PER_PAGE) {
1271             if ($perpage == DEFAULT_QUESTIONS_PER_PAGE) {
1272                 $showall = '<a href="edit.php?'.$pageurl->get_query_string(array('qperpage'=>1000)).'">'.get_string('showall', 'moodle', $totalnumber).'</a>';
1273             } else {
1274                 $showall = '<a href="edit.php?'.$pageurl->get_query_string(array('qperpage'=>DEFAULT_QUESTIONS_PER_PAGE)).'">'.get_string('showperpage', 'moodle', DEFAULT_QUESTIONS_PER_PAGE).'</a>';
1275             }
1276             if ($paging) {
1277                 $paging = substr($paging, 0, strrpos($paging, '</div>'));
1278                 $paging .= "<br />$showall</div>";
1279             } else {
1280                 $paging = "<div class='paging'>$showall</div>";
1281             }
1282         }
1283         echo $paging;
1284         echo '</div>';
1286         echo '<div class="modulespecificbuttonscontainer">';
1287         if ($caneditall || $canmoveall || $canuseall){
1288             echo '<strong>&nbsp;'.get_string('withselected', 'quiz').':</strong><br />';
1290             if (function_exists('module_specific_buttons')) {
1291                 echo module_specific_buttons($this->cm->id,$cmoptions);
1292             }
1294             // print delete and move selected question
1295             if ($caneditall) {
1296                 echo '<input type="submit" name="deleteselected" value="' . $strdelete . "\" />\n";
1297             }
1299             if ($canmoveall && count($addcontexts)) {
1300                 echo '<input type="submit" name="move" value="'.get_string('moveto', 'quiz')."\" />\n";
1301                 question_category_select_menu($addcontexts, false, 0, "$category->id,$category->contextid");
1302             }
1304             if (function_exists('module_specific_controls') && $canuseall) {
1305                 $modulespecific = module_specific_controls($totalnumber, $recurse, $category, $this->cm->id,$cmoptions);
1306                 if(!empty($modulespecific)){
1307                     echo "<hr />$modulespecific";
1308                 }
1309             }
1310         }
1311         echo "</div>\n";
1313         echo '</fieldset>';
1314         echo "</form>\n";
1315     }
1317     protected function start_table() {
1318         echo '<table id="categoryquestions">' . "\n";
1319         echo "<thead>\n";
1320         $this->print_table_headers();
1321         echo "</thead>\n";
1322         echo "<tbody>\n";
1323     }
1325     protected function end_table() {
1326         echo "</tbody>\n";
1327         echo "</table>\n";
1328     }
1330     protected function print_table_headers() {
1331         echo "<tr>\n";
1332         foreach ($this->visiblecolumns as $column) {
1333             $column->display_header();
1334         }
1335         echo "</tr>\n";
1336     }
1338     protected function get_row_classes($question, $rowcount) {
1339         $classes = array();
1340         if ($question->hidden) {
1341             $classes[] = 'dimmed_text';
1342         }
1343         if (!empty($this->extrarows)) {
1344             $classes[] = 'r' . ($rowcount % 2);
1345         }
1346         return $classes;
1347     }
1349     protected function print_table_row($question, $rowcount) {
1350         $rowclasses = implode(' ', $this->get_row_classes($question, $rowcount));
1351         if ($rowclasses) {
1352             echo '<tr class="' . $rowclasses . '">' . "\n";
1353         } else {
1354             echo "<tr>\n";
1355         }
1356         foreach ($this->visiblecolumns as $column) {
1357             $column->display($question, $rowclasses);
1358         }
1359         echo "</tr>\n";
1360         foreach ($this->extrarows as $row) {
1361             $row->display($question, $rowclasses);
1362         }
1363     }
1365     public function process_actions() {
1366         global $CFG, $DB;
1367         /// Now, check for commands on this page and modify variables as necessary
1368         if (optional_param('move', false, PARAM_BOOL) and confirm_sesskey()) { /// Move selected questions to new category
1369             $category = required_param('category', PARAM_SEQUENCE);
1370             list($tocategoryid, $contextid) = explode(',', $category);
1371             if (! $tocategory = $DB->get_record('question_categories', array('id' => $tocategoryid, 'contextid' => $contextid))) {
1372                 print_error('cannotfindcate', 'question');
1373             }
1374             $tocontext = get_context_instance_by_id($contextid);
1375             require_capability('moodle/question:add', $tocontext);
1376             $rawdata = (array) data_submitted();
1377             $questionids = array();
1378             foreach ($rawdata as $key => $value) {    // Parse input for question ids
1379                 if (preg_match('!^q([0-9]+)$!', $key, $matches)) {
1380                     $key = $matches[1];
1381                     $questionids[] = $key;
1382                 }
1383             }
1384             if ($questionids){
1385                 list($usql, $params) = $DB->get_in_or_equal($questionids);
1386                 $sql = "SELECT q.*, c.contextid FROM {question} q, {question_categories} c WHERE q.id $usql AND c.id = q.category";
1387                 if (!$questions = $DB->get_records_sql($sql, $params)){
1388                     print_error('questiondoesnotexist', 'question', $pageurl->out());
1389                 }
1390                 $checkforfiles = false;
1391                 foreach ($questions as $question){
1392                     //check capabilities
1393                     question_require_capability_on($question, 'move');
1394                     $fromcontext = get_context_instance_by_id($question->contextid);
1395                     if (get_filesdir_from_context($fromcontext) != get_filesdir_from_context($tocontext)){
1396                         $checkforfiles = true;
1397                     }
1398                 }
1399                 $returnurl = $this->baseurl->out(false, array('category'=>"$tocategoryid,$contextid"));
1400                 if (!$checkforfiles){
1401                     if (!question_move_questions_to_category(implode(',', $questionids), $tocategory->id)) {
1402                         print_error('errormovingquestions', 'question', $returnurl, $questionids);
1403                     }
1404                     redirect($returnurl);
1405                 } else {
1406                     $movecontexturl  = new moodle_url($CFG->wwwroot.'/question/contextmoveq.php',
1407                                                     array('returnurl' => $returnurl,
1408                                                             'ids'=>$questionidlist,
1409                                                             'tocatid'=> $tocategoryid));
1410                     if ($cm){
1411                         $movecontexturl->param('cmid', $cm->id);
1412                     } else {
1413                         $movecontexturl->param('courseid', $this->course->id);
1414                     }
1415                     redirect($movecontexturl->out());
1416                 }
1417             }
1418         }
1420         if (optional_param('deleteselected', false, PARAM_BOOL)) { // delete selected questions from the category
1421             if (($confirm = optional_param('confirm', '', PARAM_ALPHANUM)) and confirm_sesskey()) { // teacher has already confirmed the action
1422                 $deleteselected = required_param('deleteselected');
1423                 if ($confirm == md5($deleteselected)) {
1424                     if ($questionlist = explode(',', $deleteselected)) {
1425                         // for each question either hide it if it is in use or delete it
1426                         foreach ($questionlist as $questionid) {
1427                             question_require_capability_on($questionid, 'edit');
1428                             if ($DB->record_exists('quiz_question_instances', array('question' => $questionid))) {
1429                                 if (!$DB->set_field('question', 'hidden', 1, array('id' => $questionid))) {
1430                                     question_require_capability_on($questionid, 'edit');
1431                                     print_error('cannothidequestion', 'question');
1432                                 }
1433                             } else {
1434                                 delete_question($questionid);
1435                             }
1436                         }
1437                     }
1438                     redirect($this->baseurl->out());
1439                 } else {
1440                     print_error('invalidconfirm', 'question');
1441                 }
1442             }
1443         }
1445         // Unhide a question
1446         if(($unhide = optional_param('unhide', '', PARAM_INT)) and confirm_sesskey()) {
1447             question_require_capability_on($unhide, 'edit');
1448             if(!$DB->set_field('question', 'hidden', 0, array('id', $unhide))) {
1449                 print_error('cannotunhidequestion', 'question');
1450             }
1451             redirect($this->baseurl->out());
1452         }
1453     }
1455     public function process_actions_needing_ui() {
1456         global $DB;
1457         if (optional_param('deleteselected', false, PARAM_BOOL)) {
1458             // make a list of all the questions that are selected
1459             $rawquestions = $_REQUEST; // This code is called by both POST forms and GET links, so cannot use data_submitted.
1460             $questionlist = '';  // comma separated list of ids of questions to be deleted
1461             $questionnames = ''; // string with names of questions separated by <br /> with
1462                                  // an asterix in front of those that are in use
1463             $inuse = false;      // set to true if at least one of the questions is in use
1464             foreach ($rawquestions as $key => $value) {    // Parse input for question ids
1465                 if (preg_match('!^q([0-9]+)$!', $key, $matches)) {
1466                     $key = $matches[1];
1467                     $questionlist .= $key.',';
1468                     question_require_capability_on($key, 'edit');
1469                     if ($DB->record_exists('quiz_question_instances', array('question' => $key))) {
1470                         $questionnames .= '* ';
1471                         $inuse = true;
1472                     }
1473                     $questionnames .= $DB->get_field('question', 'name', array('id' => $key)) . '<br />';
1474                 }
1475             }
1476             if (!$questionlist) { // no questions were selected
1477                 redirect($this->baseurl->out());
1478             }
1479             $questionlist = rtrim($questionlist, ',');
1481             // Add an explanation about questions in use
1482             if ($inuse) {
1483                 $questionnames .= '<br />'.get_string('questionsinuse', 'quiz');
1484             }
1485             notice_yesno(get_string("deletequestionscheck", "quiz", $questionnames),
1486                         $this->baseurl->out_action(array('deleteselected'=>$questionlist, 'confirm'=>md5($questionlist))),
1487                         $this->baseurl->out_action());
1489             return true;
1490         }
1491     }
1494 /**
1495  * Common setup for all pages for editing questions.
1496  * @param string $edittab code for this edit tab
1497  * @param boolean $requirecmid require cmid? default false
1498  * @param boolean $requirecourseid require courseid, if cmid is not given? default true
1499  * @return array $thispageurl, $contexts, $cmid, $cm, $module, $pagevars
1500  */
1501 function question_edit_setup($edittab, $requirecmid = false, $requirecourseid = true){
1502     global $QUESTION_EDITTABCAPS, $DB;
1504     //$thispageurl is used to construct urls for all question edit pages we link to from this page. It contains an array
1505     //of parameters that are passed from page to page.
1506     $thispageurl = new moodle_url();
1507     $thispageurl->remove_params(); // We are going to explicity add back everything important - this avoids unwanted params from being retained.
1509     if ($requirecmid){
1510         $cmid =required_param('cmid', PARAM_INT);
1511     } else {
1512         $cmid = optional_param('cmid', 0, PARAM_INT);
1513     }
1514     if ($cmid){
1515         list($module, $cm) = get_module_from_cmid($cmid);
1516         $courseid = $cm->course;
1517         $thispageurl->params(compact('cmid'));
1518         require_login($courseid, false, $cm);
1519         $thiscontext = get_context_instance(CONTEXT_MODULE, $cmid);
1520     } else {
1521         $module = null;
1522         $cm = null;
1523         if ($requirecourseid){
1524             $courseid  = required_param('courseid', PARAM_INT);
1525         } else {
1526             $courseid  = optional_param('courseid', 0, PARAM_INT);
1527         }
1528         if ($courseid){
1529             $thispageurl->params(compact('courseid'));
1530             require_login($courseid, false);
1531             $thiscontext = get_context_instance(CONTEXT_COURSE, $courseid);
1532         } else {
1533             $thiscontext = null;
1534         }
1535     }
1537     if ($thiscontext){
1538         $contexts = new question_edit_contexts($thiscontext);
1539         $contexts->require_one_edit_tab_cap($edittab);
1541     } else {
1542         $contexts = null;
1543     }
1547     $pagevars['qpage'] = optional_param('qpage', -1, PARAM_INT);
1549     //pass 'cat' from page to page and when 'category' comes from a drop down menu
1550     //then we also reset the qpage so we go to page 1 of
1551     //a new cat.
1552     $pagevars['cat'] = optional_param('cat', 0, PARAM_SEQUENCE);// if empty will be set up later
1553     if  ($category = optional_param('category', 0, PARAM_SEQUENCE)){
1554         if ($pagevars['cat'] != $category){ // is this a move to a new category?
1555             $pagevars['cat'] = $category;
1556             $pagevars['qpage'] = 0;
1557         }
1558     }
1559     if ($pagevars['cat']){
1560         $thispageurl->param('cat', $pagevars['cat']);
1561     }
1562     if ($pagevars['qpage'] > -1) {
1563         $thispageurl->param('qpage', $pagevars['qpage']);
1564     } else {
1565         $pagevars['qpage'] = 0;
1566     }
1568     $pagevars['qperpage'] = optional_param('qperpage', -1, PARAM_INT);
1569     if ($pagevars['qperpage'] > -1) {
1570         $thispageurl->param('qperpage', $pagevars['qperpage']);
1571     } else {
1572         $pagevars['qperpage'] = DEFAULT_QUESTIONS_PER_PAGE;
1573     }
1575     $sortoptions = array('alpha' => 'name, qtype ASC',
1576                           'typealpha' => 'qtype, name ASC',
1577                           'age' => 'id ASC');
1579     if ($sortorder = optional_param('qsortorder', '', PARAM_ALPHA)) {
1580         $pagevars['qsortorderdecoded'] = $sortoptions[$sortorder];
1581         $pagevars['qsortorder'] = $sortorder;
1582         $thispageurl->param('qsortorder', $sortorder);
1583     } else {
1584         $pagevars['qsortorderdecoded'] = $sortoptions['typealpha'];
1585         $pagevars['qsortorder'] = 'typealpha';
1586     }
1588     $defaultcategory = question_make_default_categories($contexts->all());
1590     $contextlistarr = array();
1591     foreach ($contexts->having_one_edit_tab_cap($edittab) as $context){
1592         $contextlistarr[] = "'$context->id'";
1593     }
1594     $contextlist = join($contextlistarr, ' ,');
1595     if (!empty($pagevars['cat'])){
1596         $catparts = explode(',', $pagevars['cat']);
1597         if (!$catparts[0] || (FALSE !== array_search($catparts[1], $contextlistarr)) ||
1598                 !$DB->count_records_select("question_categories", "id = ? AND contextid = ?", array($catparts[0], $catparts[1]))) {
1599             print_error('invalidcategory', 'quiz');
1600         }
1601     } else {
1602         $category = $defaultcategory;
1603         $pagevars['cat'] = "$category->id,$category->contextid";
1604     }
1606     if(($recurse = optional_param('recurse', -1, PARAM_BOOL)) != -1) {
1607         $pagevars['recurse'] = $recurse;
1608         $thispageurl->param('recurse', $recurse);
1609     } else {
1610         $pagevars['recurse'] = 1;
1611     }
1613     if(($showhidden = optional_param('showhidden', -1, PARAM_BOOL)) != -1) {
1614         $pagevars['showhidden'] = $showhidden;
1615         $thispageurl->param('showhidden', $showhidden);
1616     } else {
1617         $pagevars['showhidden'] = 0;
1618     }
1620     if(($showquestiontext = optional_param('showquestiontext', -1, PARAM_BOOL)) != -1) {
1621         $pagevars['showquestiontext'] = $showquestiontext;
1622         $thispageurl->param('showquestiontext', $showquestiontext);
1623     } else {
1624         $pagevars['showquestiontext'] = 0;
1625     }
1627     //category list page
1628     $pagevars['cpage'] = optional_param('cpage', 1, PARAM_INT);
1629     if ($pagevars['cpage'] != 1){
1630         $thispageurl->param('cpage', $pagevars['cpage']);
1631     }
1634     return array($thispageurl, $contexts, $cmid, $cm, $module, $pagevars);
1636 class question_edit_contexts{
1637     var $allcontexts;
1638     /**
1639      * @param current context
1640      */
1641     function question_edit_contexts($thiscontext){
1642         $pcontextids = get_parent_contexts($thiscontext);
1643         $contexts = array($thiscontext);
1644         foreach ($pcontextids as $pcontextid){
1645             $contexts[] = get_context_instance_by_id($pcontextid);
1646         }
1647         $this->allcontexts = $contexts;
1648     }
1649     /**
1650      * @return array all parent contexts
1651      */
1652     function all(){
1653         return $this->allcontexts;
1654     }
1655     /**
1656      * @return object lowest context which must be either the module or course context
1657      */
1658     function lowest(){
1659         return $this->allcontexts[0];
1660     }
1661     /**
1662      * @param string $cap capability
1663      * @return array parent contexts having capability, zero based index
1664      */
1665     function having_cap($cap){
1666         $contextswithcap = array();
1667         foreach ($this->allcontexts as $context){
1668             if (has_capability($cap, $context)){
1669                 $contextswithcap[] = $context;
1670             }
1671         }
1672         return $contextswithcap;
1673     }
1674     /**
1675      * @param array $caps capabilities
1676      * @return array parent contexts having at least one of $caps, zero based index
1677      */
1678     function having_one_cap($caps){
1679         $contextswithacap = array();
1680         foreach ($this->allcontexts as $context){
1681             foreach ($caps as $cap){
1682                 if (has_capability($cap, $context)){
1683                     $contextswithacap[] = $context;
1684                     break; //done with caps loop
1685                 }
1686             }
1687         }
1688         return $contextswithacap;
1689     }
1690     /**
1691      * @param string $tabname edit tab name
1692      * @return array parent contexts having at least one of $caps, zero based index
1693      */
1694     function having_one_edit_tab_cap($tabname){
1695         global $QUESTION_EDITTABCAPS;
1696         return $this->having_one_cap($QUESTION_EDITTABCAPS[$tabname]);
1697     }
1698     /**
1699      * Has at least one parent context got the cap $cap?
1700      *
1701      * @param string $cap capability
1702      * @return boolean
1703      */
1704     function have_cap($cap){
1705         return (count($this->having_cap($cap)));
1706     }
1708     /**
1709      * Has at least one parent context got one of the caps $caps?
1710      *
1711      * @param string $cap capability
1712      * @return boolean
1713      */
1714     function have_one_cap($caps){
1715         foreach ($caps as $cap){
1716             if ($this->have_cap($cap)){
1717                 return true;
1718             }
1719         }
1720         return false;
1721     }
1722     /**
1723      * Has at least one parent context got one of the caps for actions on $tabname
1724      *
1725      * @param string $tabname edit tab name
1726      * @return boolean
1727      */
1728     function have_one_edit_tab_cap($tabname){
1729         global $QUESTION_EDITTABCAPS;
1730         return $this->have_one_cap($QUESTION_EDITTABCAPS[$tabname]);
1731     }
1732     /**
1733      * Throw error if at least one parent context hasn't got the cap $cap
1734      *
1735      * @param string $cap capability
1736      */
1737     function require_cap($cap){
1738         if (!$this->have_cap($cap)){
1739             print_error('nopermissions', '', '', $cap);
1740         }
1741     }
1742     /**
1743      * Throw error if at least one parent context hasn't got one of the caps $caps
1744      *
1745      * @param array $cap capabilities
1746      */
1747      function require_one_cap($caps){
1748         if (!$this->have_one_cap($caps)){
1749             $capsstring = join($caps, ', ');
1750             print_error('nopermissions', '', '', $capsstring);
1751         }
1752     }
1753     /**
1754      * Throw error if at least one parent context hasn't got one of the caps $caps
1755      *
1756      * @param string $tabname edit tab name
1757      */
1758      function require_one_edit_tab_cap($tabname){
1759         if (!$this->have_one_edit_tab_cap($tabname)){
1760             print_error('nopermissions', '', '', 'access question edit tab '.$tabname);
1761         }
1762     }
1765 //capabilities for each page of edit tab.
1766 //this determines which contexts' categories are available. At least one
1767 //page is displayed if user has one of the capability on at least one context
1768 $QUESTION_EDITTABCAPS = array(
1769         'editq' => array('moodle/question:add',
1770             'moodle/question:editmine',
1771             'moodle/question:editall',
1772             'moodle/question:viewmine',
1773             'moodle/question:viewall',
1774             'moodle/question:usemine',
1775             'moodle/question:useall',
1776             'moodle/question:movemine',
1777             'moodle/question:moveall'),
1778         'questions'=>array('moodle/question:add',
1779             'moodle/question:editmine',
1780             'moodle/question:editall',
1781             'moodle/question:viewmine',
1782             'moodle/question:viewall',
1783             'moodle/question:movemine',
1784             'moodle/question:moveall'),
1785         'categories'=>array('moodle/question:managecategory'),
1786         'import'=>array('moodle/question:add'),
1787         'export'=>array('moodle/question:viewall', 'moodle/question:viewmine'));
1789 /**
1790  * Make sure user is logged in as required in this context.
1791  */
1792 function require_login_in_context($contextorid = null){
1793     global $DB;
1794     if (!is_object($contextorid)){
1795         $context = get_context_instance_by_id($contextorid);
1796     } else {
1797         $context = $contextorid;
1798     }
1799     if ($context && ($context->contextlevel == CONTEXT_COURSE)) {
1800         require_login($context->instanceid);
1801     } else if ($context && ($context->contextlevel == CONTEXT_MODULE)) {
1802         if ($cm = $DB->get_record('course_modules',array('id' =>$context->instanceid))) {
1803             if (!$course = $DB->get_record('course', array('id' => $cm->course))) {
1804                 print_error('invalidcourseid');
1805             }
1806             require_course_login($course, true, $cm);
1808         } else {
1809             print_error('invalidcoursemodule');
1810         }
1811     } else if ($context && ($context->contextlevel == CONTEXT_SYSTEM)) {
1812         if (!empty($CFG->forcelogin)) {
1813             require_login();
1814         }
1816     } else {
1817         require_login();
1818     }
1821 /**
1822  * Print a form to let the user choose which question type to add.
1823  * When the form is submitted, it goes to the question.php script.
1824  * @param $hiddenparams hidden parameters to add to the form, in addition to
1825  * the qtype radio buttons.
1826  */
1827 function print_choose_qtype_to_add_form($hiddenparams) {
1828     global $CFG, $QTYPES;
1829     require_js(array('yui_yahoo','yui_dom','yui_event'));
1830     require_js('question/qbank.js');
1831     echo '<div id="chooseqtypehead" class="hd">' . "\n";
1832     print_heading(get_string('chooseqtypetoadd', 'question'), '', 3);
1833     echo "</div>\n";
1834     echo '<div id="chooseqtype">' . "\n";
1835     echo '<form action="' . $CFG->wwwroot . '/question/question.php" method="get"><div id="qtypeformdiv">' . "\n";
1836     foreach ($hiddenparams as $name => $value) {
1837         echo '<input type="hidden" name="' . s($name) . '" value="' . s($value) . '" />' . "\n";
1838     }
1839     echo "</div>\n";
1840     $types = question_type_menu();
1841     echo '<div class="qtypes">' . "\n";
1842     echo '<div class="instruction">' . get_string('selectaqtypefordescription', 'question') . "</div>\n";
1843     foreach ($types as $qtype => $localizedname) {
1844         print_qtype_to_add_option($qtype, $localizedname);
1845     }
1846     echo "</div>\n";
1847     echo '<div class="submitbuttons">' . "\n";
1848     echo '<input type="submit" value="' . get_string('next') . '" id="chooseqtype_submit" />' . "\n";
1849     echo '<input type="submit" id="chooseqtypecancel" name="addcancel" value="' . get_string('cancel') . '" />' . "\n";
1850     echo "</div></form>\n";
1851     echo "</div>\n";
1852     print_js_call('qtype_chooser.init', array('chooseqtype'));
1855 /**
1856  * Private function used by the preceding one.
1857  * @param $qtype the question type.
1858  * @param $localizedname the localized name of this question type.
1859  */
1860 function print_qtype_to_add_option($qtype, $localizedname) {
1861     global $QTYPES;
1862     echo '<div class="qtypeoption">' . "\n";
1863     echo '<input type="radio" name="qtype" id="qtype_' . $qtype . '" value="' . $qtype . '" />';
1864     echo '<label for="qtype_' . $qtype . '"><span class="qtypename">';
1865     $fakequestion = new stdClass;
1866     $fakequestion->qtype = $qtype;
1867     print_question_icon($fakequestion);
1868     echo $localizedname . '</span><span class="qtypesummary">' . get_string($qtype . 'summary', 'qtype_' . $qtype);
1869     echo "</span></label>\n";
1870     echo "</div>\n";
1873 /**
1874  * Print a button for creating a new question. This will open question/addquestion.php,
1875  * which in turn goes to question/question.php before getting back to $params['returnurl']
1876  * (by default the question bank screen).
1877  *
1878  * @param integer $categoryid The id of the category that the new question should be added to.
1879  * @param array $params Other paramters to add to the URL. You need either $params['cmid'] or
1880  *      $params['courseid'], and you should probably set $params['returnurl']
1881  * @param string $caption the text to display on the button.
1882  * @param string $tooltip a tooltip to add to the button (optional).
1883  * @param boolean $disabled if true, the button will be disabled.
1884  */
1885 function create_new_question_button($categoryid, $params, $caption, $tooltip = '', $disabled = false) {
1886     global $CFG;
1887     static $choiceformprinted = false;
1888     $params['category'] = $categoryid;
1889     print_single_button($CFG->wwwroot . '/question/addquestion.php', $params,
1890             $caption,'get', '', false, $tooltip, $disabled);
1891     helpbutton('questiontypes', get_string('createnewquestion', 'question'), 'question');
1892     require_js(array('yui_yahoo','yui_dom','yui_event', 'yui_dragdrop', 'yui_container'));
1893     if (!$choiceformprinted) {
1894         echo '<div id="qtypechoicecontainer">';
1895         print_choose_qtype_to_add_form(array());
1896         echo "</div>\n";
1897         $choiceformprinted = true;
1898     }
1901 ?>