Gecko [ elibrary.unsap.ac.id ]

Name	Size	Permission	Date
amd	[ DIR ]	drwxrwxrwx	2024-12-24 01:28
classes	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
filters	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
profile	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
selector	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
templates	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
tests	[ DIR ]	drwxrwxrwx	2022-12-30 22:37
action_redir.php	10.01 KB	-rw-rw-rw-	2022-01-31 00:06
calendar.php	3.74 KB	-rw-rw-rw-	2022-01-31 00:06
course.php	2.14 KB	-rw-rw-rw-	2022-01-31 00:06
defaulthomepage.php	2.13 KB	-rw-rw-rw-	2022-01-31 00:06
edit.php	11.18 KB	-rw-rw-rw-	2022-01-31 00:06
edit_form.php	9.53 KB	-rw-rw-rw-	2022-01-31 00:06
editadvanced.php	12.98 KB	-rw-rw-rw-	2022-01-31 00:06
editadvanced_form.php	12.77 KB	-rw-rw-rw-	2022-01-31 00:06
editlib.php	20.02 KB	-rw-rw-rw-	2022-01-31 00:06
editor.php	2.41 KB	-rw-rw-rw-	2022-01-31 00:06
editor_form.php	2.51 KB	-rw-rw-rw-	2022-01-31 00:06
emailupdate.php	3.51 KB	-rw-rw-rw-	2022-01-31 00:06
externallib.php	84.81 KB	-rw-rw-rw-	2022-01-31 00:06
files.php	3.44 KB	-rw-rw-rw-	2022-01-31 00:06
files_form.php	2.44 KB	-rw-rw-rw-	2022-01-31 00:06
forum.php	3.23 KB	-rw-rw-rw-	2022-01-31 00:06
forum_form.php	3.91 KB	-rw-rw-rw-	2022-01-31 00:06
grouppix.php	1.77 KB	-rw-rw-rw-	2022-01-31 00:06
index.php	12.98 KB	-rw-rw-rw-	2022-01-31 00:06
language.php	2.65 KB	-rw-rw-rw-	2022-01-31 00:06
language_form.php	2.9 KB	-rw-rw-rw-	2022-01-31 00:06
lib.php	52.67 KB	-rw-rw-rw-	2022-01-31 00:06
managetoken.php	3.93 KB	-rw-rw-rw-	2022-01-31 00:06
pix.php	1.51 KB	-rw-rw-rw-	2022-01-31 00:06
policy.php	3.26 KB	-rw-rw-rw-	2022-01-31 00:06
portfolio.php	4.7 KB	-rw-rw-rw-	2022-01-31 00:06
portfoliologs.php	5.67 KB	-rw-rw-rw-	2022-01-31 00:06
preferences.php	3.02 KB	-rw-rw-rw-	2022-01-31 00:06
profile.php	8.22 KB	-rw-rw-rw-	2022-01-31 00:06
profilesys.php	2.33 KB	-rw-rw-rw-	2022-01-31 00:06
renderer.php	16.6 KB	-rw-rw-rw-	2022-01-31 00:06
repository.php	2.78 KB	-rw-rw-rw-	2022-01-31 00:06
upgrade.txt	896 B	-rw-rw-rw-	2022-01-31 00:06
view.php	8.48 KB	-rw-rw-rw-	2022-01-31 00:06

Rename

<?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/>.

/**
 * Change a users email address
 *
 * @copyright 1999 Martin Dougiamas  http://dougiamas.com
 * @license http://www.gnu.org/copyleft/gpl.html GNU GPL v3 or later
 * @package core_user
 */

require_once('../config.php');
require_once($CFG->libdir.'/adminlib.php');
require_once($CFG->dirroot.'/user/editlib.php');
require_once($CFG->dirroot.'/user/lib.php');

$key = required_param('key', PARAM_ALPHANUM);
$id  = required_param('id', PARAM_INT);

$PAGE->set_url('/user/emailupdate.php', array('id' => $id, 'key' => $key));
$PAGE->set_context(context_system::instance());

if (!$user = $DB->get_record('user', array('id' => $id))) {
    print_error('invaliduserid');
}

$preferences = get_user_preferences(null, null, $user->id);
$a = new stdClass();
$a->fullname = fullname($user, true);
$stremailupdate = get_string('emailupdate', 'auth', $a);

$PAGE->set_title(format_string($SITE->fullname) . ": $stremailupdate");
$PAGE->set_heading(format_string($SITE->fullname) . ": $stremailupdate");

if (empty($preferences['newemailattemptsleft'])) {
    redirect("$CFG->wwwroot/user/view.php?id=$user->id");

} else if ($preferences['newemailattemptsleft'] < 1) {
    cancel_email_update($user->id);

echo $OUTPUT->header();
    echo $OUTPUT->box(get_string('auth_outofnewemailupdateattempts', 'auth'), 'center');
    echo $OUTPUT->footer();
} else if ($key == $preferences['newemailkey']) {
    $olduser = clone($user);
    cancel_email_update($user->id);
    $user->email = $preferences['newemail'];

// Detect duplicate before saving.
    if (empty($CFG->allowaccountssameemail)) {
        // Make a case-insensitive query for the given email address.
        $select = $DB->sql_equal('email', ':email', false) . ' AND mnethostid = :mnethostid AND id <> :userid';
        $params = array(
            'email' => $user->email,
            'mnethostid' => $CFG->mnet_localhost_id,
            'userid' => $user->id
        );
        // If there are other user(s) that already have the same email, cancel and redirect.
        if ($DB->record_exists_select('user', $select, $params)) {
            redirect(new moodle_url('/user/view.php', ['id' => $user->id]), get_string('emailnowexists', 'auth'));
        }
    }

// Update user email.
    $authplugin = get_auth_plugin($user->auth);
    $authplugin->user_update($olduser, $user);
    user_update_user($user, false);
    $a->email = $user->email;
    redirect(
        new moodle_url('/user/view.php', ['id' => $user->id]),
        get_string('emailupdatesuccess', 'auth', $a),
        null,
        \core\output\notification::NOTIFY_SUCCESS
    );

} else {
    $preferences['newemailattemptsleft']--;
    set_user_preference('newemailattemptsleft', $preferences['newemailattemptsleft'], $user->id);
    echo $OUTPUT->header();
    echo $OUTPUT->box(get_string('auth_invalidnewemailkey', 'auth'), 'center');
    echo $OUTPUT->footer();
}