$a->oldemail = $usernew->email = $user->email; $email_changed_html = print_box(get_string('auth_changingemailaddress', 'auth', $a), 'generalbox', 'notice', true); $email_changed_html .= print_continue("{$CFG->wwwroot}/user/view.php?id={$user->id}&course={$course->id}", true); $email_changed = true; } } $authplugin = get_auth_plugin($user->auth); $usernew->timemodified = time(); $usernew->username = get_field('user', 'username', 'id', $usernew->id); // not in the edit form of the user // Added: to call calendar ws to edit user. if (modifyQSUser($usernew)) { $olduserinfo = get_record('user', 'id', $usernew->id); if (editUserProfile($usernew->username, $usernew)) { if (!update_record('user', $usernew)) { admin_moodlefailed_email($usernew, 'modifyUser'); error('Error updating user record'); } // pass a true $userold here if (!$authplugin->user_update($user, $userform->get_data(false))) { // auth update failed, rollback for moodle update_record('user', addslashes_object($user)); error('Failed to update user data on external auth: ' . $user->auth . '. See the server logs for more details.'); } //update preferences useredit_update_user_preference($usernew); //update interests if (!empty($CFG->usetags)) { useredit_update_interests($usernew, $usernew->interests); } //update user picture
// Added: 05/08/2012 add_to_log($course->id, 'course', 'unenrol', "view.php?id={$course->id}", $course->id); } else { enrollQSUser($tmpuser, $course); admin_webservicefailed_email($tmpuser, 'unenrollUser', $course); } } else { error("An error occurred while trying to unenroll that person."); } redirect($CFG->wwwroot . '/user/index.php?id=' . $course->id); } else { /// Added: Check value submitted and call calendar ws to unenrol user if (unenrollQSUser($USER, $course)) { if (enrollUserInCourse($USER->username, $USER->username, $course->fullname, false)) { if (!role_unassign(0, $USER->id, 0, $context->id)) { admin_moodlefailed_email($USER, 'unenrollUser', $course); error("An error occurred while trying to unenroll you."); } send_unenrollment_notification($course, $USER); // Added: 05/08/2012 // force a refresh of mycourses unset($USER->mycourses); add_to_log($course->id, 'course', 'unenrol', "view.php?id={$course->id}", $course->id); } else { enrollQSUser($USER, $course); admin_webservicefailed_email($USER, 'unenrollUser', $course); } } else { error("An error occurred while trying to unenroll you."); } redirect($CFG->wwwroot);
if (editUserProfile($USER->username, $usernew)) { if (!update_record('user', $usernew)) { admin_moodlefailed_email($usernew, 'modifyUser', $course); error('Error updating user record'); } // pass a true $userold here if (!$authplugin->user_update($user, $userform->get_data(false))) { // auth update failed, rollback for moodle update_record('user', addslashes_object($user)); error('Failed to update user data on external auth: ' . $user->auth . '. See the server logs for more details.'); } //set new password if specified if (!empty($usernew->newpassword)) { if ($authplugin->can_change_password()) { if (!$authplugin->user_update_password($usernew, $usernew->newpassword)) { admin_moodlefailed_email($usernew, 'modifyUserPassword', $course); error('Failed to update password on external auth: ' . $usernew->auth . '. See the server logs for more details.'); } } } } else { modifyQSUser($olduserinfo); admin_webservicefailed_email($olduserinfo, 'modifyUser', $course); } } $usercreated = false; } //update preferences useredit_update_user_preference($usernew); // update tags if (!empty($CFG->usetags)) {
$usernew = new object(); $usernew->id = -1; $usernew->auth = 'manual'; $usernew->deleted = 0; unset($usernew->id); $usernew->mnethostid = $CFG->mnet_localhost_id; // always local user $usernew->confirmed = 1; $usernew->password = hash_internal_user_password($password); $usernew->username = $username; $usernew->email = $email; $usernew->firstname = $firstname; $usernew->lastname = $lastname; if (createUserProfile($username, $usernew)) { if (!($usernew->id = insert_record('user', $usernew))) { admin_moodlefailed_email($usernew, 'addUser', $course); error('Error creating user record'); } // Insert the user_custom_profile_field for timezone $rec = new object(); $rec->userid = $usernew->id; $rec->fieldid = 4; $rec->data = $timezone; insert_record('user_info_data', $rec); // Insert the user_custom_profile_field for companyname $rec = new object(); $rec->userid = $usernew->id; $rec->fieldid = 2; $rec->data = $companyname; insert_record('user_info_data', $rec); // reload from db
echo "<br> Context id is {$context->id}"; if (!($user = get_record('user', 'username', $username))) { echo 'The username ' . $username . ' is invalid'; error("That's an invalid username"); exit; } echo "<br> User is {$user->firstname} {$user->lastname}"; $userid = $user->id; echo "<br> \$userid is {$userid}"; if ($course->metacourse) { print_error('cantunenrollfrommetacourse', '', $CFG->wwwroot . '/course/view.php?id=' . $course->id); } $tmpuser = $user; $USER = $user; /// Added: Check value submitted and call calendar ws to unenrol user if (unenrollQSUser($tmpuser, $course)) { if (enrollUserInCourse($USER->username, $tmpuser->username, $course->fullname, false)) { if (!role_unassign(0, $userid, 0, $context->id)) { admin_moodlefailed_email($tmpuser, 'unenrollUser', $course); error("An error occurred while trying to unenroll that person."); } send_unenrollment_notification($course, $tmpuser); // Added: 05/08/2012 add_to_log($course->id, 'course', 'unenrol', "view.php?id={$course->id}", $course->id); } else { enrollQSUser($tmpuser, $course); admin_webservicefailed_email($tmpuser, 'unenrollUser', $course); } } else { error("An error occurred while trying to unenroll that person."); }
print_heading(get_string('deleteuser', 'admin')); $optionsyes = array('delete' => $delete, 'confirm' => md5($delete), 'sesskey' => sesskey()); notice_yesno(get_string('deletecheckfull', '', "'{$fullname}'"), 'user.php', 'user.php', $optionsyes, NULL, 'post', 'get'); admin_externalpage_print_footer(); die; } else { if (data_submitted() and !$user->deleted) { // Added: to call calendar ws to delete user, if fails then dont delete // Added: 01.03.2010 - quotasystem.php if (deleteQSUser($user)) { if (deleteUserProfile($USER->username, $user)) { if (delete_user($user)) { notify(get_string('deletedactivity', '', fullname($user, true))); } else { notify(get_string('deletednot', '', fullname($user, true))); admin_moodlefailed_email($user, 'deleteUser'); } } else { addQSUser($user); // re-Adds the user to the QS if second WS call fails admin_webservicefailed_email($user, 'deleteUser'); notify(get_string('deletednot', '', fullname($user, true))); } } else { //error('This account could not be deleted.'); notify(get_string('deletednot', '', fullname($user, true))); } } } } else { if ($acl and confirm_sesskey()) {
function _deleteUser($user) { $retVal = true; echo "<br> {$username} is now going to be deleted from vLab!"; if (deleteQSUser($user)) { echo "<br> deleteQSUser for {$user->username} was successful."; if (deleteUserProfile('admin', $user)) { echo "<br> deleteUserProfile for {$user->username} was successful."; if (delete_user($user)) { echo "<br> delete_user for {$user->username} was successful."; echo "<br> {$user->username} was successfully deleted from vLab."; send_user_deleted_notification($user); } else { echo "<br> Error occurred in delete_user while trying delete {$username} from vLab."; admin_moodlefailed_email($user, 'deleteUser'); $retVal = false; } } else { addQSUser($user); // re-Adds the user to the QS if second WS call fails echo "<br> Error occurred in deleteUserProfile while trying delete {$username} from vLab."; admin_webservicefailed_email($user, 'deleteUser'); $retVal = false; } } else { echo "<br> Error occurred in deleteQSUser while trying delete {$username} from vLab."; admin_moodlefailed_email($user, 'deleteUser'); $retVal = false; } return $retVal; }