You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
227 lines
10 KiB
227 lines
10 KiB
11 years ago
|
<?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/>.
|
||
|
|
||
|
/**
|
||
|
* Adds new instance of enrol_ilbead to specified course
|
||
|
* or edits current instance.
|
||
|
*
|
||
|
* @package enrol_ilbead
|
||
|
* @copyright 2010 Petr Skoda {@link http://skodak.org}
|
||
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
||
|
*/
|
||
|
|
||
|
defined('MOODLE_INTERNAL') || die();
|
||
|
|
||
|
require_once($CFG->libdir.'/formslib.php');
|
||
|
|
||
|
class enrol_ilbead_edit_form extends moodleform {
|
||
|
|
||
|
function definition() {
|
||
|
global $DB;
|
||
|
|
||
|
$mform = $this->_form;
|
||
|
|
||
|
list($instance, $plugin, $context) = $this->_customdata;
|
||
|
|
||
|
$mform->addElement('header', 'header', get_string('pluginname', 'enrol_ilbead'));
|
||
|
|
||
|
$mform->addElement('text', 'name', get_string('custominstancename', 'enrol'));
|
||
|
$mform->setType('name', PARAM_TEXT);
|
||
|
|
||
|
$options = array(ENROL_INSTANCE_ENABLED => get_string('yes'),
|
||
|
ENROL_INSTANCE_DISABLED => get_string('no'));
|
||
|
$mform->addElement('select', 'status', get_string('status', 'enrol_ilbead'), $options);
|
||
|
$mform->addHelpButton('status', 'status', 'enrol_ilbead');
|
||
|
|
||
|
$options = array(1 => get_string('yes'), 0 => get_string('no'));
|
||
|
$mform->addElement('select', 'customint6', get_string('newenrols', 'enrol_ilbead'), $options);
|
||
|
$mform->addHelpButton('customint6', 'newenrols', 'enrol_ilbead');
|
||
|
$mform->disabledIf('customint6', 'status', 'eq', ENROL_INSTANCE_DISABLED);
|
||
|
|
||
|
$mform->addElement('passwordunmask', 'password', get_string('password', 'enrol_ilbead'));
|
||
|
$mform->addHelpButton('password', 'password', 'enrol_ilbead');
|
||
|
if (empty($instance->id) and $plugin->get_config('requirepassword')) {
|
||
|
$mform->addRule('password', get_string('required'), 'required', null, 'client');
|
||
|
}
|
||
|
|
||
|
$options = array(1 => get_string('yes'),
|
||
|
0 => get_string('no'));
|
||
|
$mform->addElement('select', 'customint1', get_string('groupkey', 'enrol_ilbead'), $options);
|
||
|
$mform->addHelpButton('customint1', 'groupkey', 'enrol_ilbead');
|
||
|
|
||
|
$roles = $this->extend_assignable_roles($context, $instance->roleid);
|
||
|
$mform->addElement('select', 'roleid', get_string('role', 'enrol_ilbead'), $roles);
|
||
|
|
||
|
$mform->addElement('duration', 'enrolperiod', get_string('enrolperiod', 'enrol_ilbead'), array('optional' => true, 'defaultunit' => 86400));
|
||
|
$mform->addHelpButton('enrolperiod', 'enrolperiod', 'enrol_ilbead');
|
||
|
|
||
|
$options = array(0 => get_string('no'), 1 => get_string('expirynotifyenroller', 'core_enrol'), 2 => get_string('expirynotifyall', 'core_enrol'));
|
||
|
$mform->addElement('select', 'expirynotify', get_string('expirynotify', 'core_enrol'), $options);
|
||
|
$mform->addHelpButton('expirynotify', 'expirynotify', 'core_enrol');
|
||
|
|
||
|
$mform->addElement('duration', 'expirythreshold', get_string('expirythreshold', 'core_enrol'), array('optional' => false, 'defaultunit' => 86400));
|
||
|
$mform->addHelpButton('expirythreshold', 'expirythreshold', 'core_enrol');
|
||
|
$mform->disabledIf('expirythreshold', 'expirynotify', 'eq', 0);
|
||
|
|
||
|
$mform->addElement('date_selector', 'enrolstartdate', get_string('enrolstartdate', 'enrol_ilbead'), array('optional' => true));
|
||
|
$mform->setDefault('enrolstartdate', 0);
|
||
|
$mform->addHelpButton('enrolstartdate', 'enrolstartdate', 'enrol_ilbead');
|
||
|
|
||
|
$mform->addElement('date_selector', 'enrolenddate', get_string('enrolenddate', 'enrol_ilbead'), array('optional' => true));
|
||
|
$mform->setDefault('enrolenddate', 0);
|
||
|
$mform->addHelpButton('enrolenddate', 'enrolenddate', 'enrol_ilbead');
|
||
|
|
||
|
$options = array(0 => get_string('never'),
|
||
|
1800 * 3600 * 24 => get_string('numdays', '', 1800),
|
||
|
1000 * 3600 * 24 => get_string('numdays', '', 1000),
|
||
|
365 * 3600 * 24 => get_string('numdays', '', 365),
|
||
|
180 * 3600 * 24 => get_string('numdays', '', 180),
|
||
|
150 * 3600 * 24 => get_string('numdays', '', 150),
|
||
|
120 * 3600 * 24 => get_string('numdays', '', 120),
|
||
|
90 * 3600 * 24 => get_string('numdays', '', 90),
|
||
|
60 * 3600 * 24 => get_string('numdays', '', 60),
|
||
|
30 * 3600 * 24 => get_string('numdays', '', 30),
|
||
|
21 * 3600 * 24 => get_string('numdays', '', 21),
|
||
|
14 * 3600 * 24 => get_string('numdays', '', 14),
|
||
|
7 * 3600 * 24 => get_string('numdays', '', 7));
|
||
|
$mform->addElement('select', 'customint2', get_string('longtimenosee', 'enrol_ilbead'), $options);
|
||
|
$mform->addHelpButton('customint2', 'longtimenosee', 'enrol_ilbead');
|
||
|
|
||
|
$mform->addElement('text', 'customint3', get_string('maxenrolled', 'enrol_ilbead'));
|
||
|
$mform->addHelpButton('customint3', 'maxenrolled', 'enrol_ilbead');
|
||
|
$mform->setType('customint3', PARAM_INT);
|
||
|
|
||
|
$mform->addElement('text', 'customint7', get_string('maxongoing', 'enrol_ilbead'));
|
||
|
$mform->addHelpButton('customint7', 'maxongoing', 'enrol_ilbead');
|
||
|
$mform->setType('customint7', PARAM_INT);
|
||
|
|
||
|
$mform->addElement('text', 'customint8', get_string('abandonpunishment', 'enrol_ilbead'));
|
||
|
$mform->addHelpButton('customint8', 'abandonpunishment', 'enrol_ilbead');
|
||
|
$mform->setType('customint8', PARAM_INT);
|
||
|
|
||
|
$cohorts = array(0 => get_string('no'));
|
||
|
list($sqlparents, $params) = $DB->get_in_or_equal($context->get_parent_context_ids(), SQL_PARAMS_NAMED);
|
||
|
$params['current'] = $instance->customint5;
|
||
|
$sql = "SELECT id, name, idnumber, contextid
|
||
|
FROM {cohort}
|
||
|
WHERE contextid $sqlparents OR id = :current
|
||
|
ORDER BY name ASC, idnumber ASC";
|
||
|
$rs = $DB->get_recordset_sql($sql, $params);
|
||
|
foreach ($rs as $c) {
|
||
|
$ccontext = context::instance_by_id($c->contextid);
|
||
|
if ($c->id != $instance->customint5 and !has_capability('moodle/cohort:view', $ccontext)) {
|
||
|
continue;
|
||
|
}
|
||
|
$cohorts[$c->id] = format_string($c->name, true, array('context'=>$context));
|
||
|
if ($c->idnumber) {
|
||
|
$cohorts[$c->id] .= ' ['.s($c->idnumber).']';
|
||
|
}
|
||
|
}
|
||
|
if (!isset($cohorts[$instance->customint5])) {
|
||
|
// Somebody deleted a cohort, better keep the wrong value so that random ppl can not enrol.
|
||
|
$cohorts[$instance->customint5] = get_string('unknowncohort', 'cohort', $instance->customint5);
|
||
|
}
|
||
|
$rs->close();
|
||
|
if (count($cohorts) > 1) {
|
||
|
$mform->addElement('select', 'customint5', get_string('cohortonly', 'enrol_ilbead'), $cohorts);
|
||
|
$mform->addHelpButton('customint5', 'cohortonly', 'enrol_ilbead');
|
||
|
} else {
|
||
|
$mform->addElement('hidden', 'customint5');
|
||
|
$mform->setType('customint5', PARAM_INT);
|
||
|
$mform->setConstant('customint5', 0);
|
||
|
}
|
||
|
|
||
|
$mform->addElement('advcheckbox', 'customint4', get_string('sendcoursewelcomemessage', 'enrol_ilbead'));
|
||
|
$mform->addHelpButton('customint4', 'sendcoursewelcomemessage', 'enrol_ilbead');
|
||
|
|
||
|
$mform->addElement('textarea', 'customtext1', get_string('customwelcomemessage', 'enrol_ilbead'), array('cols'=>'60', 'rows'=>'8'));
|
||
|
$mform->addHelpButton('customtext1', 'customwelcomemessage', 'enrol_ilbead');
|
||
|
|
||
|
$mform->addElement('hidden', 'id');
|
||
|
$mform->setType('id', PARAM_INT);
|
||
|
$mform->addElement('hidden', 'courseid');
|
||
|
$mform->setType('courseid', PARAM_INT);
|
||
|
|
||
|
$this->add_action_buttons(true, ($instance->id ? null : get_string('addinstance', 'enrol')));
|
||
|
|
||
|
$this->set_data($instance);
|
||
|
}
|
||
|
|
||
|
function validation($data, $files) {
|
||
|
global $DB, $CFG;
|
||
|
$errors = parent::validation($data, $files);
|
||
|
|
||
|
list($instance, $plugin, $context) = $this->_customdata;
|
||
|
$checkpassword = false;
|
||
|
|
||
|
if ($instance->id) {
|
||
|
if ($data['status'] == ENROL_INSTANCE_ENABLED) {
|
||
|
if ($instance->password !== $data['password']) {
|
||
|
$checkpassword = true;
|
||
|
}
|
||
|
}
|
||
|
} else {
|
||
|
if ($data['status'] == ENROL_INSTANCE_ENABLED) {
|
||
|
$checkpassword = true;
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if ($checkpassword) {
|
||
|
$require = $plugin->get_config('requirepassword');
|
||
|
$policy = $plugin->get_config('usepasswordpolicy');
|
||
|
if ($require and trim($data['password']) === '') {
|
||
|
$errors['password'] = get_string('required');
|
||
|
} else if ($policy) {
|
||
|
$errmsg = '';//prevent eclipse warning
|
||
|
if (!check_password_policy($data['password'], $errmsg)) {
|
||
|
$errors['password'] = $errmsg;
|
||
|
}
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if ($data['status'] == ENROL_INSTANCE_ENABLED) {
|
||
|
if (!empty($data['enrolenddate']) and $data['enrolenddate'] < $data['enrolstartdate']) {
|
||
|
$errors['enrolenddate'] = get_string('enrolenddaterror', 'enrol_ilbead');
|
||
|
}
|
||
|
}
|
||
|
|
||
|
if ($data['expirynotify'] > 0 and $data['expirythreshold'] < 86400) {
|
||
|
$errors['expirythreshold'] = get_string('errorthresholdlow', 'core_enrol');
|
||
|
}
|
||
|
|
||
|
return $errors;
|
||
|
}
|
||
|
|
||
|
/**
|
||
|
* Gets a list of roles that this user can assign for the course as the default for ilb ead self-enrolment.
|
||
|
*
|
||
|
* @param context $context the context.
|
||
|
* @param integer $defaultrole the id of the role that is set as the default for ilb ead self-enrolment
|
||
|
* @return array index is the role id, value is the role name
|
||
|
*/
|
||
|
function extend_assignable_roles($context, $defaultrole) {
|
||
|
global $DB;
|
||
|
|
||
|
$roles = get_assignable_roles($context, ROLENAME_BOTH);
|
||
|
if (!isset($roles[$defaultrole])) {
|
||
|
if ($role = $DB->get_record('role', array('id'=>$defaultrole))) {
|
||
|
$roles[$defaultrole] = role_get_name($role, $context, ROLENAME_BOTH);
|
||
|
}
|
||
|
}
|
||
|
return $roles;
|
||
|
}
|
||
|
}
|