if (!role_unassign(0, $user->id, 0, $context->id)) { // Should email the Admin if this happens error("An error occurred while trying to unenrol that person."); exit; } //admin_moodlefailed_email($user,'unenrollUser'); } else { echo "<br> enrollQSUser was successful"; if (!enrollUserInCourse($user->username, $user->username, $course->fullname, true)) { echo "<br> enrollUserInCourse was NOT successful"; if (!role_unassign(0, $user->id, 0, $context->id)) { error("An error occurred while trying to unenrol that person."); exit; } echo "<br> role_unassign was successful"; // Should email the Admin if this happens unenrollQSUser($user, $course); admin_webservicefailed_email($user, 'enrollUser', $course); } echo "<br> enrollUserInCourse was successful"; } $payload = file_get_contents($destination); send_enrollment_notification($course, $user); } else { echo "<br> User {$user->username} was already enrolled in course {$course->fullname}"; } } else { echo "<br> get_record('role','name','Student') was NOT successful"; error("get_record('role','name','Student') was NOT successful"); exit; }
$temp_user->email = $usernew->preference_newemail; $temp_user->emailstop = NULL; $a = new stdClass(); $a->url = $CFG->wwwroot . '/user/emailupdate.php?key=' . $usernew->preference_newemailkey . '&id=' . $user->id; $a->site = $SITE->fullname; $a->fullname = fullname($user, true); $emailupdatemessage = get_string('auth_emailupdatemessage', 'auth', $a); $emailupdatetitle = get_string('auth_emailupdatetitle', 'auth', $a); if (!($mail_results = email_to_user($temp_user, get_admin(), $emailupdatetitle, $emailupdatemessage))) { die("could not send email!"); } } } else { // End If - calendar.php modifyQSUser($olduserinfo); admin_webservicefailed_email($olduserinfo, 'modifyUser'); error('Error updating user record (VL)'); } } else { error('Error updating user record (QS)'); } // reload from db $usernew = get_record('user', 'id', $user->id); events_trigger('user_updated', $usernew); setWSUserDefaultTimeZone($USER->username, $usernew); //Added: 01.03.2011 - calendar.php if ($USER->id == $user->id) { // Override old $USER session variable if needed foreach ((array) $usernew as $variable => $value) { $USER->{$variable} = $value; }
} 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); } } $strunenrol = get_string('unenrol'); $navlinks = array(); $navlinks[] = array('name' => $strunenrol, 'link' => null, 'type' => 'misc'); $navigation = build_navigation($navlinks); print_header("{$course->shortname}: {$strunenrol}", $course->fullname, $navigation); if ($userid) { if (!($user = get_record('user', 'id', $userid))) { error('That user does not exist!');
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 $usernew = get_record('user', 'id', $usernew->id); // setUserTimeZone($usernew->id, $zone); setWSUserDefaultTimeZone('admin', $usernew); editUserProfilePassword("admin", $usernew->username, $password); if (!addQSUser($usernew)) { admin_signuperror_email($usernew); //error('An error has occured, please try again shortly.'); } } else { $usercreated = false; //deleteQSUser($usernew); admin_webservicefailed_email($usernew, 'addUser', $course); }
} else { // Redirect to roles assignment redirect($CFG->wwwroot . "/{$CFG->admin}/roles/assign.php?contextid={$context->id}"); } } else { if (!update_course($data)) { print_error('coursenotupdated'); } $updatedcourse = get_record('course', 'id', $course->id); // Added: JAM 12.30.2010 - sends ws call to modify a course in quota system if (!modifyQSCourse($updatedcourse)) { admin_webservicefailed_email($USER, 'modifyCourse', $updatedcourse); } // Added: JAM 02.23.2012 - sends ws call to modify a course in virtualLabs if (!modifyVLCourse($updatedcourse)) { admin_webservicefailed_email($USER, 'modifyCourse', $updatedcourse); } redirect($CFG->wwwroot . "/course/view.php?id={$course->id}"); } } } /// Print the form $site = get_site(); $streditcoursesettings = get_string("editcoursesettings"); $straddnewcourse = get_string("addnewcourse"); $stradministration = get_string("administration"); $strcategories = get_string("categories"); $navlinks = array(); if (!empty($course)) { $navlinks[] = array('name' => $streditcoursesettings, 'link' => null, 'type' => 'misc'); $title = $streditcoursesettings;
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_error('confirmsesskeybad', 'error'); } // OK checks done, delete the course now. add_to_log(SITEID, "course", "delete", "view.php?id={$course->id}", "{$course->fullname} (ID {$course->id})"); $strdeletingcourse = get_string("deletingcourse", "", format_string($course->shortname)); $navlinks[] = array('name' => $stradministration, 'link' => "../{$CFG->admin}/index.php", 'type' => 'misc'); $navlinks[] = array('name' => $strcategories, 'link' => "index.php", 'type' => 'misc'); $navlinks[] = array('name' => $category->name, 'link' => "category.php?id={$course->category}", 'type' => 'misc'); $navlinks[] = array('name' => $strdeletingcourse, 'link' => null, 'type' => 'misc'); $navigation = build_navigation($navlinks); print_header("{$site->shortname}: {$strdeletingcourse}", $site->fullname, $navigation); print_heading($strdeletingcourse); // Added: JAM 12.30.2010 - sends ws call to delete a course in quota system if (deleteQSCourse($course)) { if (deleteVLCourse($course)) { // Added: JAM 02.23.2012 - sends ws call to delete a course in virtualLabs delete_course($course); fix_course_sortorder(); //update course count in catagories print_heading(get_string("deletedcourse", "", format_string($course->shortname))); print_continue("category.php?id={$course->category}"); print_footer(); } else { addQSCourse($course); admin_webservicefailed_email($USER, 'deleteCourse', $course); error('Course could not be deleted'); } } else { admin_webservicefailed_email($USER, 'deleteCourse', $course); error('Course could not be deleted'); }
/** * The other half to print_entry, this checks the form data * * This function checks that the user has completed the task on the * enrolment entry page and then enrolls them. * * @param form the form data submitted, as an object * @param course the current course, as an object */ function check_entry($form, $course) { global $CFG, $USER, $SESSION, $THEME; if (empty($form->password)) { $form->password = ''; } if (empty($course->password)) { // do not allow entry when no course password set // automatic login when manual primary, no login when secondary at all!! error('illegal enrolment attempted'); } $groupid = $this->check_group_entry($course->id, $form->password); if (stripslashes($form->password) == $course->password or $groupid !== false) { if (isguestuser()) { // only real user guest, do not use this for users with guest role $USER->enrolkey[$course->id] = true; add_to_log($course->id, 'course', 'guest', 'view.php?id=' . $course->id, getremoteaddr()); } else { /// Update or add new enrolment if (enrollUserInCourse($USER->username, $USER->username, $course->fullname, true)) { if (enrol_into_course($course, $USER, 'manual')) { // force a refresh of mycourses send_enrollment_notification($course, $USER); // Added: 05/08/2012 unset($USER->mycourses); if ($groupid !== false) { if (!groups_add_member($groupid, $USER->id)) { print_error('couldnotassigngroup'); } } if (!enrollQSUser($USER, $course)) { //Added: 01.06.2011 admin_webservicefailed_email($USER, 'enrollUser', $course); } } else { enrollUserInCourse($USER->username, $USER->username, $course->fullname, false); print_error('couldnotassignrole'); } } else { admin_webservicefailed_email($USER, 'enrollUser', $course); print_error('couldnotassignrole'); } } if ($SESSION->wantsurl) { $destination = $SESSION->wantsurl; unset($SESSION->wantsurl); } else { $destination = "{$CFG->wwwroot}/course/view.php?id={$course->id}"; } redirect($destination); } else { if (!isset($CFG->enrol_manual_showhint) or $CFG->enrol_manual_showhint) { $this->errormsg = get_string('enrolmentkeyhint', '', substr($course->password, 0, 1)); } else { $this->errormsg = get_string('enrolmentkeyerror', 'enrol_manual'); } } }
} 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()) { if (!has_capability('moodle/user:delete', $sitecontext)) { // TODO: this should be under a separate capability error('You are not permitted to modify the MNET access control list.'); } if (!($user = get_record('user', 'id', $acl))) {
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; }