mirror of
https://github.com/moodle/moodle.git
synced 2025-08-04 08:26:37 +02:00
272 lines
10 KiB
PHP
272 lines
10 KiB
PHP
<?php
|
||
|
||
// This file is part of Moodle - http://moodle.org/
|
||
//
|
||
// Moodle is free software: you can redistribute it and/or modify
|
||
// it under the terms of the GNU General Public License as published by
|
||
// the Free Software Foundation, either version 3 of the License, or
|
||
// (at your option) any later version.
|
||
//
|
||
// Moodle is distributed in the hope that it will be useful,
|
||
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||
// GNU General Public License for more details.
|
||
//
|
||
// You should have received a copy of the GNU General Public License
|
||
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
||
|
||
/**
|
||
* Allows the admin to manage question types.
|
||
*
|
||
* @package moodlecore
|
||
* @subpackage questionbank
|
||
* @copyright 2008 Tim Hunt
|
||
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
*/
|
||
|
||
use core_question\local\bank\question_version_status;
|
||
|
||
require_once(__DIR__ . '/../config.php');
|
||
require_once($CFG->libdir . '/questionlib.php');
|
||
require_once($CFG->libdir . '/adminlib.php');
|
||
require_once($CFG->libdir . '/tablelib.php');
|
||
|
||
admin_externalpage_setup('manageqtypes');
|
||
|
||
$systemcontext = context_system::instance();
|
||
require_capability('moodle/question:config', $systemcontext);
|
||
$canviewreports = has_capability('report/questioninstances:view', $systemcontext);
|
||
|
||
$thispageurl = new moodle_url('/admin/qtypes.php');
|
||
|
||
$qtypes = question_bank::get_all_qtypes();
|
||
$pluginmanager = core_plugin_manager::instance();
|
||
|
||
// Get some data we will need - question counts and which types are needed.
|
||
// The second JOIN on question_versions (qv2) is to get the latest version of each question.
|
||
// (Using this sort of JOIN is a known trick for doing this in the fastest possible way.)
|
||
$counts = $DB->get_records_sql("
|
||
SELECT q.qtype,
|
||
COUNT(qv.id) AS numquestions,
|
||
SUM(CASE WHEN qv.status = :hiddenstatus THEN 1 ELSE 0 END) AS numhidden,
|
||
SUM(CASE WHEN qv.status = :draftstatus THEN 1 ELSE 0 END) AS numdraft
|
||
FROM {question} q
|
||
JOIN {question_versions} qv ON q.id = qv.questionid
|
||
LEFT JOIN {question_versions} qv2 ON qv.questionbankentryid = qv2.questionbankentryid AND qv.version < qv2.version
|
||
WHERE qv2.questionbankentryid IS NULL
|
||
GROUP BY q.qtype
|
||
", [
|
||
'hiddenstatus' => question_version_status::QUESTION_STATUS_HIDDEN,
|
||
'draftstatus' => question_version_status::QUESTION_STATUS_DRAFT,
|
||
]);
|
||
|
||
$needed = [];
|
||
foreach ($qtypes as $qtypename => $qtype) {
|
||
if (!isset($counts[$qtypename])) {
|
||
$counts[$qtypename] = new stdClass;
|
||
$counts[$qtypename]->numquestions = 0;
|
||
$counts[$qtypename]->numhidden = 0;
|
||
$counts[$qtypename]->numdraft = 0;
|
||
}
|
||
$needed[$qtypename] = $counts[$qtypename]->numquestions > 0 ||
|
||
$pluginmanager->other_plugins_that_require($qtype->plugin_name());
|
||
$counts[$qtypename]->numquestions -= ($counts[$qtypename]->numhidden + $counts[$qtypename]->numdraft);
|
||
}
|
||
$needed['missingtype'] = true; // The system needs the missing question type.
|
||
foreach ($counts as $qtypename => $count) {
|
||
if (!isset($qtypes[$qtypename])) {
|
||
$counts['missingtype']->numquestions += $count->numquestions - ($count->numhidden + $count->numdraft);
|
||
$counts['missingtype']->numhidden += $count->numhidden;
|
||
$counts['missingtype']->numdraft += $count->numdraft;
|
||
}
|
||
}
|
||
|
||
// Work of the correct sort order.
|
||
$config = get_config('question');
|
||
$sortedqtypes = array();
|
||
foreach ($qtypes as $qtypename => $qtype) {
|
||
$sortedqtypes[$qtypename] = $qtype->local_name();
|
||
}
|
||
$sortedqtypes = question_bank::sort_qtype_array($sortedqtypes, $config);
|
||
|
||
// Process actions ============================================================
|
||
|
||
// Disable.
|
||
if (($disable = optional_param('disable', '', PARAM_PLUGIN)) && confirm_sesskey()) {
|
||
if (!isset($qtypes[$disable])) {
|
||
throw new \moodle_exception('unknownquestiontype', 'question', $thispageurl, $disable);
|
||
}
|
||
|
||
$class = \core_plugin_manager::resolve_plugininfo_class('qtype');
|
||
$class::enable_plugin($disable, false);
|
||
redirect($thispageurl);
|
||
}
|
||
|
||
// Enable.
|
||
if (($enable = optional_param('enable', '', PARAM_PLUGIN)) && confirm_sesskey()) {
|
||
if (!isset($qtypes[$enable])) {
|
||
throw new \moodle_exception('unknownquestiontype', 'question', $thispageurl, $enable);
|
||
}
|
||
|
||
if (!$qtypes[$enable]->menu_name()) {
|
||
throw new \moodle_exception('cannotenable', 'question', $thispageurl, $enable);
|
||
}
|
||
|
||
$class = \core_plugin_manager::resolve_plugininfo_class('qtype');
|
||
$class::enable_plugin($enable, true);
|
||
redirect($thispageurl);
|
||
}
|
||
|
||
// Move up in order.
|
||
if (($up = optional_param('up', '', PARAM_PLUGIN)) && confirm_sesskey()) {
|
||
if (!isset($qtypes[$up])) {
|
||
throw new \moodle_exception('unknownquestiontype', 'question', $thispageurl, $up);
|
||
}
|
||
|
||
$neworder = question_reorder_qtypes($sortedqtypes, $up, -1);
|
||
question_save_qtype_order($neworder, $config);
|
||
redirect($thispageurl);
|
||
}
|
||
|
||
// Move down in order.
|
||
if (($down = optional_param('down', '', PARAM_PLUGIN)) && confirm_sesskey()) {
|
||
if (!isset($qtypes[$down])) {
|
||
throw new \moodle_exception('unknownquestiontype', 'question', $thispageurl, $down);
|
||
}
|
||
|
||
$neworder = question_reorder_qtypes($sortedqtypes, $down, +1);
|
||
question_save_qtype_order($neworder, $config);
|
||
redirect($thispageurl);
|
||
}
|
||
|
||
// End of process actions ==================================================
|
||
|
||
// Print the page heading.
|
||
echo $OUTPUT->header();
|
||
echo $OUTPUT->heading(get_string('manageqtypes', 'admin'));
|
||
|
||
// Set up the table.
|
||
$table = new flexible_table('qtypeadmintable');
|
||
$table->define_baseurl($thispageurl);
|
||
$table->define_columns(array('questiontype', 'numquestions', 'version', 'requires',
|
||
'availableto', 'uninstall', 'settings'));
|
||
$table->define_headers(array(get_string('questiontype', 'question'), get_string('numquestions', 'question'),
|
||
get_string('version'), get_string('requires', 'admin'), get_string('availableq', 'question'),
|
||
get_string('settings'), get_string('uninstallplugin', 'core_admin')));
|
||
$table->set_attribute('id', 'qtypes');
|
||
$table->set_attribute('class', 'admintable generaltable');
|
||
$table->setup();
|
||
|
||
// Add a row for each question type.
|
||
$createabletypes = question_bank::get_creatable_qtypes();
|
||
foreach ($sortedqtypes as $qtypename => $localname) {
|
||
$qtype = $qtypes[$qtypename];
|
||
$row = array();
|
||
|
||
// Question icon and name.
|
||
$fakequestion = new stdClass;
|
||
$fakequestion->qtype = $qtypename;
|
||
$icon = print_question_icon($fakequestion, true);
|
||
$row[] = $icon . ' ' . $localname;
|
||
|
||
// Number of questions of this type.
|
||
if ($counts[$qtypename]->numquestions + $counts[$qtypename]->numhidden + $counts[$qtypename]->numdraft > 0) {
|
||
if ($counts[$qtypename]->numhidden + $counts[$qtypename]->numdraft > 0) {
|
||
$strcount = get_string('numquestionsandhidden', 'question', $counts[$qtypename]);
|
||
} else {
|
||
$strcount = $counts[$qtypename]->numquestions;
|
||
}
|
||
if ($canviewreports) {
|
||
$row[] = html_writer::link(new moodle_url('/report/questioninstances/index.php',
|
||
array('qtype' => $qtypename)), $strcount, array('title' => get_string('showdetails', 'admin')));
|
||
} else {
|
||
$strcount;
|
||
}
|
||
} else {
|
||
$row[] = 0;
|
||
}
|
||
|
||
// Question version number.
|
||
$version = get_config('qtype_' . $qtypename, 'version');
|
||
if ($version) {
|
||
$row[] = $version;
|
||
} else {
|
||
$row[] = html_writer::tag('span', get_string('nodatabase', 'admin'), array('class' => 'text-muted'));
|
||
}
|
||
|
||
// Other question types required by this one.
|
||
$plugin = $pluginmanager->get_plugin_info($qtype->plugin_name());
|
||
$requiredtypes = $plugin->get_other_required_plugins();
|
||
$strtypes = array();
|
||
if (!empty($requiredtypes)) {
|
||
foreach ($requiredtypes as $required => $notused) {
|
||
$strtypes[] = $pluginmanager->plugin_name($required);
|
||
}
|
||
$row[] = implode(', ', $strtypes);
|
||
} else {
|
||
$row[] = '';
|
||
}
|
||
|
||
// Are people allowed to create new questions of this type?
|
||
$rowclass = '';
|
||
if ($qtype->menu_name()) {
|
||
$createable = isset($createabletypes[$qtypename]);
|
||
$icons = question_types_enable_disable_icons($qtypename, $createable);
|
||
if (!$createable) {
|
||
$rowclass = 'dimmed_text';
|
||
}
|
||
} else {
|
||
$icons = $OUTPUT->spacer();
|
||
}
|
||
|
||
// Move icons.
|
||
$icons .= question_type_icon_html('up', $qtypename, 't/up', get_string('up'), '');
|
||
$icons .= question_type_icon_html('down', $qtypename, 't/down', get_string('down'), '');
|
||
$row[] = $icons;
|
||
|
||
// Settings link, if available.
|
||
$settings = admin_get_root()->locate('qtypesetting' . $qtypename);
|
||
if ($settings instanceof admin_externalpage) {
|
||
$row[] = html_writer::link($settings->url, get_string('settings'));
|
||
} else if ($settings instanceof admin_settingpage) {
|
||
$row[] = html_writer::link(new moodle_url('/admin/settings.php',
|
||
array('section' => 'qtypesetting' . $qtypename)), get_string('settings'));
|
||
} else {
|
||
$row[] = '';
|
||
}
|
||
|
||
// Uninstall link, if available.
|
||
if ($needed[$qtypename]) {
|
||
$row[] = '';
|
||
} else {
|
||
$uninstallurl = core_plugin_manager::instance()->get_uninstall_url('qtype_'.$qtypename, 'manage');
|
||
if ($uninstallurl) {
|
||
$row[] = html_writer::link($uninstallurl, get_string('uninstallplugin', 'core_admin'),
|
||
array('title' => get_string('uninstallqtype', 'question')));
|
||
}
|
||
}
|
||
|
||
$table->add_data($row, $rowclass);
|
||
}
|
||
|
||
$table->finish_output();
|
||
|
||
echo $OUTPUT->footer();
|
||
|
||
function question_types_enable_disable_icons($qtypename, $createable) {
|
||
if ($createable) {
|
||
return question_type_icon_html('disable', $qtypename, 't/hide',
|
||
get_string('enabled', 'question'), get_string('disable'));
|
||
} else {
|
||
return question_type_icon_html('enable', $qtypename, 't/show',
|
||
get_string('disabled', 'question'), get_string('enable'));
|
||
}
|
||
}
|
||
|
||
function question_type_icon_html($action, $qtypename, $icon, $alt, $tip) {
|
||
global $OUTPUT;
|
||
return $OUTPUT->action_icon(new moodle_url('/admin/qtypes.php',
|
||
array($action => $qtypename, 'sesskey' => sesskey())),
|
||
new pix_icon($icon, $alt, 'moodle', array('title' => '', 'class' => 'iconsmall')),
|
||
null, array('title' => $tip));
|
||
}
|