public function execute()
{
global $DB;
foreach ($this->arguments as $argument) {
try {
$course = $DB->get_record('course', array('id' => $argument));
} catch (Exception $e) {
print get_class($e) . " thrown within the exception handler. Message: " . $e->getMessage() . " on line " . $e->getLine();
}
if ($course instanceof \stdClass) {
delete_course($course);
} else {
print "Course not found\n";
}
}
fix_course_sortorder();
}
public function execute()
{
global $CFG;
require_once $CFG->dirroot . '/course/lib.php';
$options = $this->expandedOptions;
$arguments = $this->arguments;
$this->checkFileArg($arguments[0]);
$this->categorystack = array();
if ($options['parent']) {
$this->categorystack[] = $options['parent'];
} else {
$this->categorystack[] = 0;
}
$this->coursesmap = array();
$this->parser = xml_parser_create();
xml_set_element_handler($this->parser, array(&$this, "start_element"), array(&$this, "end_element"));
if (!($fp = fopen($arguments[0], "r"))) {
die("could not open XML input");
}
while ($data = fread($fp, 4096)) {
if (!xml_parse($this->parser, $data, feof($fp))) {
die(sprintf("XML error: %s at line %d", xml_error_string(xml_get_error_code($this->parser)), xml_get_current_line_number($this->parser)));
}
}
xml_parser_free($this->parser);
fix_course_sortorder();
}
/**
* Roll over an existing Moodle course into a new one using a customized backup
* and restore routine
*
* @param int $courseid Id of the course we are copying
* @param int $categoryid
* @return int|boolean Id of the newly created course
*/
function course_rollover($courseid, $categoryid = null)
{
global $DB;
if ($course = $DB->get_record('course', array('id' => $courseid))) {
//figure out the category
if ($categoryid === null) {
$categoryid = $course->category;
}
//make sure the category is valid
if (!$DB->record_exists('course_categories', array('id' => $categoryid))) {
//invalid category
return false;
}
//perform backup without including user info
$controller = new rollover_backup_controller($courseid);
$controller->get_plan()->get_setting('users')->set_value(false);
$controller->execute_plan();
//get directory name for use in restore
$backupid = $controller->get_backupid();
//start a database transaction to make sure restore is atomic, etc
$transaction = $DB->start_delegated_transaction();
//create the new course
$result = restore_dbops::create_new_course($course->fullname, $course->shortname, $categoryid);
//restore the content into it within the current transaction without including user information
$controller = new rollover_restore_controller($backupid, $result);
$controller->get_plan()->get_setting('users')->set_value(false);
$controller->execute_precheck();
$controller->execute_plan();
//make sure the sort order is defined as expected
fix_course_sortorder();
try {
//try to finalize
$transaction->allow_commit();
} catch (dml_transaction_exception $e) {
//failure
$result = false;
}
return $result;
} else {
//invalid course specified
return false;
}
}
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;
}
/**
* Create categories
*
* @param array $categories - see create_categories_parameters() for the array structure
* @return array - see create_categories_returns() for the array structure
* @since Moodle 2.3
*/
public static function create_categories($categories)
{
global $CFG, $DB;
require_once $CFG->dirroot . "/course/lib.php";
$params = self::validate_parameters(self::create_categories_parameters(), array('categories' => $categories));
$transaction = $DB->start_delegated_transaction();
$createdcategories = array();
foreach ($params['categories'] as $category) {
if ($category['parent']) {
if (!$DB->record_exists('course_categories', array('id' => $category['parent']))) {
throw new moodle_exception('unknowcategory');
}
$context = context_coursecat::instance($category['parent']);
} else {
$context = context_system::instance();
}
self::validate_context($context);
require_capability('moodle/category:manage', $context);
// Check name.
if (textlib::strlen($category['name']) > 255) {
throw new moodle_exception('categorytoolong');
}
$newcategory = new stdClass();
$newcategory->name = $category['name'];
$newcategory->parent = $category['parent'];
$newcategory->sortorder = 999;
// Same as in the course/editcategory.php .
// Format the description.
if (!empty($category['description'])) {
$newcategory->description = $category['description'];
}
$newcategory->descriptionformat = external_validate_format($category['descriptionformat']);
if (isset($category['theme']) and !empty($CFG->allowcategorythemes)) {
$newcategory->theme = $category['theme'];
}
// Check id number.
if (!empty($category['idnumber'])) {
// Same as in course/editcategory_form.php .
if (textlib::strlen($category['idnumber']) > 100) {
throw new moodle_exception('idnumbertoolong');
}
if ($existing = $DB->get_record('course_categories', array('idnumber' => $category['idnumber']))) {
if ($existing->id) {
throw new moodle_exception('idnumbertaken');
}
}
$newcategory->idnumber = $category['idnumber'];
}
$newcategory = create_course_category($newcategory);
// Populate special fields.
fix_course_sortorder();
$createdcategories[] = array('id' => $newcategory->id, 'name' => $newcategory->name);
}
$transaction->allow_commit();
return $createdcategories;
}
private function process_category_group_node($groupnode, $xpath)
{
global $DB, $CFG;
$group = new stdClass();
if ($groupnode->getAttribute("recstatus") != 3) {
$groupname = $xpath->evaluate("description/short", $groupnode)->item(0);
if ($groupname) {
$group->name = $groupname->nodeValue;
}
$groupdescription = $xpath->evaluate("sourcedid/id", $groupnode)->item(0);
if ($groupdescription) {
$group->description = htmlspecialchars_decode($groupdescription->nodeValue);
}
$parentgroup = $xpath->evaluate("relationship/sourcedid/id", $groupnode)->item(0);
if ($parentgroup) {
$parentid = $DB->get_field_select('course_categories', 'id', 'description =\'
' . htmlspecialchars_decode($parentgroup->nodeValue) . '\'');
if ($parentid) {
$group->parent = $parentid;
}
} else {
$group->parent = 0;
}
$id = $DB->get_record_select('course_categories', 'description=\'' . $group->description . '\'');
if (!$id) {
$group->id = $DB->insert_record('course_categories', $group);
$classname = context_helper::get_class_for_level(CONTEXT_COURSECAT);
$group->context = $classname::instance($group->id, IGNORE_MISSING);
mark_context_dirty($group->context->path);
$DB->update_record('course_categories', $group);
fix_course_sortorder();
}
} else {
$groupname = $xpath->evaluate("description/short", $groupnode)->item(0);
if ($groupname) {
$group->name = $groupname->nodeValue;
}
$groupdescription = $xpath->evaluate("sourcedid/id", $groupnode)->item(0);
if ($groupdescription) {
$group->description = htmlspecialchars_decode($groupdescription->nodeValue);
}
$parentgroup = $xpath->evaluate("relationship/sourcedid/id", $groupnode)->item(0);
if ($parentgroup) {
$parentid = $DB->get_field_select('course_categories', 'id', 'description =\'
' . htmlspecialchars_decode($parentgroup->nodeValue) . '\'');
if ($parentid) {
$group->parent = $parentid;
}
} else {
$group->parent = 0;
}
$id = $DB->get_record_select('course_categories', 'description=\'' . $group->description . '\'');
if ($id) {
if ($children = $DB->get_records('course_categories', array('parent' => $id->id), 'sortorder ASC')) {
echo 'has cats!';
} else {
if ($courses = $DB->get_records('course', array('category' => $id->id), 'sortorder ASC')) {
echo 'has courses!';
} else {
$DB->delete_records('course_categories', array('id' => $id->id));
delete_context(CONTEXT_COURSECAT, $id->id);
}
}
}
}
}
/**
* Changes the sort order of this categories parent shifting this category up or down one.
*
* @global \moodle_database $DB
* @param bool $up If set to true the category is shifted up one spot, else its moved down.
* @return bool True on success, false otherwise.
*/
public function change_sortorder_by_one($up)
{
global $DB;
$params = array($this->sortorder, $this->parent);
if ($up) {
$select = 'sortorder < ? AND parent = ?';
$sort = 'sortorder DESC';
} else {
$select = 'sortorder > ? AND parent = ?';
$sort = 'sortorder ASC';
}
fix_course_sortorder();
$swapcategory = $DB->get_records_select('course_categories', $select, $params, $sort, '*', 0, 1);
$swapcategory = reset($swapcategory);
if ($swapcategory) {
$DB->set_field('course_categories', 'sortorder', $swapcategory->sortorder, array('id' => $this->id));
$DB->set_field('course_categories', 'sortorder', $this->sortorder, array('id' => $swapcategory->id));
$this->sortorder = $swapcategory->sortorder;
$event = \core\event\course_category_updated::create(array('objectid' => $this->id, 'context' => $this->get_context()));
$event->set_legacy_logdata(array(SITEID, 'category', 'move', 'management.php?categoryid=' . $this->id, $this->id));
$event->trigger();
// Finally reorder courses.
fix_course_sortorder();
cache_helper::purge_by_event('changesincoursecat');
return true;
}
return false;
}
/**
* Setup the DB fixture data
*/
public function setup()
{
parent::setUp();
$tables = array('block_instance', 'cache_flags', 'capabilities', 'context', 'context_temp', 'course', 'course_modules', 'course_categories', 'course_sections', 'files', 'files_cleanup', 'grade_items', 'grade_categories', 'groups', 'groups_members', 'modules', 'role', 'role_names', 'role_context_levels', 'role_assignments', 'role_capabilities', 'user');
$this->create_test_tables($tables, 'lib');
$this->create_test_table('forum', 'mod/forum');
$this->switch_to_test_db();
global $DB, $CFG;
// Insert needed capabilities
$DB->insert_record('capabilities', array('id' => 45, 'name' => 'moodle/course:update', 'cattype' => 'write', 'contextlevel' => 50, 'component' => 'moodle', 'riskbitmask' => 4));
$DB->insert_record('capabilities', array('id' => 14, 'name' => 'moodle/site:backup', 'cattype' => 'write', 'contextlevel' => 50, 'component' => 'moodle', 'riskbitmask' => 28));
$DB->insert_record('capabilities', array('id' => 17, 'name' => 'moodle/site:restore', 'cattype' => 'write', 'contextlevel' => 50, 'component' => 'moodle', 'riskbitmask' => 28));
$DB->insert_record('capabilities', array('id' => 52, 'name' => 'moodle/course:managefiles', 'cattype' => 'write', 'contextlevel' => 50, 'component' => 'moodle', 'riskbitmask' => 4));
$DB->insert_record('capabilities', array('id' => 73, 'name' => 'moodle/user:editownprofile', 'cattype' => 'write', 'contextlevel' => 10, 'component' => 'moodle', 'riskbitmask' => 16));
// Insert system context
$DB->insert_record('context', array('id' => 1, 'contextlevel' => 10, 'instanceid' => 0, 'path' => '/1', 'depth' => 1));
$DB->insert_record('context', array('id' => 2, 'contextlevel' => 50, 'instanceid' => 1, 'path' => '/1/2', 'depth' => 2));
// Insert site course
$DB->insert_record('course', array('category' => 0, 'sortorder' => 1, 'fullname' => 'Test site', 'shortname' => 'test', 'format' => 'site', 'modinfo' => 'a:0:{}'));
// User and capability stuff (stolen from testaccesslib.php)
$syscontext = get_system_context(false);
$adminrole = create_role(get_string('administrator'), 'admin', get_string('administratordescription'), 'moodle/legacy:admin');
/// Now is the correct moment to install capabilities - after creation of legacy roles, but before assigning of roles
assign_capability('moodle/site:doanything', CAP_ALLOW, $adminrole, $syscontext->id);
update_capabilities('moodle');
update_capabilities('mod/forum');
$contexts = $this->load_test_data('context', array('contextlevel', 'instanceid', 'path', 'depth'), array(1 => array(40, 666, '', 2)));
$contexts[0] = $syscontext;
$contexts[1]->path = $contexts[0]->path . '/' . $contexts[1]->id;
$this->testdb->set_field('context', 'path', $contexts[1]->path, array('id' => $contexts[1]->id));
$users = $this->load_test_data('user', array('username', 'confirmed', 'deleted'), array('a' => array('a', 1, 0)));
$admin = $this->testdb->get_record('role', array('shortname' => 'admin'));
$ras = $this->load_test_data('role_assignments', array('userid', 'roleid', 'contextid'), array('a' => array($users['a']->id, $admin->id, $contexts[0]->id)));
$this->switch_global_user_id(1);
accesslib_clear_all_caches_for_unit_testing();
// Create a coursecat
$newcategory = new stdClass();
$newcategory->name = 'test category';
$newcategory->sortorder = 999;
if (!($newcategory->id = $DB->insert_record('course_categories', $newcategory))) {
print_error('cannotcreatecategory', '', '', format_string($newcategory->name));
}
$newcategory->context = get_context_instance(CONTEXT_COURSECAT, $newcategory->id);
mark_context_dirty($newcategory->context->path);
fix_course_sortorder();
// Required to build course_categories.depth and .path.
$this->coursecat = $DB->get_record('course_categories', array('id' => $newcategory->id));
// Create a course
$coursedata = new stdClass();
$coursedata->category = $newcategory->id;
$coursedata->shortname = 'testcourse';
$coursedata->fullname = 'Test Course';
try {
$this->course = create_course($coursedata);
} catch (moodle_exception $e) {
// Most likely the result of an aborted unit test: the test course was not correctly deleted
$this->course = $DB->get_record('course', array('shortname' => $coursedata->shortname));
}
// Create a user
$this->user = new stdClass();
$this->user->username = '******';
$this->user->password = '******';
$this->user->firstname = 'TestUser';
$this->user->lastname = 'TestUser';
$this->user->email = '*****@*****.**';
try {
$this->user->id = create_user($this->user);
} catch (moodle_exception $e) {
// Most likely the result of an aborted unit test: the test user was not correctly deleted
$this->user->id = $DB->get_field('user', 'id', array('username' => $this->user->username));
}
// Assign user to course
// role_assign(5, $this->user->id, 0, get_context_instance(CONTEXT_COURSE, $this->course->id)->id);
// Create a module
$module = new stdClass();
$module->intro = 'Forum used for testing filelib API';
$module->type = 'general';
$module->forcesubscribe = 1;
$module->format = 1;
$module->name = 'Test Forum';
$module->module = $DB->get_field('modules', 'id', array('name' => 'forum'));
$module->modulename = 'forum';
$module->add = 'forum';
$module->cmidnumber = '';
$module->course = $this->course->id;
$module->instance = forum_add_instance($module, '');
$this->section = get_course_section(1, $this->course->id);
$module->section = $this->section->id;
$module->coursemodule = add_course_module($module);
add_mod_to_section($module);
$module->cmidnumber = set_coursemodule_idnumber($module->coursemodule, '');
rebuild_course_cache($this->course->id);
$this->module = $DB->get_record('forum', array('id' => $module->instance));
$this->module->instance = $module->instance;
// Update local copy of course
$this->course = $DB->get_record('course', array('id' => $this->course->id));
}
function create_course($course_ext, $skip_fix_course_sortorder = 0)
{
global $CFG;
// override defaults with template course
if (!empty($CFG->enrol_ldap_template)) {
$course = get_record("course", 'shortname', $CFG->enrol_ldap_template);
unset($course->id);
// so we are clear to reinsert the record
unset($course->sortorder);
} else {
// set defaults
$course = new object();
$course->student = get_string('defaultcoursestudent');
$course->students = get_string('defaultcoursestudents');
$course->teacher = get_string('defaultcourseteacher');
$course->teachers = get_string('defaultcourseteachers');
$course->format = 'topics';
}
// override with required ext data
$course->idnumber = $course_ext[$CFG->enrol_ldap_course_idnumber][0];
$course->fullname = $course_ext[$CFG->enrol_ldap_course_fullname][0];
$course->shortname = $course_ext[$CFG->enrol_ldap_course_shortname][0];
if (empty($course->idnumber) || empty($course->fullname) || empty($course->shortname)) {
// we are in trouble!
error_log("Cannot create course: missing required data from the LDAP record!");
error_log(var_export($course, true));
return false;
}
$course->summary = empty($CFG->enrol_ldap_course_summary) || empty($course_ext[$CFG->enrol_ldap_course_summary][0]) ? '' : $course_ext[$CFG->enrol_ldap_course_summary][0];
if (!empty($CFG->enrol_ldap_category)) {
// optional ... but ensure it is set!
$course->category = $CFG->enrol_ldap_category;
}
if ($course->category == 0) {
// must be avoided as it'll break moodle
$course->category = 1;
// the misc 'catch-all' category
}
// define the sortorder (yuck)
$sort = get_record_sql('SELECT MAX(sortorder) AS max, 1 FROM ' . $CFG->prefix . 'course WHERE category=' . $course->category);
$sort = $sort->max;
$sort++;
$course->sortorder = $sort;
// override with local data
$course->startdate = time();
$course->timecreated = time();
$course->visible = 1;
$course = addslashes_recursive($course);
// store it and log
if ($newcourseid = insert_record("course", $course)) {
// Set up new course
$section = new object();
$section->course = $newcourseid;
// Create a default section.
$section->section = 0;
$section->id = insert_record("course_sections", $section);
$page = page_create_object(PAGE_COURSE_VIEW, $newcourseid);
blocks_repopulate_page($page);
// Return value no
if (!$skip_fix_course_sortorder) {
fix_course_sortorder();
}
add_to_log($newcourseid, "course", "new", "view.php?id={$newcourseid}", "enrol/ldap auto-creation");
} else {
error_log("Could not create new course from LDAP from DN:" . $course_ext['dn']);
notify("Serious Error! Could not create the new course!");
return false;
}
return $newcourseid;
}
/**
* Read in an IMS Enterprise file.
* Originally designed to handle v1.1 files but should be able to handle
* earlier types as well, I believe.
*
*/
public function cron() {
global $CFG;
// Get configs.
$imsfilelocation = $this->get_config('imsfilelocation');
$logtolocation = $this->get_config('logtolocation');
$mailadmins = $this->get_config('mailadmins');
$prevtime = $this->get_config('prev_time');
$prevmd5 = $this->get_config('prev_md5');
$prevpath = $this->get_config('prev_path');
if (empty($imsfilelocation)) {
$filename = "$CFG->dataroot/1/imsenterprise-enrol.xml"; // Default location.
} else {
$filename = $imsfilelocation;
}
$this->logfp = false;
if (!empty($logtolocation)) {
$this->logfp = fopen($logtolocation, 'a');
}
$fileisnew = false;
if ( file_exists($filename) ) {
core_php_time_limit::raise();
$starttime = time();
$this->log_line('----------------------------------------------------------------------');
$this->log_line("IMS Enterprise enrol cron process launched at " . userdate(time()));
$this->log_line('Found file '.$filename);
$this->xmlcache = '';
// Make sure we understand how to map the IMS-E roles to Moodle roles.
$this->load_role_mappings();
// Make sure we understand how to map the IMS-E course names to Moodle course names.
$this->load_course_mappings();
$md5 = md5_file($filename); // NB We'll write this value back to the database at the end of the cron.
$filemtime = filemtime($filename);
// Decide if we want to process the file (based on filepath, modification time, and MD5 hash)
// This is so we avoid wasting the server's efforts processing a file unnecessarily.
if (empty($prevpath) || ($filename != $prevpath)) {
$fileisnew = true;
} else if (isset($prevtime) && ($filemtime <= $prevtime)) {
$this->log_line('File modification time is not more recent than last update - skipping processing.');
} else if (isset($prevmd5) && ($md5 == $prevmd5)) {
$this->log_line('File MD5 hash is same as on last update - skipping processing.');
} else {
$fileisnew = true; // Let's process it!
}
if ($fileisnew) {
// The <properties> tag is allowed to halt processing if we're demanding a matching target.
$this->continueprocessing = true;
// Run through the file and process the group/person entries.
if (($fh = fopen($filename, "r")) != false) {
$line = 0;
while ((!feof($fh)) && $this->continueprocessing) {
$line++;
$curline = fgets($fh);
$this->xmlcache .= $curline; // Add a line onto the XML cache.
while (true) {
// If we've got a full tag (i.e. the most recent line has closed the tag) then process-it-and-forget-it.
// Must always make sure to remove tags from cache so they don't clog up our memory.
if ($tagcontents = $this->full_tag_found_in_cache('group', $curline)) {
$this->process_group_tag($tagcontents);
$this->remove_tag_from_cache('group');
} else if ($tagcontents = $this->full_tag_found_in_cache('person', $curline)) {
$this->process_person_tag($tagcontents);
$this->remove_tag_from_cache('person');
} else if ($tagcontents = $this->full_tag_found_in_cache('membership', $curline)) {
$this->process_membership_tag($tagcontents);
$this->remove_tag_from_cache('membership');
} else if ($tagcontents = $this->full_tag_found_in_cache('comments', $curline)) {
$this->remove_tag_from_cache('comments');
} else if ($tagcontents = $this->full_tag_found_in_cache('properties', $curline)) {
$this->process_properties_tag($tagcontents);
$this->remove_tag_from_cache('properties');
} else {
break;
}
}
}
fclose($fh);
fix_course_sortorder();
}
$timeelapsed = time() - $starttime;
$this->log_line('Process has completed. Time taken: '.$timeelapsed.' seconds.');
}
// These variables are stored so we can compare them against the IMS file, next time round.
$this->set_config('prev_time', $filemtime);
$this->set_config('prev_md5', $md5);
$this->set_config('prev_path', $filename);
} else {
$this->log_line('File not found: '.$filename);
}
if (!empty($mailadmins) && $fileisnew) {
$timeelapsed = isset($timeelapsed) ? $timeelapsed : 0;
$msg = "An IMS enrolment has been carried out within Moodle.\nTime taken: $timeelapsed seconds.\n\n";
if (!empty($logtolocation)) {
if ($this->logfp) {
$msg .= "Log data has been written to:\n";
$msg .= "$logtolocation\n";
$msg .= "(Log file size: ".ceil(filesize($logtolocation) / 1024)."Kb)\n\n";
} else {
$msg .= "The log file appears not to have been successfully written.\n";
$msg .= "Check that the file is writeable by the server:\n";
$msg .= "$logtolocation\n\n";
}
} else {
$msg .= "Logging is currently not active.";
}
$eventdata = new stdClass();
$eventdata->modulename = 'moodle';
$eventdata->component = 'enrol_imsenterprise';
$eventdata->name = 'imsenterprise_enrolment';
$eventdata->userfrom = get_admin();
$eventdata->userto = get_admin();
$eventdata->subject = "Moodle IMS Enterprise enrolment notification";
$eventdata->fullmessage = $msg;
$eventdata->fullmessageformat = FORMAT_PLAIN;
$eventdata->fullmessagehtml = '';
$eventdata->smallmessage = '';
message_send($eventdata);
$this->log_line('Notification email sent to administrator.');
}
if ($this->logfp) {
fclose($this->logfp);
}
}
/**
* This recursive function makes sure that the courseorder is consecutive
*
* @param type description
*
* $n is the starting point, offered only for compatilibity -- will be ignored!
* $safe (bool) prevents it from assuming category-sortorder is unique, used to upgrade
* safely from 1.4 to 1.5
*/
function fix_course_sortorder($categoryid = 0, $n = 0, $safe = 0, $depth = 0, $path = '')
{
global $CFG;
$count = 0;
$catgap = 1000;
// "standard" category gap
$tolerance = 200;
// how "close" categories can get
if ($categoryid > 0) {
// update depth and path
$cat = get_record('course_categories', 'id', $categoryid);
if ($cat->parent == 0) {
$depth = 0;
$path = '';
} else {
if ($depth == 0) {
// doesn't make sense; get from DB
// this is only called if the $depth parameter looks dodgy
$parent = get_record('course_categories', 'id', $cat->parent);
$path = $parent->path;
$depth = $parent->depth;
}
}
$path = $path . '/' . $categoryid;
$depth = $depth + 1;
if ($cat->path !== $path) {
set_field('course_categories', 'path', addslashes($path), 'id', $categoryid);
}
if ($cat->depth != $depth) {
set_field('course_categories', 'depth', $depth, 'id', $categoryid);
}
}
// get some basic info about courses in the category
$info = get_record_sql('SELECT MIN(sortorder) AS min,
MAX(sortorder) AS max,
COUNT(sortorder) AS count
FROM ' . $CFG->prefix . 'course
WHERE category=' . $categoryid);
if (is_object($info)) {
// no courses?
$max = $info->max;
$count = $info->count;
$min = $info->min;
unset($info);
}
if ($categoryid > 0 && $n == 0) {
// only passed category so don't shift it
$n = $min;
}
// $hasgap flag indicates whether there's a gap in the sequence
$hasgap = false;
if ($max - $min + 1 != $count) {
$hasgap = true;
}
// $mustshift indicates whether the sequence must be shifted to
// meet its range
$mustshift = false;
if ($min < $n + $tolerance || $min > $n + $tolerance + $catgap) {
$mustshift = true;
}
// actually sort only if there are courses,
// and we meet one ofthe triggers:
// - safe flag
// - they are not in a continuos block
// - they are too close to the 'bottom'
if ($count && ($safe || $hasgap || $mustshift)) {
// special, optimized case where all we need is to shift
if ($mustshift && !$safe && !$hasgap) {
$shift = $n + $catgap - $min;
if ($shift < $count) {
$shift = $count + $catgap;
}
// UPDATE course SET sortorder=sortorder+$shift
execute_sql("UPDATE {$CFG->prefix}course\n SET sortorder=sortorder+{$shift}\n WHERE category={$categoryid}", 0);
$n = $n + $catgap + $count;
} else {
// do it slowly
$n = $n + $catgap;
// if the new sequence overlaps the current sequence, lack of transactions
// will stop us -- shift things aside for a moment...
if ($safe || $n >= $min && $n + $count + 1 < $min && $CFG->dbfamily === 'mysql') {
$shift = $max + $n + 1000;
execute_sql("UPDATE {$CFG->prefix}course\n SET sortorder=sortorder+{$shift}\n WHERE category={$categoryid}", 0);
}
$courses = get_courses($categoryid, 'c.sortorder ASC', 'c.id,c.sortorder');
begin_sql();
$tx = true;
// transaction sanity
foreach ($courses as $course) {
if ($tx && $course->sortorder != $n) {
// save db traffic
$tx = $tx && set_field('course', 'sortorder', $n, 'id', $course->id);
}
$n++;
}
if ($tx) {
commit_sql();
} else {
rollback_sql();
if (!$safe) {
// if we failed when called with !safe, try
// to recover calling self with safe=true
return fix_course_sortorder($categoryid, $n, true, $depth, $path);
}
}
}
}
set_field('course_categories', 'coursecount', $count, 'id', $categoryid);
// $n could need updating
$max = get_field_sql("SELECT MAX(sortorder) from {$CFG->prefix}course WHERE category={$categoryid}");
if ($max > $n) {
$n = $max;
}
if ($categories = get_categories($categoryid)) {
foreach ($categories as $category) {
$n = fix_course_sortorder($category->id, $n, $safe, $depth, $path);
}
}
return $n + 1;
}
/**
* Update a course and return true or false
*
* @param object $data - all the data needed for an entry in the 'course' table
*/
function update_course($data)
{
global $USER, $CFG;
// Preprocess allowed mods
$allowedmods = empty($data->allowedmods) ? array() : $data->allowedmods;
unset($data->allowedmods);
// Normal teachers can't change setting
if (!has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
unset($data->restrictmodules);
}
$movecat = false;
$oldcourse = get_record('course', 'id', $data->id);
// should not fail, already tested above
if (!has_capability('moodle/course:create', get_context_instance(CONTEXT_COURSECAT, $oldcourse->category)) or !has_capability('moodle/course:create', get_context_instance(CONTEXT_COURSECAT, $data->category))) {
// can not move to new category, keep the old one
unset($data->category);
} elseif ($oldcourse->category != $data->category) {
$movecat = true;
}
// Update with the new data
if (update_record('course', $data)) {
$course = get_record('course', 'id', $data->id);
add_to_log($course->id, "course", "update", "edit.php?id={$course->id}", $course->id);
// "Admins" can change allowed mods for a course
if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
update_restricted_mods($course, $allowedmods);
}
if ($movecat) {
$context = get_context_instance(CONTEXT_COURSE, $course->id);
$newparent = get_context_instance(CONTEXT_COURSECAT, $course->category);
context_moved($context, $newparent);
}
fix_course_sortorder();
// Test for and remove blocks which aren't appropriate anymore
$page = page_create_object(PAGE_COURSE_VIEW, $course->id);
blocks_remove_inappropriate($page);
// put custom role names into db
$context = get_context_instance(CONTEXT_COURSE, $course->id);
foreach ($data as $dname => $dvalue) {
// is this the right param?
$dvalue = clean_param($dvalue, PARAM_NOTAGS);
if (!strstr($dname, 'role_')) {
continue;
}
$dt = explode('_', $dname);
$roleid = $dt[1];
// make up our mind whether we want to delete, update or insert
if (empty($dvalue)) {
delete_records('role_names', 'contextid', $context->id, 'roleid', $roleid);
} else {
if ($t = get_record('role_names', 'contextid', $context->id, 'roleid', $roleid)) {
$t->name = $dvalue;
update_record('role_names', $t);
} else {
$t->contextid = $context->id;
$t->roleid = $roleid;
$t->name = $dvalue;
insert_record('role_names', $t);
}
}
}
//trigger events
events_trigger('course_updated', $course);
return true;
}
return false;
}
public function test_create_course_category()
{
global $CFG, $DB;
$this->resetAfterTest(true);
// Create the category
$data = new stdClass();
$data->name = 'aaa';
$data->description = 'aaa';
$data->idnumber = '';
$category1 = create_course_category($data);
// Initially confirm that base data was inserted correctly
$this->assertEquals($data->name, $category1->name);
$this->assertEquals($data->description, $category1->description);
$this->assertEquals($data->idnumber, $category1->idnumber);
// sortorder should be blank initially
$this->assertEmpty($category1->sortorder);
// Calling fix_course_sortorder() should provide a new sortorder
fix_course_sortorder();
$category1 = $DB->get_record('course_categories', array('id' => $category1->id));
$this->assertGreaterThanOrEqual(1, $category1->sortorder);
// Create two more categories and test the sortorder worked correctly
$data->name = 'ccc';
$category2 = create_course_category($data);
$this->assertEmpty($category2->sortorder);
$data->name = 'bbb';
$category3 = create_course_category($data);
$this->assertEmpty($category3->sortorder);
// Calling fix_course_sortorder() should provide a new sortorder to give category1,
// category2, category3. New course categories are ordered by id not name
fix_course_sortorder();
$category1 = $DB->get_record('course_categories', array('id' => $category1->id));
$category2 = $DB->get_record('course_categories', array('id' => $category2->id));
$category3 = $DB->get_record('course_categories', array('id' => $category3->id));
$this->assertGreaterThanOrEqual($category1->sortorder, $category2->sortorder);
$this->assertGreaterThanOrEqual($category2->sortorder, $category3->sortorder);
$this->assertGreaterThanOrEqual($category1->sortorder, $category3->sortorder);
}
/**
* Process the group tag. This defines a Moodle course.
* @param string $tagconents The raw contents of the XML element
*/
function process_group_tag($tagcontents)
{
global $CFG;
// Process tag contents
unset($group);
if (preg_match('{<sourcedid>.*?<id>(.+?)</id>.*?</sourcedid>}is', $tagcontents, $matches)) {
$group->coursecode = trim($matches[1]);
}
if (preg_match('{<description>.*?<short>(.*?)</short>.*?</description>}is', $tagcontents, $matches)) {
$group->description = trim($matches[1]);
}
if (preg_match('{<org>.*?<orgunit>(.*?)</orgunit>.*?</org>}is', $tagcontents, $matches)) {
$group->category = trim($matches[1]);
}
$recstatus = $this->get_recstatus($tagcontents, 'group');
//echo "<p>get_recstatus for this group returned $recstatus</p>";
if (!(strlen($group->coursecode) > 0)) {
$this->log_line('Error at line ' . $line . ': Unable to find course code in \'group\' element.');
} else {
// First, truncate the course code if desired
if (intval($CFG->enrol_truncatecoursecodes) > 0) {
$group->coursecode = $CFG->enrol_truncatecoursecodes > 0 ? substr($group->coursecode, 0, intval($CFG->enrol_truncatecoursecodes)) : $group->coursecode;
}
/* -----------Course aliasing is DEACTIVATED until a more general method is in place---------------
// Second, look in the course alias table to see if the code should be translated to something else
if($aliases = get_field('enrol_coursealias', 'toids', 'fromid', $group->coursecode)){
$this->log_line("Found alias of course code: Translated $group->coursecode to $aliases");
// Alias is allowed to be a comma-separated list, so let's split it
$group->coursecode = explode(',', $aliases);
}
*/
// For compatibility with the (currently inactive) course aliasing, we need this to be an array
$group->coursecode = array($group->coursecode);
// Third, check if the course(s) exist
foreach ($group->coursecode as $coursecode) {
$coursecode = trim($coursecode);
if (!get_field('course', 'id', 'idnumber', $coursecode)) {
if (!$CFG->enrol_createnewcourses) {
$this->log_line("Course {$coursecode} not found in Moodle's course idnumbers.");
} else {
// Create the (hidden) course(s) if not found
$course->fullname = $group->description;
$course->shortname = $coursecode;
$course->idnumber = $coursecode;
$course->format = 'topics';
$course->visible = 0;
// Insert default names for teachers/students, from the current language
$site = get_site();
if (current_language() == $CFG->lang) {
$course->teacher = $site->teacher;
$course->teachers = $site->teachers;
$course->student = $site->student;
$course->students = $site->students;
} else {
$course->teacher = get_string("defaultcourseteacher");
$course->teachers = get_string("defaultcourseteachers");
$course->student = get_string("defaultcoursestudent");
$course->students = get_string("defaultcoursestudents");
}
// Handle course categorisation (taken from the group.org.orgunit field if present)
if (strlen($group->category) > 0) {
// If the category is defined and exists in Moodle, we want to store it in that one
if ($catid = get_field('course_categories', 'id', 'name', addslashes($group->category))) {
$course->category = $catid;
} elseif ($CFG->enrol_createnewcategories) {
// Else if we're allowed to create new categories, let's create this one
$newcat->name = $group->category;
$newcat->visible = 0;
if ($catid = insert_record('course_categories', $newcat)) {
$course->category = $catid;
$this->log_line("Created new (hidden) category, #{$catid}: {$newcat->name}");
} else {
$this->log_line('Failed to create new category: ' . $newcat->name);
}
} else {
// If not found and not allowed to create, stick with default
$this->log_line('Category ' . $group->category . ' not found in Moodle database, so using default category instead.');
$course->category = 1;
}
} else {
$course->category = 1;
}
$course->timecreated = time();
$course->startdate = time();
$course->numsections = 1;
// Choose a sort order that puts us at the start of the list!
$sortinfo = get_record_sql('SELECT MIN(sortorder) AS min,
MAX(sortorder) AS max
FROM ' . $CFG->prefix . 'course WHERE category<>0');
if (is_object($sortinfo)) {
// no courses?
$max = $sortinfo->max;
$min = $sortinfo->min;
unset($sortinfo);
$course->sortorder = $min - 1;
} else {
$course->sortorder = 1000;
}
if ($course->id = insert_record('course', addslashes_object($course))) {
// Setup the blocks
$page = page_create_object(PAGE_COURSE_VIEW, $course->id);
blocks_repopulate_page($page);
// Return value not checked because you can always edit later
$section = NULL;
$section->course = $course->id;
// Create a default section.
$section->section = 0;
$section->id = insert_record("course_sections", $section);
fix_course_sortorder();
add_to_log(SITEID, "course", "new", "view.php?id={$course->id}", "{$course->fullname} (ID {$course->id})");
$this->log_line("Created course {$coursecode} in Moodle (Moodle ID is {$course->id})");
} else {
$this->log_line('Failed to create course ' . $coursecode . ' in Moodle');
}
}
} elseif ($recstatus == 3 && ($courseid = get_field('course', 'id', 'idnumber', $coursecode))) {
// If course does exist, but recstatus==3 (delete), then set the course as hidden
set_field('course', 'visible', '0', 'id', $courseid);
}
}
// End of foreach(coursecode)
}
}
/**
* Save the course category
*
* @author Andrew Zoltay
* date 2011-05-30
* @global type $DB
* @param string $categoryname
* @param int $parent
* @return boolean - success or failure
*/
function save_category($categoryname, $parent = 0)
{
global $DB;
// First off - don't save any categories that are null.
if (empty($categoryname) or is_null($categoryname)) {
return false;
}
// Next check to see if category already exists.
$categoryid = $DB->get_field_select('course_categories', 'id', 'name = ? AND parent = ?', array($categoryname, $parent));
// Finally save the category if it hasnt been found.
if ($categoryid) {
echo 'Found existing cat: ' . $categoryname . ' with id=' . $categoryid . '</br>';
return $categoryid;
} else {
// Save the new category.
$newcategory->name = $categoryname;
$newcategory->description = '';
// Don't define a description.
$newcategory->descriptionformat = 1;
// Default to HTML format.
$newcategory->parent = $parent;
$newcategory->sortorder = 999;
$newcategory->id = $DB->insert_record('course_categories', $newcategory);
$newcategory->context = get_context_instance(CONTEXT_COURSECAT, $newcategory->id);
$categorycontext = $newcategory->context;
mark_context_dirty($newcategory->context->path);
// Now that we have the context, we need to update the category's path info.
$DB->update_record('course_categories', $newcategory);
fix_course_sortorder();
echo 'Added new cat: ' . $categoryname . ' with id=' . $newcategory->id . '</br>';
return $newcategory->id;
}
}
/**
* Delete courses
*
* @param array $courseids A list of course ids
* @since Moodle 2.2
*/
public static function delete_courses($courseids)
{
global $CFG, $DB;
require_once $CFG->dirroot . "/course/lib.php";
// Parameter validation.
$params = self::validate_parameters(self::delete_courses_parameters(), array('courseids' => $courseids));
$warnings = array();
foreach ($params['courseids'] as $courseid) {
$course = $DB->get_record('course', array('id' => $courseid));
if ($course === false) {
$warnings[] = array('item' => 'course', 'itemid' => $courseid, 'warningcode' => 'unknowncourseidnumber', 'message' => 'Unknown course ID ' . $courseid);
continue;
}
// Check if the context is valid.
$coursecontext = context_course::instance($course->id);
self::validate_context($coursecontext);
// Check if the current user has permission.
if (!can_delete_course($courseid)) {
$warnings[] = array('item' => 'course', 'itemid' => $courseid, 'warningcode' => 'cannotdeletecourse', 'message' => 'You do not have the permission to delete this course' . $courseid);
continue;
}
if (delete_course($course, false) === false) {
$warnings[] = array('item' => 'course', 'itemid' => $courseid, 'warningcode' => 'cannotdeletecategorycourse', 'message' => 'Course ' . $courseid . ' failed to be deleted');
continue;
}
}
fix_course_sortorder();
return array('warnings' => $warnings);
}
$visible = 1;
}
if ($course) {
if (!set_field("course", "visible", $visible, "id", $course->id)) {
notify("Could not update that course!");
}
}
}
/// Move a course up or down
if ((!empty($moveup) or !empty($movedown)) and confirm_sesskey()) {
require_capability('moodle/category:update', $context);
$movecourse = NULL;
$swapcourse = NULL;
// ensure the course order has no gaps
// and isn't at 0
fix_course_sortorder($category->id);
// we are going to need to know the range
$max = get_record_sql('SELECT MAX(sortorder) AS max, 1
FROM ' . $CFG->prefix . 'course WHERE category=' . $category->id);
$max = $max->max + 100;
if (!empty($moveup)) {
$movecourse = get_record('course', 'id', $moveup);
$swapcourse = get_record('course', 'category', $category->id, 'sortorder', $movecourse->sortorder - 1);
} else {
$movecourse = get_record('course', 'id', $movedown);
$swapcourse = get_record('course', 'category', $category->id, 'sortorder', $movecourse->sortorder + 1);
}
if ($swapcourse and $movecourse) {
// Renumber everything for robustness
begin_sql();
if (!(set_field("course", "sortorder", $max, "id", $swapcourse->id) && set_field("course", "sortorder", $swapcourse->sortorder, "id", $movecourse->id) && set_field("course", "sortorder", $movecourse->sortorder, "id", $swapcourse->id))) {
function create_course($course, $skip_fix_course_sortorder = 0)
{
global $CFG;
// define a template
if (!empty($CFG->enrol_db_template)) {
$template = get_record("course", 'shortname', $CFG->enrol_db_template);
$template = (array) $template;
} else {
$site = get_site();
$template = array('startdate' => time() + 3600 * 24, 'summary' => get_string("defaultcoursesummary"), 'format' => "weeks", 'password' => "", 'guest' => 0, 'numsections' => 10, 'idnumber' => '', 'cost' => '', 'newsitems' => 5, 'showgrades' => 1, 'groupmode' => 0, 'groupmodeforce' => 0, 'student' => $site->student, 'students' => $site->students, 'teacher' => $site->teacher, 'teachers' => $site->teachers);
}
// overlay template
foreach (array_keys($template) as $key) {
if (empty($course->{$key})) {
$course->{$key} = $template[$key];
}
}
$course->category = 1;
// the misc 'catch-all' category
if (!empty($CFG->enrol_db_category)) {
//category = 0 or undef will break moodle
$course->category = $CFG->enrol_db_category;
}
// define the sortorder
$sort = get_field_sql('SELECT COALESCE(MAX(sortorder)+1, 100) AS max ' . ' FROM ' . $CFG->prefix . 'course ' . ' WHERE category=' . $course->category);
$course->sortorder = $sort;
// override with local data
$course->startdate = time() + 3600 * 24;
$course->timecreated = time();
$course->visible = 1;
// clear out id just in case
unset($course->id);
// truncate a few key fields
$course->idnumber = substr($course->idnumber, 0, 100);
$course->shortname = substr($course->shortname, 0, 100);
// store it and log
if ($newcourseid = insert_record("course", addslashes_object($course))) {
// Set up new course
$section = NULL;
$section->course = $newcourseid;
// Create a default section.
$section->section = 0;
$section->id = insert_record("course_sections", $section);
$page = page_create_object(PAGE_COURSE_VIEW, $newcourseid);
blocks_repopulate_page($page);
// Return value no
if (!$skip_fix_course_sortorder) {
fix_course_sortorder();
}
add_to_log($newcourseid, "course", "new", "view.php?id={$newcourseid}", "enrol/database auto-creation");
} else {
trigger_error("Could not create new course {$extcourse} from from database");
notify("Serious Error! Could not create the new course!");
return false;
}
return $newcourseid;
}
/**
* Changes the sort order of courses in a category so that the first course appears after the second.
*
* @param int|stdClass $courseorid The course to focus on.
* @param int $moveaftercourseid The course to shifter after or 0 if you want it to be the first course in the category.
* @return bool
*/
function course_change_sortorder_after_course($courseorid, $moveaftercourseid)
{
global $DB;
if (!is_object($courseorid)) {
$course = get_course($courseorid);
} else {
$course = $courseorid;
}
if ((int) $moveaftercourseid === 0) {
// We've moving the course to the start of the queue.
$sql = 'SELECT sortorder
FROM {course}
WHERE category = :categoryid
ORDER BY sortorder';
$params = array('categoryid' => $course->category);
$sortorder = $DB->get_field_sql($sql, $params, IGNORE_MULTIPLE);
$sql = 'UPDATE {course}
SET sortorder = sortorder + 1
WHERE category = :categoryid
AND id <> :id';
$params = array('categoryid' => $course->category, 'id' => $course->id);
$DB->execute($sql, $params);
$DB->set_field('course', 'sortorder', $sortorder, array('id' => $course->id));
} else {
if ($course->id === $moveaftercourseid) {
// They're the same - moronic.
debugging("Invalid move after course given.", DEBUG_DEVELOPER);
return false;
} else {
// Moving this course after the given course. It could be before it could be after.
$moveaftercourse = get_course($moveaftercourseid);
if ($course->category !== $moveaftercourse->category) {
debugging("Cannot re-order courses. The given courses do not belong to the same category.", DEBUG_DEVELOPER);
return false;
}
// Increment all courses in the same category that are ordered after the moveafter course.
// This makes a space for the course we're moving.
$sql = 'UPDATE {course}
SET sortorder = sortorder + 1
WHERE category = :categoryid
AND sortorder > :sortorder';
$params = array('categoryid' => $moveaftercourse->category, 'sortorder' => $moveaftercourse->sortorder);
$DB->execute($sql, $params);
$DB->set_field('course', 'sortorder', $moveaftercourse->sortorder + 1, array('id' => $course->id));
}
}
fix_course_sortorder();
cache_helper::purge_by_event('changesincourse');
return true;
}
/**
* Update a course and return true or false
*
* @param object $data - all the data needed for an entry in the 'course' table
*/
function update_course($data)
{
global $USER, $CFG;
// Preprocess allowed mods
$allowedmods = empty($data->allowedmods) ? array() : $data->allowedmods;
unset($data->allowedmods);
// Normal teachers can't change setting
if (!has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
unset($data->restrictmodules);
}
$movecat = false;
$oldcourse = get_record('course', 'id', $data->id);
// should not fail, already tested above
if (!has_capability('moodle/course:create', get_context_instance(CONTEXT_COURSECAT, $oldcourse->category)) or !has_capability('moodle/course:create', get_context_instance(CONTEXT_COURSECAT, $data->category))) {
// can not move to new category, keep the old one
unset($data->category);
} elseif ($oldcourse->category != $data->category) {
$movecat = true;
}
// Update with the new data
if (update_record('course', $data)) {
$course = get_record('course', 'id', $data->id);
add_to_log($course->id, "course", "update", "edit.php?id={$course->id}", $course->id);
// "Admins" can change allowed mods for a course
if (has_capability('moodle/site:config', get_context_instance(CONTEXT_SYSTEM))) {
update_restricted_mods($course, $allowedmods);
}
if ($movecat) {
$context = get_context_instance(CONTEXT_COURSE, $course->id);
$newparent = get_context_instance(CONTEXT_COURSECAT, $course->category);
context_moved($context, $newparent);
}
fix_course_sortorder();
// Test for and remove blocks which aren't appropriate anymore
$page = page_create_object(PAGE_COURSE_VIEW, $course->id);
blocks_remove_inappropriate($page);
// Save any custom role names.
save_local_role_names($course->id, $data);
// Trigger events
events_trigger('course_updated', $course);
return true;
}
return false;
}
function main_upgrade($oldversion = 0)
{
global $CFG, $THEME, $db;
$result = true;
if ($oldversion == 0) {
execute_sql("\n CREATE TABLE `config` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `name` varchar(255) NOT NULL default '',\n `value` varchar(255) NOT NULL default '',\n PRIMARY KEY (`id`),\n UNIQUE KEY `name` (`name`)\n ) COMMENT='Moodle configuration variables';");
notify("Created a new table 'config' to hold configuration data");
}
if ($oldversion < 2002073100) {
execute_sql(" DELETE FROM `modules` WHERE `name` = 'chat' ");
}
if ($oldversion < 2002080200) {
execute_sql(" ALTER TABLE `modules` DROP `fullname` ");
execute_sql(" ALTER TABLE `modules` DROP `search` ");
}
if ($oldversion < 2002080300) {
execute_sql(" ALTER TABLE `log_display` CHANGE `table` `mtable` VARCHAR( 20 ) NOT NULL ");
execute_sql(" ALTER TABLE `user_teachers` CHANGE `authority` `authority` TINYINT( 3 ) DEFAULT '3' NOT NULL ");
}
if ($oldversion < 2002082100) {
execute_sql(" ALTER TABLE `course` CHANGE `guest` `guest` TINYINT(2) UNSIGNED DEFAULT '0' NOT NULL ");
}
if ($oldversion < 2002082101) {
execute_sql(" ALTER TABLE `user` ADD `maildisplay` TINYINT(2) UNSIGNED DEFAULT '2' NOT NULL AFTER `mailformat` ");
}
if ($oldversion < 2002090100) {
execute_sql(" ALTER TABLE `course_sections` CHANGE `summary` `summary` TEXT NOT NULL ");
}
if ($oldversion < 2002090701) {
execute_sql(" ALTER TABLE `user_teachers` CHANGE `authority` `authority` TINYINT( 10 ) DEFAULT '3' NOT NULL ");
execute_sql(" ALTER TABLE `user_teachers` ADD `role` VARCHAR(40) NOT NULL AFTER `authority` ");
}
if ($oldversion < 2002090800) {
execute_sql(" ALTER TABLE `course` ADD `teachers` VARCHAR( 100 ) DEFAULT 'Teachers' NOT NULL AFTER `teacher` ");
execute_sql(" ALTER TABLE `course` ADD `students` VARCHAR( 100 ) DEFAULT 'Students' NOT NULL AFTER `student` ");
}
if ($oldversion < 2002091000) {
execute_sql(" ALTER TABLE `user` CHANGE `personality` `secret` VARCHAR( 15 ) NOT NULL DEFAULT '' ");
}
if ($oldversion < 2002091400) {
execute_sql(" ALTER TABLE `user` ADD `lang` VARCHAR( 3 ) DEFAULT 'en' NOT NULL AFTER `country` ");
}
if ($oldversion < 2002091900) {
notify("Most Moodle configuration variables have been moved to the database and can now be edited via the admin page.");
notify("Although it is not vital that you do so, you might want to edit <U>config.php</U> and remove all the unused settings (except the database, URL and directory definitions). See <U>config-dist.php</U> for an example of how your new slim config.php should look.");
}
if ($oldversion < 2002092000) {
execute_sql(" ALTER TABLE `user` CHANGE `lang` `lang` VARCHAR(5) DEFAULT 'en' NOT NULL ");
}
if ($oldversion < 2002092100) {
execute_sql(" ALTER TABLE `user` ADD `deleted` TINYINT(1) UNSIGNED DEFAULT '0' NOT NULL AFTER `confirmed` ");
}
if ($oldversion < 2002101001) {
execute_sql(" ALTER TABLE `user` ADD `htmleditor` TINYINT(1) UNSIGNED DEFAULT '1' NOT NULL AFTER `maildisplay` ");
}
if ($oldversion < 2002101701) {
execute_sql(" ALTER TABLE `reading` RENAME `resource` ");
// Small line with big consequences!
execute_sql(" DELETE FROM `log_display` WHERE module = 'reading'");
execute_sql(" INSERT INTO log_display (module, action, mtable, field) VALUES ('resource', 'view', 'resource', 'name') ");
execute_sql(" UPDATE log SET module = 'resource' WHERE module = 'reading' ");
execute_sql(" UPDATE modules SET name = 'resource' WHERE name = 'reading' ");
}
if ($oldversion < 2002102503) {
execute_sql(" ALTER TABLE `course` ADD `modinfo` TEXT NOT NULL AFTER `format` ");
require_once "{$CFG->dirroot}/mod/forum/lib.php";
require_once "{$CFG->dirroot}/course/lib.php";
if (!($module = get_record("modules", "name", "forum"))) {
notify("Could not find forum module!!");
return false;
}
// First upgrade the site forums
if ($site = get_site()) {
print_heading("Making News forums editable for main site (moving to section 1)...");
if ($news = forum_get_course_forum($site->id, "news")) {
$mod->course = $site->id;
$mod->module = $module->id;
$mod->instance = $news->id;
$mod->section = 1;
if (!($mod->coursemodule = add_course_module($mod))) {
notify("Could not add a new course module to the site");
return false;
}
if (!($sectionid = add_mod_to_section($mod))) {
notify("Could not add the new course module to that section");
return false;
}
if (!set_field("course_modules", "section", $sectionid, "id", $mod->coursemodule)) {
notify("Could not update the course module with the correct section");
return false;
}
}
}
// Now upgrade the courses.
if ($courses = get_records_sql("SELECT * FROM course WHERE category > 0")) {
print_heading("Making News and Social forums editable for each course (moving to section 0)...");
foreach ($courses as $course) {
if ($course->format == "social") {
// we won't touch them
continue;
}
if ($news = forum_get_course_forum($course->id, "news")) {
$mod->course = $course->id;
$mod->module = $module->id;
$mod->instance = $news->id;
$mod->section = 0;
if (!($mod->coursemodule = add_course_module($mod))) {
notify("Could not add a new course module to the course '" . format_string($course->fullname) . "'");
return false;
}
if (!($sectionid = add_mod_to_section($mod))) {
notify("Could not add the new course module to that section");
return false;
}
if (!set_field("course_modules", "section", $sectionid, "id", $mod->coursemodule)) {
notify("Could not update the course module with the correct section");
return false;
}
}
if ($social = forum_get_course_forum($course->id, "social")) {
$mod->course = $course->id;
$mod->module = $module->id;
$mod->instance = $social->id;
$mod->section = 0;
if (!($mod->coursemodule = add_course_module($mod))) {
notify("Could not add a new course module to the course '" . format_string($course->fullname) . "'");
return false;
}
if (!($sectionid = add_mod_to_section($mod))) {
notify("Could not add the new course module to that section");
return false;
}
if (!set_field("course_modules", "section", $sectionid, "id", $mod->coursemodule)) {
notify("Could not update the course module with the correct section");
return false;
}
}
}
}
}
if ($oldversion < 2002111003) {
execute_sql(" ALTER TABLE `course` ADD `modinfo` TEXT NOT NULL AFTER `format` ");
if ($courses = get_records_sql("SELECT * FROM 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 < 2002111100) {
print_simple_box_start("CENTER", "", "#FFCCCC");
echo "<FONT SIZE=+1>";
echo "<P>Changes have been made to all built-in themes, to add the new popup navigation menu.";
echo "<P>If you have customised themes, you will need to edit theme/xxxx/header.html as follows:";
echo "<UL><LI>Change anywhere it says <B>\$" . "button</B> to say <B>\$" . "menu</B>";
echo "<LI>Add <B>\$" . "button</B> elsewhere (eg at the end of the navigation bar)</UL>";
echo "<P>See the standard themes for examples, eg: theme/standard/header.html";
print_simple_box_end();
}
if ($oldversion < 2002111200) {
execute_sql(" ALTER TABLE `course` ADD `showrecent` TINYINT(5) UNSIGNED DEFAULT '1' NOT NULL AFTER `numsections` ");
}
if ($oldversion < 2002111400) {
// Rebuild all course caches, because some may not be done in new installs (eg site page)
if ($courses = get_records_sql("SELECT * FROM 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 < 2002112000) {
set_config("guestloginbutton", 1);
}
if ($oldversion < 2002122300) {
execute_sql("ALTER TABLE `log` CHANGE `user` `userid` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
execute_sql("ALTER TABLE `user_admins` CHANGE `user` `userid` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
execute_sql("ALTER TABLE `user_students` CHANGE `user` `userid` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
execute_sql("ALTER TABLE `user_teachers` CHANGE `user` `userid` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
execute_sql("ALTER TABLE `user_students` CHANGE `start` `timestart` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
execute_sql("ALTER TABLE `user_students` CHANGE `end` `timeend` INT(10) UNSIGNED DEFAULT '0' NOT NULL ");
}
if ($oldversion < 2002122700) {
if (!record_exists("log_display", "module", "user", "action", "view")) {
execute_sql("INSERT INTO {$CFG->prefix}log_display (module, action, mtable, field) VALUES ('user', 'view', 'user', 'CONCAT(firstname,' ',lastname)') ");
}
}
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);
}
if ($oldversion < 2003012200) {
// execute_sql(" ALTER TABLE `log_display` CHANGE `module` `module` VARCHAR( 20 ) NOT NULL ");
// Commented out - see below where it's done properly
}
if ($oldversion < 2003032500) {
modify_database("", "CREATE TABLE `prefix_user_coursecreators` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `userid` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `id` (`id`)\n ) TYPE=MyISAM COMMENT='One record per course creator';");
}
if ($oldversion < 2003032602) {
// Redoing it because of no prefix last time
execute_sql(" ALTER TABLE `{$CFG->prefix}log_display` CHANGE `module` `module` VARCHAR( 20 ) NOT NULL ");
// Add some indexes for speed
execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX(course) ");
execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX(userid) ");
}
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 < 2003042600) {
/// Some more indexes - we need all the help we can get on the logs
//execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX(module) ");
//execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX(action) ");
}
if ($oldversion < 2003042700) {
/// Changing to multiple indexes
execute_sql(" ALTER TABLE `{$CFG->prefix}log` DROP INDEX module ", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}log` DROP INDEX action ", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}log` DROP INDEX course ", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}log` DROP INDEX userid ", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX coursemoduleaction (course,module,action) ");
execute_sql(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX courseuserid (course,userid) ");
}
if ($oldversion < 2003042801) {
execute_sql("CREATE TABLE `{$CFG->prefix}course_display` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `course` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n `display` int(10) NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `id` (`id`),\n KEY `courseuserid` (course,userid)\n ) TYPE=MyISAM COMMENT='Stores info about how to display the course'");
}
if ($oldversion < 2003050400) {
table_column("course_sections", "", "visible", "integer", "1", "unsigned", "1", "", "");
}
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 has been removed (it will be replaced later by the workshop module). 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(" ALTER TABLE `{$CFG->prefix}log` ADD INDEX timecoursemoduleaction (time,course,module,action) ");
execute_sql(" ALTER TABLE `{$CFG->prefix}user_students` ADD INDEX courseuserid (course,userid) ");
execute_sql(" ALTER TABLE `{$CFG->prefix}user_teachers` ADD INDEX courseuserid (course,userid) ");
}
if ($oldversion < 2003072803) {
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) {
table_column("course_categories", "courseorder", "courseorder", "integer", "10", "unsigned");
table_column("course", "", "sortorder", "integer", "10", "unsigned", "0", "", "category");
}
if ($oldversion < 2003080700) {
notify("Cleaning up categories and course ordering...");
fix_course_sortorder();
}
if ($oldversion < 2003081001) {
table_column("course", "format", "format", "varchar", "10", "", "topics");
}
if ($oldversion < 2003081500) {
// print_simple_box("Some important changes have been made to how course creators work. Formerly, they could create new courses and assign teachers, and teachers could edit courses. Now, ordinary teachers can no longer edit courses - they <b>need to be a teacher of a course AND a course creator</b>. A new site-wide configuration variable allows you to choose whether to allow course creators to create new courses as well (by default this is off). <p>The following update will automatically convert all your existing teachers into course creators, to maintain backward compatibility. Make sure you look at your upgraded site carefully and understand these new changes.", "center", "50%", "$THEME->cellheading", "20", "noticebox");
// $count = 0;
// $errorcount = 0;
// if ($teachers = get_records("user_teachers")) {
// foreach ($teachers as $teacher) {
// if (! record_exists("user_coursecreators", "userid", $teacher->userid)) {
// $creator = NULL;
// $creator->userid = $teacher->userid;
// if (!insert_record("user_coursecreators", $creator)) {
// $errorcount++;
// } else {
// $count++;
// }
// }
// }
// }
// print_simple_box("$count teachers were upgraded to course creators (with $errorcount errors)", "center", "50%", "$THEME->cellheading", "20", "noticebox");
}
if ($oldversion < 2003081501) {
execute_sql(" CREATE TABLE `{$CFG->prefix}scale` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n `name` varchar(255) NOT NULL default '',\n `scale` text NOT NULL,\n `description` text NOT NULL,\n `timemodified` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (id)\n ) TYPE=MyISAM COMMENT='Defines grading scales'");
}
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 < 2003082001) {
table_column("course", "", "showgrades", "integer", "2", "unsigned", "1", "", "format");
}
if ($oldversion < 2003082101) {
execute_sql(" ALTER TABLE `{$CFG->prefix}course` ADD INDEX category (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 < 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) {
modify_database("", "CREATE TABLE `prefix_groups` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `name` varchar(254) NOT NULL default '',\n `description` text NOT NULL,\n `lang` varchar(10) NOT NULL default 'en',\n `picture` int(10) unsigned NOT NULL default '0',\n `timecreated` int(10) unsigned NOT NULL default '0',\n `timemodified` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`)\n ) TYPE=MyISAM COMMENT='Each record is a group in a course.'; ");
modify_database("", "CREATE TABLE `prefix_groups_members` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `groupid` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n `timeadded` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `groupid` (`groupid`)\n ) TYPE=MyISAM COMMENT='Lists memberships of users in groups'; ");
}
if ($oldversion < 2003121800) {
table_column("course", "modinfo", "modinfo", "longtext", "", "", "");
}
if ($oldversion < 2003122600) {
table_column("course", "", "groupmode", "integer", "4", "unsigned", "0", "", "showreports");
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` int(10) unsigned NOT NULL auto_increment,\n `name` varchar(255) NOT NULL default '',\n `description` text NOT NULL,\n `courseid` int(10) unsigned NOT NULL default '0',\n `groupid` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n `modulename` varchar(20) NOT NULL default '',\n `instance` int(10) unsigned NOT NULL default '0',\n `eventtype` varchar(20) NOT NULL default '',\n `timestart` int(10) unsigned NOT NULL default '0',\n `timeduration` int(10) unsigned NOT NULL default '0',\n `timemodified` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `id` (`id`),\n KEY `courseid` (`courseid`),\n KEY `userid` (`userid`)\n ) TYPE=MyISAM COMMENT='For everything with a time associated to it'; ");
}
if ($oldversion < 2004012800) {
modify_database("", "CREATE TABLE `prefix_user_preferences` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `userid` int(10) unsigned NOT NULL default '0',\n `name` varchar(50) NOT NULL default '',\n `value` varchar(255) NOT NULL default '',\n PRIMARY KEY (`id`),\n UNIQUE KEY `id` (`id`),\n KEY `useridname` (userid,name)\n ) TYPE=MyISAM COMMENT='Allows modules to store arbitrary user preferences'; ");
}
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` int(10) unsigned NOT NULL auto_increment,\n `md5key` varchar(32) NOT NULL default '',\n `formattedtext` longtext NOT NULL,\n `timemodified` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `md5key` (`md5key`)\n ) TYPE=MyISAM COMMENT='For storing temporary copies of processed texts';");
}
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` int(10) unsigned NOT NULL auto_increment,\n `filter` varchar(32) NOT NULL default '',\n `version` int(10) unsigned NOT NULL default '0',\n `md5key` varchar(32) NOT NULL default '',\n `rawtext` text NOT NULL,\n `timemodified` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `filtermd5key` (filter,md5key)\n ) TYPE=MyISAM COMMENT='For keeping information about cached data';");
}
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");
}
if ($oldversion < 2004042702) {
/// add a format field for the description
table_column("event", "", "format", "integer", "4", "unsigned", "0", "not null", "description");
}
if ($oldversion < 2004042900) {
execute_sql(" ALTER TABLE `{$CFG->prefix}course` DROP `showrecent` ");
}
if ($oldversion < 2004043001) {
/// Change hiddentopics to hiddensections
table_column("course", "hiddentopics", "hiddensections", "integer", "2", "unsigned", "0", "not null");
}
if ($oldversion < 2004050400) {
/// add a visible field for events
table_column("event", "", "visible", "tinyint", "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', 'tinyint', '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 < 2004082200) {
// Making admins teachers on site course
$site = get_site();
$admins = get_admins();
foreach ($admins as $admin) {
add_teacher($admin->id, $site->id);
}
}
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');
}
/* Commented out unused guid-field code
if ($oldversion < 2004090300) { // Add guid-field used in user syncronization
table_column('user', '', 'guid', 'varchar', '128', '', '', '', 'auth');
execute_sql("ALTER TABLE {$CFG->prefix}user ADD INDEX authguid (auth, guid)");
}
*/
if ($oldversion < 2004091900) {
// modify idnumber to hold longer values
table_column('user', 'idnumber', 'idnumber', 'varchar', '64', '', '', '', '');
execute_sql("ALTER TABLE {$CFG->prefix}user DROP INDEX user_idnumber", false);
// added in case of conflicts with upgrade from 14stable
execute_sql("ALTER TABLE {$CFG->prefix}user DROP INDEX user_auth", false);
// added in case of conflicts with upgrade from 14stable
execute_sql("ALTER TABLE {$CFG->prefix}user ADD INDEX idnumber (idnumber)");
execute_sql("ALTER TABLE {$CFG->prefix}user ADD INDEX auth (auth)");
}
if ($oldversion < 2004093001) {
// add new table for sessions storage
execute_sql(" CREATE TABLE `{$CFG->prefix}sessions` (\n `sesskey` char(32) NOT null,\n `expiry` int(11) unsigned NOT null,\n `expireref` varchar(64),\n `data` text NOT null,\n PRIMARY KEY (`sesskey`), \n KEY (`expiry`) \n ) TYPE=MyISAM COMMENT='Optional database session storage, not used by default';");
}
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(" ALTER TABLE `{$CFG->prefix}course` DROP INDEX idnumber;", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}course` DROP INDEX shortname;", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}user_students` DROP INDEX userid;", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}user_teachers` DROP INDEX userid;", false);
execute_sql(" ALTER TABLE `{$CFG->prefix}course` ADD INDEX idnumber (idnumber);");
execute_sql(" ALTER TABLE `{$CFG->prefix}course` ADD INDEX shortname (shortname);");
execute_sql(" ALTER TABLE `{$CFG->prefix}user_students` ADD INDEX userid (userid);");
execute_sql(" ALTER TABLE `{$CFG->prefix}user_teachers` ADD INDEX userid (userid);");
}
if ($oldversion < 2004111700) {
// add an index to event for timestart and timeduration. - drop them first silently to avoid conflicts when upgrading.
execute_sql("ALTER TABLE {$CFG->prefix}event DROP INDEX timestart;", false);
execute_sql("ALTER TABLE {$CFG->prefix}event DROP INDEX timeduration;", false);
modify_database('', 'ALTER TABLE prefix_event ADD INDEX timestart (timestart);');
modify_database('', 'ALTER TABLE prefix_event ADD INDEX timeduration (timeduration);');
}
if ($oldversion < 2004111700) {
//add indexes on modules and course_modules. - drop them first silently to avoid conflicts when upgrading.
execute_sql("ALTER TABLE {$CFG->prefix}course_modules drop key visible;", false);
execute_sql("ALTER TABLE {$CFG->prefix}course_modules drop key course;", false);
execute_sql("ALTER TABLE {$CFG->prefix}course_modules drop key module;", false);
execute_sql("ALTER TABLE {$CFG->prefix}course_modules drop key instance;", false);
execute_sql("ALTER TABLE {$CFG->prefix}course_modules drop key deleted;", false);
execute_sql("ALTER TABLE {$CFG->prefix}modules drop key name;", false);
modify_database('', 'ALTER TABLE prefix_course_modules add key visible(visible);');
modify_database('', 'ALTER TABLE prefix_course_modules add key course(course);');
modify_database('', 'ALTER TABLE prefix_course_modules add key module(module);');
modify_database('', 'ALTER TABLE prefix_course_modules add key instance (instance);');
modify_database('', 'ALTER TABLE prefix_course_modules add key deleted (deleted);');
modify_database('', 'ALTER TABLE prefix_modules add key name(name);');
}
if ($oldversion < 2004111700) {
// add an index on the groups_members table. - drop them first silently to avoid conflicts when upgrading.
execute_sql("ALTER TABLE {$CFG->prefix}groups_members DROP INDEX userid;", false);
modify_database('', 'ALTER TABLE prefix_groups_members ADD INDEX userid (userid);');
}
if ($oldversion < 2004111700) {
// add an index on user students timeaccess (used for sorting)- drop them first silently to avoid conflicts when upgrading
execute_sql("ALTER TABLE {$CFG->prefix}user_students DROP INDEX timeaccess;", false);
modify_database('', 'ALTER TABLE prefix_user_students ADD INDEX timeaccess (timeaccess);');
}
if ($oldversion < 2004111700) {
// add indexes on faux-foreign keys. - drop them first silently to avoid conflicts when upgrading.
execute_sql("ALTER TABLE {$CFG->prefix}scale DROP INDEX courseid;", false);
execute_sql("ALTER TABLE {$CFG->prefix}user_admins DROP INDEX userid;", false);
execute_sql("ALTER TABLE {$CFG->prefix}user_coursecreators DROP INDEX userid;", false);
modify_database('', 'ALTER TABLE prefix_scale ADD INDEX courseid (courseid);');
modify_database('', 'ALTER TABLE prefix_user_admins ADD INDEX userid (userid);');
modify_database('', 'ALTER TABLE prefix_user_coursecreators ADD INDEX userid (userid);');
}
if ($oldversion < 2004111700) {
// replace index on course
fix_course_sortorder(0, 0, 1);
execute_sql("ALTER TABLE `{$CFG->prefix}course` DROP KEY category", false);
execute_sql("ALTER TABLE `{$CFG->prefix}course` DROP KEY category_sortorder;", false);
modify_database('', "ALTER TABLE `prefix_course` ADD UNIQUE KEY category_sortorder(category,sortorder)");
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_deleted_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_confirmed_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_firstname_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_lastname_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_city_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_country_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_lastaccess_idx;", false);
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_deleted_idx (deleted)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_confirmed_idx (confirmed)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_firstname_idx (firstname)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_lastname_idx (lastname)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_city_idx (city)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_country_idx (country)");
modify_database("", "ALTER TABLE `prefix_user` ADD INDEX prefix_user_lastaccess_idx (lastaccess)");
}
if ($oldversion < 2004111700) {
// one more index for email (for sorting)
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_email_idx;", false);
modify_database('', 'ALTER TABLE `prefix_user` ADD INDEX prefix_user_email_idx (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');
execute_sql("ALTER TABLE `{$CFG->prefix}user_students` ADD INDEX enrol (enrol);");
execute_sql("ALTER TABLE `{$CFG->prefix}user_teachers` ADD INDEX enrol (enrol);");
}
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();
modify_database('', 'ALTER TABLE prefix_user_students DROP INDEX courseuserid;');
modify_database('', 'ALTER TABLE prefix_user_students ADD UNIQUE INDEX courseuserid(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();
modify_database('', 'ALTER TABLE prefix_user_teachers DROP INDEX courseuserid;');
modify_database('', 'ALTER TABLE prefix_user_teachers ADD UNIQUE INDEX courseuserid(course,userid);');
}
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 < 2004121500) {
modify_database('', "CREATE TABLE prefix_dst_preset (\n id int(10) NOT NULL auto_increment,\n name char(48) default '' NOT NULL,\n \n apply_offset tinyint(3) default '0' NOT NULL,\n \n activate_index tinyint(1) default '1' NOT NULL,\n activate_day tinyint(1) default '1' NOT NULL,\n activate_month tinyint(2) default '1' NOT NULL,\n activate_time char(5) default '03:00' NOT NULL,\n \n deactivate_index tinyint(1) default '1' NOT NULL,\n deactivate_day tinyint(1) default '1' NOT NULL,\n deactivate_month tinyint(2) default '2' NOT NULL,\n deactivate_time char(5) default '03:00' NOT NULL,\n \n last_change int(10) default '0' NOT NULL,\n next_change int(10) default '0' NOT NULL,\n current_offset tinyint(3) default '0' NOT NULL,\n \n PRIMARY KEY (id))");
}
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);
modify_database('', "CREATE TABLE `prefix_message` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `useridfrom` int(10) NOT NULL default '0',\n `useridto` int(10) NOT NULL default '0',\n `message` text NOT NULL,\n `timecreated` int(10) NOT NULL default '0',\n `messagetype` varchar(50) NOT NULL default '',\n PRIMARY KEY (`id`),\n KEY `useridfrom` (`useridfrom`),\n KEY `useridto` (`useridto`)\n ) TYPE=MyISAM COMMENT='Stores all unread messages';");
modify_database('', "CREATE TABLE `prefix_message_read` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `useridfrom` int(10) NOT NULL default '0',\n `useridto` int(10) NOT NULL default '0',\n `message` text NOT NULL,\n `timecreated` int(10) NOT NULL default '0',\n `timeread` int(10) NOT NULL default '0',\n `messagetype` varchar(50) NOT NULL default '',\n `mailed` tinyint(1) NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `useridfrom` (`useridfrom`),\n KEY `useridto` (`useridto`)\n ) TYPE=MyISAM COMMENT='Stores all messages that have been read';");
modify_database('', "CREATE TABLE `prefix_message_contacts` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `userid` int(10) unsigned NOT NULL default '0',\n `contactid` int(10) unsigned NOT NULL default '0',\n `blocked` tinyint(1) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `usercontact` (`userid`,`contactid`)\n ) TYPE=MyISAM COMMENT='Maintains lists of relationships between users';");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'write', 'user', 'CONCAT(firstname,\" \",lastname)'); ");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'read', 'user', 'CONCAT(firstname,\" \",lastname)'); ");
}
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', 'CONCAT(firstname,\" \",lastname)'); ");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'remove contact', 'user', 'CONCAT(firstname,\" \",lastname)'); ");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'block contact', 'user', 'CONCAT(firstname,\" \",lastname)'); ");
modify_database('', "INSERT INTO prefix_log_display (module, action, mtable, field) VALUES ('message', 'unblock contact', 'user', 'CONCAT(firstname,\" \",lastname)'); ");
}
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` int(1) unsigned NOT NULL auto_increment,
`parent_course` int(10) NOT NULL default 0,
`child_course` int(10) NOT NULL default 0,
PRIMARY KEY (`id`),
KEY `parent_course` (parent_course),
KEY `child_course` (child_course)
);");
// add flag to course field
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) {
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
// add new table for meta courses.
modify_database("", "CREATE TABLE `prefix_course_meta` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `parent_course` int(10) NOT NULL default 0,\n `child_course` int(10) NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `parent_course` (parent_course),\n KEY `child_course` (child_course)\n );");
// add flag to course field
table_column('course', '', 'metacourse', 'integer', '1', '', '0', 'not null');
}
if ($oldversion < 2005012800) {
// fix a typo (int 1 becomes int 10)
table_column('course_meta', 'id', 'id', 'integer', '10', '', '0', 'not null');
}
if ($oldversion < 2005020100) {
fix_course_sortorder(0, 1, 1);
}
if ($oldversion < 2005020101) {
// hopefully this is the LAST TIME we need to do this ;)
if ($rows = count_records("course_meta")) {
// we need to upgrade
modify_database("", "CREATE TABLE `prefix_course_meta_tmp` (\n `parent_course` int(10) NOT NULL default 0,\n `child_course` int(10) NOT NULL default 0);");
execute_sql("INSERT INTO {$CFG->prefix}course_meta_tmp (parent_course,child_course) \n SELECT {$CFG->prefix}course_meta.parent_course, {$CFG->prefix}course_meta.child_course\n FROM {$CFG->prefix}course_meta");
$insertafter = true;
}
execute_sql("DROP TABLE {$CFG->prefix}course_meta");
modify_database("", "CREATE TABLE `prefix_course_meta` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `parent_course` int(10) unsigned NOT NULL default 0,\n `child_course` int(10) unsigned NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `parent_course` (parent_course),\n KEY `child_course` (child_course));");
if (!empty($insertafter)) {
execute_sql("INSERT INTO {$CFG->prefix}course_meta (parent_course,child_course) \n SELECT {$CFG->prefix}course_meta_tmp.parent_course, {$CFG->prefix}course_meta_tmp.child_course\n FROM {$CFG->prefix}course_meta_tmp");
execute_sql("DROP TABLE {$CFG->prefix}course_meta_tmp");
}
}
if ($oldversion < 2005020800) {
// Expand module column to max 20 chars
table_column('log', 'module', 'module', 'varchar', '20', '', '', 'not null');
}
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 < 2005021600) {
// course.idnumber should be varchar(100)
table_column('course', 'idnumber', 'idnumber', 'varchar', '100', '', '', '', '');
}
if ($oldversion < 2005021700) {
table_column('user', '', 'dstpreset', 'int', '10', '', '0', 'not null', 'timezone');
}
if ($oldversion < 2005021800) {
// For database debugging, not for normal use
modify_database("", " CREATE TABLE `adodb_logsql` (\n `created` datetime 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) {
// Add more visible digits to the fields
table_column('dst_preset', 'activate_index', 'activate_index', 'tinyint', '2', '', '0', 'not null');
table_column('dst_preset', 'activate_day', 'activate_day', 'tinyint', '2', '', '0', 'not null');
// Add family and year fields
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` int(10) NOT NULL auto_increment,\n `name` varchar(100) NOT NULL default '',\n `year` int(11) NOT NULL default '0',\n `rule` varchar(20) NOT NULL default '',\n `gmtoff` int(11) NOT NULL default '0',\n `dstoff` int(11) NOT NULL default '0',\n `dst_month` tinyint(2) NOT NULL default '0',\n `dst_startday` tinyint(3) NOT NULL default '0',\n `dst_weekday` tinyint(3) NOT NULL default '0',\n `dst_skipweeks` tinyint(3) NOT NULL default '0',\n `dst_time` varchar(5) NOT NULL default '00:00',\n `std_month` tinyint(2) NOT NULL default '0',\n `std_startday` tinyint(3) NOT NULL default '0',\n `std_weekday` tinyint(3) NOT NULL default '0',\n `std_skipweeks` tinyint(3) NOT NULL default '0',\n `std_time` varchar(5) NOT NULL default '00:00',\n PRIMARY KEY (`id`)\n ) TYPE=MyISAM COMMENT='Rules for calculating local wall clock time for users';");
}
if ($oldversion < 2005032800) {
execute_sql("CREATE TABLE `{$CFG->prefix}grade_category` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `name` varchar(64) NOT NULL default '',\n `courseid` int(10) unsigned NOT NULL default '0',\n `drop_x_lowest` int(10) unsigned NOT NULL default '0',\n `bonus_points` int(10) unsigned NOT NULL default '0',\n `hidden` int(10) unsigned NOT NULL default '0',\n `weight` decimal(4,2) NOT NULL default '0.00',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`)\n ) TYPE=MyISAM ;");
execute_sql("CREATE TABLE `{$CFG->prefix}grade_exceptions` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `grade_itemid` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`)\n ) TYPE=MyISAM ;");
execute_sql("CREATE TABLE `{$CFG->prefix}grade_item` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `category` int(10) unsigned NOT NULL default '0',\n `modid` int(10) unsigned NOT NULL default '0',\n `cminstance` int(10) unsigned NOT NULL default '0',\n `scale_grade` float(11,10) default '1.0000000000',\n `extra_credit` int(10) unsigned NOT NULL default '0',\n `sort_order` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`)\n ) TYPE=MyISAM ;");
execute_sql("CREATE TABLE `{$CFG->prefix}grade_letter` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `letter` varchar(8) NOT NULL default 'NA',\n `grade_high` decimal(4,2) NOT NULL default '100.00',\n `grade_low` decimal(4,2) NOT NULL default '0.00',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`)\n ) TYPE=MyISAM ;");
execute_sql("CREATE TABLE `{$CFG->prefix}grade_preferences` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default '0',\n `preference` int(10) NOT NULL default '0',\n `value` int(10) NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `courseidpreference` (`courseid`,`preference`)\n ) TYPE=MyISAM ;");
}
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('ALTER TABLE `' . $CFG->prefix . 'course_modules` DROP INDEX `deleted`');
// 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 = new object();
$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 < 2005053000) {
// Add config_plugins table
// this table was created on the MOODLE_15_STABLE branch
// so it may already exist.
$result = execute_sql("CREATE TABLE IF NOT EXISTS `{$CFG->prefix}config_plugins` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `plugin` varchar(100) NOT NULL default 'core',\n `name` varchar(100) NOT NULL default '',\n `value` text NOT NULL default '',\n PRIMARY KEY (`id`),\n UNIQUE KEY `plugin_name` (`plugin`, `name`)\n ) TYPE=MyISAM \n COMMENT='Moodle modules and plugins configuration variables';");
}
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 < 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` int(10) unsigned NOT NULL auto_increment,\n `fullname` varchar(254) NOT NULL default '',\n `shortname` varchar(15) NOT NULL default '',\n `summary` text NOT NULL,\n `reason` text NOT NULL,\n `requester` int(10) NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `shortname` (`shortname`)\n ) TYPE=MyISAM;");
table_column('course', '', 'requested');
}
if ($oldversion < 2005081601) {
modify_database('', "CREATE TABLE `prefix_course_allowed_modules` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `course` int(10) unsigned NOT NULL default 0,\n `module` int(10) unsigned NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `course` (`course`),\n KEY `module` (`module`)\n ) TYPE=MyISAM;");
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) {
modify_database("", "CREATE TABLE `prefix_stats_daily` (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `students` int(10) unsigned NOT NULL default 0,\n `teachers` int(10) unsigned NOT NULL default 0,\n `activestudents` int(10) unsigned NOT NULL default 0,\n `activeteachers` int(10) unsigned NOT NULL default 0,\n `studentreads` int(10) unsigned NOT NULL default 0,\n `studentwrites` int(10) unsigned NOT NULL default 0,\n `teacherreads` int(10) unsigned NOT NULL default 0,\n `teacherwrites` int(10) unsigned NOT NULL default 0,\n `logins` int(10) unsigned NOT NULL default 0,\n `uniquelogins` int(10) unsigned NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `timeend` (`timeend`)\n );");
modify_database("", "CREATE TABLE prefix_stats_weekly (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `students` int(10) unsigned NOT NULL default 0,\n `teachers` int(10) unsigned NOT NULL default 0,\n `activestudents` int(10) unsigned NOT NULL default 0,\n `activeteachers` int(10) unsigned NOT NULL default 0,\n `studentreads` int(10) unsigned NOT NULL default 0,\n `studentwrites` int(10) unsigned NOT NULL default 0,\n `teacherreads` int(10) unsigned NOT NULL default 0,\n `teacherwrites` int(10) unsigned NOT NULL default 0,\n `logins` int(10) unsigned NOT NULL default 0,\n `uniquelogins` int(10) unsigned NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `timeend` (`timeend`)\n );");
modify_database("", "CREATE TABLE prefix_stats_monthly (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `students` int(10) unsigned NOT NULL default 0,\n `teachers` int(10) unsigned NOT NULL default 0,\n `activestudents` int(10) unsigned NOT NULL default 0,\n `activeteachers` int(10) unsigned NOT NULL default 0,\n `studentreads` int(10) unsigned NOT NULL default 0,\n `studentwrites` int(10) unsigned NOT NULL default 0,\n `teacherreads` int(10) unsigned NOT NULL default 0,\n `teacherwrites` int(10) unsigned NOT NULL default 0,\n `logins` int(10) unsigned NOT NULL default 0,\n `uniquelogins` int(10) unsigned NOT NULL default 0,\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `timeend` (`timeend`)\n );");
modify_database("", "CREATE TABLE prefix_stats_user_daily (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `userid` int(10) unsigned NOT NULL default 0,\n `roleid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `statsreads` int(10) unsigned NOT NULL default 0,\n `statswrites` int(10) unsigned NOT NULL default 0,\n `stattype` varchar(30) NOT NULL default '',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `userid` (`userid`),\n KEY `roleid` (`roleid`),\n KEY `timeend` (`timeend`)\n );");
modify_database("", "CREATE TABLE prefix_stats_user_weekly (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `userid` int(10) unsigned NOT NULL default 0,\n `roleid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `statsreads` int(10) unsigned NOT NULL default 0,\n `statswrites` int(10) unsigned NOT NULL default 0,\n `stattype` varchar(30) NOT NULL default '',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `userid` (`userid`),\n KEY `roleid` (`roleid`),\n KEY `timeend` (`timeend`)\n );");
modify_database("", "CREATE TABLE prefix_stats_user_monthly (\n `id` int(10) unsigned NOT NULL auto_increment,\n `courseid` int(10) unsigned NOT NULL default 0,\n `userid` int(10) unsigned NOT NULL default 0,\n `roleid` int(10) unsigned NOT NULL default 0,\n `timeend` int(10) unsigned NOT NULL default 0,\n `statsreads` int(10) unsigned NOT NULL default 0,\n `statswrites` int(10) unsigned NOT NULL default 0,\n `stattype` varchar(30) NOT NULL default '',\n PRIMARY KEY (`id`),\n KEY `courseid` (`courseid`),\n KEY `userid` (`userid`),\n KEY `roleid` (`roleid`),\n KEY `timeend` (`timeend`)\n );");
}
if ($oldversion < 2005100300) {
table_column('course', '', 'expirynotify', 'tinyint', '1');
table_column('course', '', 'expirythreshold', 'int', '10');
table_column('course', '', 'notifystudents', 'tinyint', '1');
$new = new stdClass();
$new->name = 'lastexpirynotify';
$new->value = 0;
insert_record('config', $new);
}
if ($oldversion < 2005100400) {
table_column('course', '', 'enrollable', 'tinyint', '1', 'unsigned', '1');
table_column('course', '', 'enrolstartdate', 'int');
table_column('course', '', 'enrolenddate', 'int');
}
if ($oldversion < 2005101200) {
// add enrolment key to course_request.
table_column('course_request', '', 'password', 'varchar', 50);
}
if ($oldversion < 2006030800) {
# add extra indexes to log (see bug #4112)
modify_database('', "ALTER TABLE prefix_log ADD INDEX userid (userid);");
modify_database('', "ALTER TABLE prefix_log ADD INDEX info (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` int(10) unsigned NOT NULL auto_increment,\n `userid` int(10) unsigned NOT NULL default '0',\n `courseid` int(10) unsigned NOT NULL default'0',\n `groupid` int(10) unsigned NOT NULL default'0',\n `moduleid` int(10) unsigned NOT NULL default'0',\n `coursemoduleid` int(10) unsigned NOT NULL default'0',\n `subject` varchar(128) NOT NULL default '',\n `summary` longtext,\n `content` longtext,\n `uniquehash` varchar(128) NOT NULL default '',\n `rating` int(10) unsigned NOT NULL default'0',\n `format` int(10) unsigned NOT NULL default'0',\n `publishstate` enum('draft','site','public') NOT NULL default 'draft',\n `lastmodified` int(10) unsigned NOT NULL default '0',\n `created` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`),\n UNIQUE KEY `id_user_idx` (`id`, `userid`),\n KEY `post_lastmodified_idx` (`lastmodified`),\n KEY `post_subject_idx` (`subject`)\n ) TYPE=MyISAM COMMENT='New moodle post table. Holds data posts such as forum entries or blog entries.';");
modify_database("", "CREATE TABLE prefix_tags (\n `id` int(10) unsigned NOT NULL auto_increment,\n `type` varchar(255) NOT NULL default 'official',\n `userid` int(10) unsigned NOT NULL default'0',\n `text` varchar(255) NOT NULL default '',\n PRIMARY KEY (`id`)\n ) TYPE=MyISAM COMMENT ='tags structure for moodle.';");
modify_database("", "CREATE TABLE prefix_blog_tag_instance (\n `id` int(10) unsigned NOT NULL auto_increment,\n `entryid` int(10) unsigned NOT NULL default'0',\n `tagid` int(10) unsigned NOT NULL default'0',\n `groupid` int(10) unsigned NOT NULL default'0',\n `courseid` int(10) unsigned NOT NULL default'0',\n `userid` int(10) unsigned NOT NULL default'0',\n PRIMARY KEY (`id`)\n ) TYPE=MyISAM COMMENT ='tag instance for blogs.';");
}
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 < 2006031600) {
execute_sql(" ALTER TABLE `{$CFG->prefix}grade_category` CHANGE `weight` `weight` decimal(5,2) default '0.00';");
}
if ($oldversion < 2006032000) {
table_column('post', '', 'module', 'varchar', '20', '', '', 'not null', 'id');
modify_database('', "ALTER TABLE prefix_post ADD INDEX post_module_idx (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('', "ALTER TABLE prefix_blog_tag_instance ADD INDEX bti_entryid_idx (entryid);");
modify_database('', "ALTER TABLE prefix_blog_tag_instance ADD INDEX bti_tagid_idx (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 coursesection ON {$CFG->prefix}course_sections (course,section) ", false);
}
/// change all the int(11) to int(10) for blogs and tags
if ($oldversion < 2006041000) {
table_column('post', 'id', 'id', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'userid', 'userid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'courseid', 'courseid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'groupid', 'groupid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'moduleid', 'moduleid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'coursemoduleid', 'coursemoduleid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'rating', 'rating', 'integer', '10', 'unsigned', '0', 'not null');
table_column('post', 'format', 'format', 'integer', '10', 'unsigned', '0', 'not null');
table_column('tags', 'id', 'id', 'integer', '10', 'unsigned', '0', 'not null');
table_column('tags', 'userid', 'userid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'id', 'id', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'entryid', 'entryid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'tagid', 'tagid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'groupid', 'groupid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'courseid', 'courseid', 'integer', '10', 'unsigned', '0', 'not null');
table_column('blog_tag_instance', 'userid', 'userid', 'integer', '10', 'unsigned', '0', 'not null');
}
if ($oldversion < 2006041001) {
table_column('cache_text', 'formattedtext', 'formattedtext', 'longblob', '', '', '', 'not null');
}
if ($oldversion < 2006041100) {
table_column('course_modules', '', 'visibleold', 'integer', '1', 'unsigned', '1', 'not null', 'visible');
}
if ($oldversion < 2006041801) {
// forgot auto_increments for ids
modify_database('', "ALTER TABLE prefix_post CHANGE id id INT UNSIGNED NOT NULL AUTO_INCREMENT");
modify_database('', "ALTER TABLE prefix_tags CHANGE id id INT UNSIGNED NOT NULL AUTO_INCREMENT");
modify_database('', "ALTER TABLE prefix_blog_tag_instance CHANGE id id INT UNSIGNED NOT NULL AUTO_INCREMENT");
}
// changed user->firstname, user->lastname, course->shortname to varchar(100)
if ($oldversion < 2006041900) {
table_column('course', 'shortname', 'shortname', 'varchar', '100', '', '', 'not null');
table_column('user', 'firstname', 'firstname', 'varchar', '100', '', '', 'not null');
table_column('user', 'lastname', 'lastname', 'varchar', '100', '', '', 'not null');
}
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` int(10) unsigned NOT NULL auto_increment,\n `module` varchar(30),\n `action` varchar(40),\n `mtable` varchar(30),\n `field` varchar(50),\n PRIMARY KEY (`id`)\n ) TYPE=MyISAM");
// Add index to ensure that module and action combination is unique.
modify_database('', "ALTER TABLE prefix_log_display ADD UNIQUE `moduleaction`(`module` , `action`)");
// Insert the records back in, sans duplicates.
if ($rs && $rs->RecordCount() > 0) {
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();
}
}
}
// change tags->type to varchar(20), adding 2 indexes for tags table.
if ($oldversion < 2006042401) {
table_column('tags', 'type', 'type', 'varchar', '20', '', '', 'not null');
modify_database('', "ALTER TABLE prefix_tags ADD INDEX tags_typeuserid_idx (type(20), userid)");
modify_database('', "ALTER TABLE prefix_tags ADD INDEX tags_text_idx(text(255))");
}
/***************************************************
* The following is an effort to change all the *
* default NULLs to NOT NULL defaut '' in all *
* mysql tables, to prevent 5303 and be consistent *
***************************************************/
if ($oldversion < 2006042800) {
execute_sql("UPDATE {$CFG->prefix}grade_category SET name='' WHERE name IS NULL");
table_column('grade_category', 'name', 'name', 'varchar', '64', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}grade_category SET weight='0' WHERE weight IS NULL");
execute_sql("ALTER TABLE {$CFG->prefix}grade_category change weight weight decimal(5,2) NOT NULL default 0.00");
execute_sql("UPDATE {$CFG->prefix}grade_item SET courseid='0' WHERE courseid IS NULL");
table_column('grade_item', 'courseid', 'courseid', 'int', '10', 'unsigned', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}grade_item SET category='0' WHERE category IS NULL");
table_column('grade_item', 'category', 'category', 'int', '10', 'unsigned', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}grade_item SET modid='0' WHERE modid IS NULL");
table_column('grade_item', 'modid', 'modid', 'int', '10', 'unsigned', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}grade_item SET cminstance='0' WHERE cminstance IS NULL");
table_column('grade_item', 'cminstance', 'cminstance', 'int', '10', 'unsigned', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}grade_item SET scale_grade='0' WHERE scale_grade IS NULL");
execute_sql("ALTER TABLE {$CFG->prefix}grade_item change scale_grade scale_grade float(11,10) NOT NULL default 1.0000000000");
execute_sql("UPDATE {$CFG->prefix}grade_preferences SET courseid='0' WHERE courseid IS NULL");
table_column('grade_preferences', 'courseid', 'courseid', 'int', '10', 'unsigned', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET idnumber='' WHERE idnumber IS NULL");
table_column('user', 'idnumber', 'idnumber', 'varchar', '64', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET icq='' WHERE icq IS NULL");
table_column('user', 'icq', 'icq', 'varchar', '15', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET skype='' WHERE skype IS NULL");
table_column('user', 'skype', 'skype', 'varchar', '50', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET yahoo='' WHERE yahoo IS NULL");
table_column('user', 'yahoo', 'yahoo', 'varchar', '50', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET aim='' WHERE aim IS NULL");
table_column('user', 'aim', 'aim', 'varchar', '50', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET msn='' WHERE msn IS NULL");
table_column('user', 'msn', 'msn', 'varchar', '50', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET phone1='' WHERE phone1 IS NULL");
table_column('user', 'phone1', 'phone1', 'varchar', '20', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET phone2='' WHERE phone2 IS NULL");
table_column('user', 'phone2', 'phone2', 'varchar', '20', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET institution='' WHERE institution IS NULL");
table_column('user', 'institution', 'institution', 'varchar', '40', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET department='' WHERE department IS NULL");
table_column('user', 'department', 'department', 'varchar', '30', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET address='' WHERE address IS NULL");
table_column('user', 'address', 'address', 'varchar', '70', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET city='' WHERE city IS NULL");
table_column('user', 'city', 'city', 'varchar', '20', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET country='' WHERE country IS NULL");
table_column('user', 'country', 'country', 'char', '2', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET lang='' WHERE lang IS NULL");
table_column('user', 'lang', 'lang', 'varchar', '10', '', 'en', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET lastIP='' WHERE lastIP IS NULL");
table_column('user', 'lastIP', 'lastIP', 'varchar', '15', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET secret='' WHERE secret IS NULL");
table_column('user', 'secret', 'secret', 'varchar', '15', '', '', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET picture='0' WHERE picture IS NULL");
table_column('user', 'picture', 'picture', 'tinyint', '1', '', '0', 'not null');
execute_sql("UPDATE {$CFG->prefix}user SET url='' WHERE url IS NULL");
table_column('user', 'url', 'url', 'varchar', '255', '', '', 'not null');
}
if ($oldversion < 2006050400) {
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_deleted_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_confirmed_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_firstname_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_lastname_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_city_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_country_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_lastaccess_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` DROP INDEX {$CFG->prefix}user_email_idx;", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_deleted (deleted)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_confirmed (confirmed)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_firstname (firstname)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_lastname (lastname)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_city (city)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_country (country)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_lastaccess (lastaccess)", false);
execute_sql("ALTER TABLE `{$CFG->prefix}user` ADD INDEX user_email (email)", false);
}
if ($oldversion < 2006050500) {
table_column('log', 'action', 'action', 'varchar', '40', '', '', 'not null');
}
if ($oldversion < 2006050501) {
table_column('sessions', 'data', 'data', 'mediumtext', '', '', '', 'not null');
}
// 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` CHANGE `reads` statsreads int(10) unsigned NOT NULL default 0", false);
execute_sql("ALTER TABLE `{$CFG->prefix}stats_user_daily` CHANGE `writes` statswrites int(10) unsigned NOT NULL default 0", false);
execute_sql("ALTER TABLE `{$CFG->prefix}stats_user_weekly` CHANGE `reads` statsreads int(10) unsigned NOT NULL default 0", false);
execute_sql("ALTER TABLE `{$CFG->prefix}stats_user_weekly` CHANGE `writes` statswrites int(10) unsigned NOT NULL default 0", false);
execute_sql("ALTER TABLE `{$CFG->prefix}stats_user_monthly` CHANGE `reads` statsreads int(10) unsigned NOT NULL default 0", false);
execute_sql("ALTER TABLE `{$CFG->prefix}stats_user_monthly` CHANGE `writes` statswrites int(10) unsigned NOT NULL default 0", 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) {
//Only if it exists
$fields = $db->MetaColumnNames($CFG->prefix . 'user');
if (in_array('lastIP', $fields)) {
table_column("user", "lastIP", "lastip", "varchar", "15", "", "", "not null", "currentlogin");
}
}
// Change in MySQL 5.0.3 concerning how decimals are stored. Mimic from 16_STABLE
// this isn't dangerous because it's a simple type change, but be careful with
// versions and duplicate work in order to provide smooth upgrade paths.
if ($oldversion < 2006071800) {
table_column('grade_letter', 'grade_high', 'grade_high', 'decimal(5,2)', '', '', '100.00', 'not null', '');
table_column('grade_letter', 'grade_low', 'grade_low', 'decimal(5,2)', '', '', '0.00', 'not null', '');
}
if ($oldversion < 2006080400) {
execute_sql("CREATE TABLE {$CFG->prefix}role (\n `id` int(10) unsigned NOT NULL auto_increment,\n `name` varchar(255) NOT NULL default '',\n `shortname` varchar(100) NOT NULL default '',\n `description` text NOT NULL default '',\n `sortorder` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}context (\n `id` int(10) unsigned NOT NULL auto_increment,\n `level` int(10) unsigned NOT NULL default '0',\n `instanceid` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_assignments (\n `id` int(10) unsigned NOT NULL auto_increment,\n `roleid` int(10) unsigned NOT NULL default '0',\n `contextid` int(10) unsigned NOT NULL default '0',\n `userid` int(10) unsigned NOT NULL default '0',\n `hidden` int(1) unsigned NOT NULL default '0',\n `timestart` int(10) unsigned NOT NULL default '0',\n `timeend` int(10) unsigned NOT NULL default '0',\n `timemodified` int(10) unsigned NOT NULL default '0',\n `modifierid` int(10) unsigned NOT NULL default '0',\n `enrol` varchar(20) NOT NULL default '',\n `sortorder` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_capabilities (\n `id` int(10) unsigned NOT NULL auto_increment,\n `contextid` int(10) unsigned NOT NULL default '0',\n `roleid` int(10) unsigned NOT NULL default '0',\n `capability` varchar(255) NOT NULL default '',\n `permission` int(10) unsigned NOT NULL default '0',\n `timemodified` int(10) unsigned NOT NULL default '0',\n `modifierid` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_deny_grant (\n `id` int(10) unsigned NOT NULL auto_increment,\n `roleid` int(10) unsigned NOT NULL default '0',\n `unviewableroleid` int(10) unsigned NOT NULL default '0',\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}capabilities ( \n `id` int(10) unsigned NOT NULL auto_increment, \n `name` varchar(255) NOT NULL default '', \n `captype` varchar(50) NOT NULL default '', \n `contextlevel` int(10) unsigned NOT NULL default '0', \n `component` varchar(100) NOT NULL default '', \n PRIMARY KEY (`id`) \n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_names ( \n `id` int(10) unsigned NOT NULL auto_increment, \n `roleid` int(10) unsigned NOT NULL default '0',\n `contextid` int(10) unsigned NOT NULL default '0', \n `text` text NOT NULL default '',\n PRIMARY KEY (`id`) \n )", true);
}
if ($oldversion < 2006081000) {
execute_sql("ALTER TABLE `{$CFG->prefix}role` ADD INDEX `sortorder` (`sortorder`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}context` ADD INDEX `instanceid` (`instanceid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}context` ADD UNIQUE INDEX `level-instanceid` (`level`, `instanceid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_assignments` ADD INDEX `roleid` (`roleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_assignments` ADD INDEX `contextid` (`contextid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_assignments` ADD INDEX `userid` (`userid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_assignments` ADD UNIQUE INDEX `contextid-roleid-userid` (`contextid`, `roleid`, `userid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_assignments` ADD INDEX `sortorder` (`sortorder`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` ADD INDEX `roleid` (`roleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` ADD INDEX `contextid` (`contextid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` ADD INDEX `modifierid` (`modifierid`)", true);
// MDL-10640 adding missing index from upgrade
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` ADD INDEX `capability` (`capability`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` ADD UNIQUE INDEX `roleid-contextid-capability` (`roleid`, `contextid`, `capability`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_deny_grant` ADD INDEX `roleid` (`roleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_deny_grant` ADD INDEX `unviewableroleid` (`unviewableroleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_deny_grant` ADD UNIQUE INDEX `roleid-unviewableroleid` (`roleid`, `unviewableroleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}capabilities` ADD UNIQUE INDEX `name` (`name`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_names` ADD INDEX `roleid` (`roleid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_names` ADD INDEX `contextid` (`contextid`)", true);
execute_sql("ALTER TABLE `{$CFG->prefix}role_names` ADD UNIQUE INDEX `roleid-contextid` (`roleid`, `contextid`)", true);
}
if ($oldversion < 2006081600) {
execute_sql("ALTER TABLE `{$CFG->prefix}role_capabilities` CHANGE permission permission int(10) NOT NULL default '0'", true);
}
// drop role_deny_grant table, and create 2 new ones
if ($oldversion < 2006081700) {
execute_sql("DROP TABLE `{$CFG->prefix}role_deny_grant`", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_allow_assign (\n `id` int(10) unsigned NOT NULL auto_increment,\n `roleid` int(10) unsigned NOT NULL default '0',\n `allowassign` int(10) unsigned NOT NULL default '0',\n KEY `roleid` (`roleid`),\n KEY `allowassign` (`allowassign`),\n UNIQUE KEY `roleid-allowassign` (`roleid`, `allowassign`),\n PRIMARY KEY (`id`)\n )", true);
execute_sql("CREATE TABLE {$CFG->prefix}role_allow_override (\n `id` int(10) unsigned NOT NULL auto_increment,\n `roleid` int(10) unsigned NOT NULL default '0',\n `allowoverride` int(10) unsigned NOT NULL default '0',\n KEY `roleid` (`roleid`),\n KEY `allowoverride` (`allowoverride`),\n UNIQUE KEY `roleid-allowoverride` (`roleid`, `allowoverride`),\n PRIMARY KEY (`id`)\n )", true);
}
if ($oldversion < 2006082100) {
execute_sql("ALTER TABLE `{$CFG->prefix}context` DROP INDEX `level-instanceid`;", false);
table_column('context', 'level', 'aggregatelevel', 'int', '10', 'unsigned', '0', 'not null', '');
execute_sql("ALTER TABLE `{$CFG->prefix}context` ADD UNIQUE INDEX `aggregatelevel-instanceid` (`aggregatelevel`, `instanceid`)", false);
}
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(64) NOT NULL default '',\n expiry DATETIME NOT NULL,\n expireref VARCHAR(250),\n created DATETIME NOT NULL,\n modified DATETIME NOT NULL,\n sessdata TEXT,\n CONSTRAINT PRIMARY KEY (sesskey)\n ) COMMENT='Optional database session storage in new format, not used by default';", 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 < 2006083001) {
table_column('sessions2', 'sessdata', 'sessdata', 'LONGTEXT', '', '', '', '', '');
}
if ($oldversion < 2006083002) {
table_column('capabilities', '', 'riskbitmask', 'INTEGER', '10', 'unsigned', '0', 'not null', '');
}
if ($oldversion < 2006083100) {
execute_sql("ALTER TABLE {$CFG->prefix}course CHANGE modinfo modinfo longtext NULL AFTER showgrades");
}
if ($oldversion < 2006083101) {
execute_sql("ALTER TABLE {$CFG->prefix}course_categories CHANGE description description text NULL AFTER name");
}
if ($oldversion < 2006083102) {
execute_sql("ALTER TABLE {$CFG->prefix}user CHANGE description description text NULL AFTER url");
}
if ($oldversion < 2006090200) {
execute_sql("ALTER TABLE {$CFG->prefix}course_sections CHANGE summary summary text NULL AFTER section");
execute_sql("ALTER TABLE {$CFG->prefix}course_sections CHANGE sequence sequence text NULL AFTER section");
}
// 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` int(10) unsigned NOT NULL auto_increment, \n `userid` int(10) unsigned NOT NULL default '0',\n `courseid` int(10) unsigned NOT NULL default '0', \n `timeaccess` int(10) unsigned NOT NULL default '0', \n KEY `userid` (`userid`),\n KEY `courseid` (`courseid`),\n UNIQUE KEY `userid-courseid` (`userid`, `courseid`),\n PRIMARY KEY (`id`) \n )TYPE=MYISAM COMMENT ='time user last accessed any page in a course';", true);
}
if ($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, SITEID);
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 ($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 BIGINT(10) NOT NULL auto_increment,\n name VARCHAR(255) NOT NULL default '',\n datatype VARCHAR(255) NOT NULL default '',\n categoryid BIGINT(10) unsigned NOT NULL default 0,\n sortorder BIGINT(10) unsigned NOT NULL default 0,\n required TINYINT(2) unsigned NOT NULL default 0,\n locked TINYINT(2) unsigned NOT NULL default 0,\n visible SMALLINT(4) unsigned NOT NULL default 0,\n defaultdata LONGTEXT,\n CONSTRAINT PRIMARY KEY (id));", true);
execute_sql("ALTER TABLE {$CFG->prefix}user_info_field COMMENT='Customisable user profile fields';", true);
execute_sql("CREATE TABLE {$CFG->prefix}user_info_category (\n id BIGINT(10) NOT NULL auto_increment,\n name VARCHAR(255) NOT NULL default '',\n sortorder BIGINT(10) unsigned NOT NULL default 0,\n CONSTRAINT PRIMARY KEY (id));", true);
execute_sql("ALTER TABLE {$CFG->prefix}user_info_category COMMENT='Customisable fields categories';", true);
execute_sql("CREATE TABLE {$CFG->prefix}user_info_data (\n id BIGINT(10) NOT NULL auto_increment,\n userid BIGINT(10) unsigned NOT NULL default 0,\n fieldid BIGINT(10) unsigned NOT NULL default 0,\n data LONGTEXT NOT NULL,\n CONSTRAINT PRIMARY KEY (id));", true);
execute_sql("ALTER TABLE {$CFG->prefix}user_info_data COMMENT='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 < 2006092201) {
execute_sql('TRUNCATE TABLE ' . $CFG->prefix . 'cache_text', true);
table_column('cache_text', 'formattedtext', 'formattedtext', 'longtext', '', '', '', 'not null');
}
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;", false);
execute_sql("ALTER TABLE {$CFG->prefix}role ADD UNIQUE INDEX {$CFG->prefix}role_sor_uix (sortorder)", false);*/
}
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` ON {$CFG->prefix}context ;", false);
execute_sql("DROP INDEX `contextlevel-instanceid` ON {$CFG->prefix}context ;", 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 ON {$CFG->prefix}role ;", false);
execute_sql("DROP INDEX {$CFG->prefix}role_sor_uix ON {$CFG->prefix}role ;", false);
execute_sql("CREATE UNIQUE INDEX {$CFG->prefix}role_sor_uix ON {$CFG->prefix}role (sortorder);", 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;
}
/**
* Update a course.
*
* Please note this functions does not verify any access control,
* the calling code is responsible for all validation (usually it is the form definition).
*
* @param object $data - all the data needed for an entry in the 'course' table
* @param array $editoroptions course description editor options
* @return void
*/
function update_course($data, $editoroptions = NULL)
{
global $CFG, $DB;
$data->timemodified = time();
$oldcourse = course_get_format($data->id)->get_course();
$context = context_course::instance($oldcourse->id);
if ($editoroptions) {
$data = file_postupdate_standard_editor($data, 'summary', $editoroptions, $context, 'course', 'summary', 0);
}
if ($overviewfilesoptions = course_overviewfiles_options($data->id)) {
$data = file_postupdate_standard_filemanager($data, 'overviewfiles', $overviewfilesoptions, $context, 'course', 'overviewfiles', 0);
}
if (!isset($data->category) or empty($data->category)) {
// prevent nulls and 0 in category field
unset($data->category);
}
$changesincoursecat = $movecat = (isset($data->category) and $oldcourse->category != $data->category);
if (!isset($data->visible)) {
// data not from form, add missing visibility info
$data->visible = $oldcourse->visible;
}
if ($data->visible != $oldcourse->visible) {
// reset the visibleold flag when manually hiding/unhiding course
$data->visibleold = $data->visible;
$changesincoursecat = true;
} else {
if ($movecat) {
$newcategory = $DB->get_record('course_categories', array('id' => $data->category));
if (empty($newcategory->visible)) {
// make sure when moving into hidden category the course is hidden automatically
$data->visible = 0;
}
}
}
// Update with the new data
$DB->update_record('course', $data);
// make sure the modinfo cache is reset
rebuild_course_cache($data->id);
// update course format options with full course data
course_get_format($data->id)->update_course_format_options($data, $oldcourse);
$course = $DB->get_record('course', array('id' => $data->id));
if ($movecat) {
$newparent = context_coursecat::instance($course->category);
context_moved($context, $newparent);
}
fix_course_sortorder();
// purge appropriate caches in case fix_course_sortorder() did not change anything
cache_helper::purge_by_event('changesincourse');
if ($changesincoursecat) {
cache_helper::purge_by_event('changesincoursecat');
}
// Test for and remove blocks which aren't appropriate anymore
blocks_remove_inappropriate($course);
// Save any custom role names.
save_local_role_names($course->id, $data);
// update enrol settings
enrol_course_updated(false, $course, $data);
add_to_log($course->id, "course", "update", "edit.php?id={$course->id}", $course->id);
// Trigger events
events_trigger('course_updated', $course);
if ($oldcourse->format !== $course->format) {
// Remove all options stored for the previous format
// We assume that new course format migrated everything it needed watching trigger
// 'course_updated' and in method format_XXX::update_course_format_options()
$DB->delete_records('course_format_options', array('courseid' => $course->id, 'format' => $oldcourse->format));
}
}
/**
* Update a course.
*
* Please note this functions does not verify any access control,
* the calling code is responsible for all validation (usually it is the form definition).
*
* @param object $data - all the data needed for an entry in the 'course' table
* @param array $editoroptions course description editor options
* @return void
*/
function update_course($data, $editoroptions = NULL)
{
global $CFG, $DB;
$data->timemodified = time();
$oldcourse = $DB->get_record('course', array('id' => $data->id), '*', MUST_EXIST);
$context = get_context_instance(CONTEXT_COURSE, $oldcourse->id);
if ($editoroptions) {
$data = file_postupdate_standard_editor($data, 'summary', $editoroptions, $context, 'course', 'summary', 0);
}
if (!isset($data->category) or empty($data->category)) {
// prevent nulls and 0 in category field
unset($data->category);
}
$movecat = (isset($data->category) and $oldcourse->category != $data->category);
if (!isset($data->visible)) {
// data not from form, add missing visibility info
$data->visible = $oldcourse->visible;
}
if ($data->visible != $oldcourse->visible) {
// reset the visibleold flag when manually hiding/unhiding course
$data->visibleold = $data->visible;
} else {
if ($movecat) {
$newcategory = $DB->get_record('course_categories', array('id' => $data->category));
if (empty($newcategory->visible)) {
// make sure when moving into hidden category the course is hidden automatically
$data->visible = 0;
}
}
}
// Update with the new data
$DB->update_record('course', $data);
$course = $DB->get_record('course', array('id' => $data->id));
if ($movecat) {
$newparent = get_context_instance(CONTEXT_COURSECAT, $course->category);
context_moved($context, $newparent);
}
fix_course_sortorder();
// Test for and remove blocks which aren't appropriate anymore
blocks_remove_inappropriate($course);
// Save any custom role names.
save_local_role_names($course->id, $data);
// update enrol settings
enrol_course_updated(false, $course, $data);
add_to_log($course->id, "course", "update", "edit.php?id={$course->id}", $course->id);
// Trigger events
events_trigger('course_updated', $course);
}
/**
* Tests for the enrol_uaims process_cohort_group_node function.
*
* Test to make sure that the cohort is created in the correct
* category context.
*
* @package enrol_uaims
* @copyright 2014 Anthony Radziszewski radzisze@ualberta.ca
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
*/
public function test_process_cohort_group_node()
{
global $DB, $CFG;
$this->resetAfterTest(true);
$xmldoc = <<<DOC
<?xml version="1.0" encoding="utf-8"?>
<enterprise xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance">
<group recstatus="1"> <sourcedid> <id>test_cohort_id</id> </sourcedid> <grouptype>
<typevalue>Cohort</typevalue> </grouptype> <description> <short>Test Cohort</short>
<long>Test Cohort</long> </description> <org /> <timeframe> <begin /> <end />
</timeframe> <enrollcontrol /> <relationship> <sourcedid> <id>UOFAB-AU</id>
</sourcedid> </relationship> </group></enterprise>
DOC;
$enrol = new enrol_uaims_plugin();
$category = new stdClass();
$category->name = "test";
$category->description = "UOFAB-AU";
$category->idnumber = "UOFAB-AU";
$category->timemodified = time();
$category->id = $DB->insert_record('course_categories', $category);
$classname = context_helper::get_class_for_level(CONTEXT_COURSECAT);
$category->context = $classname::instance($category->id, IGNORE_MISSING);
$category->context->mark_dirty();
$DB->update_record('course_categories', $category);
fix_course_sortorder();
$enrol->process_imsdoc($xmldoc);
// Make sure the cohort exists.
$getcohort = $DB->get_record('cohort', array('idnumber' => "test_cohort_id"), $fields = '*');
$this->assertEquals($getcohort->idnumber, "test_cohort_id");
$this->assertEquals($getcohort->visible, 0);
// Make sure the cohort contextid matches the id from the context table for the specified category.
$getcategory = $DB->get_record('course_categories', array('idnumber' => "UOFAB-AU"), $fields = '*');
$this->assertEquals($getcategory->description, "UOFAB-AU");
$getcontext = $DB->get_record('context', array('contextlevel' => 40, 'instanceid' => $getcategory->id), $fields = '*');
$this->assertEquals($getcontext->instanceid, $getcategory->id);
$this->assertEquals($getcontext->id, $getcohort->contextid);
}
/**
* Create a test course category
* @param array|stdClass $record
* @param array $options
* @return stdClass course category record
*/
function create_category($record = null, array $options = null)
{
global $DB, $CFG;
require_once "{$CFG->dirroot}/course/lib.php";
$this->categorycount++;
$i = $this->categorycount;
$record = (array) $record;
if (!isset($record['name'])) {
$record['name'] = 'Course category ' . $i;
}
if (!isset($record['idnumber'])) {
$record['idnumber'] = '';
}
if (!isset($record['description'])) {
$record['description'] = "Test course category {$i}\n{$this->loremipsum}";
}
if (!isset($record['descriptionformat'])) {
$record['descriptionformat'] = FORMAT_MOODLE;
}
if (!isset($record['parent'])) {
$record['parent'] = 0;
}
if (empty($record['parent'])) {
$parent = new stdClass();
$parent->path = '';
$parent->depth = 0;
} else {
$parent = $DB->get_record('course_categories', array('id' => $record['parent']), '*', MUST_EXIST);
}
$record['depth'] = $parent->depth + 1;
$record['sortorder'] = 0;
$record['timemodified'] = time();
$record['timecreated'] = $record['timemodified'];
$catid = $DB->insert_record('course_categories', $record);
$path = $parent->path . '/' . $catid;
$DB->set_field('course_categories', 'path', $path, array('id' => $catid));
context_coursecat::instance($catid);
fix_course_sortorder();
return $DB->get_record('course_categories', array('id' => $catid), '*', MUST_EXIST);
}
/**
* Read in an IMS Enterprise file.
* Originally designed to handle v1.1 files but should be able to handle
* earlier types as well, I believe.
*
*/
function cron()
{
global $CFG;
// Get configs
$imsfilelocation = $this->get_config('imsfilelocation');
$logtolocation = $this->get_config('logtolocation');
$mailadmins = $this->get_config('mailadmins');
$prev_time = $this->get_config('prev_time');
$prev_md5 = $this->get_config('prev_md5');
$prev_path = $this->get_config('prev_path');
if (empty($imsfilelocation)) {
// $filename = "$CFG->dirroot/enrol/imsenterprise/example.xml"; // Default location
$filename = "{$CFG->dataroot}/1/imsenterprise-enrol.xml";
// Default location
} else {
$filename = $imsfilelocation;
}
$this->logfp = false;
// File pointer for writing log data to
if (!empty($logtolocation)) {
$this->logfp = fopen($logtolocation, 'a');
}
if (file_exists($filename)) {
@set_time_limit(0);
$starttime = time();
$this->log_line('----------------------------------------------------------------------');
$this->log_line("IMS Enterprise enrol cron process launched at " . userdate(time()));
$this->log_line('Found file ' . $filename);
$this->xmlcache = '';
// Make sure we understand how to map the IMS-E roles to Moodle roles
$this->load_role_mappings();
$md5 = md5_file($filename);
// NB We'll write this value back to the database at the end of the cron
$filemtime = filemtime($filename);
// Decide if we want to process the file (based on filepath, modification time, and MD5 hash)
// This is so we avoid wasting the server's efforts processing a file unnecessarily
if (empty($prev_path) || $filename != $prev_path) {
$fileisnew = true;
} elseif (isset($prev_time) && $filemtime <= $prev_time) {
$fileisnew = false;
$this->log_line('File modification time is not more recent than last update - skipping processing.');
} elseif (isset($prev_md5) && $md5 == $prev_md5) {
$fileisnew = false;
$this->log_line('File MD5 hash is same as on last update - skipping processing.');
} else {
$fileisnew = true;
// Let's process it!
}
if ($fileisnew) {
$listoftags = array('group', 'person', 'member', 'membership', 'comments', 'properties');
// The list of tags which should trigger action (even if only cache trimming)
$this->continueprocessing = true;
// The <properties> tag is allowed to halt processing if we're demanding a matching target
// FIRST PASS: Run through the file and process the group/person entries
if (($fh = fopen($filename, "r")) != false) {
$line = 0;
while (!feof($fh) && $this->continueprocessing) {
$line++;
$curline = fgets($fh);
$this->xmlcache .= $curline;
// Add a line onto the XML cache
while (true) {
// If we've got a full tag (i.e. the most recent line has closed the tag) then process-it-and-forget-it.
// Must always make sure to remove tags from cache so they don't clog up our memory
if ($tagcontents = $this->full_tag_found_in_cache('group', $curline)) {
$this->process_group_tag($tagcontents);
$this->remove_tag_from_cache('group');
} elseif ($tagcontents = $this->full_tag_found_in_cache('person', $curline)) {
$this->process_person_tag($tagcontents);
$this->remove_tag_from_cache('person');
} elseif ($tagcontents = $this->full_tag_found_in_cache('membership', $curline)) {
$this->process_membership_tag($tagcontents);
$this->remove_tag_from_cache('membership');
} elseif ($tagcontents = $this->full_tag_found_in_cache('comments', $curline)) {
$this->remove_tag_from_cache('comments');
} elseif ($tagcontents = $this->full_tag_found_in_cache('properties', $curline)) {
$this->process_properties_tag($tagcontents);
$this->remove_tag_from_cache('properties');
} else {
break;
}
}
// End of while-tags-are-detected
}
// end of while loop
fclose($fh);
fix_course_sortorder();
}
// end of if(file_open) for first pass
/*
SECOND PASS REMOVED
Since the IMS specification v1.1 insists that "memberships" should come last,
and since vendors seem to have done this anyway (even with 1.0),
we can sensibly perform the import in one fell swoop.
// SECOND PASS: Now go through the file and process the membership entries
$this->xmlcache = '';
if (($fh = fopen($filename, "r")) != false) {
$line = 0;
while ((!feof($fh)) && $this->continueprocessing) {
$line++;
$curline = fgets($fh);
$this->xmlcache .= $curline; // Add a line onto the XML cache
while(true){
// Must always make sure to remove tags from cache so they don't clog up our memory
if($tagcontents = $this->full_tag_found_in_cache('group', $curline)){
$this->remove_tag_from_cache('group');
}elseif($tagcontents = $this->full_tag_found_in_cache('person', $curline)){
$this->remove_tag_from_cache('person');
}elseif($tagcontents = $this->full_tag_found_in_cache('membership', $curline)){
$this->process_membership_tag($tagcontents);
$this->remove_tag_from_cache('membership');
}elseif($tagcontents = $this->full_tag_found_in_cache('comments', $curline)){
$this->remove_tag_from_cache('comments');
}elseif($tagcontents = $this->full_tag_found_in_cache('properties', $curline)){
$this->remove_tag_from_cache('properties');
}else{
break;
}
}
} // end of while loop
fclose($fh);
} // end of if(file_open) for second pass
*/
$timeelapsed = time() - $starttime;
$this->log_line('Process has completed. Time taken: ' . $timeelapsed . ' seconds.');
}
// END of "if file is new"
// These variables are stored so we can compare them against the IMS file, next time round.
$this->set_config('prev_time', $filemtime);
$this->set_config('prev_md5', $md5);
$this->set_config('prev_path', $filename);
} else {
// end of if(file_exists)
$this->log_line('File not found: ' . $filename);
}
if (!empty($mailadmins)) {
$msg = "An IMS enrolment has been carried out within Moodle.\nTime taken: {$timeelapsed} seconds.\n\n";
if (!empty($logtolocation)) {
if ($this->logfp) {
$msg .= "Log data has been written to:\n";
$msg .= "{$logtolocation}\n";
$msg .= "(Log file size: " . ceil(filesize($logtolocation) / 1024) . "Kb)\n\n";
} else {
$msg .= "The log file appears not to have been successfully written.\nCheck that the file is writeable by the server:\n";
$msg .= "{$logtolocation}\n\n";
}
} else {
$msg .= "Logging is currently not active.";
}
$eventdata = new stdClass();
$eventdata->modulename = 'moodle';
$eventdata->component = 'imsenterprise';
$eventdata->name = 'imsenterprise_enrolment';
$eventdata->userfrom = get_admin();
$eventdata->userto = get_admin();
$eventdata->subject = "Moodle IMS Enterprise enrolment notification";
$eventdata->fullmessage = $msg;
$eventdata->fullmessageformat = FORMAT_PLAIN;
$eventdata->fullmessagehtml = '';
$eventdata->smallmessage = '';
message_send($eventdata);
$this->log_line('Notification email sent to administrator.');
}
if ($this->logfp) {
fclose($this->logfp);
}
}
/**
* Return specified category, default if given does not exist
*
* @global object
* @uses MAX_COURSES_IN_CATEGORY
* @uses CONTEXT_COURSECAT
* @uses SYSCONTEXTID
* @param int $catid course category id
* @return object caregory
*/
function get_course_category($catid = 0)
{
global $DB;
$category = false;
if (!empty($catid)) {
$category = $DB->get_record('course_categories', array('id' => $catid));
}
if (!$category) {
// the first category is considered default for now
if ($category = $DB->get_records('course_categories', null, 'sortorder', '*', 0, 1)) {
$category = reset($category);
} else {
$cat = new stdClass();
$cat->name = get_string('miscellaneous');
$cat->depth = 1;
$cat->sortorder = MAX_COURSES_IN_CATEGORY;
$cat->timemodified = time();
$catid = $DB->insert_record('course_categories', $cat);
// make sure category context exists
get_context_instance(CONTEXT_COURSECAT, $catid);
mark_context_dirty('/' . SYSCONTEXTID);
fix_course_sortorder();
// Required to build course_categories.depth and .path.
$category = $DB->get_record('course_categories', array('id' => $catid));
}
}
return $category;
}
/**
* Efficiently moves a category - NOTE that this can have
* a huge impact access-control-wise...
*
* Note that this function does not check capabilities.
*
* Example of usage:
* $coursecat = coursecat::get($categoryid);
* if ($coursecat->can_change_parent($newparentcatid)) {
* $coursecat->change_parent($newparentcatid);
* }
*
* This function does not update field course_categories.timemodified
* If you want to update timemodified, use
* $coursecat->update(array('parent' => $newparentcat));
*
* @param int|stdClass|coursecat $newparentcat
*/
public function change_parent($newparentcat)
{
// Make sure parent category exists but do not check capabilities here that it is visible to current user.
if (is_object($newparentcat)) {
$newparentcat = self::get($newparentcat->id, MUST_EXIST, true);
} else {
$newparentcat = self::get((int) $newparentcat, MUST_EXIST, true);
}
if ($newparentcat->id != $this->parent) {
$this->change_parent_raw($newparentcat);
fix_course_sortorder();
cache_helper::purge_by_event('changesincoursecat');
$this->restore();
add_to_log(SITEID, "category", "move", "editcategory.php?id={$this->id}", $this->id);
}
}
}
}
} else {
require_capability('moodle/category:manage', get_context_instance(CONTEXT_COURSECAT, $movedown));
if ($movecategory = $DB->get_record('course_categories', array('id' => $movedown))) {
if ($swapcategory = $DB->get_records_select('course_categories', "sortorder>? AND parent=?", array($movecategory->sortorder, $movecategory->parent), 'sortorder ASC', '*', 0, 1)) {
$swapcategory = reset($swapcategory);
}
}
}
if ($swapcategory and $movecategory) {
$DB->set_field('course_categories', 'sortorder', $swapcategory->sortorder, array('id' => $movecategory->id));
$DB->set_field('course_categories', 'sortorder', $movecategory->sortorder, array('id' => $swapcategory->id));
}
// finally reorder courses
fix_course_sortorder();
}
/// Print headings
echo $OUTPUT->header();
echo $OUTPUT->heading($strcategories);
/// Print out the categories with all the knobs
$strcategories = 'Materias';
$strcourses = get_string('courses');
$strmovecategoryto = 'Mover materia a';
$stredit = get_string('edit');
$displaylist = array();
$parentlist = array();
$displaylist[0] = get_string('top');
make_categories_list($displaylist, $parentlist);
echo '<table class="generalbox editcourse boxaligncenter"><tr class="header">';
echo '<th class="header" scope="col">' . $strcategories . '</th>';
function restore_execute(&$restore, $info, $course_header, &$errorstr)
{
global $CFG, $USER;
$status = true;
//Checks for the required files/functions to restore every module
//and include them
if ($allmods = get_records("modules")) {
foreach ($allmods as $mod) {
$modname = $mod->name;
$modfile = "{$CFG->dirroot}/mod/{$modname}/restorelib.php";
//If file exists and we have selected to restore that type of module
if (file_exists($modfile) and !empty($restore->mods[$modname]) and $restore->mods[$modname]->restore) {
include_once $modfile;
}
}
}
if (!defined('RESTORE_SILENTLY')) {
//Start the main table
echo "<table cellpadding=\"5\">";
echo "<tr><td>";
//Start the main ul
echo "<ul>";
}
//Location of the xml file
$xml_file = $CFG->dataroot . "/temp/backup/" . $restore->backup_unique_code . "/moodle.xml";
//Preprocess the moodle.xml file spliting into smaller chucks (modules, users, logs...)
//for optimal parsing later in the restore process.
if (!empty($CFG->experimentalsplitrestore)) {
if (!defined('RESTORE_SILENTLY')) {
echo '<li>' . get_string('preprocessingbackupfile') . '</li>';
}
//First of all, split moodle.xml into handy files
if (!restore_split_xml($xml_file, $restore)) {
if (!defined('RESTORE_SILENTLY')) {
notify("Error proccessing moodle.xml file. Process ended.");
} else {
$errorstr = "Error proccessing moodle.xml file. Process ended.";
}
return false;
}
}
//If we've selected to restore into new course
//create it (course)
//Saving conversion id variables into backup_tables
if ($restore->restoreto == RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo '<li>' . get_string('creatingnewcourse') . '</li>';
}
$oldidnumber = $course_header->course_idnumber;
if (!($status = restore_create_new_course($restore, $course_header))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Error while creating the new empty course.");
} else {
$errorstr = "Error while creating the new empty course.";
return false;
}
}
//Print course fullname and shortname and category
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<ul>";
echo "<li>" . $course_header->course_fullname . " (" . $course_header->course_shortname . ")" . '</li>';
echo "<li>" . get_string("category") . ": " . $course_header->category->name . '</li>';
if (!empty($oldidnumber)) {
echo "<li>" . get_string("nomoreidnumber", "moodle", $oldidnumber) . "</li>";
}
echo "</ul>";
//Put the destination course_id
}
$restore->course_id = $course_header->course_id;
}
if ($status = restore_open_html($restore, $course_header)) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>Creating the Restorelog.html in the course backup folder</li>";
}
}
} else {
$course = get_record("course", "id", $restore->course_id);
if ($course) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("usingexistingcourse");
echo "<ul>";
echo "<li>" . get_string("from") . ": " . $course_header->course_fullname . " (" . $course_header->course_shortname . ")" . '</li>';
echo "<li>" . get_string("to") . ": " . format_string($course->fullname) . " (" . format_string($course->shortname) . ")" . '</li>';
if ($restore->deleting) {
echo "<li>" . get_string("deletingexistingcoursedata") . '</li>';
} else {
echo "<li>" . get_string("addingdatatoexisting") . '</li>';
}
echo "</ul></li>";
}
//If we have selected to restore deleting, we do it now.
if ($restore->deleting) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("deletingolddata") . '</li>';
}
$status = remove_course_contents($restore->course_id, false) and delete_dir_contents($CFG->dataroot . "/" . $restore->course_id, "backupdata");
if ($status) {
//Now , this situation is equivalent to the "restore to new course" one (we
//have a course record and nothing more), so define it as "to new course"
$restore->restoreto = RESTORETO_NEW_COURSE;
} else {
if (!defined('RESTORE_SILENTLY')) {
notify("An error occurred while deleting some of the course contents.");
} else {
$errrostr = "An error occurred while deleting some of the course contents.";
return false;
}
}
}
} else {
if (!defined('RESTORE_SILENTLY')) {
notify("Error opening existing course.");
$status = false;
} else {
$errorstr = "Error opening existing course.";
return false;
}
}
}
//Now create users as needed
if ($status and ($restore->users == 0 or $restore->users == 1)) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingusers") . "<br />";
}
if (!($status = restore_create_users($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore users.");
} else {
$errorstr = "Could not restore users.";
return false;
}
}
//Now print info about the work done
if ($status) {
$recs = get_records_sql("select old_id, new_id from {$CFG->prefix}backup_ids\n where backup_code = '{$restore->backup_unique_code}' and\n table_name = 'user'");
//We've records
if ($recs) {
$new_count = 0;
$exists_count = 0;
$student_count = 0;
$teacher_count = 0;
$counter = 0;
//Iterate, filling counters
foreach ($recs as $rec) {
//Get full record, using backup_getids
$record = backup_getid($restore->backup_unique_code, "user", $rec->old_id);
if (strpos($record->info, "new") !== false) {
$new_count++;
}
if (strpos($record->info, "exists") !== false) {
$exists_count++;
}
if (strpos($record->info, "student") !== false) {
$student_count++;
} else {
if (strpos($record->info, "teacher") !== false) {
$teacher_count++;
}
}
//Do some output
$counter++;
if ($counter % 10 == 0) {
if (!defined('RESTORE_SILENTLY')) {
echo ".";
if ($counter % 200 == 0) {
echo "<br />";
}
}
backup_flush(300);
}
}
if (!defined('RESTORE_SILENTLY')) {
//Now print information gathered
echo " (" . get_string("new") . ": " . $new_count . ", " . get_string("existing") . ": " . $exists_count . ")";
echo "<ul>";
echo "<li>" . get_string("students") . ": " . $student_count . '</li>';
echo "<li>" . get_string("teachers") . ": " . $teacher_count . '</li>';
echo "</ul>";
}
} else {
if (!defined('RESTORE_SILENTLY')) {
notify("No users were found!");
}
// no need to return false here, it's recoverable.
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</li>";
}
}
//Now create groups as needed
if ($status and ($restore->groups == RESTORE_GROUPS_ONLY or $restore->groups == RESTORE_GROUPS_GROUPINGS)) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatinggroups");
}
if (!($status = restore_create_groups($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore groups!");
} else {
$errorstr = "Could not restore groups!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create groupings as needed
if ($status and ($restore->groups == RESTORE_GROUPINGS_ONLY or $restore->groups == RESTORE_GROUPS_GROUPINGS)) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatinggroupings");
}
if (!($status = restore_create_groupings($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore groupings!");
} else {
$errorstr = "Could not restore groupings!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create groupingsgroups as needed
if ($status and $restore->groups == RESTORE_GROUPS_GROUPINGS) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatinggroupingsgroups");
}
if (!($status = restore_create_groupings_groups($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore groups in groupings!");
} else {
$errorstr = "Could not restore groups in groupings!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create the course_sections and their associated course_modules
//we have to do this after groups and groupings are restored, because we need the new groupings id
if ($status) {
//Into new course
if ($restore->restoreto == RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingsections");
}
if (!($status = restore_create_sections($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Error creating sections in the existing course.");
} else {
$errorstr = "Error creating sections in the existing course.";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
//Into existing course
} else {
if ($restore->restoreto != RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("checkingsections");
}
if (!($status = restore_create_sections($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Error creating sections in the existing course.");
} else {
$errorstr = "Error creating sections in the existing course.";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
//Error
} else {
if (!defined('RESTORE_SILENTLY')) {
notify("Neither a new course or an existing one was specified.");
$status = false;
} else {
$errorstr = "Neither a new course or an existing one was specified.";
return false;
}
}
}
}
//Now create metacourse info
if ($status and $restore->metacourse) {
//Only to new courses!
if ($restore->restoreto == RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingmetacoursedata");
}
if (!($status = restore_create_metacourse($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Error creating metacourse in the course.");
} else {
$errorstr = "Error creating metacourse in the course.";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
}
//Now create categories and questions as needed
if ($status) {
include_once "{$CFG->dirroot}/question/restorelib.php";
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingcategoriesandquestions");
echo "<ul>";
}
if (!($status = restore_create_questions($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore categories and questions!");
} else {
$errorstr = "Could not restore categories and questions!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</ul></li>";
}
}
//Now create user_files as needed
if ($status and $restore->user_files) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("copyinguserfiles");
}
if (!($status = restore_user_files($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore user files!");
} else {
$errorstr = "Could not restore user files!";
return false;
}
}
//If all is ok (and we have a counter)
if ($status and $status !== true) {
//Inform about user dirs created from backup
if (!defined('RESTORE_SILENTLY')) {
echo "<ul>";
echo "<li>" . get_string("userzones") . ": " . $status;
echo "</li></ul>";
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create course files as needed
if ($status and $restore->course_files) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("copyingcoursefiles");
}
if (!($status = restore_course_files($restore))) {
if (empty($status)) {
notify("Could not restore course files!");
} else {
$errorstr = "Could not restore course files!";
return false;
}
}
//If all is ok (and we have a counter)
if ($status and $status !== true) {
//Inform about user dirs created from backup
if (!defined('RESTORE_SILENTLY')) {
echo "<ul>";
echo "<li>" . get_string("filesfolders") . ": " . $status . '</li>';
echo "</ul>";
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</li>";
}
}
//Now create site files as needed
if ($status and $restore->site_files) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string('copyingsitefiles');
}
if (!($status = restore_site_files($restore))) {
if (empty($status)) {
notify("Could not restore site files!");
} else {
$errorstr = "Could not restore site files!";
return false;
}
}
//If all is ok (and we have a counter)
if ($status and $status !== true) {
//Inform about user dirs created from backup
if (!defined('RESTORE_SILENTLY')) {
echo "<ul>";
echo "<li>" . get_string("filesfolders") . ": " . $status . '</li>';
echo "</ul>";
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</li>";
}
}
//Now create messages as needed
if ($status and $restore->messages) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingmessagesinfo");
}
if (!($status = restore_create_messages($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore messages!");
} else {
$errorstr = "Could not restore messages!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</li>";
}
}
//Now create blogs as needed
if ($status and $restore->blogs) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingblogsinfo");
}
if (!($status = restore_create_blogs($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore blogs!");
} else {
$errorstr = "Could not restore blogs!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo "</li>";
}
}
//Now create scales as needed
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingscales");
}
if (!($status = restore_create_scales($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore custom scales!");
} else {
$errorstr = "Could not restore custom scales!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create events as needed
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingevents");
}
if (!($status = restore_create_events($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore course events!");
} else {
$errorstr = "Could not restore course events!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create course modules as needed
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatingcoursemodules");
}
if (!($status = restore_create_modules($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore modules!");
} else {
$errorstr = "Could not restore modules!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Bring back the course blocks -- do it AFTER the modules!!!
if ($status) {
//If we are deleting and bringing into a course or making a new course, same situation
if ($restore->restoreto == RESTORETO_CURRENT_DELETING || $restore->restoreto == RESTORETO_EXISTING_DELETING || $restore->restoreto == RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo '<li>' . get_string('creatingblocks');
}
$course_header->blockinfo = !empty($course_header->blockinfo) ? $course_header->blockinfo : NULL;
if (!($status = restore_create_blocks($restore, $info->backup_block_format, $course_header->blockinfo, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify('Error while creating the course blocks');
} else {
$errorstr = "Error while creating the course blocks";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
}
if ($status) {
//If we are deleting and bringing into a course or making a new course, same situation
if ($restore->restoreto == RESTORETO_CURRENT_DELETING || $restore->restoreto == RESTORETO_EXISTING_DELETING || $restore->restoreto == RESTORETO_NEW_COURSE) {
if (!defined('RESTORE_SILENTLY')) {
echo '<li>' . get_string('courseformatdata');
}
if (!($status = restore_set_format_data($restore, $xml_file))) {
$error = "Error while setting the course format data";
if (!defined('RESTORE_SILENTLY')) {
notify($error);
} else {
$errorstr = $error;
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
}
//Now create log entries as needed
if ($status and $restore->logs) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatinglogentries");
}
if (!($status = restore_create_logs($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore logs!");
} else {
$errorstr = "Could not restore logs!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now, if all is OK, adjust the instance field in course_modules !!
//this also calculates the final modinfo information so, after this,
//code needing it can be used (like role_assignments. MDL-13740)
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("checkinginstances");
}
if (!($status = restore_check_instances($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not adjust instances in course_modules!");
} else {
$errorstr = "Could not adjust instances in course_modules!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now, if all is OK, adjust activity events
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("refreshingevents");
}
if (!($status = restore_refresh_events($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not refresh events for activities!");
} else {
$errorstr = "Could not refresh events for activities!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now, if all is OK, adjust inter-activity links
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("decodinginternallinks");
}
if (!($status = restore_decode_content_links($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not decode content links!");
} else {
$errorstr = "Could not decode content links!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now, with backup files prior to version 2005041100,
//convert all the wiki texts in the course to markdown
if ($status && $restore->backup_version < 2005041100) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("convertingwikitomarkdown");
}
if (!($status = restore_convert_wiki2markdown($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not convert wiki texts to markdown!");
} else {
$errorstr = "Could not convert wiki texts to markdown!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Now create gradebook as needed -- AFTER modules and blocks!!!
if ($status) {
if ($restore->backup_version > 2007090500) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("creatinggradebook");
}
if (!($status = restore_create_gradebook($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not restore gradebook!");
} else {
$errorstr = "Could not restore gradebook!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
} else {
// for moodle versions before 1.9, those grades need to be converted to use the new gradebook
// this code needs to execute *after* the course_modules are sorted out
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("migratinggrades");
}
/// force full refresh of grading data before migration == crete all items first
if (!($status = restore_migrate_old_gradebook($restore, $xml_file))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not migrate gradebook!");
} else {
$errorstr = "Could not migrade gradebook!";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
/// force full refresh of grading data after all items are created
grade_force_full_regrading($restore->course_id);
grade_grab_course_grades($restore->course_id);
}
/*******************************************************************************
************* Restore of Roles and Capabilities happens here ******************
*******************************************************************************/
// try to restore roles even when restore is going to fail - teachers might have
// at least some role assigned - this is not correct though
$status = restore_create_roles($restore, $xml_file) && $status;
$status = restore_roles_settings($restore, $xml_file) && $status;
//Now if all is OK, update:
// - course modinfo field
// - categories table
// - add user as teacher
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("checkingcourse");
}
//categories table
$course = get_record("course", "id", $restore->course_id);
fix_course_sortorder();
// Check if the user has course update capability in the newly restored course
// there is no need to load his capabilities again, because restore_roles_settings
// would have loaded it anyway, if there is any assignments.
// fix for MDL-6831
$newcontext = get_context_instance(CONTEXT_COURSE, $restore->course_id);
if (!has_capability('moodle/course:manageactivities', $newcontext)) {
// fix for MDL-9065, use the new config setting if exists
if ($CFG->creatornewroleid) {
role_assign($CFG->creatornewroleid, $USER->id, 0, $newcontext->id);
} else {
if ($legacyteachers = get_roles_with_capability('moodle/legacy:editingteacher', CAP_ALLOW, get_context_instance(CONTEXT_SYSTEM))) {
if ($legacyteacher = array_shift($legacyteachers)) {
role_assign($legacyteacher->id, $USER->id, 0, $newcontext->id);
}
} else {
notify('Could not find a legacy teacher role. You might need your moodle admin to assign a role with editing privilages to this course.');
}
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
//Cleanup temps (files and db)
if ($status) {
if (!defined('RESTORE_SILENTLY')) {
echo "<li>" . get_string("cleaningtempdata");
}
if (!($status = clean_temp_data($restore))) {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not clean up temporary data from files and database");
} else {
$errorstr = "Could not clean up temporary data from files and database";
return false;
}
}
if (!defined('RESTORE_SILENTLY')) {
echo '</li>';
}
}
// this is not a critical check - the result can be ignored
if (restore_close_html($restore)) {
if (!defined('RESTORE_SILENTLY')) {
echo '<li>Closing the Restorelog.html file.</li>';
}
} else {
if (!defined('RESTORE_SILENTLY')) {
notify("Could not close the restorelog.html file");
}
}
if (!defined('RESTORE_SILENTLY')) {
//End the main ul
echo "</ul>";
//End the main table
echo "</td></tr>";
echo "</table>";
}
return $status;
}
