public function show_verify_assignment()
{
PHPWS_Core::initModClass('hms', 'HMS_Term.php');
PHPWS_Core::initModClass('hms', 'HMS_SOAP.php');
PHPWS_Core::initModClass('hms', 'HMS_Assignment.php');
PHPWS_Core::initModClass('hms', 'HMS_Learning_Community.php');
PHPWS_Core::initModClass('hms', 'HMS_RLC_Assignment.php');
PHPWS_Core::initModClass('hms', 'HMS_Movein_Time.php');
$tpl = array();
$assignment = HMS_Assignment::get_assignment($_SESSION['asu_username'], $_SESSION['application_term']);
if ($assignment === NULL || $assignment == FALSE) {
$tpl['NO_ASSIGNMENT'] = "You do not currently have a housing assignment.";
} else {
$tpl['ASSIGNMENT'] = $assignment->where_am_i() . '<br />';
# Determine the student's type and figure out their movein time
$type = HMS_SOAP::get_student_type($_SESSION['asu_username'], $_SESSION['application_term']);
if ($type == TYPE_CONTINUING) {
$movein_time_id = $assignment->get_rt_movein_time_id();
} elseif ($type == TYPE_TRANFER) {
$movein_time_id = $assignment->get_t_movein_time_id();
} else {
$movein_time_id = $assignment->get_f_movein_time_id();
}
if ($movein_time_id == NULL) {
$tpl['MOVE_IN_TIME'] = 'To be determined<br />';
} else {
$movein_times = HMS_Movein_Time::get_movein_times_array($_SESSION['application_term']);
$tpl['MOVE_IN_TIME'] = $movein_times[$movein_time_id];
}
}
//get the assignees to the room that the bed that the assignment is in
$assignees = !is_null($assignment) ? $assignment->get_parent()->get_parent()->get_assignees() : NULL;
$roommates = array();
if (!is_null($assignees)) {
foreach ($assignees as $roommate) {
if ($roommate->asu_username != $_SESSION['asu_username']) {
$roommates[] = $roommate->asu_username;
}
}
}
if (empty($roommates)) {
$tpl['roommate'][]['ROOMMATE'] = 'You do not have a roommate.';
} else {
foreach ($roommates as $roommate) {
$tpl['roommate'][]['ROOMMATE'] = '' . HMS_SOAP::get_name($roommate) . ' (<a href="mailto:' . $roommate . '@appstate.edu">' . $roommate . '@appstate.edu</a>)';
}
}
$rlc_assignment = HMS_RLC_Assignment::check_for_assignment($_SESSION['asu_username'], $_SESSION['application_term']);
if ($rlc_assignment == NULL || $rlc_assignment === FALSE) {
$tpl['RLC'] = "You have not been accepted to an RLC.";
} else {
$rlc_list = HMS_Learning_Community::getRlcList();
$tpl['RLC'] = 'You have been assigned to the ' . $rlc_list[$rlc_assignment['rlc_id']];
}
$tpl['MENU_LINK'] = PHPWS_Text::secureLink('Back to Main Menu', 'hms', array('type' => 'student', 'op' => 'show_main_menu'));
return PHPWS_Template::process($tpl, 'hms', 'student/verify_assignment.tpl');
}
public function auto_assign($test = 0)
{
PHPWS_Core::initModClass('hms', 'HMS_Room.php');
PHPWS_Core::initModClass('hms', 'HousingApplication.php');
// TODO update this to use HousignAssignment
PHPWS_Core::initModClass('hms', 'HMS_Roommate.php');
PHPWS_Core::initModClass('hms', 'HMS_Assignment.php');
PHPWS_Core::initModClass('hms', 'HMS_Activity_Log.php');
PHPWS_Core::initModClass('hms', 'HMS_RLC_Assignment.php');
PHPWS_Core::initModClass('hms', 'BannerQueue.php');
$term = Term::get_selected_term();
// In both cases: Random, and include Banner info
$f_rooms = HMS_Room::get_all_free_rooms($term, FEMALE, TRUE);
$m_rooms = HMS_Room::get_all_free_rooms($term, MALE, TRUE);
$roommates = HMS_Roommate::get_all_confirmed_roommates($term, TRUE);
$applicants = HousingApplication::getAllFreshmenApplications($term, 'gender', 'hms_fall_application.lifestyle_option', 'hms_fall_application.preferred_bedtime', 'hms_fall_application.room_condition', 'random');
$problems = array();
$rlcs = array();
$assigns = array();
$notices = array();
$successes = array();
$assigned = array();
reset($f_rooms);
reset($m_rooms);
$i_f_count = count($f_rooms);
$i_m_count = count($m_rooms);
// Assign Roommates
reset($roommates);
foreach ($roommates as $pair) {
$a = HousingApplication::getApplicationByUser($pair['requestor'], $term);
if (in_array($a->username, $assigned)) {
$notices[] = "<strong>{$a->username}</strong> already scheduled for assignment.";
continue;
}
$rlc = HMS_RLC_Assignment::checkForAssignment($a->username, $term);
if ($rlc !== FALSE) {
$rlcs[] = "Skipping <strong>{$a->username}</strong>; assigned to an RLC.";
continue;
}
$b = HousingApplication::getApplicationByUser($pair['requestee'], $term);
if (in_array($b->username, $assigned)) {
$notices[] = "<strong>{$b->username}</strong> already scheduled for assignment.";
continue;
}
$rlc = HMS_RLC_Assignment::checkForAssignment($b->username, $term);
if ($rlc !== FALSE) {
$rlcs[] = "Skipping <strong>{$b->username}</strong>; assigned to an RLC.";
continue;
}
if (is_null($a->id)) {
$problems[] = "Could not assign <strong>{$a->username}</strong> with roommate <strong>{$b->username}</strong>; {$a->username} does not have an application.";
continue;
}
if (is_null($b->id)) {
$problems[] = "Could not assign <strong>{$a->username}</strong> with roommate <strong>{$b->username}</strong>; {$b->username} does not have an application.";
continue;
}
if ($a->gender != $b->gender) {
$problems[] = "Epic FAIL... <strong>{$a->username}</strong> and <strong>{$b->username}</strong> are not the same gender.";
continue;
}
$ass = HMS_Assignment::get_assignment($a->username, $term);
if (is_a($ass, 'HMS_Assignment')) {
$bbc = $ass->get_banner_building_code();
$bed = $ass->get_banner_bed_id();
$assigns[] = "Could not assign <strong>{$a->username}</strong>; already assigned to <strong>{$bbc} {$bed}</strong>";
continue;
}
$ass = HMS_Assignment::get_assignment($b->username, $term);
if (is_a($ass, 'HMS_Assignment')) {
$bbc = $ass->get_banner_building_code();
$bed = $ass->get_banner_bed_id();
$assigns[] = "Could not assign <strong>{$b->username}</strong>; already assigned to <strong>{$bbc} {$bed}</strong>";
continue;
}
$room = $a->gender == FEMALE ? array_shift($f_rooms) : ($a->gender == MALE ? array_shift($m_rooms) : 'badgender');
if (is_null($room)) {
$problems[] = "Could not assign <strong>{$a->username}</strong>; out of empty " . ($a->gender ? 'male' : 'female') . ' rooms.';
$problems[] = "Could not assign <strong>{$b->username}</strong>; out of empty " . ($b->gender ? 'male' : 'female') . ' rooms.';
continue;
} else {
if ($room === 'badgender') {
$problems[] = "Could not assign <strong>{$a->username}</strong>; {$a->gender} is not a valid gender.";
continue;
}
}
// Prepare for assignment
$room =& new HMS_Room($room);
$room->loadBeds();
$bed_a_text = $room->_beds[0]->get_banner_building_code() . ' ' . $room->_beds[0]->banner_id;
$bed_b_text = $room->_beds[1]->get_banner_building_code() . ' ' . $room->_beds[1]->banner_id;
if ($test) {
$successes[] = HMS_Autoassigner::record_success('TEST Requested', $a, $b, $bed_a_text);
$successes[] = HMS_Autoassigner::record_success('TEST Requested', $b, $a, $bed_b_text);
} else {
$result = HMS_Autoassigner::assign($a, $room->_beds[0], $term);
if ($result === TRUE) {
$successes[] = HMS_Autoassigner::record_success('Requested', $a, $b, $bed_a_text);
$assigned[] = $a->username;
} else {
$problems[] = $result;
}
if (!is_null($b->id)) {
$result = HMS_Autoassigner::assign($b, $room->_beds[1], $term);
if ($result === TRUE) {
$successes[] = HMS_Autoassigner::record_success('Requested', $b, $a, $bed_b_text);
$assigned[] = $b->username;
} else {
$problems[] = $result;
}
}
}
}
reset($applicants);
while (count($applicants) > 0) {
$a = array_shift($applicants);
if ($a === FALSE) {
continue;
}
if (!isset($a)) {
continue;
}
if (in_array($a->username, $assigned)) {
$notices[] = "<strong>{$a->username}</strong> already scheduled for assignment.";
continue;
}
$rlc = HMS_RLC_Assignment::checkForAssignment($a->username, $term);
if ($rlc !== FALSE) {
$rlcs[] = "Skipping <strong>{$a->username}</strong>; assigned to an RLC.";
continue;
}
$b = array_shift($applicants);
if (in_array($b->username, $assigned)) {
$notices[] = "<strong>{$b->username}</strong> already scheduled for assignment.";
array_unshift($applicants, $a);
continue;
}
$rlc = HMS_RLC_Assignment::checkForAssignment($b->username, $term);
if ($rlc !== FALSE) {
$rlcs[] = "Skipping <strong>{$b->username}</strong>; assigned to an RLC.";
array_unshift($applicants, $a);
continue;
}
if ($a->gender != $b->gender) {
array_unshift($applicants, $b);
$b = NULL;
continue;
}
$ass = HMS_Assignment::get_assignment($a->username, $term);
if (is_a($ass, 'HMS_Assignment')) {
$bbc = $ass->get_banner_building_code();
$bed = $ass->get_banner_bed_id();
$assigns[] = "Could not assign <strong>{$a->username}</strong>; already assigned to <strong>{$bbc} {$bed}</strong>";
array_unshift($applicants, $b);
continue;
}
$ass = HMS_Assignment::get_assignment($b->username, $term);
if (is_a($ass, 'HMS_Assignment')) {
$bbc = $ass->get_banner_building_code();
$bed = $ass->get_banner_bed_id();
$assigns[] = "Could not assign <strong>{$b->username}</strong>; already assigned to <strong>{$bbc} {$bed}</strong>";
array_unshift($applicants, $a);
continue;
}
// Determine Room Gender
$room = $a->gender == FEMALE ? array_shift($f_rooms) : ($a->gender == MALE ? array_shift($m_rooms) : 'badgender');
// We could be out of rooms or have database corruption
if (is_null($room)) {
$problems[] = "Could not assign <strong>{$a->username}</strong>; out of " . ($a->gender ? 'male' : 'female') . ' rooms.';
$problems[] = "Could not assign <strong>{$b->username}</strong>; out of " . ($b->gender ? 'male' : 'female') . ' rooms.';
continue;
} else {
if ($room === 'badgender') {
$problems[] = "Could not assign <strong>{$a->username}</strong>; {$a->gender} is not a valid gender.";
continue;
}
}
// Prepare for assignment
$room =& new HMS_Room($room);
$room->loadBeds();
$bed_a_text = $room->_beds[0]->get_banner_building_code() . ' ' . $room->_beds[0]->banner_id;
$bed_b_text = $room->_beds[1]->get_banner_building_code() . ' ' . $room->_beds[1]->banner_id;
if ($test) {
$successes[] = HMS_Autoassigner::record_success('TEST Auto', $a, $b, $bed_a_text);
$successes[] = HMS_Autoassigner::record_success('TEST Auto', $b, $a, $bed_b_text);
} else {
$result = HMS_Autoassigner::assign($a, $room->_beds[0], $term);
if ($result === TRUE) {
$successes[] = HMS_Autoassigner::record_success('Auto', $a, $b, $bed_a_text);
$assigned[] = $a->username;
} else {
$problems[] = $result;
}
if (!is_null($b->id)) {
$result = HMS_Autoassigner::assign($b, $room->_beds[1], $term);
if ($result === TRUE) {
$successes[] = HMS_Autoassigner::record_success('Auto', $b, $a, $bed_b_text);
$assigned[] = $b->username;
} else {
$problems[] = $result;
}
}
}
}
$f_f_count = count($f_rooms);
$f_m_count = count($m_rooms);
usort($successes, array('HMS_Autoassigner', 'sort_successes'));
$content = '<h1>Autoassigner Results - ' . date('Y-m-d') . '</h1>';
$content .= '<h2>Total Assignments: ' . count($assigned) . '</h2>';
$content .= "<p>Began with {$i_f_count} female rooms and {$i_m_count} male rooms</p>";
$content .= "<p>Ended with {$f_f_count} female rooms and {$f_m_count} male rooms</p>";
$content .= '<h2>Assignment Report (' . count($successes) . ')</h2>';
$content .= '<table><tr>';
$content .= '<th>Type</th><th>Bed A</th><th>Code A</th><th>Bed B</th><th>Code B</th><th>Room</th>';
$content .= '</tr>';
foreach ($successes as $success) {
$content .= '<tr>';
$content .= '<td>' . $success['type'] . '</td>';
$content .= '<td>' . $success['a'] . '</td>';
$content .= '<td>' . $success['a_code'] . '</td>';
$content .= '<td>' . $success['room'] . '</td>';
$content .= '<td>' . $success['b'] . '</td>';
$content .= '<td>' . $success['b_code'] . '</td>';
$content .= "</tr>\n";
}
$content .= '</tr></table>';
sort($problems);
$content .= '<h2>Problems (' . count($problems) . ')</h2>';
$content .= implode("<br />\n", $problems);
sort($rlcs);
$content .= '<h2>Skipped for RLC (' . count($rlcs) . ')</h2>';
$content .= implode("<br />\n", $rlcs);
sort($assigns);
$content .= '<h2>Skipped, already assigned (' . count($assigns) . ')</h2>';
$content .= implode("<br />\n", $assigns);
sort($notices);
$content .= '<h2>Notices (' . count($notices) . ')</h2>';
$content .= implode("<br />\n", $notices);
Layout::nakedDisplay($content, NULL, TRUE);
}
