104 lines
4.1 KiB
PHP
104 lines
4.1 KiB
PHP
<?php
|
|
// This file is part of Moodle - http://moodle.org/
|
|
//
|
|
// Moodle is free software: you can redistribute it and/or modify
|
|
// it under the terms of the GNU General Public License as published by
|
|
// the Free Software Foundation, either version 3 of the License, or
|
|
// (at your option) any later version.
|
|
//
|
|
// Moodle is distributed in the hope that it will be useful,
|
|
// but WITHOUT ANY WARRANTY; without even the implied warranty of
|
|
// MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
|
// GNU General Public License for more details.
|
|
//
|
|
// You should have received a copy of the GNU General Public License
|
|
// along with Moodle. If not, see <http://www.gnu.org/licenses/>.
|
|
|
|
/**
|
|
* Database enrolment plugin upgrade.
|
|
*
|
|
* @package enrol_database
|
|
* @copyright 2011 Petr Skoda {@link http://skodak.org}
|
|
* @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
|
|
*/
|
|
|
|
function xmldb_enrol_database_upgrade($oldversion) {
|
|
global $DB;
|
|
// Automatically generated Moodle v4.2.0 release upgrade line.
|
|
// Put any upgrade step following this.
|
|
|
|
// Automatically generated Moodle v4.3.0 release upgrade line.
|
|
// Put any upgrade step following this.
|
|
|
|
// Automatically generated Moodle v4.4.0 release upgrade line.
|
|
// Put any upgrade step following this.
|
|
|
|
// Automatically generated Moodle v4.5.0 release upgrade line.
|
|
// Put any upgrade step following this.
|
|
|
|
// Automatically generated Moodle v5.0.0 release upgrade line.
|
|
// Put any upgrade step following this.
|
|
|
|
if ($oldversion < 2025041402) {
|
|
// Remove duplicated enrolment records, keeping only the earliest records.
|
|
$transaction = $DB->start_delegated_transaction();
|
|
$courses = $DB->get_records_sql(
|
|
"
|
|
SELECT courseid
|
|
FROM {enrol}
|
|
WHERE enrol = 'database'
|
|
GROUP BY courseid
|
|
HAVING COUNT(*) > 1"
|
|
);
|
|
foreach ($courses as $course) {
|
|
$instances = $DB->get_records('enrol', ['enrol' => 'database', 'courseid' => $course->courseid], 'id ASC');
|
|
$idtokeep = array_key_first($instances);
|
|
$idstodelete = array_slice(array_keys($instances), 1);
|
|
[$insql, $inparams] = $DB->get_in_or_equal($idstodelete, SQL_PARAMS_NAMED);
|
|
|
|
// Migrate enrolments where possible.
|
|
// First, get the user enrolments that can be migrated.
|
|
$migrateusers = $DB->get_records_sql(
|
|
"SELECT ue.id
|
|
FROM {user_enrolments} ue
|
|
WHERE ue.enrolid $insql
|
|
AND NOT EXISTS (
|
|
SELECT 1
|
|
FROM {user_enrolments} ue2
|
|
WHERE ue2.userid = ue.userid
|
|
AND ue2.enrolid = :idtokeep)",
|
|
array_merge($inparams, ['idtokeep' => $idtokeep]),
|
|
);
|
|
|
|
// Then update them if any exist.
|
|
if (!empty($migrateusers)) {
|
|
$migrateids = array_keys($migrateusers);
|
|
[$migratein, $migrateparams] = $DB->get_in_or_equal($migrateids, SQL_PARAMS_NAMED);
|
|
$DB->execute(
|
|
"UPDATE {user_enrolments} SET enrolid = :idtokeep WHERE id $migratein",
|
|
array_merge($migrateparams, ['idtokeep' => $idtokeep]),
|
|
);
|
|
}
|
|
|
|
$DB->delete_records_select('user_enrolments', "enrolid $insql", $inparams);
|
|
|
|
// Migrate role assignments.
|
|
$DB->execute(
|
|
"
|
|
UPDATE {role_assignments}
|
|
SET itemid = :idtokeep
|
|
WHERE component = :component
|
|
AND itemid $insql",
|
|
array_merge($inparams, ['component' => 'enrol_database', 'idtokeep' => $idtokeep])
|
|
);
|
|
$DB->delete_records_select('role_assignments', "itemid $insql", $inparams);
|
|
|
|
$DB->delete_records_list('enrol', 'id', $idstodelete);
|
|
}
|
|
$transaction->allow_commit();
|
|
upgrade_plugin_savepoint(true, 2025041402, 'enrol', 'database');
|
|
}
|
|
|
|
return true;
|
|
}
|