7f2e6a23a9
* Rewrite all the forms to use formslib and improve usability. * Put the place where admins need to go to process approvals in the admin menu. * Show the request course/pending requests button on the page for the category that requested courses get added to.
210 lines
9.3 KiB
PHP
210 lines
9.3 KiB
PHP
<?php // $Id$
|
|
|
|
///////////////////////////////////////////////////////////////////////////
|
|
// //
|
|
// NOTICE OF COPYRIGHT //
|
|
// //
|
|
// Moodle - Modular Object-Oriented Dynamic Learning Environment //
|
|
// http://moodle.org //
|
|
// //
|
|
// Copyright (C) 1999 onwards Martin Dougiamas http://dougiamas.com //
|
|
// //
|
|
// This program 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 2 of the License, or //
|
|
// (at your option) any later version. //
|
|
// //
|
|
// This program 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: //
|
|
// //
|
|
// http://www.gnu.org/copyleft/gpl.html //
|
|
// //
|
|
///////////////////////////////////////////////////////////////////////////
|
|
|
|
/**
|
|
* Allow the administrator to look through a list of course requests and approve or reject them.
|
|
*
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU Public License
|
|
* @package course
|
|
*//** */
|
|
|
|
require_once(dirname(__FILE__) . '/../config.php');
|
|
require_once($CFG->libdir . '/pagelib.php');
|
|
require_once($CFG->libdir . '/blocklib.php');
|
|
require_once($CFG->libdir . '/adminlib.php');
|
|
require_once($CFG->dirroot . '/course/lib.php');
|
|
require_once($CFG->dirroot . '/course/request_form.php');
|
|
|
|
require_login();
|
|
require_capability('moodle/site:approvecourse', get_context_instance(CONTEXT_SYSTEM));
|
|
|
|
$approve = optional_param('approve', 0, PARAM_INT);
|
|
$reject = optional_param('reject', 0, PARAM_INT);
|
|
|
|
$baseurl = $CFG->wwwroot . '/course/pending.php';
|
|
admin_externalpage_setup('coursespending');
|
|
|
|
/// Process approval of a course.
|
|
if (!empty($approve) and confirm_sesskey()) {
|
|
/// Load the request.
|
|
if (!$course = get_record('course_request', 'id', $approve)) {
|
|
print_error('unknowncourserequest');
|
|
}
|
|
foreach (array_keys((array)$course) as $key) {
|
|
$course->$key = addslashes($course->$key);
|
|
}
|
|
|
|
/// Ensure all is well before proceeding.
|
|
fix_course_sortorder();
|
|
if (empty($CFG->defaultrequestcategory) or !record_exists('course_categories', 'id', $CFG->defaultrequestcategory)) {
|
|
/// default to first top level directory, hacky but means things don't break
|
|
$CFG->defaultrequestcategory = get_field('course_categories', 'id', 'parent', '0');
|
|
}
|
|
|
|
/// Build up a course record based on the request.
|
|
$course->category = $CFG->defaultrequestcategory;
|
|
$course->sortorder = get_field_sql("SELECT min(sortorder)-1 FROM {$CFG->prefix}course WHERE category=$course->category");
|
|
if (empty($course->sortorder)) {
|
|
$course->sortorder = 1000;
|
|
}
|
|
$course->requested = 1;
|
|
unset($course->reason);
|
|
unset($course->id);
|
|
$teacherid = $course->requester;
|
|
unset($course->requester);
|
|
$course->teacher = get_string("defaultcourseteacher");
|
|
$course->teachers = get_string("defaultcourseteachers");
|
|
$course->student = get_string("defaultcoursestudent");
|
|
$course->students = get_string("defaultcoursestudents");
|
|
if (!empty($CFG->restrictmodulesfor) && $CFG->restrictmodulesfor != 'none' && !empty($CFG->restrictbydefault)) {
|
|
$course->restrictmodules = 1;
|
|
}
|
|
|
|
/// Insert the record.
|
|
if ($courseid = insert_record('course', $course)) {
|
|
$page = page_create_object(PAGE_COURSE_VIEW, $courseid);
|
|
blocks_repopulate_page($page); // Return value not checked because you can always edit later
|
|
$context = get_context_instance(CONTEXT_COURSE, $courseid);
|
|
role_assign($CFG->creatornewroleid, $teacherid, 0, $context->id); // assing teacher role
|
|
$course->id = $courseid;
|
|
if (!empty($CFG->restrictmodulesfor) && $CFG->restrictmodulesfor != 'none' && !empty($CFG->restrictbydefault)) { // if we're all or requested we're ok.
|
|
$allowedmods = explode(',',$CFG->defaultallowedmodules);
|
|
update_restricted_mods($course,$allowedmods);
|
|
}
|
|
delete_records('course_request','id',$approve);
|
|
$success = 1;
|
|
}
|
|
if (!empty($success)) {
|
|
$user = get_record('user','id',$teacherid);
|
|
$a->name = $course->fullname;
|
|
$a->url = $CFG->wwwroot.'/course/view.php?id='.$courseid;
|
|
$a->teacher = $course->teacher;
|
|
email_to_user($user, $USER, get_string('courseapprovedsubject'),
|
|
get_string('courseapprovedemail', 'moodle', $a));
|
|
redirect($CFG->wwwroot.'/course/edit.php?id='.$courseid);
|
|
|
|
} else {
|
|
print_error('courseapprovedfailed');
|
|
}
|
|
}
|
|
|
|
/// Process rejection of a course.
|
|
if (!empty($reject)) {
|
|
/// Load the request.
|
|
if (!$course = get_record('course_request', 'id', $reject)) {
|
|
print_error('unknowncourserequest');
|
|
}
|
|
|
|
/// Prepare the form.
|
|
$rejectform = new reject_request_form($baseurl);
|
|
$default = new stdClass();
|
|
$default->reject = $reject;
|
|
$rejectform->set_data($default);
|
|
|
|
/// Standard form processing if statement.
|
|
if ($rejectform->is_cancelled()){
|
|
redirect($baseurl);
|
|
|
|
} else if ($data = $rejectform->get_data()) {
|
|
/// Send an email to the requester.
|
|
$user = get_record('user', 'id', $course->requester);
|
|
email_to_user($user, $USER, get_string('courserejectsubject'),
|
|
get_string('courserejectemail', '', $data->rejectnotice));
|
|
|
|
/// Delete the request
|
|
delete_records('course_request', 'id', $course->id);
|
|
|
|
/// Redirect back to the course listing.
|
|
redirect($baseurl, get_string('courserejected'));
|
|
}
|
|
|
|
/// Display the form for giving a reason for rejecting the request.
|
|
admin_externalpage_print_header($rejectform->focus());
|
|
$rejectform->display();
|
|
admin_externalpage_print_footer();
|
|
exit;
|
|
}
|
|
|
|
/// Print a list of all the pending requests.
|
|
admin_externalpage_print_header();
|
|
|
|
$pending = get_records('course_request');
|
|
if (empty($pending)) {
|
|
print_heading(get_string('nopendingcourses'));
|
|
} else {
|
|
print_heading(get_string('coursespending'));
|
|
|
|
/// Build a table of all the requests.
|
|
$table->class = 'pendingcourserequests generaltable';
|
|
$table->align = array('center', 'center', 'center', 'center', 'center', 'center', 'center');
|
|
$table->head = array(' ', get_string('shortname'), get_string('fullname'),
|
|
get_string('requestedby'), get_string('summary'), get_string('requestreason'), get_string('action'));
|
|
$strrequireskey = get_string('requireskey');
|
|
|
|
/// Loop over requested courses.
|
|
foreach ($pending as $course) {
|
|
$requester = get_record('user', 'id', $course->requester);
|
|
$row = array();
|
|
|
|
/// Check here for shortname collisions and warn about them.
|
|
if (record_exists('course', 'shortname', $course->shortname)) {
|
|
$course->shortname .= ' [*]';
|
|
$collision = 1;
|
|
}
|
|
|
|
/// Show an enrolment key icon in the first column if applicable.
|
|
if (!empty($course->password)) {
|
|
$row[] = '<img hspace="1" alt="'.$strrequireskey.'" class="icon" src="'.$CFG->pixpath.'/i/key.gif" />';
|
|
} else {
|
|
$row[] = '';
|
|
}
|
|
|
|
/// Info in the other columns.
|
|
$row[] = format_string($course->shortname);
|
|
$row[] = format_string($course->fullname);
|
|
$row[] = fullname($requester);
|
|
$row[] = format_string($course->summary);
|
|
$row[] = format_string($course->reason);
|
|
$row[] = print_single_button($baseurl, array('approve' => $course->id, 'sesskey' => sesskey()), get_string('approve'), 'get', '', true) .
|
|
print_single_button($baseurl, array('reject' => $course->id), get_string('rejectdots'), 'get', '', true);
|
|
|
|
/// Add the row to the table.
|
|
$table->data[] = $row;
|
|
}
|
|
|
|
/// Display the table.
|
|
print_table($table);
|
|
|
|
/// Message about name collisions, if necessary.
|
|
if (!empty($collision)) {
|
|
print_string('shortnamecollisionwarning');
|
|
}
|
|
}
|
|
|
|
/// Finish off the page.
|
|
print_single_button($CFG->wwwroot . '/course/index.php', array(), get_string('backtocourselisting'));
|
|
admin_externalpage_print_footer();
|
|
?>
|