function _unenrollUserFromCourse($user, $course) { $retVal = true; echo "<br> {$username} is now going to be unenrolled from {$course->fullname}."; if (unenrollQSUser($user, $course)) { echo "<br> unenrollQSUser for {$user->username} and {$course->fullname} was successful."; if (enrollUserInCourse($user->username, $user->username, $course->fullname, false)) { echo "<br> enrollUserInCourse for {$user->username} and {$course->fullname} and false was successful."; if (!($context = get_context_instance(CONTEXT_COURSE, $course->id))) { echo "<br> Course context for {$course->fullname} is invalid"; admin_moodlefailed_email($user, 'unenrollUser', $course); $retVal = false; } echo "<br> Course context id is {$context->id}"; if (!role_unassign(0, $user->id, 0, $context->id)) { echo "An error occurred in role_unassign while trying to unenroll {$username} from vLab via auto-delete."; admin_moodlefailed_email($user, 'unenrollUser', $course); $retVal = false; } echo "<br> role_unassign for user id of {$user->id} and context id of {$context->id} was successful."; send_unenrollment_notification($course, $user); add_to_log($course->id, 'course', 'unenrol', "auto-delete", $course->id); } else { enrollQSUser($user, $course); echo "An error occurred in enrollUserInCourse while trying to unenrll {$username} from vLab via auto-delete."; admin_moodlefailed_email($user, 'unenrollUser', $course); $retVal = false; } } else { echo "An error occurred in unenrollQSUser while trying to unenroll {$username} from vLab via auto-delete."; admin_moodlefailed_email($user, 'unenrollUser', $course); $retVal = false; } return $retVal; }
print_error('couldnotassignrole'); echo "<br> User could NOT be enrolled into the course"; error("User could NOT be enrolled into the course"); exit; } echo "<br> User was just enrolled into the course"; // force a refresh of mycourses unset($user->mycourses); if (!empty($SESSION->wantsurl)) { $destination = $SESSION->wantsurl; unset($SESSION->wantsurl); } else { $destination = "{$CFG->wwwroot}/course/view.php?id={$course->id}"; } echo "<br> \$destination is set to {$destination}"; if (!enrollQSUser($user, $course)) { //Added: 12.30.2010 echo "<br> enrollQSUser was NOT successful"; admin_webservicefailed_email($user, 'enrollUser', $course); 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.");
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); } } $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))) {
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."); }
/** * 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'); } } }
print_error("That's an invalid username"); } // echo "<br> \$USER->username is $USER->username"; // print_r($USER); if (!enrol_into_course($course, $USER, 'manual')) { print_error('couldnotassignrole'); } // force a refresh of mycourses unset($USER->mycourses); if (!empty($SESSION->wantsurl)) { $destination = $SESSION->wantsurl; unset($SESSION->wantsurl); } else { $destination = "{$CFG->wwwroot}/course/view.php?id={$course->id}"; } if (!enrollQSUser($USER, $course)) { //Added: 12.30.2010 admin_webservicefailed_email($USER, 'enrollUser', $course); 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."); } //admin_moodlefailed_email($USER,'unenrollUser'); } else { if (!enrollUserInCourse($USER->username, $USER->username, $course->fullname, true)) { if (!role_unassign(0, $USER->id, 0, $context->id)) { error("An error occurred while trying to unenrol that person."); } // Should email the Admin if this happens unenrollQSUser($USER, $course); admin_webservicefailed_email($USER, 'enrollUser', $course);