/**
* Are we restoring a backup that was made on the same site that we are restoring to?
* This relies on some information that was only added to backup files in January 2009.
* For older backup files, fall back to guessing based on wwwroot. MDL-16614 explains
* when this guess could give the wrong answer.
* @return boolean true if the backup was made on the same site we are restoring to.
*/
function backup_is_same_site(&$restore)
{
global $CFG;
static $hashedsiteid = null;
if (is_null($hashedsiteid)) {
$hashedsiteid = md5(get_site_identifier());
}
if (!empty($restore->original_siteidentifier)) {
return $restore->original_siteidentifier == $hashedsiteid;
} else {
return $restore->original_wwwroot == $CFG->wwwroot;
}
}
protected function define_structure()
{
global $CFG;
$info = array();
$info['name'] = $this->get_setting_value('filename');
$info['moodle_version'] = $CFG->version;
$info['moodle_release'] = $CFG->release;
$info['backup_version'] = $CFG->backup_version;
$info['backup_release'] = $CFG->backup_release;
$info['backup_date'] = time();
$info['backup_uniqueid'] = $this->get_backupid();
$info['mnet_remoteusers'] = backup_controller_dbops::backup_includes_mnet_remote_users($this->get_backupid());
$info['original_wwwroot'] = $CFG->wwwroot;
$info['original_site_identifier_hash'] = md5(get_site_identifier());
$info['original_course_id'] = $this->get_courseid();
$originalcourseinfo = backup_controller_dbops::backup_get_original_course_info($this->get_courseid());
$info['original_course_fullname'] = $originalcourseinfo->fullname;
$info['original_course_shortname'] = $originalcourseinfo->shortname;
$info['original_course_startdate'] = $originalcourseinfo->startdate;
$info['original_course_contextid'] = get_context_instance(CONTEXT_COURSE, $this->get_courseid())->id;
$info['original_system_contextid'] = get_context_instance(CONTEXT_SYSTEM)->id;
// Get more information from controller
list($dinfo, $cinfo, $sinfo) = backup_controller_dbops::get_moodle_backup_information($this->get_backupid());
// Define elements
$moodle_backup = new backup_nested_element('moodle_backup');
$information = new backup_nested_element('information', null, array('name', 'moodle_version', 'moodle_release', 'backup_version', 'backup_release', 'backup_date', 'mnet_remoteusers', 'original_wwwroot', 'original_site_identifier_hash', 'original_course_id', 'original_course_fullname', 'original_course_shortname', 'original_course_startdate', 'original_course_contextid', 'original_system_contextid'));
$details = new backup_nested_element('details');
$detail = new backup_nested_element('detail', array('backup_id'), array('type', 'format', 'interactive', 'mode', 'execution', 'executiontime'));
$contents = new backup_nested_element('contents');
$activities = new backup_nested_element('activities');
$activity = new backup_nested_element('activity', null, array('moduleid', 'sectionid', 'modulename', 'title', 'directory'));
$sections = new backup_nested_element('sections');
$section = new backup_nested_element('section', null, array('sectionid', 'title', 'directory'));
$course = new backup_nested_element('course', null, array('courseid', 'title', 'directory'));
$settings = new backup_nested_element('settings');
$setting = new backup_nested_element('setting', null, array('level', 'section', 'activity', 'name', 'value'));
// Build the tree
$moodle_backup->add_child($information);
$information->add_child($details);
$details->add_child($detail);
$information->add_child($contents);
if (!empty($cinfo['activities'])) {
$contents->add_child($activities);
$activities->add_child($activity);
}
if (!empty($cinfo['sections'])) {
$contents->add_child($sections);
$sections->add_child($section);
}
if (!empty($cinfo['course'])) {
$contents->add_child($course);
}
$information->add_child($settings);
$settings->add_child($setting);
// Set the sources
$information->set_source_array(array((object) $info));
$detail->set_source_array($dinfo);
$activity->set_source_array($cinfo['activities']);
$section->set_source_array($cinfo['sections']);
$course->set_source_array($cinfo['course']);
$setting->set_source_array($sinfo);
// Prepare some information to be sent to main moodle_backup.xml file
return $moodle_backup;
}
function backup_general_info($bf, $preferences)
{
global $CFG;
fwrite($bf, start_tag("INFO", 1, true));
//The name of the backup
fwrite($bf, full_tag("NAME", 2, false, $preferences->backup_name));
//The moodle_version
fwrite($bf, full_tag("MOODLE_VERSION", 2, false, $preferences->moodle_version));
fwrite($bf, full_tag("MOODLE_RELEASE", 2, false, $preferences->moodle_release));
//The backup_version
fwrite($bf, full_tag("BACKUP_VERSION", 2, false, $preferences->backup_version));
fwrite($bf, full_tag("BACKUP_RELEASE", 2, false, $preferences->backup_release));
//The date
fwrite($bf, full_tag("DATE", 2, false, $preferences->backup_unique_code));
//The original site wwwroot
fwrite($bf, full_tag("ORIGINAL_WWWROOT", 2, false, $CFG->wwwroot));
//The original site identifier. MD5 hashed for security.
fwrite($bf, full_tag("ORIGINAL_SITE_IDENTIFIER_HASH", 2, false, md5(get_site_identifier())));
//The zip method used
if (!empty($CFG->zip)) {
$zipmethod = 'external';
} else {
$zipmethod = 'internal';
}
//Indicate if it includes external MNET users
$sql = "SELECT b.old_id\n FROM {$CFG->prefix}backup_ids b\n JOIN {$CFG->prefix}user u ON b.old_id=u.id\n WHERE b.backup_code = '{$preferences->backup_unique_code}'\n AND b.table_name = 'user' AND u.mnethostid != '{$CFG->mnet_localhost_id}'";
if (record_exists_sql($sql)) {
fwrite($bf, full_tag("MNET_REMOTEUSERS", 2, false, 'true'));
}
fwrite($bf, full_tag("ZIP_METHOD", 2, false, $zipmethod));
//Te includes tag
fwrite($bf, start_tag("DETAILS", 2, true));
//Now, go to mod element of preferences to print its status
foreach ($preferences->mods as $element) {
//Calculate info
$included = "false";
$userinfo = "false";
if ($element->backup) {
$included = "true";
if ($element->userinfo) {
$userinfo = "true";
}
}
//Prints the mod start
fwrite($bf, start_tag("MOD", 3, true));
fwrite($bf, full_tag("NAME", 4, false, $element->name));
fwrite($bf, full_tag("INCLUDED", 4, false, $included));
fwrite($bf, full_tag("USERINFO", 4, false, $userinfo));
if (isset($preferences->mods[$element->name]->instances) && is_array($preferences->mods[$element->name]->instances) && count($preferences->mods[$element->name]->instances)) {
fwrite($bf, start_tag("INSTANCES", 4, true));
foreach ($preferences->mods[$element->name]->instances as $id => $object) {
if (!empty($object->backup)) {
//Calculate info
$included = "false";
$userinfo = "false";
if ($object->backup) {
$included = "true";
if ($object->userinfo) {
$userinfo = "true";
}
}
fwrite($bf, start_tag("INSTANCE", 5, true));
fwrite($bf, full_tag("ID", 5, false, $id));
fwrite($bf, full_tag("NAME", 5, false, $object->name));
fwrite($bf, full_tag("INCLUDED", 5, false, $included));
fwrite($bf, full_tag("USERINFO", 5, false, $userinfo));
fwrite($bf, end_tag("INSTANCE", 5, true));
}
}
fwrite($bf, end_tag("INSTANCES", 4, true));
}
//Print the end
fwrite($bf, end_tag("MOD", 3, true));
}
//The metacourse in backup
if ($preferences->backup_metacourse == 1) {
fwrite($bf, full_tag("METACOURSE", 3, false, "true"));
} else {
fwrite($bf, full_tag("METACOURSE", 3, false, "false"));
}
//The user in backup
if ($preferences->backup_users == 1) {
fwrite($bf, full_tag("USERS", 3, false, "course"));
} else {
if ($preferences->backup_users == 0) {
fwrite($bf, full_tag("USERS", 3, false, "all"));
} else {
fwrite($bf, full_tag("USERS", 3, false, "none"));
}
}
//The logs in backup
if ($preferences->backup_logs == 1) {
fwrite($bf, full_tag("LOGS", 3, false, "true"));
} else {
fwrite($bf, full_tag("LOGS", 3, false, "false"));
}
//The user files
if ($preferences->backup_user_files == 1) {
fwrite($bf, full_tag("USERFILES", 3, false, "true"));
} else {
fwrite($bf, full_tag("USERFILES", 3, false, "false"));
}
//The course files
if ($preferences->backup_course_files == 1) {
fwrite($bf, full_tag("COURSEFILES", 3, false, "true"));
} else {
fwrite($bf, full_tag("COURSEFILES", 3, false, "false"));
}
//The site files
if ($preferences->backup_site_files == 1) {
fwrite($bf, full_tag("SITEFILES", 3, false, "true"));
} else {
fwrite($bf, full_tag("SITEFILES", 3, false, "false"));
}
//The gradebook histories
if (empty($CFG->disablegradehistory) && $preferences->backup_gradebook_history == 1) {
fwrite($bf, full_tag("GRADEBOOKHISTORIES", 3, false, "true"));
} else {
fwrite($bf, full_tag("GRADEBOOKHISTORIES", 3, false, "false"));
}
//The messages in backup
if ($preferences->backup_messages == 1 && $preferences->backup_course == SITEID) {
fwrite($bf, full_tag("MESSAGES", 3, false, "true"));
} else {
fwrite($bf, full_tag("MESSAGES", 3, false, "false"));
}
//The blogs in backup
if ($preferences->backup_blogs == 1 && $preferences->backup_course == SITEID) {
fwrite($bf, full_tag("BLOGS", 3, false, "true"));
} else {
fwrite($bf, full_tag("BLOGS", 3, false, "false"));
}
//The mode of writing the block data
fwrite($bf, full_tag('BLOCKFORMAT', 3, false, 'instances'));
fwrite($bf, end_tag("DETAILS", 2, true));
$status = fwrite($bf, end_tag("INFO", 1, true));
///Roles stuff goes in here
fwrite($bf, start_tag('ROLES', 1, true));
$roles = backup_fetch_roles($preferences);
$sitecontext = get_context_instance(CONTEXT_SYSTEM);
$coursecontext = get_context_instance(CONTEXT_COURSE, $preferences->backup_course);
foreach ($roles as $role) {
fwrite($bf, start_tag('ROLE', 2, true));
fwrite($bf, full_tag('ID', 3, false, $role->id));
fwrite($bf, full_tag('NAME', 3, false, $role->name));
fwrite($bf, full_tag('SHORTNAME', 3, false, $role->shortname));
/// Calculate $role name in course
$nameincourse = role_get_name($role, $coursecontext);
if ($nameincourse != $role->name) {
fwrite($bf, full_tag('NAMEINCOURSE', 3, false, $nameincourse));
}
// find and write all default capabilities
fwrite($bf, start_tag('CAPABILITIES', 3, true));
// pull out all default (site context) capabilities
if ($capabilities = role_context_capabilities($role->id, $sitecontext)) {
foreach ($capabilities as $capability => $value) {
fwrite($bf, start_tag('CAPABILITY', 4, true));
fwrite($bf, full_tag('NAME', 5, false, $capability));
fwrite($bf, full_tag('PERMISSION', 5, false, $value));
// use this to pull out the other info (timemodified and modifierid)
$cap = get_record_sql("SELECT *\n FROM {$CFG->prefix}role_capabilities\n WHERE capability = '{$capability}'\n AND contextid = {$sitecontext->id}\n AND roleid = {$role->id}");
fwrite($bf, full_tag("TIMEMODIFIED", 5, false, $cap->timemodified));
fwrite($bf, full_tag("MODIFIERID", 5, false, $cap->modifierid));
fwrite($bf, end_tag('CAPABILITY', 4, true));
}
}
fwrite($bf, end_tag('CAPABILITIES', 3, true));
fwrite($bf, end_tag('ROLE', 2, true));
}
fwrite($bf, end_tag('ROLES', 1, true));
return $status;
}
/**
* rc4decrypt
*
* @param string $data Data to decrypt.
* @return string The now decrypted data.
*/
function rc4decrypt($data)
{
return endecrypt(get_site_identifier(), $data, 'de');
}
$navlinks = array();
$navlinks[] = array('name' => $stradministration, 'link' => "../{$CFG->admin}/index.php", 'type' => 'misc');
$navlinks[] = array('name' => $strregistration, 'link' => null, 'type' => 'misc');
$navigation = build_navigation($navlinks);
print_header("{$site->shortname}: {$strregistration}", $site->fullname, $navigation);
print_heading($strregistration);
print_simple_box($strregistrationinfo, "center", "70%");
/// Print the form
echo "<form id=\"mform1\" class=\"mform\" action=\"http://moodle.org/register/\" method=\"post\">\n";
echo '<fieldset id="registration">';
echo '<legend>Registration Information</legend>';
echo "<!-- The following hidden variables are to help prevent fake entries being sent. -->\n";
echo "<!-- Together they form a key. If any of these change between updates then the entry -->\n";
echo "<!-- is flagged as a new entry and will be manually checked by the list maintainer -->\n";
echo "<input type=\"hidden\" name=\"url\" value=\"{$CFG->wwwroot}\" />\n";
echo "<input type=\"hidden\" name=\"secret\" value=\"" . get_site_identifier() . "\" />\n";
echo "<input type=\"hidden\" name=\"host\" value=\"" . $_SERVER["HTTP_HOST"] . "\" />\n";
echo "<input type=\"hidden\" name=\"lang\" value=\"" . current_language() . "\" />\n";
echo "<input type=\"hidden\" name=\"version\" value=\"{$CFG->version}\" />\n";
echo "<input type=\"hidden\" name=\"release\" value=\"{$CFG->release}\" />\n";
echo '<div class="fitem">';
echo '<div class="fitemtitle"><label>URL</label></div>';
echo '<div class="felement ftext">' . $CFG->wwwroot . '</div>';
echo '</div>';
echo '<div class="fitem">';
echo '<div class="fitemtitle"><label>' . get_string("currentversion") . '</label></div>';
echo '<div class="felement ftext">' . "{$CFG->release} ({$CFG->version})" . '</div>';
echo '</div>';
echo '<div class="fitem">';
echo '<div class="fitemtitle"><label for="sitename">' . get_string("fullsitename") . '</label></div>';
echo '<div class="felement ftext">';
/**
* Given the information fetched from moodle_backup.xml file
* decide if we are restoring in the same site the backup was
* generated or no. Behavior of various parts of restore are
* dependent of this.
*
* Backups created natively in 2.0 and later declare the hashed
* site identifier. Backups created by conversion from a 1.9
* backup do not declare such identifier, so there is a fallback
* to wwwroot comparison. See MDL-16614.
*/
public static function backup_is_samesite($info)
{
global $CFG;
$hashedsiteid = md5(get_site_identifier());
if (isset($info->original_site_identifier_hash) && !empty($info->original_site_identifier_hash)) {
return $info->original_site_identifier_hash == $hashedsiteid;
} else {
return $info->original_wwwroot == $CFG->wwwroot;
}
}
/**
* rc4decrypt
*
* Please note that in this version of moodle that the default for rc4encryption is
* using the slightly more secure password key. There may be an issue when upgrading
* from an older version of moodle.
*
* @todo MDL-31836 Remove the old password key in version 2.4
* Code also needs to be changed in sessionlib.php
* @see get_moodle_cookie()
* @see set_moodle_cookie()
*
* @param string $data Data to decrypt.
* @param bool $usesecurekey Lets us know if we are using the old or new secure password key.
* @return string The now decrypted data.
*/
function rc4decrypt($data, $usesecurekey = true)
{
if (!$usesecurekey) {
$passwordkey = 'nfgjeingjk';
} else {
$passwordkey = get_site_identifier();
}
return endecrypt($passwordkey, $data, 'de');
}
function generate_email_processing_address($modid, $modargs)
{
global $CFG;
$header = $CFG->mailprefix . substr(base64_encode(pack('C', $modid)), 0, 2) . $modargs;
return $header . substr(md5($header . get_site_identifier()), 0, 16) . '@' . $CFG->maildomain;
}
/**
* Return the site secret for a given hub
* site identifier is assigned to Mooch
* each hub has a unique and personal site secret.
* @param string $huburl
* @return string site secret
*/
public function get_site_secret_for_hub($huburl)
{
global $DB;
$existingregistration = $DB->get_record('registration_hubs', array('huburl' => $huburl));
if (!empty($existingregistration)) {
return $existingregistration->secret;
}
if ($huburl == HUB_MOODLEORGHUBURL) {
$siteidentifier = get_site_identifier();
} else {
$siteidentifier = random_string(32) . $_SERVER['HTTP_HOST'];
}
return $siteidentifier;
}
blocks_repopulate_page($page);
//add admin_tree block to site if not already present
if ($admintree = get_record('block', 'name', 'admin_tree')) {
$page = page_create_object(PAGE_COURSE_VIEW, SITEID);
$pageblocks = blocks_get_by_page($page);
blocks_execute_action($page, $pageblocks, 'add', (int) $admintree->id, false, false);
if ($admintreeinstance = get_record('block_instance', 'pagetype', $page->type, 'pageid', SITEID, 'blockid', $admintree->id)) {
$pageblocks = blocks_get_by_page($page);
// Needs to be re-got, since has just changed
blocks_execute_action($page, $pageblocks, 'moveleft', $admintreeinstance, false, false);
}
}
set_config('adminblocks_initialised', 1);
}
/// Define the unique site ID code if it isn't already set. This getter does that as a side-effect.
get_site_identifier();
/// Check if the guest user exists. If not, create one.
if (!record_exists("user", "username", "guest")) {
if (!($guest = create_guest_record())) {
notify("Could not create guest user record !!!");
}
}
/// Set up the admin user
if (empty($CFG->rolesactive)) {
build_context_path();
// just in case - should not be needed
create_admin_user();
}
/// Check for valid admin user - no guest autologin
require_login(0, false);
$context = get_context_instance(CONTEXT_SYSTEM);
/**
* Returns a unique hash for this site and this enrolment instance.
*
* Used to verify that the link to the cartridge has not just been guessed.
*
* @param int $toolid The id of the shared tool
* @return string MD5 hash of combined site ID and enrolment instance ID.
* @since Moodle 3.2
*/
public static function generate_tool_token($toolid)
{
$siteidentifier = get_site_identifier();
$checkhash = md5($siteidentifier . '_enrol_lti_' . $toolid);
return $checkhash;
}
/**
* rc4decrypt
*
* @todo Finish documenting this function
*
* @param string $data Data to decrypt
* @return string The now decrypted data
*/
function rc4decrypt($data)
{
$password = get_site_identifier();
return endecrypt($password, $data, 'de');
}
$xml_output = new memory_xml_output();
$xml = new xml_writer($xml_output);
// Start the XML construction process
$xml->start();
// Open the top level XML element
$xml->begin_tag('MOODLE_ROLES_MIGRATION');
// General site and migration data
$xml->begin_tag('INFO');
$xml->full_tag('NAME', 'rolesmigration');
$xml->full_tag('MOODLE_VERSION', $CFG->version);
$xml->full_tag('MOODLE_RELEASE', $CFG->release);
$xml->full_tag('BACKUP_VERSION', $CFG->backup_version);
$xml->full_tag('BACKUP_RELEASE', $CFG->backup_release);
$xml->full_tag('DATE', time());
$xml->full_tag('ORIGINAL_WWWROOT', $CFG->wwwroot);
$xml->full_tag('ORIGINAL_SITE_IDENTIFIER_HASH', md5(get_site_identifier()));
$xml->end_tag('INFO');
// The roles tag contains all data for selected Roles on export screen
$xml->begin_tag('ROLES');
// Loop through provided role IDs
foreach ($data->export as $role) {
// Grab role from DB
if ($role = $DB->get_record('role', array('shortname' => $role))) {
$role_array = (array) $role;
// Loop through columns and create tag for each one
$xml->begin_tag('ROLE');
foreach ($role_array as $field => $value) {
$xml->full_tag(strtoupper($field), $value);
// Lets make an array of Role IDs to use later while we're here
if ('id' == $field) {
$role_ids[] = $value;
function old_urkund_get_url($baseurl, $plagiarismfile)
{
// Get url of api.
global $DB;
$receiver = $DB->get_field('plagiarism_urkund_config', 'value', array('cm' => $plagiarismfile->cm, 'name' => 'urkund_receiver'));
if (empty($receiver)) {
return '';
}
return $baseurl . '/' . $receiver . '/' . md5(get_site_identifier()) . '_' . $plagiarismfile->cm . '_' . $plagiarismfile->id;
}
$result = $xmlrpcclient->call($function, $params);
} catch (Exception $e) {
$error = $OUTPUT->notification(get_string('errorregistration', 'hub', $e->getMessage()));
}
}
/////// FORM REGISTRATION ACTION //////
if (!empty($fromform) and empty($update) and confirm_sesskey()) {
if (!empty($fromform) and confirm_sesskey()) {
// if the register button has been clicked
$params = (array) $fromform;
//we are using the form input as the redirection parameters (token, url and name)
$unconfirmedhub = $registrationmanager->get_unconfirmedhub($huburl);
if (empty($unconfirmedhub)) {
//we save the token into the communication table in order to have a reference
$unconfirmedhub = new stdClass();
$unconfirmedhub->token = get_site_identifier();
$unconfirmedhub->huburl = $huburl;
$unconfirmedhub->hubname = $hubname;
$unconfirmedhub->confirmed = 0;
$unconfirmedhub->id = $registrationmanager->add_registeredhub($unconfirmedhub);
}
$params['token'] = $unconfirmedhub->token;
$params['url'] = $CFG->wwwroot;
redirect(new moodle_url($huburl . '/local/hub/siteregistration.php', $params));
}
}
/////// OUTPUT SECTION /////////////
echo $OUTPUT->header();
//Display update notification result
if (!empty($registeredhub->confirmed)) {
if (!empty($result)) {
