/**
* Test for correct assignment of course permissions
*/
public function test_coursepermissions()
{
global $DB, $CFG, $USER;
accesslib_clear_all_caches(true);
set_config('siteguest', '');
set_config('siteadmins', '');
$this->assertFalse($this->has_program_create_capability());
$this->assertFalse($this->has_associate_and_manage_capability());
$this->assertFalse($this->has_program_view_capability());
$syscontext = context_system::instance();
$assigninguser = new user(array('idnumber' => 'testuserid', 'username' => 'testuser', 'firstname' => 'testuser', 'lastname' => 'testuser', 'email' => '*****@*****.**', 'country' => 'CA'));
$assigninguser->save();
$roleid = create_role('userrole', 'userrole', 'userrole');
$usr = $DB->get_record('user', array('username' => 'testuser'));
$this->setUser($usr);
$USER = $usr;
assign_capability('local/elisprogram:associate', CAP_ALLOW, $roleid, $syscontext->id);
assign_capability('local/elisprogram:manage', CAP_ALLOW, $roleid, $syscontext->id);
assign_capability('local/elisprogram:program_create', CAP_ALLOW, $roleid, $syscontext->id);
assign_capability('local/elisprogram:program_enrol', CAP_ALLOW, $roleid, $syscontext->id);
assign_capability('local/elisprogram:program_view', CAP_ALLOW, $roleid, $syscontext->id);
role_assign($roleid, $usr->id, $syscontext->id);
$this->assertTrue($this->has_program_create_capability());
$this->assertTrue($this->has_associate_and_manage_capability());
$this->assertTrue($this->has_program_view_capability());
$this->setUser(null);
}
/**
* Loads some data to be used by the different tests
* @param int $s1grade Student 1 grade
* @param int $s2grade Student 2 grade
* @return array Course and users instances
*/
private function load_data($s1grade, $s2grade)
{
global $DB;
$course = $this->getDataGenerator()->create_course(array('groupmode' => SEPARATEGROUPS, 'groupmodeforce' => 1));
$studentrole = $DB->get_record('role', array('shortname' => 'student'));
$student1 = $this->getDataGenerator()->create_user();
$this->getDataGenerator()->enrol_user($student1->id, $course->id, $studentrole->id);
$student2 = $this->getDataGenerator()->create_user();
$this->getDataGenerator()->enrol_user($student2->id, $course->id, $studentrole->id);
$teacherrole = $DB->get_record('role', array('shortname' => 'teacher'));
$teacher = $this->getDataGenerator()->create_user();
$this->getDataGenerator()->enrol_user($teacher->id, $course->id, $teacherrole->id);
$context = context_course::instance($course->id);
assign_capability('moodle/site:accessallgroups', CAP_PROHIBIT, $teacherrole->id, $context);
accesslib_clear_all_caches_for_unit_testing();
$group1 = $this->getDataGenerator()->create_group(array('courseid' => $course->id));
$group2 = $this->getDataGenerator()->create_group(array('courseid' => $course->id));
groups_add_member($group1->id, $student1->id);
groups_add_member($group1->id, $teacher->id);
groups_add_member($group2->id, $student2->id);
$assignment = $this->getDataGenerator()->create_module('assign', array('name' => "Test assign", 'course' => $course->id));
$modcontext = get_coursemodule_from_instance('assign', $assignment->id, $course->id);
$assignment->cmidnumber = $modcontext->id;
$student1grade = array('userid' => $student1->id, 'rawgrade' => $s1grade);
$student2grade = array('userid' => $student2->id, 'rawgrade' => $s2grade);
$studentgrades = array($student1->id => $student1grade, $student2->id => $student2grade);
assign_grade_item_update($assignment, $studentgrades);
return array($course, $teacher, $student1, $student2, $assignment);
}
/**
* Called from cron and update_instance. Not called from add_instance as the contexts are not set up yet.
*/
function qcreate_student_q_access_sync($qcreate, $cmcontext = null, $course = null, $forcesync = false)
{
//check if a check is needed
$timenow = time();
$activityopen = ($qcreate->timeopen == 0 || $qcreate->timeopen < $timenow) && ($qcreate->timeclose == 0 || $qcreate->timeclose > $timenow);
$activitywasopen = ($qcreate->timeopen == 0 || $qcreate->timeopen < $qcreate->timesync) && ($qcreate->timeclose == 0 || $qcreate->timeclose > $qcreate->timesync);
$needsync = empty($qcreate->timesync) || $activitywasopen != $activityopen;
if ($forcesync || $needsync) {
if ($cmcontext == null) {
$cm = get_coursemodule_from_instance('qcreate', $qcreate->id);
$cmcontext = get_context_instance(CONTEXT_MODULE, $cm->id);
}
if ($course == null) {
$course = get_record('course', 'id', $qcreate->course);
}
$studentrole = get_default_course_role($course);
if ($activityopen) {
$capabilitiestoassign = array(0 => array('moodle/question:add' => 1, 'moodle/question:usemine' => -1, 'moodle/question:viewmine' => -1, 'moodle/question:editmine' => -1), 1 => array('moodle/question:add' => 1, 'moodle/question:usemine' => 1, 'moodle/question:viewmine' => -1, 'moodle/question:editmine' => -1), 2 => array('moodle/question:add' => 1, 'moodle/question:usemine' => 1, 'moodle/question:viewmine' => 1, 'moodle/question:editmine' => -1), 3 => array('moodle/question:add' => 1, 'moodle/question:usemine' => 1, 'moodle/question:viewmine' => 1, 'moodle/question:editmine' => 1));
foreach ($capabilitiestoassign[$qcreate->studentqaccess] as $capability => $permission) {
assign_capability($capability, $permission, $studentrole->id, $cmcontext->id, true);
}
} else {
$capabilitiestounassign = array('moodle/question:add', 'moodle/question:usemine', 'moodle/question:viewmine', 'moodle/question:editmine');
foreach ($capabilitiestounassign as $capability) {
unassign_capability($capability, $studentrole->id, $cmcontext->id);
}
}
set_field('qcreate', 'timesync', $timenow, 'id', $qcreate->id);
}
}
/**
* Validate that redirection from My Moodle does not happen for admins
*/
public function test_mymoodleredirectreturnsfalseforadmin()
{
global $CFG, $USER, $DB;
require_once $CFG->dirroot . '/user/lib.php';
// Make sure we're not a guest.
set_config('siteguest', '');
// Obtain the system context.
$syscontext = context_system::instance();
// Set up the current user global.
$user = new stdClass();
$user->username = "******";
$userid = user_create_user($user);
$USER = $DB->get_record('user', array('id' => $userid));
// Enable functionaltiy.
pm_set_config('mymoodle_redirect', 1);
elis::$config = new elis_config();
// Give the admin sufficient permissions.
$roleid = create_role('adminrole', 'adminrole', 'adminrole');
assign_capability('moodle/site:config', CAP_ALLOW, $roleid, $syscontext->id);
role_assign($roleid, $USER->id, $syscontext->id);
// Validate that redirection does not happen for admins.
$result = pm_mymoodle_redirect();
// Clear out cached permissions data so we don't affect other tests.
accesslib_clear_all_caches(true);
$this->assertFalse($result);
}
/**
* @package block
* @subpackage demostudent
* @author Dominik Royko royko@ualberta.ca
*/
function xmldb_block_demostudent_install()
{
global $DB;
$result = true;
$systemcontext = context_system::instance();
// Create DemoStudent role.
$contextlevels = array(CONTEXT_COURSE, CONTEXT_MODULE);
if (!($demostudentrole = $DB->get_record('role', array('shortname' => 'demostudent')))) {
if ($roleid = create_role(get_string('roledemostudentname', 'block_demostudent'), 'demostudent', get_string('roledemostudentdescription', 'block_demostudent'), 'student')) {
$newrole = new stdClass();
$newrole->id = $roleid;
// Set the capabilities to the archetype (student).
// Caution: new capabilities un/set here can get clobbered by 'clonepermissionsfrom',
// defined in access.php.
reset_role_capabilities($roleid);
// DemoStudent needs to see the DemoStudent block.
$result = $result && assign_capability('block/demostudent:seedemostudentblock', CAP_ALLOW, $newrole->id, $systemcontext->id);
// DemoStudent should be able to see hidden courses to facilitate testing.
$result = $result && assign_capability('moodle/course:viewhiddencourses', CAP_ALLOW, $newrole->id, $systemcontext->id);
// DemoStudent should NOT be able to add more demostudents!
$result = $result && unassign_capability('block/demostudent:addinstance', $newrole->id);
$systemcontext->mark_dirty();
set_role_contextlevels($newrole->id, $contextlevels);
} else {
$result = false;
}
}
return $result;
}
/**
*
* @since 2.0
* @package blocks
* @copyright 2011 Dustin Durand
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
function xmldb_block_roomscheduler_upgrade($oldversion)
{
global $DB;
$dbman = $DB->get_manager();
if ($oldversion < 2011150301) {
$timenow = time();
$sysctx = get_context_instance(CONTEXT_SYSTEM);
/// Fully setup the Elluminate Moderator role.
if (!($mrole = $DB->get_record('role', array('shortname' => 'roomschedulermanager')))) {
if ($rid = create_role(get_string('roomschedulermanager', 'block_roomscheduler'), 'roomschedulemanager', get_string('roomschedulermanagerdescription', 'block_roomscheduler'))) {
$mrole = $DB->get_record('role', array('id' => $rid));
assign_capability('block/roomscheduler:manage', CAP_ALLOW, $mrole->id, $sysctx->id);
set_role_contextlevels($mrole->id, array(CONTEXT_SYSTEM));
} else {
$mrole = $DB->get_record('role', array('shortname' => 'roomschedulermanager'));
set_role_contextlevels($mrole->id, array(CONTEXT_SYSTEM));
}
}
upgrade_block_savepoint(true, 2011150301, 'roomscheduler');
}
if ($oldversion < 2011140315) {
// Define field reservable to be added to roomscheduler_rooms
$table = new xmldb_table('roomscheduler_rooms');
$field = new xmldb_field('reservable', XMLDB_TYPE_INTEGER, '1', null, XMLDB_NOTNULL, null, '1', 'active');
// Conditionally launch add field reservable
if (!$dbman->field_exists($table, $field)) {
$dbman->add_field($table, $field);
}
upgrade_block_savepoint(true, 2011140315, 'roomscheduler');
}
return true;
}
/**
* Assign a new permission.
* @param int $permission One of CAP_ALLOW, CAP_PROHIBIT, CAP_PREVENT
*/
public function assign($permission)
{
foreach ($this->capability as $capability) {
assign_capability($capability, $permission, $this->roleid, $this->contextid, true);
}
accesslib_clear_all_caches_for_unit_testing();
}
protected function assign_capability($capability, $permission = CAP_ALLOW, $contextid = null) {
if ($contextid === null) {
$contextid = context_system::instance();
}
if (is_object($contextid)) {
$contextid = $contextid->id;
}
assign_capability($capability, $permission, $this->get_roleid($contextid), $contextid, true);
accesslib_clear_all_caches_for_unit_testing();
}
/**
* Creates the two roles required to test default role association. The first role contains the 'view' and
* 'create' permissions for the entity and the second contains the 'view' and 'edit' capabilities for the entity.
*
* @param string $entity The name of the entity being created.
* @return array An array containg the role for the creator / editor role
*/
private function create_roles($entity)
{
$syscontext = context_system::instance();
$role1 = create_role($entity . '_creator', $entity . '_creator', $entity . '_creator');
assign_capability('local/elisprogram:' . $entity . '_view', CAP_ALLOW, $role1, $syscontext->id);
assign_capability('local/elisprogram:' . $entity . '_create', CAP_ALLOW, $role1, $syscontext->id);
$role2 = create_role($entity . '_editor', $entity . '_editor', $entity . '_editor');
assign_capability('local/elisprogram:' . $entity . '_view', CAP_ALLOW, $role2, $syscontext->id);
assign_capability('local/elisprogram:' . $entity . '_create', CAP_ALLOW, $role2, $syscontext->id);
return array($role1, $role2);
}
/**
* Cria um papel no MOODLE conforme os padrões.
*
* É sugerido que com esta função seja usado um dos papeis como Arquétipo:
* <lu>
* <li>manager
* <li>coursecreator
* <li>editingteacher
* <li>teacher
* <li>student
* </lu>
*
*
* O Array de habilidades (capabilities) deve ser formado da seguinte forma
* $caps = array(
* array('name'=>'moodle/site:sendmessage', 'perm'=CAP_PREVENT),
* array('name'=>'moodle/restore:rolldates', 'perm'=CAP_INHERIT),
* array('name'=>'moodle/site:manageblocks', 'perm'=CAP_PROHIBIT),
* array('name'=>'mod/data:viewallratings', 'perm'=CAP_ALLOW),
*
* );
* Como pode ser visto 'name'aponta para o nome da habilidade e
* 'perm' indica a permissão que será data da seguinte forma:
* <lu>
* <li>CAP_PREVENT<br/>
* Evita esta habilidade
* <li>CAP_INHERIT<br/>
* Erda esta habilidade do Arquétipo informado.
* <li>CAP_PROHIBIT<br/>
* Proibe esta Habilidade
* <li>CAP_ALLOW<br/>
* Permite ter esta habilidade.
* </lu>
*
* @param string $name
* @param string $shortname
* @param String $description
* @param string $archtype
* @param array $capabilities
*/
public static function createRoleWithCapabilities($name, $shortname, $description, $archtype, $capabilities = NULL)
{
global $DB, $CFG;
require_once "{$CFG->dirlib}/accesslib.php";
$roleid = create_role($name, $shortname, $description, $archetype = '');
if (empty($capabilities)) {
foreach ($capabilities as $cap) {
assign_capability($cap[name], $cap[perm], $roleid, 1);
}
}
}
/**
* Create a role with capabilities and permissions.
*
* @param string|array $caps Capability names.
* @param int $perm Constant CAP_* to apply to the capabilities.
* @return int The new role ID.
*/
protected function create_role_with_caps($caps, $perm)
{
$caps = (array) $caps;
$dg = $this->getDataGenerator();
$roleid = $dg->create_role();
foreach ($caps as $cap) {
assign_capability($cap, $perm, $roleid, context_system::instance()->id, true);
}
accesslib_clear_all_caches_for_unit_testing();
return $roleid;
}
/**
* Test block_elisadmin_load_menu_children_course function.
*/
public function test_block_elisadmin_load_menu_children_course()
{
global $DB, $USER;
accesslib_clear_all_caches(true);
// Create test user - ensure the returned user is NOT a site admin. if they are, our capability restrictions won't work.
$testuser = new user();
$testuser->username = '******';
$testuser->idnumber = 'testELIS4093';
$testuser->firstname = 'testELIS4093';
$testuser->lastname = 'testELIS4093';
$testuser->email = '*****@*****.**';
$testuser->country = 'CA';
$testuser->save();
$testmuser = $testuser->get_moodleuser();
// Create role with cap: 'local/elisprogram:class_view'.
$testrole = new stdClass();
$testrole->name = 'ELIS Class View';
$testrole->shortname = '_test_ELIS_4093';
$testrole->description = 'ELIS Class View';
$testrole->archetype = '';
$testrole->id = create_role($testrole->name, $testrole->shortname, $testrole->description, $testrole->archetype);
// Ensure our new role is assignable to ELIS class contexts.
set_role_contextlevels($testrole->id, array(CONTEXT_ELIS_CLASS));
// Ensure the role has our required capability assigned.
$sitecontext = context_system::instance();
assign_capability('local/elisprogram:class_view', CAP_ALLOW, $testrole->id, $sitecontext->id, true);
$sitecontext->mark_dirty();
// Create ELIS Course Description.
$testcrs = new course(array('name' => 'CD-ELIS-4093', 'idnumber' => 'CDELIS4093', 'syllabus' => ''));
$testcrs->save();
$testcrs->load();
// Create three(3) Class Instances for Course Descrption.
$testcls1 = new pmclass(array('courseid' => $testcrs->id, 'idnumber' => 'CI_ELIS_4093.1'));
$testcls1->save();
$testcls1->load();
$testcls2 = new pmclass(array('courseid' => $testcrs->id, 'idnumber' => 'CI_ELIS_4093.2'));
$testcls2->save();
$testcls2->load();
$testcls3 = new pmclass(array('courseid' => $testcrs->id, 'idnumber' => 'CI_ELIS_4093.3'));
$testcls3->save();
$testcls3->load();
// Assign testuser new role in one Class Instance.
$context = \local_elisprogram\context\pmclass::instance($testcls2->id);
role_assign($testrole->id, $testmuser->id, $context->id);
// Switch to testuser.
$USER = $testmuser;
$this->setUser($testmuser);
$items = block_elisadmin_load_menu_children_course($testcrs->id, 0, 0, 5, '');
$this->assertEquals(1, count($items));
$this->assertTrue($items[0]->name == 'pmclass_2');
}
function xmldb_block_demostudent_upgrade($oldversion = 0)
{
global $CFG;
$result = true;
// Assign moodle/course:viewhiddencourses capability to demostudent role.
if ($oldversion < 2013100201) {
if (get_capability_info('moodle/course:viewhiddencourses')) {
$demostudentroleid = get_roleid_by_roleshortname('demostudent');
assign_capability('moodle/course:viewhiddencourses', CAP_ALLOW, $demostudentroleid, 1);
}
upgrade_plugin_savepoint(true, 2013100201, 'block', 'demostudent');
}
return $result;
}
/**
* Assign a capability to $USER
* The function creates a student $USER if $USER->id is empty
*
* @param string $capability capability name
* @param int $contextid
* @param int $roleid
* @return int the role id - mainly returned for creation, so calling function can reuse it
*/
public static function assignUserCapability($capability, $contextid, $roleid = null)
{
global $USER;
// Create a new student $USER if $USER doesn't exist
if (empty($USER->id)) {
$user = self::getDataGenerator()->create_user();
self::setUser($user);
}
if (empty($roleid)) {
$roleid = create_role('Dummy role', 'dummyrole', 'dummy role description');
}
assign_capability($capability, CAP_ALLOW, $roleid, $contextid);
role_assign($roleid, $USER->id, $contextid);
accesslib_clear_all_caches_for_unit_testing();
return $roleid;
}
/**
* Test load_users method.
*/
public function test_load_users()
{
global $DB;
$this->setAdminUser();
$this->resetAfterTest(true);
$roleteacher = $DB->get_record('role', array('shortname' => 'teacher'), '*', MUST_EXIST);
// Create a course, users and groups.
$course = $this->getDataGenerator()->create_course();
$coursecontext = context_course::instance($course->id);
$group = $this->getDataGenerator()->create_group(array('courseid' => $course->id));
$teacher = $this->getDataGenerator()->create_user();
$user1 = $this->getDataGenerator()->create_user();
$user2 = $this->getDataGenerator()->create_user();
$this->getDataGenerator()->enrol_user($teacher->id, $course->id, $roleteacher->id);
$this->getDataGenerator()->enrol_user($user1->id, $course->id);
$this->getDataGenerator()->enrol_user($user2->id, $course->id);
$this->getDataGenerator()->create_group_member(array('groupid' => $group->id, 'userid' => $teacher->id));
$this->getDataGenerator()->create_group_member(array('groupid' => $group->id, 'userid' => $user1->id));
$this->getDataGenerator()->create_group_member(array('groupid' => $group->id, 'userid' => $user2->id));
// Perform a regrade before creating the report.
grade_regrade_final_grades($course->id);
$screentest = new gradereport_singleview_screen_testable($course->id, 0, $group->id);
$groupusers = $screentest->test_load_users();
$this->assertCount(2, $groupusers);
// Now, let's suspend the enrolment of a user. Should return only one user.
$this->getDataGenerator()->enrol_user($user2->id, $course->id, $roleteacher->id, 'manual', 0, 0, ENROL_USER_SUSPENDED);
$users = $screentest->test_load_users();
$this->assertCount(1, $users);
// Change the viewsuspendedusers capabilities and set the user preference to display suspended users.
assign_capability('moodle/course:viewsuspendedusers', CAP_ALLOW, $roleteacher->id, $coursecontext, true);
set_user_preference('grade_report_showonlyactiveenrol', false, $teacher);
accesslib_clear_all_caches_for_unit_testing();
$this->setUser($teacher);
$screentest = new gradereport_singleview_screen_testable($course->id, 0, $group->id);
$users = $screentest->test_load_users();
$this->assertCount(2, $users);
// Change the capability again, now the user can't see the suspended enrolments.
assign_capability('moodle/course:viewsuspendedusers', CAP_PROHIBIT, $roleteacher->id, $coursecontext, true);
set_user_preference('grade_report_showonlyactiveenrol', false, $teacher);
accesslib_clear_all_caches_for_unit_testing();
$users = $screentest->test_load_users();
$this->assertCount(1, $users);
// Now, activate the user enrolment again. We shall get 2 users now.
$this->getDataGenerator()->enrol_user($user2->id, $course->id, $roleteacher->id, 'manual', 0, 0, ENROL_USER_ACTIVE);
$users = $screentest->test_load_users();
$this->assertCount(2, $users);
}
/**
* Do setup before each test.
*/
protected function setUp()
{
global $DB;
parent::setUp();
// Ensure that the editing teacher role has a specific capapbility enabled.
$role = $DB->get_record('role', array('shortname' => 'editingteacher'));
accesslib_clear_all_caches(true);
$syscontext = context_system::instance();
assign_capability('local/elisprogram:userset_enrol_userset_user', CAP_ALLOW, $role->id, $syscontext, true);
$syscontext->mark_dirty();
// Initialise testing data.
$this->initprogram();
$this->inittrack($this->tprogramid);
$this->initcourse();
$this->initclass($this->tcourseid);
$this->inituser();
$this->inituserset();
}
function xmldb_block_roomscheduler_install()
{
global $DB;
$timenow = time();
$sysctx = get_context_instance(CONTEXT_SYSTEM);
/// Fully setup the Elluminate Moderator role.
if (!($mrole = $DB->get_record('role', array('shortname' => 'roomschedulermanager')))) {
if ($rid = create_role(get_string('roomschedulermanager', 'block_roomscheduler'), 'roomschedulemanager', get_string('roomschedulermanagerdescription', 'block_roomscheduler'))) {
$mrole = $DB->get_record('role', array('id' => $rid));
assign_capability('block/roomscheduler:manage', CAP_ALLOW, $mrole->id, $sysctx->id);
//Only assignable at system level
set_role_contextlevels($mrole->id, array(CONTEXT_SYSTEM));
} else {
$mrole = $DB->get_record('role', array('shortname' => 'roomschedulermanager'));
set_role_contextlevels($mrole->id, array(CONTEXT_SYSTEM));
}
}
}
function xmldb_glossary_upgrade($oldversion = 0)
{
global $CFG, $THEME, $db;
$result = true;
/// And upgrade begins here. For each one, you'll need one
/// block of code similar to the next one. Please, delete
/// this comment lines once this file start handling proper
/// upgrade code.
/// if ($result && $oldversion < YYYYMMDD00) { //New version in version.php
/// $result = result of "/lib/ddllib.php" function calls
/// }
if ($result && $oldversion < 2006111400) {
/// MDL-10475, set override for legacy:student before dropping studentcanpost
/// if the glossary disables student postings
if ($glossaries = get_records('glossary', 'studentcanpost', '0')) {
foreach ($glossaries as $glossary) {
if ($cm = get_coursemodule_from_instance('glossary', $glossary->id)) {
// add student override in this instance
$context = get_context_instance(CONTEXT_MODULE, $cm->id);
// find all roles with legacy:student
if ($studentroles = get_roles_with_capability('moodle/legacy:student', CAP_ALLOW)) {
foreach ($studentroles as $studentrole) {
assign_capability('mod/glossary:write', CAP_PREVENT, $studentrole->id, $context->id);
}
}
}
}
}
/// Define field studentcanpost to be dropped from glossary
$table = new XMLDBTable('glossary');
$field = new XMLDBField('studentcanpost');
/// Launch drop field studentcanpost
$result = $result && drop_field($table, $field);
}
if ($result && $oldversion < 2007072200) {
require_once $CFG->dirroot . '/mod/glossary/lib.php';
// too much debug output
$db->debug = false;
glossary_update_grades();
$db->debug = true;
}
//===== 1.9.0 upgrade line ======//
return $result;
}
/**
*
* @param int $oldversion
* @param object $block
*/
function xmldb_block_iomad_company_admin_upgrade($oldversion)
{
global $CFG, $DB;
$result = true;
$dbman = $DB->get_manager();
if ($oldversion < 2014041200) {
// Check if there is an instance of the company select block on the dashboard.
if ($DB->get_record('block_instances', array('blockname' => 'iomad_company_selector', 'pagetypepattern' => 'local-iomad-dashboard-index'))) {
$DB->delete_records('block_instances', array('blockname' => 'iomad_company_selector', 'pagetypepattern' => 'local-iomad-dashboard-index'));
}
// Iomad_company_admin savepoint reached.
upgrade_block_savepoint(true, 2014041200, 'iomad_company_admin');
}
// add new role capability
if ($oldversion < 2014041201) {
$systemcontext = context_system::instance();
$clientadministrator = $DB->get_record('role', array('shortname' => 'clientadministrator'), '*', MUST_EXIST);
assign_capability('block/iomad_company_admin:restrict_capabilities', CAP_ALLOW, $clientadministrator->id, $systemcontext->id);
}
return true;
}
/**
* Set up some base user data
*/
protected function set_up_users()
{
global $DB, $USER;
// Set up a cluster administrator as a PM user.
$clusteradmin = new user(array('idnumber' => 'clusteradmin', 'username' => 'clusteradmin', 'firstname' => 'Cluster', 'lastname' => 'Admin', 'email' => '*****@*****.**', 'country' => 'CA'));
$clusteradmin->save();
$USER = $DB->get_record('user', array('username' => 'clusteradmin'));
// Set up a user set member as a PM user.
$clusteruser = new user(array('idnumber' => 'clusteruser', 'username' => 'clusteruser', 'firstname' => 'Cluster', 'lastname' => 'User', 'email' => '*****@*****.**', 'country' => 'CA'));
$clusteruser->save();
// Set up our test role.
$syscontext = context_system::instance();
$roleid = create_role('clusteradmin', 'clusteradmin', 'clusteradmin');
assign_capability('local/elisprogram:user_edit', CAP_ALLOW, $roleid, $syscontext->id);
// Assign the userset administrator an appropriate role on the userset.
$instance = \local_elisprogram\context\userset::instance(1);
role_assign($roleid, $USER->id, $instance->id);
// Assign the user to the user set.
$clusterassignment = new clusterassignment(array('clusterid' => 1, 'userid' => $clusteruser->id));
$clusterassignment->save();
}
public function execute()
{
global $CFG, $DB;
require_once $CFG->libdir . DIRECTORY_SEPARATOR . "accesslib.php";
$options = $this->expandedOptions;
$arguments = $this->arguments;
//execute method
if ($options['id']) {
$role = $DB->get_record('role', array('id' => $arguments[0]));
if (!$role) {
echo "Role with id '" . $arguments[0] . "' does not exist\n";
exit(0);
}
} else {
$role = $DB->get_record('role', array('shortname' => $arguments[0]));
if (!$role) {
echo "Role '" . $arguments[0] . "' does not exist.\n";
exit(0);
}
}
$capability = CAP_ALLOW;
switch ($arguments[2]) {
case 'inherit':
$capability = CAP_INHERIT;
break;
case 'allow':
$capability = CAP_ALLOW;
break;
case 'prevent':
$capability = CAP_PREVENT;
break;
case 'prohibit':
$capability = CAP_PROHIBIT;
break;
}
if (assign_capability($arguments[1], $capability, $role->id, $arguments[3], true)) {
echo "Capability '{$arguments[1]}' was set to {$capability} for roleid {$role->id} ({$role->shortname}) successfuly\n";
}
echo "\n";
}
function xmldb_enrol_category_install()
{
global $CFG, $DB;
if (!$DB->record_exists_select('role_assignments', "contextid IN (SELECT id FROM {context} WHERE contextlevel = ?)", array(CONTEXT_COURSECAT))) {
// fresh install or nobody used category enrol
return;
}
// existing sites need a way to keep category role enrols, but we do not want to encourage that on new sites
// extremely ugly hack, the sync depends on the capabilities so we unfortunately force update of caps here
// note: this is not officially supported and should not be copied elsewhere! :-(
update_capabilities('enrol_category');
$syscontext = get_context_instance(CONTEXT_SYSTEM);
$archetypes = array('student', 'teacher', 'editingteacher');
$enableplugin = false;
foreach ($archetypes as $archetype) {
$roles = get_archetype_roles($archetype);
foreach ($roles as $role) {
if (!$DB->record_exists_select('role_assignments', "roleid = ? AND contextid IN (SELECT id FROM {context} WHERE contextlevel = ?)", array($role->id, CONTEXT_COURSECAT))) {
continue;
}
assign_capability('enrol/category:synchronised', CAP_ALLOW, $role->id, $syscontext->id, true);
$levels = get_role_contextlevels($role->id);
$levels[] = CONTEXT_COURSECAT;
set_role_contextlevels($role->id, $levels);
$enableplugin = true;
}
}
if (!$enableplugin) {
return;
}
// enable this plugin
$enabledplugins = explode(',', $CFG->enrol_plugins_enabled);
$enabledplugins[] = 'category';
$enabledplugins = array_unique($enabledplugins);
set_config('enrol_plugins_enabled', implode(',', $enabledplugins));
// brute force course resync, this may take a while
require_once "{$CFG->dirroot}/enrol/category/locallib.php";
enrol_category_sync_full();
}
/**
* Installing repository tests
*
* @copyright 2012 Dongsheng Cai {@link http://dongsheng.org}
*/
public function test_install_repository() {
global $CFG, $DB;
$this->resetAfterTest(true);
$syscontext = context_system::instance();
$repositorypluginname = 'boxnet';
// override repository permission
$capability = 'repository/' . $repositorypluginname . ':view';
$allroles = $DB->get_records_menu('role', array(), 'id', 'archetype, id');
assign_capability($capability, CAP_ALLOW, $allroles['guest'], $syscontext->id, true);
$plugintype = new repository_type($repositorypluginname);
$pluginid = $plugintype->create(false);
$this->assertInternalType('int', $pluginid);
$args = array();
$args['type'] = $repositorypluginname;
$repos = repository::get_instances($args);
$repository = reset($repos);
$this->assertInstanceOf('repository', $repository);
$info = $repository->get_meta();
$this->assertEquals($repositorypluginname, $info->type);
}
/**
* More user friendly role permission changing,
* it should produce as few overrides as possible.
* @param int $roleid
* @param object $context
* @param string $capname capability name
* @param int $permission
* @return void
*/
function role_change_permission($roleid, $context, $capname, $permission)
{
global $DB;
if ($permission == CAP_INHERIT) {
unassign_capability($capname, $roleid, $context->id);
$context->mark_dirty();
return;
}
$ctxids = trim($context->path, '/');
// kill leading slash
$ctxids = str_replace('/', ',', $ctxids);
$params = array('roleid' => $roleid, 'cap' => $capname);
$sql = "SELECT ctx.id, rc.permission, ctx.depth\n FROM {role_capabilities} rc\n JOIN {context} ctx ON ctx.id = rc.contextid\n WHERE rc.roleid = :roleid AND rc.capability = :cap AND ctx.id IN ({$ctxids})\n ORDER BY ctx.depth DESC";
if ($existing = $DB->get_records_sql($sql, $params)) {
foreach ($existing as $e) {
if ($e->permission == CAP_PROHIBIT) {
// prohibit can not be overridden, no point in changing anything
return;
}
}
$lowest = array_shift($existing);
if ($lowest->permission == $permission) {
// permission already set in this context or parent - nothing to do
return;
}
if ($existing) {
$parent = array_shift($existing);
if ($parent->permission == $permission) {
// permission already set in parent context or parent - just unset in this context
// we do this because we want as few overrides as possible for performance reasons
unassign_capability($capname, $roleid, $context->id);
$context->mark_dirty();
return;
}
}
} else {
if ($permission == CAP_PREVENT) {
// nothing means role does not have permission
return;
}
}
// assign the needed capability
assign_capability($capname, $permission, $roleid, $context->id, true);
// force cap reloading
$context->mark_dirty();
}
/**
* Validate that class instance-moodle course associations can be created during a class instance update action.
*
* @param string $link The link attribute to use in the import, or 'auto' to auto-create from template.
* @dataProvider link_course_provider
*/
public function test_associate_moodle_course_during_class_update($link)
{
global $CFG, $DB, $USER;
require_once $CFG->dirroot . '/course/lib.php';
require_once $CFG->dirroot . '/local/elisprogram/lib/setup.php';
require_once elispm::lib('data/classmoodlecourse.class.php');
require_once elispm::lib('data/coursetemplate.class.php');
require_once elispm::lib('data/course.class.php');
require_once elispm::lib('data/pmclass.class.php');
// Make sure $USER is set up for backup/restore.
$USER->id = $DB->get_field_select('user', 'id', "username != 'guest' AND deleted = 0", array(), IGNORE_MULTIPLE);
// Need the moodle/backup:backupcourse capability.
$guestroleid = create_role('guestrole', 'guestrole', 'guestrole');
set_config('guestroleid', $guestroleid);
set_config('siteguest', '');
$systemcontext = context_system::instance();
$roleid = create_role('testrole', 'testrole', 'testrole');
assign_capability('moodle/backup:backupcourse', CAP_ALLOW, $roleid, $systemcontext->id);
role_assign($roleid, $USER->id, $systemcontext->id);
$coursecategory = new stdClass();
$coursecategory->name = 'testcoursecategoryname';
$coursecategory->id = $DB->insert_record('course_categories', $coursecategory);
$moodlecourse = new stdClass();
$moodlecourse->category = $coursecategory->id;
$moodlecourse->shortname = 'testcourseshortname';
$moodlecourse->fullname = 'testcoursefullname';
$moodlecourse = create_course($moodlecourse);
$course = new course(array('name' => 'testcoursename', 'idnumber' => 'testcourseidnumber', 'syllabus' => ''));
$course->save();
$class = new pmclass(array('courseid' => $course->id, 'idnumber' => 'testclassidnumber'));
$class->save();
// Need this for the 'auto' case, at the very least.
$coursetemplate = new coursetemplate(array('courseid' => $course->id, 'location' => $moodlecourse->id, 'templateclass' => 'moodlecourseurl'));
$coursetemplate->save();
// Run the class instance create action.
$record = new stdClass();
$record->idnumber = 'testclassidnumber';
$record->assignment = 'testcourseidnumber';
$record->link = $link;
$importplugin = rlip_dataplugin_factory::factory('dhimport_version1elis');
$importplugin->fslogger = new silent_fslogger(null);
$importplugin->class_update($record, 'bogus');
// Validation.
if ($record->link == 'auto') {
$moodlecourseid = $moodlecourse->id + 1;
} else {
$moodlecourseid = $moodlecourse->id;
}
$dbautocreated = $record->link == 'auto' ? 1 : 0;
$this->assertTrue($DB->record_exists(classmoodlecourse::TABLE, array('classid' => $class->id, 'moodlecourseid' => $moodlecourseid, 'enroltype' => 0, 'enrolplugin' => 'crlm', 'autocreated' => $dbautocreated)));
ini_set('max_execution_time', '0');
}
function main_upgrade($oldversion = 0)
{
global $CFG, $THEME, $db;
$result = true;
if ($oldversion < 2003010101) {
delete_records("log_display", "module", "user");
$new->module = "user";
$new->action = "view";
$new->mtable = "user";
$new->field = "CONCAT(firstname,\" \",lastname)";
insert_record("log_display", $new);
delete_records("log_display", "module", "course");
$new->module = "course";
$new->action = "view";
$new->mtable = "course";
$new->field = "fullname";
insert_record("log_display", $new);
$new->action = "update";
insert_record("log_display", $new);
$new->action = "enrol";
insert_record("log_display", $new);
}
//support user based course creating
if ($oldversion < 2003032400) {
execute_sql("CREATE TABLE {$CFG->prefix}user_coursecreators (\n id int8 SERIAL PRIMARY KEY,\n userid int8 NOT NULL default '0'\n )");
}
if ($oldversion < 2003041400) {
table_column("course_modules", "", "visible", "integer", "1", "unsigned", "1", "not null", "score");
}
if ($oldversion < 2003042104) {
// Try to update permissions of all files
if ($files = get_directory_list($CFG->dataroot)) {
echo "Attempting to update permissions for all files... ignore any errors.";
foreach ($files as $file) {
echo "{$CFG->dataroot}/{$file}<br />";
@chmod("{$CFG->dataroot}/{$file}", $CFG->directorypermissions);
}
}
}
if ($oldversion < 2003042400) {
// Rebuild all course caches, because of changes to do with visible variable
if ($courses = get_records_sql("SELECT * FROM {$CFG->prefix}course")) {
require_once "{$CFG->dirroot}/course/lib.php";
foreach ($courses as $course) {
$modinfo = serialize(get_array_of_activities($course->id));
if (!set_field("course", "modinfo", $modinfo, "id", $course->id)) {
notify("Could not cache module information for course '" . format_string($course->fullname) . "'!");
}
}
}
}
if ($oldversion < 2003042500) {
// Convert all usernames to lowercase.
$users = get_records_sql("SELECT id, username FROM {$CFG->prefix}user");
$cerrors = "";
$rarray = array();
foreach ($users as $user) {
// Check for possible conflicts
$lcname = trim(moodle_strtolower($user->username));
if (in_array($lcname, $rarray)) {
$cerrors .= $user->id . "->" . $lcname . '<br/>';
} else {
array_push($rarray, $lcname);
}
}
if ($cerrors != '') {
notify("Error: Cannot convert usernames to lowercase. \n Following usernames would overlap (id->username):<br/> {$cerrors} . \n Please resolve overlapping errors.");
$result = false;
}
$cerrors = "";
echo "Checking userdatabase:<br />";
foreach ($users as $user) {
$lcname = trim(moodle_strtolower($user->username));
if ($lcname != $user->username) {
$convert = set_field("user", "username", $lcname, "id", $user->id);
if (!$convert) {
if ($cerrors) {
$cerrors .= ", ";
}
$cerrors .= $item;
} else {
echo ".";
}
}
}
if ($cerrors != '') {
notify("There were errors when converting following usernames to lowercase. \n '{$cerrors}' . Sorry, but you will need to fix your database by hand.");
$result = false;
}
}
if ($oldversion < 2003042700) {
/// Changing to multiple indexes
execute_sql(" CREATE INDEX {$CFG->prefix}log_coursemoduleaction_idx ON {$CFG->prefix}log (course,module,action) ");
execute_sql(" CREATE INDEX {$CFG->prefix}log_courseuserid_idx ON {$CFG->prefix}log (course,userid) ");
}
if ($oldversion < 2003042801) {
execute_sql("CREATE TABLE {$CFG->prefix}course_display (\n id SERIAL PRIMARY KEY,\n course integer NOT NULL default '0',\n userid integer NOT NULL default '0',\n display integer NOT NULL default '0'\n )");
execute_sql("CREATE INDEX {$CFG->prefix}course_display_courseuserid_idx ON {$CFG->prefix}course_display (course,userid)");
}
if ($oldversion < 2003050400) {
table_column("course_sections", "", "visible", "integer", "1", "unsigned", "1", "", "");
}
if ($oldversion < 2003050401) {
table_column("user", "", "lang", "VARCHAR", "5", "", "{$CFG->lang}", "NOT NULL", "");
}
if ($oldversion < 2003050900) {
table_column("modules", "", "visible", "integer", "1", "unsigned", "1", "", "");
}
if ($oldversion < 2003050902) {
if (get_records("modules", "name", "pgassignment")) {
print_simple_box("Note: the pgassignment module will soon be deleted from CVS! Go to the new 'Manage Modules' page and DELETE IT from your system", "center", "50%", "{$THEME->cellheading}", "20", "noticebox");
}
}
if ($oldversion < 2003051600) {
print_simple_box("Thanks for upgrading!<p>There are many changes since the last release. Please read the release notes carefully. If you are using CUSTOM themes you will need to edit them. You will also need to check your site's config.php file.", "center", "50%", "{$THEME->cellheading}", "20", "noticebox");
}
if ($oldversion < 2003052300) {
table_column("user", "", "autosubscribe", "integer", "1", "unsigned", "1", "", "htmleditor");
}
if ($oldversion < 2003072100) {
table_column("course", "", "visible", "integer", "1", "unsigned", "1", "", "marker");
}
if ($oldversion < 2003072101) {
table_column("course_sections", "sequence", "sequence", "text", "", "", "", "", "");
}
if ($oldversion < 2003072800) {
print_simple_box("The following database index improves performance, but can be quite large - if you are upgrading and you have problems with a limited quota you may want to delete this index later from the '{$CFG->prefix}log' table in your database", "center", "50%", "{$THEME->cellheading}", "20", "noticebox");
flush();
execute_sql(" CREATE INDEX {$CFG->prefix}log_timecoursemoduleaction_idx ON {$CFG->prefix}log (time,course,module,action) ");
execute_sql(" CREATE INDEX {$CFG->prefix}user_students_courseuserid_idx ON {$CFG->prefix}user_students (course,userid) ");
execute_sql(" CREATE INDEX {$CFG->prefix}user_teachers_courseuserid_idx ON {$CFG->prefix}user_teachers (course,userid) ");
}
if ($oldversion < 2003072802) {
table_column("course_categories", "", "description", "text", "", "", "");
table_column("course_categories", "", "parent", "integer", "10", "unsigned");
table_column("course_categories", "", "sortorder", "integer", "10", "unsigned");
table_column("course_categories", "", "courseorder", "text", "", "", "");
table_column("course_categories", "", "visible", "integer", "1", "unsigned", "1");
table_column("course_categories", "", "timemodified", "integer", "10", "unsigned");
}
if ($oldversion < 2003080400) {
notify("If the following command fails you may want to change the type manually, from TEXT to INTEGER. Moodle should keep working even if you don't.");
table_column("course_categories", "courseorder", "courseorder", "integer", "10", "unsigned");
table_column("course", "", "sortorder", "integer", "10", "unsigned", "0", "", "category");
}
if ($oldversion < 2003081502) {
execute_sql(" CREATE TABLE {$CFG->prefix}scale (\n id SERIAL PRIMARY KEY,\n courseid integer NOT NULL default '0',\n userid integer NOT NULL default '0',\n name varchar(255) NOT NULL default '',\n scale text,\n description text,\n timemodified integer NOT NULL default '0'\n )");
}
if ($oldversion < 2003081503) {
table_column("forum", "", "scale", "integer", "10", "unsigned", "0", "", "assessed");
get_scales_menu(0);
// Just to force the default scale to be created
}
if ($oldversion < 2003081600) {
table_column("user_teachers", "", "editall", "integer", "1", "unsigned", "1", "", "role");
table_column("user_teachers", "", "timemodified", "integer", "10", "unsigned", "0", "", "editall");
}
if ($oldversion < 2003081900) {
table_column("course_categories", "courseorder", "coursecount", "integer", "10", "unsigned", "0");
}
if ($oldversion < 2003080700) {
notify("Cleaning up categories and course ordering...");
fix_course_sortorder();
}
if ($oldversion < 2003082001) {
table_column("course", "", "showgrades", "integer", "2", "unsigned", "1", "", "format");
}
if ($oldversion < 2003082101) {
execute_sql(" CREATE INDEX {$CFG->prefix}course_category_idx ON {$CFG->prefix}course (category) ");
}
if ($oldversion < 2003082702) {
execute_sql(" INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'user report', 'user', 'CONCAT(firstname,\" \",lastname)') ");
}
if ($oldversion < 2003091000) {
# Old field that was never added!
table_column("course", "", "showrecent", "integer", "10", "unsigned", "1", "", "numsections");
}
if ($oldversion < 2003091400) {
table_column("course_modules", "", "indent", "integer", "5", "unsigned", "0", "", "score");
}
if ($oldversion < 2003092900) {
table_column("course", "", "maxbytes", "integer", "10", "unsigned", "0", "", "marker");
}
if ($oldversion < 2003102700) {
table_column("user_students", "", "timeaccess", "integer", "10", "unsigned", "0", "", "time");
table_column("user_teachers", "", "timeaccess", "integer", "10", "unsigned", "0", "", "timemodified");
$db->debug = false;
$CFG->debug = 0;
notify("Calculating access times. Please wait - this may take a long time on big sites...", "green");
flush();
if ($courses = get_records_select("course", "category > 0")) {
foreach ($courses as $course) {
notify("Processing " . format_string($course->fullname) . " ...", "green");
flush();
if ($users = get_records_select("user_teachers", "course = '{$course->id}'", "id", "id, userid, timeaccess")) {
foreach ($users as $user) {
$loginfo = get_record_sql("SELECT id, time FROM {$CFG->prefix}log WHERE course = '{$course->id}' and userid = '{$user->userid}' ORDER by time DESC");
if (empty($loginfo->time)) {
$loginfo->time = 0;
}
execute_sql("UPDATE {$CFG->prefix}user_teachers SET timeaccess = '{$loginfo->time}' \n WHERE userid = '{$user->userid}' AND course = '{$course->id}'", false);
}
}
if ($users = get_records_select("user_students", "course = '{$course->id}'", "id", "id, userid, timeaccess")) {
foreach ($users as $user) {
$loginfo = get_record_sql("SELECT id, time FROM {$CFG->prefix}log \n WHERE course = '{$course->id}' and userid = '{$user->userid}' \n ORDER by time DESC");
if (empty($loginfo->time)) {
$loginfo->time = 0;
}
execute_sql("UPDATE {$CFG->prefix}user_students \n SET timeaccess = '{$loginfo->time}' \n WHERE userid = '{$user->userid}' AND course = '{$course->id}'", false);
}
}
}
}
notify("All courses complete.", "green");
$db->debug = true;
}
if ($oldversion < 2003103100) {
table_column("course", "", "showreports", "integer", "4", "unsigned", "0", "", "maxbytes");
}
if ($oldversion < 2003121600) {
execute_sql("CREATE TABLE {$CFG->prefix}groups (\n id SERIAL PRIMARY KEY,\n courseid integer NOT NULL default '0',\n name varchar(255) NOT NULL default '',\n description text,\n lang varchar(10) NOT NULL default '',\n picture integer NOT NULL default '0',\n timecreated integer NOT NULL default '0',\n timemodified integer NOT NULL default '0'\n )");
execute_sql("CREATE INDEX {$CFG->prefix}groups_idx ON {$CFG->prefix}groups (courseid) ");
execute_sql("CREATE TABLE {$CFG->prefix}groups_members (\n id SERIAL PRIMARY KEY,\n groupid integer NOT NULL default '0',\n userid integer NOT NULL default '0',\n timeadded integer NOT NULL default '0'\n )");
execute_sql("CREATE INDEX {$CFG->prefix}groups_members_idx ON {$CFG->prefix}groups_members (groupid) ");
}
if ($oldversion < 2003122600) {
table_column("course", "", "groupmode", "integer", "4", "unsigned", "0", "", "visible");
table_column("course", "", "groupmodeforce", "integer", "4", "unsigned", "0", "", "groupmode");
}
if ($oldversion < 2004010900) {
table_column("course_modules", "", "groupmode", "integer", "4", "unsigned", "0", "", "visible");
}
if ($oldversion < 2004011700) {
modify_database("", "CREATE TABLE prefix_event (\n id SERIAL PRIMARY KEY,\n name varchar(255) NOT NULL default '',\n description text,\n courseid integer NOT NULL default '0',\n groupid integer NOT NULL default '0',\n userid integer NOT NULL default '0',\n modulename varchar(20) NOT NULL default '',\n instance integer NOT NULL default '0',\n eventtype varchar(20) NOT NULL default '',\n timestart integer NOT NULL default '0',\n timeduration integer NOT NULL default '0',\n timemodified integer NOT NULL default '0'\n ); ");
modify_database("", "CREATE INDEX prefix_event_courseid_idx ON prefix_event (courseid);");
modify_database("", "CREATE INDEX prefix_event_userid_idx ON prefix_event (userid);");
}
if ($oldversion < 2004012800) {
modify_database("", "CREATE TABLE prefix_user_preferences (\n id SERIAL PRIMARY KEY,\n userid integer NOT NULL default '0',\n name varchar(50) NOT NULL default '',\n value varchar(255) NOT NULL default ''\n ); ");
modify_database("", "CREATE INDEX prefix_user_preferences_useridname_idx ON prefix_user_preferences (userid,name);");
}
if ($oldversion < 2004012900) {
table_column("config", "value", "value", "text", "", "", "");
}
if ($oldversion < 2004013101) {
table_column("log", "", "cmid", "integer", "10", "unsigned", "0", "", "module");
set_config("upgrade", "logs");
}
if ($oldversion < 2004020900) {
table_column("course", "", "lang", "varchar", "5", "", "", "", "groupmodeforce");
}
if ($oldversion < 2004020903) {
modify_database("", "CREATE TABLE prefix_cache_text (\n id SERIAL PRIMARY KEY,\n md5key varchar(32) NOT NULL default '',\n formattedtext text,\n timemodified integer NOT NULL default '0'\n );");
}
if ($oldversion < 2004021000) {
$textfilters = array();
for ($i = 1; $i <= 10; $i++) {
$variable = "textfilter{$i}";
if (!empty($CFG->{$variable})) {
/// No more filters
if (is_readable("{$CFG->dirroot}/" . $CFG->{$variable})) {
$textfilters[] = $CFG->{$variable};
}
}
}
$textfilters = implode(',', $textfilters);
if (empty($textfilters)) {
$textfilters = 'mod/glossary/dynalink.php';
}
set_config('textfilters', $textfilters);
}
if ($oldversion < 2004021201) {
modify_database("", "CREATE TABLE prefix_cache_filters (\n id SERIAL PRIMARY KEY,\n filter varchar(32) NOT NULL default '',\n version integer NOT NULL default '0',\n md5key varchar(32) NOT NULL default '',\n rawtext text,\n timemodified integer NOT NULL default '0'\n );");
modify_database("", "CREATE INDEX prefix_cache_filters_filtermd5key_idx ON prefix_cache_filters (filter,md5key);");
modify_database("", "CREATE INDEX prefix_cache_text_md5key_idx ON prefix_cache_text (md5key);");
}
if ($oldversion < 2004021500) {
table_column("groups", "", "hidepicture", "integer", "2", "unsigned", "0", "", "picture");
}
if ($oldversion < 2004021700) {
if (!empty($CFG->textfilters)) {
$CFG->textfilters = str_replace("tex_filter.php", "filter.php", $CFG->textfilters);
$CFG->textfilters = str_replace("multilang.php", "filter.php", $CFG->textfilters);
$CFG->textfilters = str_replace("censor.php", "filter.php", $CFG->textfilters);
$CFG->textfilters = str_replace("mediaplugin.php", "filter.php", $CFG->textfilters);
$CFG->textfilters = str_replace("algebra_filter.php", "filter.php", $CFG->textfilters);
$CFG->textfilters = str_replace("dynalink.php", "filter.php", $CFG->textfilters);
set_config("textfilters", $CFG->textfilters);
}
}
if ($oldversion < 2004022000) {
table_column("user", "", "emailstop", "integer", "1", "unsigned", "0", "not null", "email");
}
if ($oldversion < 2004022200) {
/// Final renaming I hope. :-)
if (!empty($CFG->textfilters)) {
$CFG->textfilters = str_replace("/filter.php", "", $CFG->textfilters);
$CFG->textfilters = str_replace("mod/glossary/dynalink.php", "mod/glossary", $CFG->textfilters);
$textfilters = explode(',', $CFG->textfilters);
foreach ($textfilters as $key => $textfilter) {
$textfilters[$key] = trim($textfilter);
}
set_config("textfilters", implode(',', $textfilters));
}
}
if ($oldversion < 2004030702) {
/// Because of the renaming of Czech language pack
execute_sql("UPDATE {$CFG->prefix}user SET lang = 'cs' WHERE lang = 'cz'");
execute_sql("UPDATE {$CFG->prefix}course SET lang = 'cs' WHERE lang = 'cz'");
}
if ($oldversion < 2004041800) {
/// Integrate Block System from contrib
table_column("course", "", "blockinfo", "varchar", "255", "", "", "not null", "modinfo");
}
if ($oldversion < 2004042600) {
/// Rebuild course caches for resource icons
//include_once("$CFG->dirroot/course/lib.php");
//rebuild_course_cache();
}
if ($oldversion < 2004042700) {
/// Increase size of lang fields
table_column("user", "lang", "lang", "varchar", "10", "", "en");
table_column("groups", "lang", "lang", "varchar", "10", "", "");
table_column("course", "lang", "lang", "varchar", "10", "", "");
}
if ($oldversion < 2004042701) {
/// Add hiddentopics field to control hidden topics behaviour
#table_column("course", "", "hiddentopics", "integer", "1", "unsigned", "0", "not null", "visible");
#See 'hiddensections' further down
}
if ($oldversion < 2004042702) {
/// Add a format field for the description
table_column("event", "", "format", "integer", "4", "unsigned", "0", "not null", "description");
}
if ($oldversion < 2004043001) {
/// Add hiddentopics field to control hidden topics behaviour
table_column("course", "", "hiddensections", "integer", "2", "unsigned", "0", "not null", "visible");
}
if ($oldversion < 2004050400) {
/// add a visible field for events
table_column("event", "", "visible", "smallint", "1", "", "1", "not null", "timeduration");
if ($events = get_records('event')) {
foreach ($events as $event) {
if ($moduleid = get_field('modules', 'id', 'name', $event->modulename)) {
if (get_field('course_modules', 'visible', 'module', $moduleid, 'instance', $event->instance) == 0) {
set_field('event', 'visible', 0, 'id', $event->id);
}
}
}
}
}
if ($oldversion < 2004052800) {
/// First version tagged "1.4 development", version.php 1.227
set_config('siteblocksadded', true);
/// This will be used later by the block upgrade
}
if ($oldversion < 2004053000) {
/// set defaults for site course
$site = get_site();
set_field('course', 'numsections', 0, 'id', $site->id);
set_field('course', 'groupmodeforce', 1, 'id', $site->id);
set_field('course', 'teacher', get_string('administrator'), 'id', $site->id);
set_field('course', 'teachers', get_string('administrators'), 'id', $site->id);
set_field('course', 'student', get_string('user'), 'id', $site->id);
set_field('course', 'students', get_string('users'), 'id', $site->id);
}
if ($oldversion < 2004060100) {
set_config('digestmailtime', 0);
table_column('user', "", 'maildigest', 'smallint', '1', '', '0', 'not null', 'mailformat');
}
if ($oldversion < 2004062400) {
table_column('user_teachers', "", 'timeend', 'int', '10', 'unsigned', '0', 'not null', 'editall');
table_column('user_teachers', "", 'timestart', 'int', '10', 'unsigned', '0', 'not null', 'editall');
}
if ($oldversion < 2004062401) {
table_column('course', '', 'idnumber', 'varchar', '100', '', '', 'not null', 'shortname');
execute_sql('UPDATE ' . $CFG->prefix . 'course SET idnumber = shortname');
// By default
}
if ($oldversion < 2004062600) {
table_column('course', '', 'cost', 'varchar', '10', '', '', 'not null', 'lang');
}
if ($oldversion < 2004072900) {
table_column('course', '', 'enrolperiod', 'int', '10', 'unsigned', '0', 'not null', 'startdate');
}
if ($oldversion < 2004072901) {
// Fixing error in schema
if ($record = get_record('log_display', 'module', 'course', 'action', 'update')) {
delete_records('log_display', 'module', 'course', 'action', 'update');
insert_record('log_display', $record, false);
}
}
if ($oldversion < 2004081200) {
// Fixing version errors in some blocks
set_field('blocks', 'version', 2004081200, 'name', 'admin');
set_field('blocks', 'version', 2004081200, 'name', 'calendar_month');
set_field('blocks', 'version', 2004081200, 'name', 'course_list');
}
if ($oldversion < 2004081500) {
// Adding new "auth" field to user table to allow more flexibility
table_column('user', '', 'auth', 'varchar', '20', '', 'manual', 'not null', 'id');
execute_sql("UPDATE {$CFG->prefix}user SET auth = 'manual'");
// Set everyone to 'manual' to be sure
if ($admins = get_admins()) {
// Set all the NON-admins to whatever the current auth module is
$adminlist = array();
foreach ($admins as $user) {
$adminlist[] = $user->id;
}
$adminlist = implode(',', $adminlist);
execute_sql("UPDATE {$CFG->prefix}user SET auth = '{$CFG->auth}' WHERE id NOT IN ({$adminlist})");
}
}
if ($oldversion < 2004082600) {
//update auth-fields for external users
// following code would not work in 1.8
/* include_once ($CFG->dirroot."/auth/".$CFG->auth."/lib.php");
if (function_exists('auth_get_userlist')) {
$externalusers = auth_get_userlist();
if (!empty($externalusers)){
$externalusers = '\''. implode('\',\'',$externalusers).'\'';
execute_sql("UPDATE {$CFG->prefix}user SET auth = '$CFG->auth' WHERE username IN ($externalusers)");
}
}*/
}
if ($oldversion < 2004082900) {
// Make sure guest is "manual" too.
set_field('user', 'auth', 'manual', 'username', 'guest');
}
/* Just commenteed unused fields out
if ($oldversion < 2004090300) { // Add guid-field used in user syncronization
table_column('user', '', 'guid', 'varchar', '128', '', '', '', 'auth');
execute_sql("CREATE INDEX {$CFG->prefix}user_auth_guid_idx ON {$CFG->prefix}user (auth, guid)");
}
*/
if ($oldversion < 2004091900) {
//Modify idnumber to hold longer keys
set_field('user', 'auth', 'manual', 'username', 'guest');
table_column('user', 'idnumber', 'idnumber', 'varchar', '64', '', '', '', '');
execute_sql("DROP INDEX {$CFG->prefix}user_idnumber_idx ;", false);
// added in case of conflicts with upgrade from 14stable
execute_sql("DROP INDEX {$CFG->prefix}user_auth_idx ;", false);
// added in case of conflicts with upgrade from 14stable
execute_sql("CREATE INDEX {$CFG->prefix}user_idnumber_idx ON {$CFG->prefix}user (idnumber)");
execute_sql("CREATE INDEX {$CFG->prefix}user_auth_idx ON {$CFG->prefix}user (auth)");
}
if ($oldversion < 2004092000) {
//redoing this just to be sure that column type is text (postgres type changes didnt work when this was done first time)
table_column("config", "value", "value", "text", "", "", "");
}
if ($oldversion < 2004093001) {
// add new table for sessions storage
execute_sql(" CREATE TABLE {$CFG->prefix}sessions (\n sesskey char(32) PRIMARY KEY,\n expiry integer NOT null,\n expireref varchar(64),\n data text NOT null\n );");
execute_sql(" CREATE INDEX {$CFG->prefix}sessions_expiry_idx ON {$CFG->prefix}sessions (expiry)");
}
if ($oldversion < 2004111500) {
// Update any users/courses using wrongly-named lang pack
execute_sql("UPDATE {$CFG->prefix}user SET lang = 'mi_nt' WHERE lang = 'ma_nt'");
execute_sql("UPDATE {$CFG->prefix}course SET lang = 'mi_nt' WHERE lang = 'ma_nt'");
}
if ($oldversion < 2004111700) {
// add indexes- drop them first silently to avoid conflicts when upgrading.
execute_sql("DROP INDEX {$CFG->prefix}course_idnumber_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_shortname_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_students_userid_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_teachers_userid_idx;", false);
modify_database("", "CREATE INDEX {$CFG->prefix}course_idnumber_idx ON {$CFG->prefix}course (idnumber);");
modify_database("", "CREATE INDEX {$CFG->prefix}course_shortname_idx ON {$CFG->prefix}course (shortname);");
modify_database("", "CREATE INDEX {$CFG->prefix}user_students_userid_idx ON {$CFG->prefix}user_students (userid);");
modify_database("", "CREATE INDEX {$CFG->prefix}user_teachers_userid_idx ON {$CFG->prefix}user_teachers (userid);");
}
if ($oldversion < 2004111700) {
// add an index to event for timestart and timeduration- drop them first silently to avoid conflicts when upgrading.
execute_sql("DROP INDEX {$CFG->prefix}event_timestart_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}event_timeduration_idx;", false);
modify_database('', 'CREATE INDEX prefix_event_timestart_idx ON prefix_event (timestart);');
modify_database('', 'CREATE INDEX prefix_event_timeduration_idx ON prefix_event (timeduration);');
}
if ($oldversion < 2004117000) {
// add an index on the groups_members table- drop them first silently to avoid conflicts when upgrading.
execute_sql("DROP INDEX {$CFG->prefix}groups_members_userid_idx;", false);
modify_database('', 'CREATE INDEX prefix_groups_members_userid_idx ON prefix_groups_members (userid);');
}
if ($oldversion < 2004111700) {
//add indexes on modules and course_modules- drop them first silently to avoid conflicts when upgrading.
execute_sql("DROP INDEX {$CFG->prefix}course_modules_visible_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_modules_course_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_modules_module_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_modules_instance_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_modules_deleted_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}modules_name_idx;", false);
modify_database('', 'CREATE INDEX prefix_course_modules_visible_idx ON prefix_course_modules (visible);');
modify_database('', 'CREATE INDEX prefix_course_modules_course_idx ON prefix_course_modules (course);');
modify_database('', 'CREATE INDEX prefix_course_modules_module_idx ON prefix_course_modules (module);');
modify_database('', 'CREATE INDEX prefix_course_modules_instance_idx ON prefix_course_modules (instance);');
modify_database('', 'CREATE INDEX prefix_course_modules_deleted_idx ON prefix_course_modules (deleted);');
modify_database('', 'CREATE INDEX prefix_modules_name_idx ON prefix_modules (name);');
}
if ($oldversion < 2004111700) {
// add an index on user students timeaccess (used for sorting)- drop them first silently to avoid conflicts when upgrading
execute_sql("DROP INDEX {$CFG->prefix}user_students_timeaccess_idx;", false);
modify_database('', 'CREATE INDEX prefix_user_students_timeaccess_idx ON prefix_user_students (timeaccess);');
}
if ($oldversion < 2004111700) {
//add indexes on faux foreign keys - drop them first silently to avoid conflicts when upgrading.
execute_sql("DROP INDEX {$CFG->prefix}course_sections_coursesection_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}scale_courseid_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_admins_userid_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_coursecreators_userid_idx;", false);
modify_database('', 'CREATE INDEX prefix_course_sections_coursesection_idx ON prefix_course_sections (course,section);');
modify_database('', 'CREATE INDEX prefix_scale_courseid_idx ON prefix_scale (courseid);');
modify_database('', 'CREATE INDEX prefix_user_admins_userid_idx ON prefix_user_admins (userid);');
modify_database('', 'CREATE INDEX prefix_user_coursecreators_userid_idx ON prefix_user_coursecreators (userid);');
}
if ($oldversion < 2004111700) {
// make new indexes on user table.
fix_course_sortorder(0, 0, 1);
execute_sql("DROP INDEX {$CFG->prefix}course_category_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}course_category_sortorder_uk;", false);
modify_database('', "CREATE UNIQUE INDEX prefix_course_category_sortorder_uk ON prefix_course(category,sortorder)");
execute_sql("DROP INDEX {$CFG->prefix}user_deleted_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_confirmed_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_firstname_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_lastname_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_city_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_country_idx;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_lastaccess_idx;", false);
modify_database("", "CREATE INDEX prefix_user_deleted_idx ON prefix_user (deleted)");
modify_database("", "CREATE INDEX prefix_user_confirmed_idx ON prefix_user (confirmed)");
modify_database("", "CREATE INDEX prefix_user_firstname_idx ON prefix_user (firstname)");
modify_database("", "CREATE INDEX prefix_user_lastname_idx ON prefix_user (lastname)");
modify_database("", "CREATE INDEX prefix_user_city_idx ON prefix_user (city)");
modify_database("", "CREATE INDEX prefix_user_country_idx ON prefix_user (country)");
modify_database("", "CREATE INDEX prefix_user_lastaccess_idx ON prefix_user (lastaccess)");
}
if ($oldversion < 2004111700) {
// one more index for email (for sorting)
execute_sql("DROP INDEX {$CFG->prefix}user_email_idx;", false);
modify_database('', 'CREATE INDEX prefix_user_email_idx ON prefix_user (email);');
}
if ($oldversion < 2004112200) {
// new 'enrol' field for enrolment tables
table_column('user_students', '', 'enrol', 'varchar', '20', '', '', 'not null');
table_column('user_teachers', '', 'enrol', 'varchar', '20', '', '', 'not null');
modify_database("", "CREATE INDEX {$CFG->prefix}user_students_enrol_idx ON {$CFG->prefix}user_students (enrol);");
modify_database("", "CREATE INDEX {$CFG->prefix}user_teachers_enrol_idx ON {$CFG->prefix}user_teachers (enrol);");
}
if ($oldversion < 2004112300) {
// update log display to use correct postgres friendly sql
execute_sql("UPDATE {$CFG->prefix}log_display SET field='firstname||\\' \\'||lastname' WHERE module='user' AND action='view' AND mtable='user'");
execute_sql("UPDATE {$CFG->prefix}log_display SET field='firstname||\\' \\'||lastname' WHERE module='course' AND action='user report' AND mtable='user'");
}
if ($oldversion < 2004112400) {
/// Delete duplicate enrolments
/// and then tell the database course,userid is a unique combination
if ($users = get_records_select("user_students", "userid > 0 GROUP BY course, userid " . "HAVING count(*) > 1", "", "max(id) as id, userid, course ,count(*)")) {
foreach ($users as $user) {
delete_records_select("user_students", "userid = '{$user->userid}' " . "AND course = '{$user->course}' AND id <> '{$user->id}'");
}
}
flush();
// drop some indexes quietly -- they may or may not exist depending on what version
// the user upgrades from
execute_sql("DROP INDEX {$CFG->prefix}user_students_courseuserid_idx ", false);
execute_sql("DROP INDEX {$CFG->prefix}user_students_courseuserid_uk ", false);
modify_database('', 'CREATE UNIQUE INDEX prefix_user_students_courseuserid_uk ON prefix_user_students (course,userid);');
/// Delete duplicate teacher enrolments
/// and then tell the database course,userid is a unique combination
if ($users = get_records_select("user_teachers", "userid > 0 GROUP BY course, userid " . "HAVING count(*) > 1", "", "max(id) as id, userid, course ,count(*)")) {
foreach ($users as $user) {
delete_records_select("user_teachers", "userid = '{$user->userid}' " . "AND course = '{$user->course}' AND id <> '{$user->id}'");
}
}
flush();
// drop some indexes quietly -- they may or may not exist depending on what version
// the user upgrades from
execute_sql("DROP INDEX {$CFG->prefix}user_teachers_courseuserid_idx ", false);
execute_sql("DROP INDEX {$CFG->prefix}user_teachers_courseuserid_uk ", false);
modify_database('', 'CREATE UNIQUE INDEX prefix_user_teachers_courseuserid_uk ON prefix_user_teachers (course,userid);');
}
if ($oldversion < 2004112401) {
// some postgres databases may have a non-unique index mislabeled unique.
fix_course_sortorder(0, 0, 1);
execute_sql("DROP INDEX {$CFG->prefix}course_category_sortorder_uk ", false);
execute_sql("DROP INDEX {$CFG->prefix}course_category_idx ", false);
modify_database('', "CREATE UNIQUE INDEX prefix_course_category_sortorder_uk ON prefix_course(category,sortorder);");
// odd! username was missing its unique index!
// first silently drop it just in case...
execute_sql("ALTER TABLE {$CFG->prefix}user DROP CONSTRAINT {$CFG->prefix}user_username_uk;", false);
execute_sql("DROP INDEX {$CFG->prefix}user_username_uk", false);
modify_database('', "CREATE UNIQUE INDEX prefix_user_username_uk ON prefix_user (username);");
}
if ($oldversion < 2004112900) {
table_column('user', '', 'policyagreed', 'integer', '1', 'unsigned', '0', 'not null', 'confirmed');
}
if ($oldversion < 2004121400) {
table_column('groups', '', 'password', 'varchar', '50', '', '', 'not null', 'description');
}
if ($oldversion < 2004121600) {
modify_database('', "CREATE TABLE prefix_dst_preset (\n id SERIAL PRIMARY KEY,\n name varchar(48) NOT NULL default '',\n apply_offset integer NOT NULL default '0',\n activate_index integer NOT NULL default '1',\n activate_day integer NOT NULL default '1',\n activate_month integer NOT NULL default '1',\n activate_time char(5) NOT NULL default '03:00',\n deactivate_index integer NOT NULL default '1',\n deactivate_day integer NOT NULL default '1',\n deactivate_month integer NOT NULL default '2',\n deactivate_time char(5) NOT NULL default '03:00',\n last_change integer NOT NULL default '0',\n next_change integer NOT NULL default '0',\n current_offset integer NOT NULL default '0'\n );");
}
if ($oldversion < 2004122800) {
execute_sql("DROP TABLE {$CFG->prefix}message", false);
execute_sql("DROP TABLE {$CFG->prefix}message_read", false);
execute_sql("DROP TABLE {$CFG->prefix}message_contacts", false);
execute_sql("DROP INDEX {$CFG->prefix}message_useridfrom_idx", false);
execute_sql("DROP INDEX {$CFG->prefix}message_useridto_idx", false);
execute_sql("DROP INDEX {$CFG->prefix}message_read_useridfrom_idx", false);
execute_sql("DROP INDEX {$CFG->prefix}message_read_useridto_idx", false);
execute_sql("DROP INDEX {$CFG->prefix}message_contacts_useridcontactid_idx", false);
modify_database('', "CREATE TABLE prefix_message (\n id SERIAL PRIMARY KEY,\n useridfrom integer NOT NULL default '0',\n useridto integer NOT NULL default '0',\n message text,\n timecreated integer NOT NULL default '0',\n messagetype varchar(50) NOT NULL default ''\n );\n\n CREATE INDEX prefix_message_useridfrom_idx ON prefix_message (useridfrom);\n CREATE INDEX prefix_message_useridto_idx ON prefix_message (useridto);\n\n CREATE TABLE prefix_message_read (\n id SERIAL PRIMARY KEY,\n useridfrom integer NOT NULL default '0',\n useridto integer NOT NULL default '0',\n message text,\n timecreated integer NOT NULL default '0',\n timeread integer NOT NULL default '0',\n messagetype varchar(50) NOT NULL default '',\n mailed integer NOT NULL default '0'\n );\n\n CREATE INDEX prefix_message_read_useridfrom_idx ON prefix_message_read (useridfrom);\n CREATE INDEX prefix_message_read_useridto_idx ON prefix_message_read (useridto);\n ");
modify_database('', "CREATE TABLE prefix_message_contacts (\n id SERIAL PRIMARY KEY,\n userid integer NOT NULL default '0',\n contactid integer NOT NULL default '0',\n blocked integer NOT NULL default '0'\n );\n\n CREATE INDEX prefix_message_contacts_useridcontactid_idx ON prefix_message_contacts (userid,contactid);\n ");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'write', 'user', 'firstname||\\' \\'||lastname');\n INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'read', 'user', 'firstname||\\' \\'||lastname');\n ");
}
if ($oldversion < 2004122801) {
table_column('message', '', 'format', 'integer', '4', 'unsigned', '0', 'not null', 'message');
table_column('message_read', '', 'format', 'integer', '4', 'unsigned', '0', 'not null', 'message');
}
if ($oldversion < 2005010100) {
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'add contact', 'user', 'firstname||\\' \\'||lastname');\n INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'remove contact', 'user', 'firstname||\\' \\'||lastname');\n INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'block contact', 'user', 'firstname||\\' \\'||lastname');\n INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'unblock contact', 'user', 'firstname||\\' \\'||lastname');\n ");
}
if ($oldversion < 2005011000) {
// Create a .htaccess file in dataroot, just in case
if (!file_exists($CFG->dataroot . '/.htaccess')) {
if ($handle = fopen($CFG->dataroot . '/.htaccess', 'w')) {
// For safety
@fwrite($handle, "deny from all\r\nAllowOverride None\r\n");
@fclose($handle);
notify("Created a default .htaccess file in {$CFG->dataroot}");
}
}
}
if ($oldversion < 2005012500) {
// add new table for meta courses.
/*
modify_database("","CREATE TABLE prefix_meta_course (
id SERIAL primary key,
parent_course integer NOT NULL,
child_course integer NOT NULL
);");
modify_database("","CREATE INDEX prefix_meta_course_parent_idx ON prefix_meta_course (parent_course);");
modify_database("","CREATE INDEX prefix_meta_course_child_idx ON prefix_meta_course (child_course);");
table_column('course','','meta_course','integer','1','','0','not null');
*/
// taking this OUT for upgrade from 1.4 to 1.5 (those tracking head will have already seen it)
}
if ($oldversion < 2005012501) {
//fix table names for consistency
execute_sql("DROP TABLE {$CFG->prefix}meta_course", false);
// drop silently
execute_sql("ALTER TABLE {$CFG->prefix}course DROP COLUMN meta_course", false);
// drop silently
modify_database("", "CREATE TABLE prefix_course_meta (\n id SERIAL primary key,\n parent_course integer NOT NULL,\n child_course integer NOT NULL\n );");
modify_database("", "CREATE INDEX prefix_course_meta_parent_idx ON prefix_course_meta (parent_course);");
modify_database("", "CREATE INDEX prefix_course_meta_child_idx ON prefix_course_meta (child_course);");
table_column('course', '', 'metacourse', 'integer', '1', '', '0', 'not null');
}
if ($oldversion < 2005020100) {
fix_course_sortorder(0, 1, 1);
}
if ($oldversion < 2005021000) {
// New fields for theme choices
table_column('course', '', 'theme', 'varchar', '50', '', '', '', 'lang');
table_column('groups', '', 'theme', 'varchar', '50', '', '', '', 'lang');
table_column('user', '', 'theme', 'varchar', '50', '', '', '', 'lang');
set_config('theme', 'standardwhite');
// Reset to a known good theme
}
if ($oldversion < 2005021700) {
table_column('user', '', 'dstpreset', 'int', '10', '', '0', 'not null', 'timezone');
}
if ($oldversion < 2005021800) {
modify_database("", "CREATE TABLE adodb_logsql (\n created timestamp NOT NULL,\n sql0 varchar(250) NOT NULL,\n sql1 text NOT NULL,\n params text NOT NULL,\n tracer text NOT NULL,\n timer decimal(16,6) NOT NULL\n );");
}
if ($oldversion < 2005022400) {
table_column('dst_preset', '', 'family', 'varchar', '100', '', '', 'not null', 'name');
table_column('dst_preset', '', 'year', 'int', '10', '', '0', 'not null', 'family');
}
if ($oldversion < 2005030501) {
table_column('user', '', 'msn', 'varchar', '50', '', '', '', 'icq');
table_column('user', '', 'aim', 'varchar', '50', '', '', '', 'icq');
table_column('user', '', 'yahoo', 'varchar', '50', '', '', '', 'icq');
table_column('user', '', 'skype', 'varchar', '50', '', '', '', 'icq');
}
if ($oldversion < 2005032300) {
table_column('user', 'dstpreset', 'timezonename', 'varchar', '100');
execute_sql('UPDATE ' . $CFG->prefix . 'user SET timezonename = \'\'');
}
if ($oldversion < 2005032600) {
execute_sql('DROP TABLE ' . $CFG->prefix . 'dst_preset', false);
modify_database('', "CREATE TABLE prefix_timezone (\n id SERIAL PRIMARY KEY,\n name varchar(100) NOT NULL default '',\n year integer NOT NULL default '0',\n rule varchar(20) NOT NULL default '',\n gmtoff integer NOT NULL default '0',\n dstoff integer NOT NULL default '0',\n dst_month integer NOT NULL default '0',\n dst_startday integer NOT NULL default '0',\n dst_weekday integer NOT NULL default '0',\n dst_skipweeks integer NOT NULL default '0',\n dst_time varchar(5) NOT NULL default '00:00',\n std_month integer NOT NULL default '0',\n std_startday integer NOT NULL default '0',\n std_weekday integer NOT NULL default '0',\n std_skipweeks integer NOT NULL default '0',\n std_time varchar(5) NOT NULL default '00:00'\n );");
}
if ($oldversion < 2005032800) {
modify_database('', "CREATE TABLE prefix_grade_category (\n id SERIAL PRIMARY KEY,\n name varchar(64) default NULL,\n courseid integer NOT NULL default '0',\n drop_x_lowest integer NOT NULL default '0',\n bonus_points integer NOT NULL default '0',\n hidden integer NOT NULL default '0',\n weight decimal(4,2) default '0.00'\n );");
modify_database('', "CREATE INDEX prefix_grade_category_courseid_idx ON prefix_grade_category (courseid);");
modify_database('', "CREATE TABLE prefix_grade_exceptions (\n id SERIAL PRIMARY KEY,\n courseid integer NOT NULL default '0',\n grade_itemid integer NOT NULL default '0',\n userid integer NOT NULL default '0'\n );");
modify_database('', "CREATE INDEX prefix_grade_exceptions_courseid_idx ON prefix_grade_exceptions (courseid);");
modify_database('', "CREATE TABLE prefix_grade_item (\n id SERIAL PRIMARY KEY,\n courseid integer default NULL,\n category integer default NULL,\n modid integer default NULL,\n cminstance integer default NULL,\n scale_grade float(11) default '1.0000000000',\n extra_credit integer NOT NULL default '0',\n sort_order integer NOT NULL default '0'\n );");
modify_database('', "CREATE INDEX prefix_grade_item_courseid_idx ON prefix_grade_item (courseid);");
modify_database('', "CREATE TABLE prefix_grade_letter (\n id SERIAL PRIMARY KEY,\n courseid integer NOT NULL default '0',\n letter varchar(8) NOT NULL default 'NA',\n grade_high decimal(6,2) NOT NULL default '100.00',\n grade_low decimal(6,2) NOT NULL default '0.00'\n );");
modify_database('', "CREATE INDEX prefix_grade_letter_courseid_idx ON prefix_grade_letter (courseid);");
modify_database('', "CREATE TABLE prefix_grade_preferences (\n id SERIAL PRIMARY KEY,\n courseid integer default NULL,\n preference integer NOT NULL default '0',\n value integer NOT NULL default '0'\n );");
modify_database('', "CREATE UNIQUE INDEX prefix_grade_prefs_courseidpref_uk ON prefix_grade_preferences (courseid,preference);");
}
if ($oldversion < 2005033100) {
// Get rid of defunct field from course modules table
delete_records('course_modules', 'deleted', 1);
// Delete old records we don't need any more
execute_sql('DROP INDEX ' . $CFG->prefix . 'course_modules_deleted_idx;');
// Old index
execute_sql('ALTER TABLE ' . $CFG->prefix . 'course_modules DROP deleted;');
// Old field
}
if ($oldversion < 2005040800) {
table_column('user', 'timezone', 'timezone', 'varchar', '100', '', '99');
execute_sql(" ALTER TABLE {$CFG->prefix}user DROP timezonename ");
}
if ($oldversion < 2005041101) {
require_once $CFG->libdir . '/filelib.php';
if (is_readable($CFG->dirroot . '/lib/timezones.txt')) {
// Distribution file
if ($timezones = get_records_csv($CFG->dirroot . '/lib/timezones.txt', 'timezone')) {
$db->debug = false;
update_timezone_records($timezones);
notify(count($timezones) . ' timezones installed');
$db->debug = true;
}
}
}
if ($oldversion < 2005041900) {
// Copy all Dialogue entries into Messages, and hide Dialogue module
if ($entries = get_records_sql('SELECT e.id, e.userid, c.recipientid, e.text, e.timecreated
FROM ' . $CFG->prefix . 'dialogue_conversations c,
' . $CFG->prefix . 'dialogue_entries e
WHERE e.conversationid = c.id')) {
foreach ($entries as $entry) {
$message = NULL;
$message->useridfrom = $entry->userid;
$message->useridto = $entry->recipientid;
$message->message = addslashes($entry->text);
$message->format = FORMAT_HTML;
$message->timecreated = $entry->timecreated;
$message->messagetype = 'direct';
insert_record('message_read', $message);
}
}
set_field('modules', 'visible', 0, 'name', 'dialogue');
notify('The Dialogue module has been disabled, and all the old Messages from it copied into the new standard Message feature. If you really want Dialogue back, you can enable it using the "eye" icon here: Admin >> Modules >> Dialogue');
}
if ($oldversion < 2005042100) {
$result = table_column('event', '', 'repeatid', 'int', '10', 'unsigned', '0', 'not null', 'userid') && $result;
}
if ($oldversion < 2005042400) {
// Add user tracking prefs field.
table_column('user', '', 'trackforums', 'int', '4', 'unsigned', '0', 'not null', 'autosubscribe');
}
if ($oldversion < 2005051500) {
// Add user tracking prefs field.
table_column('grade_category', 'weight', 'weight', 'numeric(5,2)', '', '', '0.00', '', '');
}
if ($oldversion < 2005053000) {
// Add config_plugins table
// this table was created on the MOODLE_15_STABLE branch
// so it may already exist. Therefore we hide potential errors
// (Postgres doesn't support CREATE TABLE IF NOT EXISTS)
execute_sql("CREATE TABLE {$CFG->prefix}config_plugins (\n id SERIAL PRIMARY KEY,\n plugin varchar(100) NOT NULL default 'core',\n name varchar(100) NOT NULL default '',\n value text NOT NULL default '',\n CONSTRAINT {$CFG->prefix}config_plugins_plugin_name_uk UNIQUE (plugin, name)\n );", false);
}
if ($oldversion < 2005060200) {
// migrate some config items to config_plugins table
// NOTE: this block is in both postgres AND mysql upgrade
// files. If you edit either, update the otherone.
$user_fields = array("firstname", "lastname", "email", "phone1", "phone2", "department", "address", "city", "country", "description", "idnumber", "lang");
if (!empty($CFG->auth)) {
// if we have no auth, just pass
foreach ($user_fields as $field) {
$suffixes = array('', '_editlock', '_updateremote', '_updatelocal');
foreach ($suffixes as $suffix) {
$key = 'auth_user_' . $field . $suffix;
if (isset($CFG->{$key})) {
// translate keys & values
// to the new convention
// this should support upgrading
// even 1.5dev installs
$newkey = $key;
$newval = $CFG->{$key};
if ($suffix === '') {
$newkey = 'field_map_' . $field;
} elseif ($suffix === '_editlock') {
$newkey = 'field_lock_' . $field;
$newval = $newval == 1 ? 'locked' : 'unlocked';
// translate 0/1 to locked/unlocked
} elseif ($suffix === '_updateremote') {
$newkey = 'field_updateremote_' . $field;
} elseif ($suffix === '_updatelocal') {
$newkey = 'field_updatelocal_' . $field;
$newval = $newval == 1 ? 'onlogin' : 'oncreate';
// translate 0/1 to locked/unlocked
}
if (!(set_config($newkey, addslashes($newval), 'auth/' . $CFG->auth) && delete_records('config', 'name', $key))) {
notify("Error updating Auth configuration {$key} to {$CFG->auth} {$newkey} .");
$result = false;
}
}
// end if isset key
}
// end foreach suffix
}
// end foreach field
}
}
if ($oldversion < 2005060201) {
// Close down the Attendance module, we are removing it from CVS.
if (!file_exists($CFG->dirroot . '/mod/attendance/lib.php')) {
if (count_records('attendance')) {
// We have some data, so should keep it
set_field('modules', 'visible', 0, 'name', 'attendance');
notify('The Attendance module has been discontinued. If you really want to
continue using it, you should download it individually from
http://download.moodle.org/modules and install it, then
reactivate it from Admin >> Configuration >> Modules.
None of your existing data has been deleted, so all existing
Attendance activities should re-appear.');
} else {
// No data, so do a complete delete
execute_sql('DROP TABLE ' . $CFG->prefix . 'attendance', false);
delete_records('modules', 'name', 'attendance');
notify("The Attendance module has been discontinued and removed from your site. \n You weren't using it anyway. ;-)");
}
}
}
if ($oldversion < 2005060223) {
// Mass cleanup of bad postgres upgrade scripts
execute_sql("DROP TABLE {$CFG->prefix}attendance_roll", false);
// There are no attendance module anymore
modify_database('', 'ALTER TABLE prefix_config ALTER value SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_course ALTER metacourse SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_course ALTER theme SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_event ALTER repeatid SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_groups ALTER password SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_groups ALTER theme SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_message ALTER format SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_message_read ALTER format SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_groups ALTER theme SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user ALTER aim DROP DEFAULT');
modify_database('', 'ALTER TABLE prefix_user ALTER idnumber DROP DEFAULT');
modify_database('', 'ALTER TABLE prefix_user ALTER msn DROP DEFAULT');
modify_database('', 'ALTER TABLE prefix_user ALTER policyagreed SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user ALTER skype DROP DEFAULT');
modify_database('', 'ALTER TABLE prefix_user ALTER theme SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user ALTER timezone SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user ALTER trackforums SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user ALTER yahoo DROP DEFAULT');
modify_database('', 'ALTER TABLE prefix_user_students ALTER enrol SET NOT NULL');
modify_database('', 'ALTER TABLE prefix_user_teachers ALTER enrol SET NOT NULL');
}
if ($oldversion < 2005071700) {
// Close down the Dialogue module, we are removing it from CVS.
if (!file_exists($CFG->dirroot . '/mod/dialogue/lib.php')) {
if (count_records('dialogue')) {
// We have some data, so should keep it
set_field('modules', 'visible', 0, 'name', 'dialogue');
notify('The Dialogue module has been discontinued. If you really want to
continue using it, you should download it individually from
http://download.moodle.org/modules and install it, then
reactivate it from Admin >> Configuration >> Modules.
None of your existing data has been deleted, so all existing
Dialogue activities should re-appear.');
} else {
// No data, so do a complete delete
execute_sql('DROP TABLE ' . $CFG->prefix . 'dialogue', false);
delete_records('modules', 'name', 'dialogue');
notify("The Dialogue module has been discontinued and removed from your site. \n You weren't using it anyway. ;-)");
}
}
}
if ($oldversion < 2005072000) {
// Add a couple fields to mdl_event to work towards iCal import/export
table_column('event', '', 'uuid', 'char', '36', '', '', 'not null', 'visible');
table_column('event', '', 'sequence', 'integer', '10', 'unsigned', '1', 'not null', 'uuid');
}
if ($oldversion < 2005072100) {
// run the online assignment cleanup code
include $CFG->dirroot . '/' . $CFG->admin . '/oacleanup.php';
if (function_exists('online_assignment_cleanup')) {
online_assignment_cleanup();
}
}
if ($oldversion < 2005072200) {
// fix the mistakenly-added currency stuff from enrol/authorize
execute_sql("DROP TABLE {$CFG->prefix}currencies", false);
// drop silently
execute_sql("ALTER TABLE {$CFG->prefix}course DROP currency", false);
$defaultcurrency = empty($CFG->enrol_currency) ? 'USD' : $CFG->enrol_currency;
table_column('course', '', 'currency', 'char', '3', '', $defaultcurrency, 'not null', 'cost');
}
if ($oldversion < 2005081600) {
//set up the course requests table
modify_database('', "CREATE TABLE prefix_course_request (\n id SERIAL PRIMARY KEY,\n fullname varchar(254) NOT NULL default '',\n shortname varchar(15) NOT NULL default '',\n summary text NOT NULL default '',\n reason text NOT NULL default '',\n requester INTEGER NOT NULL default 0\n );");
modify_database('', 'CREATE INDEX prefix_course_request_shortname_idx ON prefix_course_request (shortname);');
table_column('course', '', 'requested');
}
if ($oldversion < 2005081601) {
modify_database('', 'CREATE TABLE prefix_course_allowed_modules (
id SERIAL PRIMARY KEY,
course INTEGER NOT NULL default 0,
module INTEGER NOT NULL default 0
);');
modify_database('', 'CREATE INDEX prefix_course_allowed_modules_course_idx ON prefix_course_allowed_modules (course);');
modify_database('', 'CREATE INDEX prefix_course_allowed_modules_module_idx ON prefix_course_allowed_modules (module);');
table_column('course', '', 'restrictmodules', 'int', '1', '', '0', 'not null');
}
if ($oldversion < 2005081700) {
table_column('course_categories', '', 'depth', 'integer');
table_column('course_categories', '', 'path', 'varchar', '255');
}
if ($oldversion < 2005090100) {
// stats!
modify_database('', 'CREATE TABLE prefix_stats_daily (
id SERIAL PRIMARY KEY,
courseid INTEGER NOT NULL default 0,
timeend INTEGER NOT NULL default 0,
students INTEGER NOT NULL default 0,
teachers INTEGER NOT NULL default 0,
activestudents INTEGER NOT NULL default 0,
activeteachers INTEGER NOT NULL default 0,
studentreads INTEGER NOT NULL default 0,
studentwrites INTEGER NOT NULL default 0,
teacherreads INTEGER NOT NULL default 0,
teacherwrites INTEGER NOT NULL default 0,
logins INTEGER NOT NULL default 0,
uniquelogins INTEGER NOT NULL default 0
);');
modify_database('', 'CREATE INDEX prefix_stats_daily_courseid_idx ON prefix_stats_daily (courseid);');
modify_database('', 'CREATE INDEX prefix_stats_daily_timeend_idx ON prefix_stats_daily (timeend);');
modify_database('', 'CREATE TABLE prefix_stats_weekly (
id SERIAL PRIMARY KEY,
courseid INTEGER NOT NULL default 0,
timeend INTEGER NOT NULL default 0,
students INTEGER NOT NULL default 0,
teachers INTEGER NOT NULL default 0,
activestudents INTEGER NOT NULL default 0,
activeteachers INTEGER NOT NULL default 0,
studentreads INTEGER NOT NULL default 0,
studentwrites INTEGER NOT NULL default 0,
teacherreads INTEGER NOT NULL default 0,
teacherwrites INTEGER NOT NULL default 0,
logins INTEGER NOT NULL default 0,
uniquelogins INTEGER NOT NULL default 0
);');
modify_database('', 'CREATE INDEX prefix_stats_weekly_courseid_idx ON prefix_stats_weekly (courseid);');
modify_database('', 'CREATE INDEX prefix_stats_weekly_timeend_idx ON prefix_stats_weekly (timeend);');
modify_database('', 'CREATE TABLE prefix_stats_monthly (
id SERIAL PRIMARY KEY,
courseid INTEGER NOT NULL default 0,
timeend INTEGER NOT NULL default 0,
students INTEGER NOT NULL default 0,
teachers INTEGER NOT NULL default 0,
activestudents INTEGER NOT NULL default 0,
activeteachers INTEGER NOT NULL default 0,
studentreads INTEGER NOT NULL default 0,
studentwrites INTEGER NOT NULL default 0,
teacherreads INTEGER NOT NULL default 0,
teacherwrites INTEGER NOT NULL default 0,
logins INTEGER NOT NULL default 0,
uniquelogins INTEGER NOT NULL default 0
);');
modify_database('', 'CREATE INDEX prefix_stats_monthly_courseid_idx ON prefix_stats_monthly (courseid);');
modify_database('', 'CREATE INDEX prefix_stats_monthly_timeend_idx ON prefix_stats_monthly (timeend);');
modify_database("", "CREATE TABLE prefix_stats_user_daily (\n id SERIAL PRIMARY KEY,\n courseid INTEGER NOT NULL default 0,\n userid INTEGER NOT NULL default 0,\n roleid INTEGER NOT NULL default 0,\n timeend INTEGER NOT NULL default 0,\n statsreads INTEGER NOT NULL default 0,\n statswrites INTEGER NOT NULL default 0,\n stattype varchar(30) NOT NULL default ''\n );");
modify_database("", "CREATE INDEX prefix_stats_user_daily_courseid_idx ON prefix_stats_user_daily (courseid);");
modify_database("", "CREATE INDEX prefix_stats_user_daily_userid_idx ON prefix_stats_user_daily (userid);");
modify_database("", "CREATE INDEX prefix_stats_user_daily_roleid_idx ON prefix_stats_user_daily (roleid);");
modify_database("", "CREATE INDEX prefix_stats_user_daily_timeend_idx ON prefix_stats_user_daily (timeend);");
modify_database("", "CREATE TABLE prefix_stats_user_weekly (\n id SERIAL PRIMARY KEY,\n courseid INTEGER NOT NULL default 0,\n userid INTEGER NOT NULL default 0,\n roleid INTEGER NOT NULL default 0,\n timeend INTEGER NOT NULL default 0,\n statsreads INTEGER NOT NULL default 0,\n statswrites INTEGER NOT NULL default 0,\n stattype varchar(30) NOT NULL default ''\n );");
modify_database("", "CREATE INDEX prefix_stats_user_weekly_courseid_idx ON prefix_stats_user_weekly (courseid);");
modify_database("", "CREATE INDEX prefix_stats_user_weekly_userid_idx ON prefix_stats_user_weekly (userid);");
modify_database("", "CREATE INDEX prefix_stats_user_weekly_roleid_idx ON prefix_stats_user_weekly (roleid);");
modify_database("", "CREATE INDEX prefix_stats_user_weekly_timeend_idx ON prefix_stats_user_weekly (timeend);");
modify_database("", "CREATE TABLE prefix_stats_user_monthly (\n id SERIAL PRIMARY KEY,\n courseid INTEGER NOT NULL default 0,\n userid INTEGER NOT NULL default 0,\n roleid INTEGER NOT NULL default 0,\n timeend INTEGER NOT NULL default 0,\n statsreads INTEGER NOT NULL default 0,\n statswrites INTEGER NOT NULL default 0,\n stattype varchar(30) NOT NULL default ''\n );");
modify_database("", "CREATE INDEX prefix_stats_user_monthly_courseid_idx ON prefix_stats_user_monthly (courseid);");
modify_database("", "CREATE INDEX prefix_stats_user_monthly_userid_idx ON prefix_stats_user_monthly (userid);");
modify_database("", "CREATE INDEX prefix_stats_user_monthly_roleid_idx ON prefix_stats_user_monthly (roleid);");
modify_database("", "CREATE INDEX prefix_stats_user_monthly_timeend_idx ON prefix_stats_user_monthly (timeend);");
}
if ($oldversion < 2005100300) {
table_column('course', '', 'expirynotify', 'integer', '1');
table_column('course', '', 'expirythreshold', 'integer');
table_column('course', '', 'notifystudents', 'integer', '1');
$new = new stdClass();
$new->name = 'lastexpirynotify';
$new->value = 0;
insert_record('config', $new);
}
if ($oldversion < 2005100400) {
table_column('course', '', 'enrollable', 'integer', '1', 'unsigned', '1');
table_column('course', '', 'enrolstartdate', 'integer');
table_column('course', '', 'enrolenddate', 'integer');
}
if ($oldversion < 2005101200) {
// add enrolment key to course_request.
table_column('course_request', '', 'password', 'text');
}
if ($oldversion < 2006030800) {
# add extra indexes to log (see bug #4112)
modify_database('', "CREATE INDEX prefix_log_userid_idx ON prefix_log (userid);");
modify_database('', "CREATE INDEX prefix_log_info_idx ON prefix_log (info);");
}
if ($oldversion < 2006030900) {
table_column('course', '', 'enrol', 'varchar', '20', '', '');
if ($CFG->enrol == 'internal' || $CFG->enrol == 'manual') {
set_config('enrol_plugins_enabled', 'manual');
set_config('enrol', 'manual');
} else {
set_config('enrol_plugins_enabled', 'manual,' . $CFG->enrol);
}
require_once "{$CFG->dirroot}/enrol/enrol.class.php";
$defaultenrol = enrolment_factory::factory($CFG->enrol);
if (!method_exists($defaultenrol, 'print_entry')) {
// switch enrollable to off for all courses in this case
modify_database('', 'UPDATE prefix_course SET enrollable = 0');
}
execute_sql("UPDATE {$CFG->prefix}user_students SET enrol='manual' WHERE enrol='' OR enrol='internal'");
execute_sql("UPDATE {$CFG->prefix}user_teachers SET enrol='manual' WHERE enrol=''");
}
if ($oldversion < 2006031000) {
modify_database("", "CREATE TABLE prefix_post (\n id SERIAL PRIMARY KEY,\n userid INTEGER NOT NULL default 0,\n courseid INTEGER NOT NULL default 0,\n groupid INTEGER NOT NULL default 0,\n moduleid INTEGER NOT NULL default 0,\n coursemoduleid INTEGER NOT NULL default 0,\n subject varchar(128) NOT NULL default '',\n summary text,\n content text,\n uniquehash varchar(128) NOT NULL default '',\n rating INTEGER NOT NULL default 0,\n format INTEGER NOT NULL default 0,\n publishstate varchar(10) CHECK (publishstate IN ('draft','site','public')) NOT NULL default 'draft',\n lastmodified INTEGER NOT NULL default '0',\n created INTEGER NOT NULL default '0'\n );");
modify_database("", "CREATE INDEX id_user_idx ON prefix_post (id, courseid);");
modify_database("", "CREATE INDEX post_lastmodified_idx ON prefix_post (lastmodified);");
modify_database("", "CREATE INDEX post_subject_idx ON prefix_post (subject);");
modify_database("", "CREATE TABLE prefix_tags (\n id SERIAL PRIMARY KEY,\n type varchar(255) NOT NULL default 'official',\n userid INTEGER NOT NULL default 0,\n text varchar(255) NOT NULL default ''\n );");
modify_database("", "CREATE TABLE prefix_blog_tag_instance (\n id SERIAL PRIMARY KEY,\n entryid integer NOT NULL default 0,\n tagid integer NOT NULL default 0,\n groupid integer NOT NULL default 0,\n courseid integer NOT NULL default 0,\n userid integer NOT NULL default 0\n );");
}
if ($oldversion < 2006031400) {
require_once "{$CFG->dirroot}/enrol/enrol.class.php";
$defaultenrol = enrolment_factory::factory($CFG->enrol);
if (!method_exists($defaultenrol, 'print_entry')) {
set_config('enrol', 'manual');
}
}
if ($oldversion < 2006032000) {
table_column('post', '', 'module', 'varchar', '20', '', '', 'not null', 'id');
modify_database('', "CREATE INDEX post_module_idx ON prefix_post (module);");
modify_database('', "UPDATE prefix_post SET module = 'blog';");
}
if ($oldversion < 2006032001) {
table_column('blog_tag_instance', '', 'timemodified', 'integer', '10', 'unsigned', '0', 'not null', 'userid');
modify_database('', "CREATE INDEX bti_entryid_idx ON prefix_blog_tag_instance (entryid);");
modify_database('', "CREATE INDEX bti_tagid_idx ON prefix_blog_tag_instance (tagid);");
modify_database('', "UPDATE prefix_blog_tag_instance SET timemodified = '" . time() . "';");
}
if ($oldversion < 2006040500) {
// Add an index to course_sections that was never upgraded (bug 5100)
execute_sql(" CREATE INDEX {$CFG->prefix}course_sections_coursesection_idx ON {$CFG->prefix}course_sections (course,section) ", false);
}
if ($oldversion < 2006041100) {
table_column('course_modules', '', 'visibleold', 'integer', '1', 'unsigned', '1', 'not null', 'visible');
}
if ($oldversion < 2006042400) {
// Look through table log_display and get rid of duplicates.
$rs = get_recordset_sql('SELECT DISTINCT * FROM ' . $CFG->prefix . 'log_display');
// Drop the log_display table and create it back with an id field.
execute_sql("DROP TABLE {$CFG->prefix}log_display", false);
modify_database('', "CREATE TABLE prefix_log_display (\n id SERIAL PRIMARY KEY,\n module varchar(30) NOT NULL default '',\n action varchar(40) NOT NULL default '',\n mtable varchar(30) NOT NULL default '',\n field varchar(50) NOT NULL default '')");
// Add index to ensure that module and action combination is unique.
modify_database('', 'CREATE INDEX prefix_log_display_moduleaction ON prefix_log_display (module,action)');
// Insert the records back in, sans duplicates.
if ($rs) {
while (!$rs->EOF) {
$sql = "INSERT INTO {$CFG->prefix}log_display " . "VALUES('', '" . $rs->fields['module'] . "', " . "'" . $rs->fields['action'] . "', " . "'" . $rs->fields['mtable'] . "', " . "'" . $rs->fields['field'] . "')";
execute_sql($sql, false);
$rs->MoveNext();
}
rs_close($rs);
}
}
// add 2 indexes to tags table
if ($oldversion < 2006042401) {
modify_database('', "CREATE INDEX tags_typeuserid_idx ON prefix_tags (type, userid);");
modify_database('', "CREATE INDEX tags_text_idx ON prefix_tags (text);");
}
if ($oldversion < 2006050500) {
table_column('log', 'action', 'action', 'varchar', '40', '', '', 'not null');
}
if ($oldversion < 2006050502) {
// Close down the Dialogue module, we are removing it from CVS.
if (!file_exists($CFG->dirroot . '/mod/dialogue/lib.php')) {
if (!count_records('dialogue_conversations')) {
// no data, drop the extra tables
execute_sql('DROP TABLE ' . $CFG->prefix . 'dialogue_conversations', false);
execute_sql('DROP TABLE ' . $CFG->prefix . 'dialogue_entries', false);
notify("The Dialogue module has been discontinued and removed from your site. \n You weren't using it anyway. ;-)");
}
}
table_column('course_request', 'password', 'password', 'varchar', '50', '', '');
table_column('course', 'currency', 'currency', 'varchar', '3');
modify_database('', 'ALTER TABLE prefix_course_categories
ALTER COLUMN path SET DEFAULT \'\'');
table_column('log_display', 'module', 'module', 'varchar', '20');
modify_database("", "DROP INDEX id_user_idx");
modify_database("", "DROP INDEX post_lastmodified_idx");
modify_database("", "DROP INDEX post_subject_idx");
modify_database('', "DROP INDEX bti_entryid_idx");
modify_database('', "DROP INDEX bti_tagid_idx");
modify_database('', "DROP INDEX post_module_idx");
modify_database('', "DROP INDEX tags_typeuserid_idx");
modify_database('', "DROP INDEX tags_text_idx");
modify_database("", "CREATE INDEX {$CFG->prefix}id_user_idx ON prefix_post (id, courseid);");
modify_database("", "CREATE INDEX {$CFG->prefix}post_lastmodified_idx ON prefix_post (lastmodified);");
modify_database("", "CREATE INDEX {$CFG->prefix}post_subject_idx ON prefix_post (subject);");
modify_database('', "CREATE INDEX {$CFG->prefix}bti_entryid_idx ON prefix_blog_tag_instance (entryid);");
modify_database('', "CREATE INDEX {$CFG->prefix}bti_tagid_idx ON prefix_blog_tag_instance (tagid);");
modify_database('', "CREATE INDEX {$CFG->prefix}post_module_idx ON prefix_post (moduleid);");
modify_database('', "CREATE INDEX {$CFG->prefix}tags_typeuserid_idx ON prefix_tags (type, userid);");
modify_database('', "CREATE INDEX {$CFG->prefix}tags_text_idx ON prefix_tags (text);");
}
// renaming of reads and writes for stats_user_xyz
if ($oldversion < 2006052400) {
// change this later
// we are using this because we want silent updates
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_daily RENAME COLUMN reads TO statsreads", false);
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_daily RENAME COLUMN writes TO statswrites", false);
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_weekly RENAME COLUMN reads TO statsreads", false);
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_weekly RENAME COLUMN writes TO statswrites", false);
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_monthly RENAME COLUMN reads TO statsreads", false);
execute_sql("ALTER TABLE {$CFG->prefix}stats_user_monthly RENAME COLUMN writes TO statswrites", false);
}
// Adding some missing log actions
if ($oldversion < 2006060400) {
// But only if they doesn't exist (because this was introduced after branch and we could be duplicating!)
if (!record_exists('log_display', 'module', 'course', 'action', 'report log')) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'report log', 'course', 'fullname')");
}
if (!record_exists('log_display', 'module', 'course', 'action', 'report live')) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'report live', 'course', 'fullname')");
}
if (!record_exists('log_display', 'module', 'course', 'action', 'report outline')) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'report outline', 'course', 'fullname')");
}
if (!record_exists('log_display', 'module', 'course', 'action', 'report participation')) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'report participation', 'course', 'fullname')");
}
if (!record_exists('log_display', 'module', 'course', 'action', 'report stats')) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('course', 'report stats', 'course', 'fullname')");
}
}
//Renaming lastIP to lastip (all fields lowercase)
if ($oldversion < 2006060900) {
//Not needed unded PG because it stores fieldnames lowecase by default
//Only if it exists (because MOODLE_16_STABLE could have done this work before. Bug 5763)
//$fields = $db->MetaColumnNames($CFG->prefix.'user');
//if (in_array('lastIP',$fields)) {
// table_column("user", "lastIP", "lastip", "varchar", "15", "", "", "", "currentlogin");
//}
}
if ($oldversion < 2006080400) {
modify_database('', "CREATE TABLE prefix_role (\n id SERIAL PRIMARY KEY,\n name varchar(255) NOT NULL default '',\n shortname varchar(100) NOT NULL default '', \n description text NOT NULL default '',\n sortorder integer NOT NULL default '0'\n );");
modify_database('', "CREATE TABLE prefix_context (\n id SERIAL PRIMARY KEY,\n level integer NOT NULL default 0,\n instanceid integer NOT NULL default 0\n );");
modify_database('', "CREATE TABLE prefix_role_assignments (\n id SERIAL PRIMARY KEY,\n roleid integer NOT NULL default 0,\n contextid integer NOT NULL default 0,\n userid integer NOT NULL default 0,\n hidden integer NOT NULL default 0,\n timestart integer NOT NULL default 0,\n timeend integer NOT NULL default 0,\n timemodified integer NOT NULL default 0,\n modifierid integer NOT NULL default 0,\n enrol varchar(20) NOT NULL default '',\n sortorder integer NOT NULL default '0'\n );");
modify_database('', "CREATE TABLE prefix_role_capabilities (\n id SERIAL PRIMARY KEY,\n contextid integer NOT NULL default 0,\n roleid integer NOT NULL default 0,\n capability varchar(255) NOT NULL default '',\n permission integer NOT NULL default 0,\n timemodified integer NOT NULL default 0,\n modifierid integer NOT NULL default 0\n );");
modify_database('', "CREATE TABLE prefix_role_deny_grant (\n id SERIAL PRIMARY KEY,\n roleid integer NOT NULL default '0',\n unviewableroleid integer NOT NULL default '0'\n );");
modify_database('', "CREATE TABLE prefix_capabilities ( \n id SERIAL PRIMARY KEY,\n name varchar(255) NOT NULL default '', \n captype varchar(50) NOT NULL default '', \n contextlevel integer NOT NULL default 0, \n component varchar(100) NOT NULL default ''\n );");
modify_database('', "CREATE TABLE prefix_role_names ( \n id SERIAL PRIMARY KEY,\n roleid integer NOT NULL default 0,\n contextid integer NOT NULL default 0, \n text text NOT NULL default ''\n );");
}
if ($oldversion < 2006081000) {
modify_database('', "CREATE INDEX prefix_role_sortorder_idx ON prefix_role (sortorder);");
modify_database('', "CREATE INDEX prefix_context_instanceid_idx ON prefix_context (instanceid);");
modify_database('', "CREATE UNIQUE INDEX prefix_context_levelinstanceid_idx ON prefix_context (level, instanceid);");
modify_database('', "CREATE INDEX prefix_role_assignments_roleid_idx ON prefix_role_assignments (roleid);");
modify_database('', "CREATE INDEX prefix_role_assignments_contextidid_idx ON prefix_role_assignments (contextid);");
modify_database('', "CREATE INDEX prefix_role_assignments_userid_idx ON prefix_role_assignments (userid);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_assignments_contextidroleiduserid_idx ON prefix_role_assignments (contextid, roleid, userid);");
modify_database('', "CREATE INDEX prefix_role_assignments_sortorder_idx ON prefix_role_assignments (sortorder);");
modify_database('', "CREATE INDEX prefix_role_capabilities_roleid_idx ON prefix_role_capabilities (roleid);");
modify_database('', "CREATE INDEX prefix_role_capabilities_contextid_idx ON prefix_role_capabilities (contextid);");
modify_database('', "CREATE INDEX prefix_role_capabilities_modifierid_idx ON prefix_role_capabilities (modifierid);");
// MDL-10640 adding missing index from upgrade
modify_database('', "CREATE INDEX prefix_role_capabilities_capability_idx ON prefix_role_capabilities (capability);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_capabilities_roleidcontextidcapability_idx ON prefix_role_capabilities (roleid, contextid, capability);");
modify_database('', "CREATE INDEX prefix_role_deny_grant_roleid_idx ON prefix_role_deny_grant (roleid);");
modify_database('', "CREATE INDEX prefix_role_deny_grant_unviewableroleid_idx ON prefix_role_deny_grant (unviewableroleid);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_deny_grant_roleidunviewableroleid_idx ON prefix_role_deny_grant (roleid, unviewableroleid);");
modify_database('', "CREATE UNIQUE INDEX prefix_capabilities_name_idx ON prefix_capabilities (name);");
modify_database('', "CREATE INDEX prefix_role_names_roleid_idx ON prefix_role_names (roleid);");
modify_database('', "CREATE INDEX prefix_role_names_contextid_idx ON prefix_role_names (contextid);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_names_roleidcontextid_idx ON prefix_role_names (roleid, contextid);");
}
if ($oldversion < 2006081700) {
modify_database('', "DROP TABLE prefix_role_deny_grant");
modify_database('', "CREATE TABLE prefix_role_allow_assign ( \n id SERIAL PRIMARY KEY, \n roleid integer NOT NULL default '0', \n allowassign integer NOT NULL default '0' \n );");
modify_database('', "CREATE INDEX prefix_role_allow_assign_roleid_idx ON prefix_role_allow_assign (roleid);");
modify_database('', "CREATE INDEX prefix_role_allow_assign_allowassign_idx ON prefix_role_allow_assign (allowassign);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_allow_assign_roleidallowassign_idx ON prefix_role_allow_assign (roleid, allowassign);");
modify_database('', "CREATE TABLE prefix_role_allow_override ( \n id SERIAL PRIMARY KEY, \n roleid integer NOT NULL default '0', \n allowoverride integer NOT NULL default '0' \n );");
modify_database('', "CREATE INDEX prefix_role_allow_override_roleid_idx ON prefix_role_allow_override (roleid);");
modify_database('', "CREATE INDEX prefix_role_allow_override_allowoverride_idx ON prefix_role_allow_override (allowoverride);");
modify_database('', "CREATE UNIQUE INDEX prefix_role_allow_override_roleidallowoverride_idx ON prefix_role_allow_override (roleid, allowoverride);");
}
if ($oldversion < 2006082100) {
execute_sql("DROP INDEX {$CFG->prefix}context_levelinstanceid_idx;", false);
table_column('context', 'level', 'aggregatelevel', 'integer', '10', 'unsigned', '0', 'not null', '');
modify_database('', "CREATE UNIQUE INDEX prefix_context_aggregatelevelinstanceid_idx ON prefix_context (aggregatelevel, instanceid);");
}
if ($oldversion < 2006082200) {
table_column('timezone', 'rule', 'tzrule', 'varchar', '20', '', '', 'not null', '');
}
if ($oldversion < 2006082800) {
table_column('user', '', 'ajax', 'integer', '1', 'unsigned', '1', 'not null', 'htmleditor');
}
if ($oldversion < 2006082900) {
execute_sql("DROP TABLE {$CFG->prefix}sessions", true);
execute_sql("\n CREATE TABLE {$CFG->prefix}sessions2 (\n sesskey VARCHAR(255) NOT NULL default '',\n expiry TIMESTAMP NOT NULL,\n expireref VARCHAR(255),\n created TIMESTAMP NOT NULL,\n modified TIMESTAMP NOT NULL,\n sessdata TEXT,\n CONSTRAINT {$CFG->prefix}sess_ses_pk PRIMARY KEY (sesskey)\n );", true);
execute_sql("\n CREATE INDEX {$CFG->prefix}sess_exp_ix ON {$CFG->prefix}sessions2 (expiry);", true);
execute_sql("\n CREATE INDEX {$CFG->prefix}sess_exp2_ix ON {$CFG->prefix}sessions2 (expireref);", true);
}
if ($oldversion < 2006083002) {
table_column('capabilities', '', 'riskbitmask', 'INTEGER', '10', 'unsigned', '0', 'not null', '');
}
if ($oldversion < 2006083100) {
execute_sql("ALTER TABLE {$CFG->prefix}course ALTER COLUMN modinfo DROP NOT NULL");
execute_sql("ALTER TABLE {$CFG->prefix}course ALTER COLUMN modinfo DROP DEFAULT");
}
if ($oldversion < 2006083101) {
execute_sql("ALTER TABLE {$CFG->prefix}course_categories ALTER COLUMN description DROP NOT NULL");
execute_sql("ALTER TABLE {$CFG->prefix}course_categories ALTER COLUMN description DROP DEFAULT");
}
if ($oldversion < 2006083102) {
execute_sql("ALTER TABLE {$CFG->prefix}user ALTER COLUMN description DROP NOT NULL");
execute_sql("ALTER TABLE {$CFG->prefix}user ALTER COLUMN description DROP DEFAULT");
}
if ($oldversion < 2006090200) {
execute_sql("ALTER TABLE {$CFG->prefix}course_sections ALTER COLUMN summary DROP NOT NULL");
execute_sql("ALTER TABLE {$CFG->prefix}course_sections ALTER COLUMN summary DROP DEFAULT");
execute_sql("ALTER TABLE {$CFG->prefix}course_sections ALTER COLUMN sequence DROP NOT NULL");
execute_sql("ALTER TABLE {$CFG->prefix}course_sections ALTER COLUMN sequence DROP DEFAULT");
}
// table to keep track of course page access times, used in online participants block, and participants list
if ($oldversion < 2006091200) {
execute_sql("CREATE TABLE {$CFG->prefix}user_lastaccess ( \n id SERIAL PRIMARY KEY, \n userid integer NOT NULL default 0,\n courseid integer NOT NULL default 0, \n timeaccess integer NOT NULL default 0\n );", true);
execute_sql("CREATE INDEX {$CFG->prefix}user_lastaccess_userid_idx ON {$CFG->prefix}user_lastaccess (userid);", true);
execute_sql("CREATE INDEX {$CFG->prefix}user_lastaccess_courseid_idx ON {$CFG->prefix}user_lastaccess (courseid);", true);
execute_sql("CREATE UNIQUE INDEX {$CFG->prefix}user_lastaccess_useridcourseid_idx ON {$CFG->prefix}user_lastaccess (userid, courseid);", true);
}
if (!empty($CFG->rolesactive) and $oldversion < 2006091212) {
// Reload the guest roles completely with new defaults
if ($guestroles = get_roles_with_capability('moodle/legacy:guest', CAP_ALLOW)) {
delete_records('capabilities');
$sitecontext = get_context_instance(CONTEXT_SYSTEM);
foreach ($guestroles as $guestrole) {
delete_records('role_capabilities', 'roleid', $guestrole->id);
assign_capability('moodle/legacy:guest', CAP_ALLOW, $guestrole->id, $sitecontext->id);
}
}
}
if ($oldversion < 2006091700) {
table_column('course', '', 'defaultrole', 'integer', '10', 'unsigned', '0', 'not null');
}
if ($oldversion < 2006091800) {
delete_records('config', 'name', 'showsiteparticipantslist');
delete_records('config', 'name', 'requestedteachername');
delete_records('config', 'name', 'requestedteachersname');
delete_records('config', 'name', 'requestedstudentname');
delete_records('config', 'name', 'requestedstudentsname');
}
if (!empty($CFG->rolesactive) and $oldversion < 2006091901) {
if ($roles = get_records('role')) {
$first = array_shift($roles);
if (!empty($first->shortname)) {
// shortnames already exist
} else {
table_column('role', '', 'shortname', 'varchar', '100', '', '', 'not null', 'name');
$legacy_names = array('admin', 'coursecreator', 'editingteacher', 'teacher', 'student', 'guest');
foreach ($legacy_names as $name) {
if ($roles = get_roles_with_capability('moodle/legacy:' . $name, CAP_ALLOW)) {
$i = '';
foreach ($roles as $role) {
if (empty($role->shortname)) {
$updated = new object();
$updated->id = $role->id;
$updated->shortname = $name . $i;
update_record('role', $updated);
$i++;
}
}
}
}
}
}
}
/// Tables for customisable user profile fields
if ($oldversion < 2006092000) {
execute_sql("CREATE TABLE {$CFG->prefix}user_info_field (\n id BIGSERIAL,\n name VARCHAR(255) NOT NULL default '',\n datatype VARCHAR(255) NOT NULL default '',\n categoryid BIGINT NOT NULL default 0,\n sortorder BIGINT NOT NULL default 0,\n required SMALLINT NOT NULL default 0,\n locked SMALLINT NOT NULL default 0,\n visible SMALLINT NOT NULL default 0,\n defaultdata TEXT,\n CONSTRAINT {$CFG->prefix}userinfofiel_id_pk PRIMARY KEY (id));", true);
execute_sql("COMMENT ON TABLE {$CFG->prefix}user_info_field IS 'Customisable user profile fields';", true);
execute_sql("CREATE TABLE {$CFG->prefix}user_info_category (\n id BIGSERIAL,\n name VARCHAR(255) NOT NULL default '',\n sortorder BIGINT NOT NULL default 0,\n CONSTRAINT {$CFG->prefix}userinfocate_id_pk PRIMARY KEY (id));", true);
execute_sql("COMMENT ON TABLE {$CFG->prefix}user_info_category IS 'Customisable fields categories';", true);
execute_sql("CREATE TABLE {$CFG->prefix}user_info_data (\n id BIGSERIAL,\n userid BIGINT NOT NULL default 0,\n fieldid BIGINT NOT NULL default 0,\n data TEXT NOT NULL,\n CONSTRAINT {$CFG->prefix}userinfodata_id_pk PRIMARY KEY (id));", true);
execute_sql("COMMENT ON TABLE {$CFG->prefix}user_info_data IS 'Data for the customisable user fields';", true);
}
if ($oldversion < 2006092200) {
table_column('context', 'aggregatelevel', 'contextlevel', 'int', '10', 'unsigned', '0', 'not null', '');
/* execute_sql("ALTER TABLE `{$CFG->prefix}context` DROP INDEX `aggregatelevel-instanceid`;",false);
execute_sql("ALTER TABLE `{$CFG->prefix}context` ADD UNIQUE INDEX `contextlevel-instanceid` (`contextlevel`, `instanceid`)",false); // see 2006092409 below */
}
if ($oldversion < 2006092302) {
// fix sortorder first if needed
if ($roles = get_all_roles()) {
$i = 0;
foreach ($roles as $rolex) {
if ($rolex->sortorder != $i) {
$r = new object();
$r->id = $rolex->id;
$r->sortorder = $i;
update_record('role', $r);
}
$i++;
}
}
/* execute_sql("ALTER TABLE {$CFG->prefix}role DROP INDEX {$CFG->prefix}role_sor_ix;");
execute_sql("ALTER TABLE {$CFG->prefix}role ADD UNIQUE INDEX {$CFG->prefix}role_sor_uix (sortorder)");*/
}
if ($oldversion < 2006092400) {
table_column('user', '', 'trustbitmask', 'INTEGER', '10', 'unsigned', '0', 'not null', '');
}
if ($oldversion < 2006092409) {
// ok, once more and now correctly!
execute_sql("DROP INDEX \"aggregatelevel-instanceid\";", false);
execute_sql("DROP INDEX \"contextlevel-instanceid\";", false);
execute_sql("CREATE UNIQUE INDEX {$CFG->prefix}cont_conins_uix ON {$CFG->prefix}context (contextlevel, instanceid);", false);
execute_sql("DROP INDEX {$CFG->prefix}role_sor_ix;", false);
execute_sql("DROP INDEX {$CFG->prefix}role_sor_uix;", false);
execute_sql("CREATE UNIQUE INDEX {$CFG->prefix}role_sor_uix ON {$CFG->prefix}role (sortorder);", false);
}
if ($oldversion < 2006092410) {
/// Convert all the PG unique keys into their corresponding unique indexes
/// we don't want such keys inside Moodle 1.7 and above
/// Look for all the UNIQUE CONSTRAINSTS existing in DB
$uniquecons = get_records_sql("SELECT conname, relname, conkey, clas.oid AS tableoid\n FROM pg_constraint cons,\n pg_class clas\n WHERE cons.contype='u'\n AND cons.conrelid = clas.oid");
/// Iterate over every unique constraint, calculating its fields
if ($uniquecons) {
foreach ($uniquecons as $uniquecon) {
$conscols = trim(trim($uniquecon->conkey, '}'), '{');
$conscols = explode(',', $conscols);
/// Iterate over each column to fetch its name
$indexcols = array();
foreach ($conscols as $conscol) {
$column = get_record_sql("SELECT attname, attname\n FROM pg_attribute\n WHERE attrelid = {$uniquecon->tableoid}\n AND attnum = {$conscol}");
$indexcols[] = $column->attname;
}
/// Drop the old UNIQUE CONSTRAINT
execute_sql("ALTER TABLE {$uniquecon->relname} DROP CONSTRAINT {$uniquecon->conname}", false);
/// Create the new UNIQUE INDEX
execute_sql("CREATE UNIQUE INDEX {$uniquecon->relname}_" . implode('_', $indexcols) . "_uix ON {$uniquecon->relname} (" . implode(', ', $indexcols) . ')', false);
}
}
}
if ($oldversion < 2006092601) {
table_column('log_display', 'field', 'field', 'varchar', '200', '', '', 'not null', '');
}
////// DO NOT ADD NEW THINGS HERE!! USE upgrade.php and the lib/ddllib.php functions.
return $result;
}
/**
* Converts a forum to use the Roles System
*
* @global object
* @global object
* @param object $forum a forum object with the same attributes as a record
* from the forum database table
* @param int $forummodid the id of the forum module, from the modules table
* @param array $teacherroles array of roles that have archetype teacher
* @param array $studentroles array of roles that have archetype student
* @param array $guestroles array of roles that have archetype guest
* @param int $cmid the course_module id for this forum instance
* @return boolean forum was converted or not
*/
function forum_convert_to_roles($forum, $forummodid, $teacherroles=array(),
$studentroles=array(), $guestroles=array(), $cmid=NULL) {
global $CFG, $DB, $OUTPUT;
if (!isset($forum->open) && !isset($forum->assesspublic)) {
// We assume that this forum has already been converted to use the
// Roles System. Columns forum.open and forum.assesspublic get dropped
// once the forum module has been upgraded to use Roles.
return false;
}
if ($forum->type == 'teacher') {
// Teacher forums should be converted to normal forums that
// use the Roles System to implement the old behavior.
// Note:
// Seems that teacher forums were never backed up in 1.6 since they
// didn't have an entry in the course_modules table.
require_once($CFG->dirroot.'/course/lib.php');
if ($DB->count_records('forum_discussions', array('forum' => $forum->id)) == 0) {
// Delete empty teacher forums.
$DB->delete_records('forum', array('id' => $forum->id));
} else {
// Create a course module for the forum and assign it to
// section 0 in the course.
$mod = new stdClass();
$mod->course = $forum->course;
$mod->module = $forummodid;
$mod->instance = $forum->id;
$mod->section = 0;
$mod->visible = 0; // Hide the forum
$mod->visibleold = 0; // Hide the forum
$mod->groupmode = 0;
if (!$cmid = add_course_module($mod)) {
print_error('cannotcreateinstanceforteacher', 'forum');
} else {
$sectionid = course_add_cm_to_section($forum->course, $mod->coursemodule, 0);
}
// Change the forum type to general.
$forum->type = 'general';
$DB->update_record('forum', $forum);
$context = context_module::instance($cmid);
// Create overrides for default student and guest roles (prevent).
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:viewdiscussion', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:viewhiddentimedposts', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:startdiscussion', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:replypost', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:viewrating', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:viewanyrating', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:rate', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:createattachment', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:deleteownpost', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:deleteanypost', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:splitdiscussions', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:movediscussions', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:editanypost', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:viewqandawithoutposting', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:viewsubscribers', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:managesubscriptions', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:postwithoutthrottling', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($guestroles as $guestrole) {
assign_capability('mod/forum:viewdiscussion', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:viewhiddentimedposts', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:startdiscussion', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:replypost', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:viewrating', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:viewanyrating', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:rate', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:createattachment', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:deleteownpost', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:deleteanypost', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:splitdiscussions', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:movediscussions', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:editanypost', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:viewqandawithoutposting', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:viewsubscribers', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:managesubscriptions', CAP_PREVENT, $guestrole->id, $context->id);
assign_capability('mod/forum:postwithoutthrottling', CAP_PREVENT, $guestrole->id, $context->id);
}
}
} else {
// Non-teacher forum.
if (empty($cmid)) {
// We were not given the course_module id. Try to find it.
if (!$cm = get_coursemodule_from_instance('forum', $forum->id)) {
echo $OUTPUT->notification('Could not get the course module for the forum');
return false;
} else {
$cmid = $cm->id;
}
}
$context = context_module::instance($cmid);
// $forum->open defines what students can do:
// 0 = No discussions, no replies
// 1 = No discussions, but replies are allowed
// 2 = Discussions and replies are allowed
switch ($forum->open) {
case 0:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:startdiscussion', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:replypost', CAP_PREVENT, $studentrole->id, $context->id);
}
break;
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:startdiscussion', CAP_PREVENT, $studentrole->id, $context->id);
assign_capability('mod/forum:replypost', CAP_ALLOW, $studentrole->id, $context->id);
}
break;
case 2:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:startdiscussion', CAP_ALLOW, $studentrole->id, $context->id);
assign_capability('mod/forum:replypost', CAP_ALLOW, $studentrole->id, $context->id);
}
break;
}
// $forum->assessed defines whether forum rating is turned
// on (1 or 2) and who can rate posts:
// 1 = Everyone can rate posts
// 2 = Only teachers can rate posts
switch ($forum->assessed) {
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:rate', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/forum:rate', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 2:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:rate', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/forum:rate', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
// $forum->assesspublic defines whether students can see
// everybody's ratings:
// 0 = Students can only see their own ratings
// 1 = Students can see everyone's ratings
switch ($forum->assesspublic) {
case 0:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:viewanyrating', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/forum:viewanyrating', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/forum:viewanyrating', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/forum:viewanyrating', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
if (empty($cm)) {
$cm = $DB->get_record('course_modules', array('id' => $cmid));
}
// $cm->groupmode:
// 0 - No groups
// 1 - Separate groups
// 2 - Visible groups
switch ($cm->groupmode) {
case 0:
break;
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('moodle/site:accessallgroups', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 2:
foreach ($studentroles as $studentrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
}
return true;
}
public function process_override($data)
{
$data = (object) $data;
// Check roleid is one of the mapped ones
$newroleid = $this->get_mappingid('role', $data->roleid);
// If newroleid and context are valid assign it via API (it handles dupes and so on)
if ($newroleid && $this->task->get_contextid()) {
// TODO: assign_capability() needs one userid param to be able to specify our restore userid
// TODO: it seems that assign_capability() doesn't check for valid capabilities at all ???
assign_capability($data->capability, $data->permission, $newroleid, $this->task->get_contextid());
}
}
/**
* Set the 'webservice/xmlrpc:use' to the Authenticated user role (allow or not)
* @param type $status true to allow, false to not set
*/
private function set_xmlrpc_cap($status)
{
global $CFG;
if ($status and !$this->is_xmlrpc_cap_allowed()) {
//need to allow the cap
$permission = CAP_ALLOW;
$assign = true;
} else {
if (!$status and $this->is_xmlrpc_cap_allowed()) {
//need to disallow the cap
$permission = CAP_INHERIT;
$assign = true;
}
}
if (!empty($assign)) {
$systemcontext = get_system_context();
assign_capability('webservice/xmlrpc:use', $permission, $CFG->defaultuserroleid, $systemcontext->id, true);
}
}
/**
* Converts a database (module instance) to use the Roles System
*
* @global object
* @global object
* @uses CONTEXT_MODULE
* @uses CAP_PREVENT
* @uses CAP_ALLOW
* @param object $data a data object with the same attributes as a record
* from the data database table
* @param int $datamodid the id of the data module, from the modules table
* @param array $teacherroles array of roles that have archetype teacher
* @param array $studentroles array of roles that have archetype student
* @param array $guestroles array of roles that have archetype guest
* @param int $cmid the course_module id for this data instance
* @return boolean data module was converted or not
*/
function data_convert_to_roles($data, $teacherroles=array(), $studentroles=array(), $cmid=NULL) {
global $CFG, $DB, $OUTPUT;
if (!isset($data->participants) && !isset($data->assesspublic)
&& !isset($data->groupmode)) {
// We assume that this database has already been converted to use the
// Roles System. above fields get dropped the data module has been
// upgraded to use Roles.
return false;
}
if (empty($cmid)) {
// We were not given the course_module id. Try to find it.
if (!$cm = get_coursemodule_from_instance('data', $data->id)) {
echo $OUTPUT->notification('Could not get the course module for the data');
return false;
} else {
$cmid = $cm->id;
}
}
$context = get_context_instance(CONTEXT_MODULE, $cmid);
// $data->participants:
// 1 - Only teachers can add entries
// 3 - Teachers and students can add entries
switch ($data->participants) {
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:writeentry', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:writeentry', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 3:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:writeentry', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:writeentry', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
// $data->assessed:
// 2 - Only teachers can rate posts
// 1 - Everyone can rate posts
// 0 - No one can rate posts
switch ($data->assessed) {
case 0:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:rate', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:rate', CAP_PREVENT, $teacherrole->id, $context->id);
}
break;
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:rate', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:rate', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 2:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:rate', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:rate', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
// $data->assesspublic:
// 0 - Students can only see their own ratings
// 1 - Students can see everyone's ratings
switch ($data->assesspublic) {
case 0:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:viewrating', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:viewrating', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case 1:
foreach ($studentroles as $studentrole) {
assign_capability('mod/data:viewrating', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('mod/data:viewrating', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
if (empty($cm)) {
$cm = $DB->get_record('course_modules', array('id'=>$cmid));
}
switch ($cm->groupmode) {
case NOGROUPS:
break;
case SEPARATEGROUPS:
foreach ($studentroles as $studentrole) {
assign_capability('moodle/site:accessallgroups', CAP_PREVENT, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
case VISIBLEGROUPS:
foreach ($studentroles as $studentrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $studentrole->id, $context->id);
}
foreach ($teacherroles as $teacherrole) {
assign_capability('moodle/site:accessallgroups', CAP_ALLOW, $teacherrole->id, $context->id);
}
break;
}
return true;
}
