<?
/* 
   This file is part of the 'Science Fair In A Box' project
   SFIAB Website: http://www.sfiab.ca

   Copyright (C) 2005 Sci-Tech Ontario Inc <info@scitechontario.org>
   Copyright (C) 2005 James Grant <james@lightbox.org>
   Copyright (C) 2007 David Grant <dave@lightbox.org>

   This program 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, version 2.

   This program 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 this program; see the file COPYING.  If not, write to
   the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
   Boston, MA 02111-1307, USA.
*/
?>
<?
include_once('account.inc.php');
function user_valid_role($role)
{
	global $roles;
	if(!is_array($role)) $role = array($role);

	foreach($role as $r) {
		if(!array_key_exists($r, $roles)) return false;
	}
	return true;
}


function user_load($users_id, $accounts_id = false)
{
	/* Load user, join accounts so we also load the email, superuser flag */
	//hand-code the list here because we dont want all the old stuff that hasnt been removed yet like username/password access_*, etc.
	if($accounts_id != false) {
		$accounts_id = intval($accounts_id);
		$users_id = mysql_result(mysql_query("SELECT users.id FROM users WHERE accounts_id = $accounts_id LIMIT 1", 0));
	} else {
		$users_id = intval($users_id);
	}

	$count = mysql_result(mysql_query("SELECT COUNT(*) FROM users WHERE id = $users_id"), 0);
	if($count == 0){
		return false;
	}
	if($count > 1){
		echo "ERROR: More than one user.\n";
		return false;
	}

	// Load the user, we'll start with a blank slate
	$u = array();

	// Get roles, and active/complete status for each role
	$u['roles'] = array();
	$query = "SELECT user_roles.roles_id, user_roles.active, user_roles.complete, roles.type,roles.name FROM user_roles LEFT JOIN roles ON roles.id=user_roles.roles_id WHERE user_roles.users_id=$users_id";
	$q = mysql_query($query);
	while(($roledata = mysql_fetch_assoc($q))) {
		$u['roles'][$roledata['type']] = $roledata;
	}

	if(count($u['roles']) == 0) {
		/* No roles, that's ok actually, the previous logic here was that
		 * a user without roles is deleted.. but.. this could happen for
		 * new users, or if someone deletes all their roles before adding
		 * a new role */
	}

	// get a list of all fields relevant to this user
	$fieldDat = user_get_fields(array_keys($u['roles']));
	// we need to separate the fields that are in the users table from those in separate tables
	$fields = array_unique(array_merge(array_keys($fieldDat), array('id', 'accounts_id', 'conferences_id')));
	$userFields = array();
	$q = mysql_query("DESCRIBE users");
	while($row = mysql_fetch_assoc($q)){
		$userFields[] = $row['Field'];
	}
	$userFields = array_intersect($fields, $userFields);
	$specialFields = array_diff($fields, $userFields);

	// we can start by populating the array with data out of the users table
	$query = "SELECT users." . implode(", users.", $userFields) . ", accounts.email";
	$query .= " FROM users JOIN accounts ON accounts.id=users.accounts_id";
	$query .= " WHERE `users`.`id`='$users_id'";
	$q = mysql_query($query);
	echo mysql_error();

	// Sanitize the user data
	$userDat = mysql_fetch_assoc($q);
	$u = array_merge($u, $userDat);
	$u['id'] = intval($u['id']);
	$u['accounts_id'] = intval($u['accounts_id']);

	// Convenience
	$u['name'] = ($u['firstname'] ? "{$u['firstname']} " : '').$u['lastname'];

	// Email recipient for "to" field on emails 
	if( ($u['firstname'] || $u['lastname']) && $u['email']) {
		//use their full name if we have it
		//if the name contains anything non-standard, we need to quote it.
		if(eregi("[^a-z0-9 ]",$u['name']))
			$u['emailrecipient']="\"{$u['name']}\" <{$u['email']}>";
		else
			$u['emailrecipient']="{$u['name']} <{$u['email']}>";
	}
	else if($u['email']) {
		//otherwise, just their email address
		$u['emailrecipient']=$u['email'];
	}
	else {
		$u['emailrecipient']="";
	}

	/* we dont want them thinking they can change the email, so dont include it here, 
	its part of the account, not the user, this way they still get the 'emailrecipient'
	convenience variable, not not the email itself, for that, they need to access
	the account. */
	unset($u['email']);
	$should_be_arrays=array();


	foreach(array_keys($u['roles']) as $r) {
		/* Do the load routines inline, the explosion of user roles
		 * means it's just silly to have a different function for each
		 * one.  If we get one that has a crazy amount of stuff to do, 
		 * we could move it all to a function and call it in the 
		 * switch below */
		switch($r) {
		case 'committee':
			$u['ord'] = intval($u['ord']);
			$u['displayemail'] = ($u['displayemail'] == 'yes') ? 'yes' : 'no';
			break;

		case 'judge':
			$u['years_school'] = intval($u['years_school']);
			$u['years_regional'] = intval($u['years_regional']);
			$u['years_national'] = intval($u['years_national']);
			$u['willing_chair'] = ($u['willing_chair'] == 'yes') ? 'yes' : 'no';
			$u['special_award_only'] = ($u['special_award_only'] == 'yes') ? 'yes' : 'no';
			$u['cat_prefs'] = (strlen($u['cat_prefs']) > 0) ? unserialize($u['cat_prefs']) : array();
			$u['div_prefs'] = (strlen($u['div_prefs']) > 0) ? unserialize($u['div_prefs']) : array();
			$u['divsub_prefs'] = (strlen($u['divsub_prefs']) > 0) ? unserialize($u['divsub_prefs']) : array();
		//	$u['expertise_other'] = $u['expertise_other'];
			//if it hasnt been parsed/converted yet
			if(!is_array($u['languages']))
				$u['languages'] = (strlen($u['languages']) > 0) ? unserialize($u['languages']) : array();
		//	$u['highest_psd'] = $u['highest_psd'];

			/* Sanity check the arrays, make sure they are arrays */
			$should_be_arrays = array('cat_prefs','div_prefs', 'divsub_prefs','languages','special_awards','time_availability');
			break;
			
		case 'sponsor':
			$u['sponsors_id'] = intval($u['sponsors_id']);
			if($u['sponsors_id']) {
				$q=mysql_query("SELECT * FROM sponsors WHERE id='{$u['sponsors_id']}'");
				$u['sponsor']=mysql_fetch_assoc($q);
			}
			break;
		case 'volunteer':
			//if it hasnt been parsed/converted yet
			if(!is_array($u['languages']))
				$u['languages'] = (strlen($u['languages']) > 0) ? unserialize($u['languages']) : array();
			$should_be_arrays = array('languages');
		break;

		default:
			/* Nothing to do for all other roles */
			break;
		}
	}

	foreach($should_be_arrays as $k) {
		if(!is_array($u[$k])) $u[$k] = array();
	}

	// now let's populate the fields that are not stored in the users table
	foreach($specialFields as $field){
		switch($field){
			case 'special_awards':
				$selected = array();
				$q = mysql_query("SELECT award_awards_id aaid FROM judges_specialaward_sel WHERE users_id = {$u['id']}");
				while($r = mysql_fetch_assoc($q)){
					$selected[] = $r['aaid'];
				}
				$u['special_awards'] = $selected;
				break;

			case 'available_times':
				// a rather complicated match-up, as they're linked by time values, not by record id's
				$times = get_judging_timeslots($u['conferences_id']);
				$q = mysql_query("SELECT * FROM judges_availability WHERE users_id=\"{$u['id']}\"");

				$sel = array();
				while($r=mysql_fetch_object($q)) {
					foreach($times as $t) {
						if($r->start == $t['starttime'] && $r->end == $t['endtime'] && $r->date == $t['date'])
							$sel[] = $t['id'];
					}
				}
				$items = array();
				foreach($times as $t) {
					$st = substr($t['starttime'], 0, 5);
					$end = substr($t['endtime'], 0, 5);
					if(in_array($t['id'], $sel)){
						$items[] = $t['id'];
					}
				}
				$u['available_times'] = $items;
				break;

			case 'available_events':
				$q1 = mysql_query("SELECT schedule_id FROM `schedule_users_availability_link` sual JOIN schedule ON schedule.id = sual.schedule_id WHERE users_id = {$u['id']} AND schedule.conferences_id = '{$u['conferences_id']}'");
				$ids = array();
				while($row = mysql_fetch_assoc($q1)){
					$ids[] = $row['schedule_id'];
				}
				$u['available_events'] = $ids;
				break;

			case 'volunteer_positions':
				$q1 = mysql_query("SELECT volunteer_positions_id AS vpid FROM volunteer_positions_signup WHERE users_id = {$u['id']} AND conferences_id = {$u['conferences_id']}");
				$ids = array();
				while($row = mysql_fetch_assoc($q1)){
					$ids[] = $row['vpid'];
				}
				$u['volunteer_positions'] = $ids;
				break;
		}

	}

	/* Do this assignment without recursion :) */
	unset($u['orig']);
	$orig = $u;
	$u['orig'] = $orig;
	$u['required_fields']=user_all_fields_required(array_keys($u['roles']));
	return $u;
}


function user_load_by_accounts_id($accounts_id)
{
	return user_load(0, $accounts_id);
}

function user_load_by_email($email)
{
	/* Find the accounts_id for the email, regardless of deleted status */
	$e = mysql_real_escape_string($email);
	$q = mysql_query("SELECT accounts_id FROM users WHERE email='$e' OR username='$e'");

	if(mysql_num_rows($q) == 1) {
		$i = mysql_fetch_assoc($q);
		return user_load_by_accounts_id($i['accounts_id']);
	}
	return false;
}

function user_get_role_fields($role){
	switch($role){
		case 'committee':
			$fields = array('emailprivate','ord','displayemail');
			break;
		case 'judge':
			$fields = array('years_school','years_regional','years_national',
					'willing_chair','special_award_only',
					'cat_prefs','div_prefs','divsub_prefs',
					'expertise_other','languages', 'highest_psd');
			break;
		case 'student':
			$fields = array('grade', 'schools_id');
			break;
		case 'fair':
			$fields = array('fairs_id');
			break;
		case 'sponsor':
			$fields = array('sponsors_id','primary','position','notes');
			break;
		case 'teacher':
			$fields = array('schools_id');
			break;
		case 'principal':
			$fields = array('schools_id');
			break;
		case 'volunteer':
			$fields = array('languages');
			break;
		default:
			$fields = array();
	}
	return $fields;
}

function user_get_field_info(){
	global $conference;
	$returnval = array(
		'salutation' => array('label' => 'Salutation', 'group' => 'Personal Information'),
		'firstname' => array('label' => 'First Name', 'group' => 'Personal Information'),
		'lastname' => array('label' => 'Last Name', 'group' => 'Personal Information'),
		'sex' => array('label' => 'Sex', 'group' => 'Personal Information'),
		'phonehome' => array('label' => 'Home Phone', 'group' => 'Contact Information'),
		'phonework' => array('label' => 'Work Phone', 'group' => 'Contact Information'),
		'phonecell' => array('label' => 'Cell Phone', 'group' => 'Contact Information'),
		'fax' => array('label' => 'Fax Number', 'group' => 'Contact Information'),
		'organization' => array('label' => 'Organization', 'group' => 'Contact Information'),
		'birthdate' => array('label' => 'Date of Birth', 'group' => 'Personal Information'),
		'lang'  => array('label' => 'Primary Language', 'group' => 'Contact Information'),
		'address' => array('label' => 'Address', 'group' => 'Contact Information'),
		'address2' => array('label' => '', 'group' => 'Contact Information'),
		'city' => array('label' => 'City', 'group' => 'Contact Information'),
		'province' => array('label' => 'Province', 'group' => 'Contact Information'),
		'postalcode' => array('label' => 'Postal Code', 'group' => 'Contact Information'),
		'firstaid' => array('label' => 'First Aid', 'group' => 'Personal Information'),
		'cpr' => array('label' => 'CPR', 'group' => 'Personal Information'),
		'displayemail' => array('label' => 'Display Email', 'group' => 'Personal Information'),
		'years_school' => array('label' => 'Years experience judging at school level', 'group' => 'Judges'),
		'years_regional' => array('label' => 'Years experience judging at regional level', 'group' => 'Judges'),
		'years_national' => array('label' => 'Years experience judging at national level', 'group' => 'Judges'),
		'willing_chair' => array('label' => 'Willing to lead a judging team', 'group' => 'Judges'),
		'special_award_only' => array('label' => 'Judging only for a special award', 'group' => 'Judges'),
		'cat_prefs' => array('label' => 'Category Preferences', 'group' => 'Judges'),
		'div_prefs' => array('label' => 'Division Preferences', 'group' => 'Judges'),
		'divsub_prefs' => array('label' => 'Subdivision Preferences', 'group' => 'Judges'),
		'languages' => array('label' => 'Spoken Languages', 'group' => 'Judges'),
		'highest_psd' => array('label' => 'Highest post-secondary degree', 'group' => 'Judges'),
		'expertise_other' => array('label' => 'Other areas of expertise', 'group' => 'Judges'),
		'sponsors_id' => array('label' => 'Sponsor', 'group' => 'Sponsors'),
		'primary' => array('label' => 'Primary Contact', 'group' => 'Sponsors'),
		'position' => array('label' => 'Position', 'group' => 'Sponsors'),
		'notes' => array('label' => 'Notes', 'group' => 'Sponsors'),
		'schools_id' => array('label' => 'School', 'group' => 'Personal Information'),
		'grade' => array('label' => 'Grade', 'group' => 'Personal Information'),
		'special_awards' => array('label' => 'Special Awards', 'group' => 'Judges'),
		'volunteer_positions' => array('label' => 'Volunteer Positions', 'group' => 'Volunteers')
	);
	switch($conference['type']){
		case 'sciencefair':
			$returnval['available_times'] = array('label' => 'Times Available', 'group' => 'Judges');
			$returnval['available_events'] = array('label' => 'Event Availability', 'group' => 'Volunteers');
			break;
		case 'scienceolympics':
			$returnval['available_events'] = array('label' => 'Event Availability', 'group' => 'Judges,Volunteers');
			break;
	}

	return $returnval;
}

function user_role_field_required($role, $fieldname){
	$returnval = 0;
	$requiredFields = array(
		'judge' => array('years_school','years_regional','years_national','languages'),
		'student' => array('schools_id'),
		'fair' => array('fairs_id'),
		'sponsor' => array('sponsors_id','primary','position'),
		'volunteer' => array('languages')
	);

	if(array_key_exists($role, $requiredFields)){
		if(in_array($fieldname, $requiredFields[$role])){
			$returnval = 1;
		}
	}
	return $returnval;
}

// accepts either an array of roles (eg. {'judge', 'teacher', 'foo'}), a single one as a string (eg. 'judge'), or a null value (no roles at all)
function user_get_fields($userRoles = null){
	global $roles, $conference, $config;

	if($userRoles == null){
		$userRoles = array();
	}else if(!is_array($userRoles)){
		// assume that they passed a string identifying a single role (eg. "judge")
		$userRoles = array($userRoles);
	}

	// scrub for only valid roles, and fetch their special fields
	$enabledFields = array();
	$requiredFields = array();
	$roleFields = array();
	foreach($userRoles as $role){
		if(array_key_exists($role, $roles)){
			$requiredFields = array_merge($requiredFields, user_fields_required($role));
			$enabledFields = array_merge($enabledFields, user_fields_enabled($role));
			$roleFields[$role] = user_get_role_fields($role);
		}
	}

	// build a list of all fields that are applicable to this user, and assemble them into an array
	$fields = array();
	foreach($requiredFields as $field){
		if(!array_key_exists($field, $fields)){
			$fields[$field] = array(
				'field' => $field,
				'required' => 1
			);
		}
	}

	foreach($roleFields as $role => $fieldList){
		foreach($fieldList as $field){
			if(!array_key_exists($field, $fields)){
				$fields[$field] = array(
					'field' => $field,
					'required' => user_role_field_required($role, $field)
				);
			}
		}
	}

	foreach($enabledFields as $field){
		if(!array_key_exists($field, $fields)){
			$fields[$field] = array(
				'field' => $field,
				'required' => 0
			);
		}
	}

	// get the field types
	$query = mysql_query("DESCRIBE users");
	$fieldType = array();
	while($row = mysql_fetch_assoc($query)){
		$fieldType[$row['Field']] = $row['Type'];
	}

	$fieldInfo = user_get_field_info();
	
	foreach($fields as $fieldName => $field){
		$ftype = $fieldType[$fieldName];
		if(array_key_exists($fieldName, $fieldInfo)){
			$fields[$fieldName]['display'] = i18n($fieldInfo[$fieldName]['label']);
			$fields[$fieldName]['group'] = i18n($fieldInfo[$fieldName]['group']);
		}
		switch($fieldName){
			case 'languages':
				$fields[$fieldName]['type'] = 'multiselect';
				$fields[$fieldName]['options'] = $config['languages'];
				break;
			case 'lang':
				$fields[$fieldName]['type'] = 'singleselect';
				$fields[$fieldName]['options'] = $config['languages'];
				break;
			case 'cat_prefs':
				$fields[$fieldName]['description'] = 'Preference levels for judging individual project categories';
				$fields[$fieldName]['type'] = 'singleselectlist';
				$fields[$fieldName]['options'] = array(-2 => 'Very Low', -1 => 'Low', 0 => 'Indifferent', 1 => 'Medium', 2 => 'High');
				$fields[$fieldName]['entries'] = array();
				$query = mysql_query("SELECT id, category FROM projectcategories WHERE conferences_id = {$conference['id']}");
				while($row = mysql_fetch_assoc($query)){
					$fields[$fieldName]['entries'][$row['id']] = $row['category'];
				}
				break;
			case 'div_prefs':
				$divquery = mysql_query("SELECT * FROM projectdivisions WHERE conferences_id = {$conference['id']}");
				$fields[$fieldName]['entries'] = array();
				$fields[$fieldName]['type'] = 'singleselectlist';
				$fields[$fieldName]['options'] = array(1 => 'Very Little', 2 => 'Little', 3 => 'Average', 4 => 'Knowledgable', 5 => 'Very Knowledgable');
				while($divdata = mysql_fetch_assoc($divquery)){
					$divid = $divdata['id'];
					$fields[$fieldName]['entries'][$divdata['id']] = $divdata['division'];
				}
				break;
			case 'divsub_prefs':
				$fields[$fieldName]['entries'] = array();
				$fields[$fieldName]['description'] = "Preference levels for subdivisions of existing divisions.  If a division has subdivisions, they";
				$fields[$fieldName]['description'] .= " are listed in an array which is stored within the 'entries' array at the index of the division's id.";
				$fields[$fieldName]['description'] .= " eg. If a division 'foo' has an id of '3' and the subdivisions 'bar1' and 'bar2', then entries[3]";
				$fields[$fieldName]['description'] .= " will be an array: {0 => 'bar1', 1 => 'bar2'}.";
				$fields[$fieldName]['type'] = 'singleselectlist';
				$fields[$fieldName]['options'] = array(1 => 'Very Little', 2 => 'Little', 3 => 'Average', 4 => 'Knowledgable', 5 => 'Very Knowledgable');
				$divquery = mysql_query("SELECT * FROM projectdivisions WHERE conferences_id = {$conference['id']}");
				while($divdata = mysql_fetch_assoc($divquery)){
					$divid = $divdata['id'];
					$subset = array();
					$subdivquery = mysql_query("SELECT * FROM projectsubdivisions WHERE conferences_id = {$conference['id']} AND projectdivisions_id = $divid");
					while($subdivdata = mysql_fetch_assoc($subdivquery)){
						$subset[] = $subdivdata['subdivision'];
					}
					if(count($subset)){
						$fields[$fieldName]['entries'][$divdata['id']]  = $subset;
					}
				}
				break;


			default:
				if(!strncasecmp($ftype, "varchar", 7)){
					$parts = explode(')', $ftype);
					$parts = explode('(', $parts[0]);
					$fields[$fieldName]['type'] = $parts[0] . ':' . $parts[1];
				}elseif(!strncasecmp($ftype, "char", 4)){
					$parts = explode(')', $ftype);
					$parts = explode('(', $parts[0]);
					$fields[$fieldName]['type'] = $parts[0] . ':' . $parts[1];
				}else if(!strncasecmp($ftype, "enum", 4)){
					$fields[$fieldName]['type'] = 'singleselect';
					$fields[$fieldName]['options']  = array();
					$parts = explode("'", $ftype);
					for($n = 1; $n < count($parts); $n += 2){
						$fields[$fieldName]['options'][$parts[$n]] = ucfirst($parts[$n]);
					}
				}else if(!strcmp($ftype, "date")){
					$fields[$fieldName]['type'] = $fieldType[$fieldName];
				}else if(!strncmp($ftype, "tinyint", 7)){
					$fields[$fieldName]['type'] = 'integer';
				}else if(!strncmp($ftype, "tinytext", 8)){
					$fields[$fieldName]['type'] = 'text';
				}else{
					$fields[$fieldName]['type'] = "ERROR:" . $fieldType[$fieldName];
				}
		}
	}

	/******* Now we add fields that are not stored directly in the users table ********/
	switch($conference['type']){
		case 'sciencefair':
			$specialFieldRoles = array(
				'special_awards' => array('judge', 'student'),
				'available_times' => array('judge'),
				'available_events' => array('volunteer'),
				'volunteer_positions' => array('volunteer')
			);
			break;
		case 'scienceolympics':
			$specialFieldRoles = array(
				'special_awards' => array(),
				'available_times' => array(),
				'available_events' => array('judge', 'volunteer'),
				'volunteer_positions' => array('volunteer')
			);
			break;
		default:
			$specialFieldRoles = array();
	}

	// get the special_awards info if necessary
	if(count(array_intersect($specialFieldRoles['special_awards'], $userRoles)) > 0){
		$fields['special_awards'] = array();
		$fields['special_awards']['field'] = 'special_awards';
		$fields['special_awards']['display'] = i18n($fieldInfo['special_awards']['label']);
		$fields['special_awards']['group'] = i18n($fieldInfo['special_awards']['group']);
		$fields['special_awards']['type'] = 'multiselect';
		$fields['special_awards']['options'] = get_special_awards($conference['id']);
	}

	// get the available_times info if available
	if(count(array_intersect($specialFieldRoles['available_times'], $userRoles)) > 0){
		$fields['available_times'] = array();
		$fields['available_times']['field'] = 'available_times';
		$fields['available_times']['display'] = i18n($fieldInfo['available_times']['label']);
		$fields['available_times']['group'] = i18n($fieldInfo['available_times']['group']);
		$fields['available_times']['type'] = 'multiselect';
		$fields['available_times']['options'] = array();
		$timeslots = get_judging_timeslots($conference['id']);
		foreach($timeslots as $slot){
			$fields['available_times']['options'][$slot['id']] = $slot;
		}
	}

	// get the available_events if available
	if(count(array_intersect($specialFieldRoles['available_events'], $userRoles)) > 0){
		$fields['available_events'] = array();
		$fields['available_events']['field'] = 'available_events';
		$fields['available_events']['display'] = i18n($fieldInfo['available_events']['label']);
		$fields['available_events']['group'] = i18n($fieldInfo['available_events']['group']);
		$fields['available_events']['type'] = 'multiselect';
		$fields['available_events']['options'] = array();
		$q=mysql_query("SELECT schedule.id, schedule.date, schedule.hour, schedule.minute, schedule.duration, events.name FROM schedule JOIN events ON schedule.events_id=events.id WHERE schedule.conferences_id='{$conference['id']}'");
		while($row = mysql_fetch_assoc($q)){
			$fields['available_events']['options'][$row['id']] = $row; //$row['name'] . ' ' . $row['date'] . ', ' . $row['hour'] . ':' . $row['minute'] . ':00 (' . $row['duration'] . ' ' . i18n('minutes') . ')';
		}
	}

	// get the available volunteer positions as well
	if(count(array_intersect($specialFieldRoles['volunteer_positions'], $userRoles)) > 0){
		$fields['volunteer_positions'] = array();
		$fields['volunteer_positions']['field'] = 'volunteer_positions';
		$fields['volunteer_positions']['display'] = i18n($fieldInfo['volunteer_positions']['label']);
		$fields['volunteer_positions']['group'] = i18n($fieldInfo['volunteer_positions']['group']);
		$fields['volunteer_positions']['type'] = 'multiselect';
		$fields['volunteer_positions']['options'] = array();
		$q = mysql_query("SELECT * FROM volunteer_positions WHERE conferences_id = {$conference['id']}");
		while($row = mysql_fetch_assoc($q)){
			$fields['volunteer_positions']['options'][$row['id']] = $row; //$row['name'];
		}
	}

	return $fields;
}

// this depends on the naming convention that any given role that needs a completion check
// will have a function called <role>_status_update, which updates their status with the
// current session data and returns 'complete' or 'incomplete' accordingly.
// I love the fact that this remark took more characters than the function.
function user_check_role_complete($u, $role){
	$func = $role . '_status_update';
	if(function_exists($func)){
		$result = $func($u); // that's right, func(u)!
	}else{
		$result = 'complete';
	}
	return $result;
}

function user_save(&$u)
{
	global $conference;
	global $roles;

	$errMessage = '';
	/* Sanity check */
	if($u['conferences_id'] != $u['orig']['conferences_id']) {
		return "The user's conference changed.  Can't save a user to a difference conference, use user_dupe to copy the user to a new conference.";
	}

	// Update 'active' status for all roles
	$new_roles = array_keys($u['roles']);
	foreach($new_roles as $r) {
		mysql_query("UPDATE user_roles SET active='{$u['roles'][$r]['active']}' WHERE roles_id='{$u['roles'][$r]['roles_id']}' AND users_id='{$u['id']}'");
		if(mysql_error() != '') break;
	}
	if(mysql_error() != '') return mysql_error();

	$fields = array('salutation','firstname','lastname',
			'phonehome','phonework','phonecell','fax','organization',
			'address','address2','city','province','postalcode','sex',
			'firstaid', 'cpr', 'lang', 'notes');

	$fields_for_role['committee'] = array('emailprivate','ord','displayemail');
	$fields_for_role['judge'] = array('years_school','years_regional','years_national',
					'willing_chair','special_award_only',
					'cat_prefs','div_prefs','divsub_prefs',
					'expertise_other','languages', 'highest_psd');
//	$fields_for_role['student'] = array('schools_id');
	$fields_for_role['fair'] = array('fairs_id');
	$fields_for_role['sponsor'] = array('sponsors_id','primary','position');
	$fields_for_role['teacher'] = array();
	$fields_for_role['volunteer'] = array('languages');

	/* Merge fields as necessary, build a big list of fields to save */
	foreach($new_roles as $r) {
		if(!array_key_exists($r, $fields_for_role)) continue;
		$fields = array_merge($fields, $fields_for_role[$r]);
	}

	$set = "";
	foreach($fields as $f) {
		if($u[$f] == $u['orig'][$f]) continue;

		if($set != "") $set .=',';

		if($u[$f] == NULL) {
			$set .= "$f=NULL";
			continue;
		}

		if(is_array($u[$f])) 
			$data = mysql_escape_string(serialize($u[$f]));
		else 
			$data = mysql_escape_string(stripslashes($u[$f]));
		$set .= "$f='$data'";
	}

	if($set != "") {
		$query = "UPDATE users SET $set WHERE id='{$u['id']}'";
		mysql_query($query);
	}
	if(mysql_error() != '') return mysql_error();

	// Save the other user data that is not stored in the users table

	if( // if this user has an altered special awards selection, it needs to be saved
		array_key_exists('special_awards', $u) &&
		count(array_diff_assoc($u['special_awards'], $u['orig']['special_awards'])) > 0
	){
		mysql_query("DELETE FROM judges_specialaward_sel WHERE users_id = {$u['id']}");
		if(count($u['special_awards']) > 0){
			$query = "INSERT INTO judges_specialaward_sel (users_id, award_awards_id) VALUES (" . $u['id'] . ", ";
			$query .= implode('), (' . $u['id'] . ', ', $u['special_awards']);
			$query .= ")";
			mysql_query($query);
		}
	}
	if(mysql_error() != '') return mysql_error();

	if( // if this user has an altered available judging times selection, we need to save it
		array_key_exists('available_times', $u) &&
		count(array_diff_assoc($u['available_times'], $u['orig']['available_times'])) > 0
	){
		mysql_query("DELETE FROM judges_availability WHERE users_id='{$u['id']}'");

		$query = 'SELECT date, starttime, endtime FROM judges_timeslots WHERE id IN (';
		$ids = $u['available_times'];
		$query .= implode(',', $ids) . ')';
		if(count($ids) > 0){
			$insertVals = array();
			$results = mysql_query($query);
			while($row = mysql_fetch_assoc($results)){
				$insertVals[] = "({$u['id']},'{$row['date']}','{$row['starttime']}','{$row['endtime']}')";
			}
			if(count($insertVals) > 0){
				$query = "INSERT INTO judges_availability (users_id, `date`,`start`,`end`) VALUES ";
				$query .= implode(',', $insertVals);
			}
			mysql_query($query);
		}
	}
	if(mysql_error() != '') return mysql_error();

	if( // if this user has an altered event availability selection, we need to save it
		array_key_exists('available_events', $u) &&
		count(array_diff_assoc($u['available_events'], $u['orig']['available_events'])) > 0
	){
		mysql_query("DELETE FROM schedule_users_availability_link WHERE users_id = {$u['id']}");
		if(count($u['available_events']) > 0){
			$query = "INSERT INTO schedule_users_availability_link (users_id, schedule_id) VALUES (" . $u['id'] . ", ";
			$query .= implode('), (' . $u['id'] . ', ', $u['available_events']);
			$query .= ")";
			mysql_query($query);
		}
	}
	if(mysql_error() != '') return mysql_error();

	if( // if this user has an altered selection of volunteer positions, we'll need to change that too
		array_key_exists('volunteer_positions', $u) &&
		count(array_diff_assoc($u['volunteer_positions'], $u['orig']['volunteer_positions'])) > 0
	){
		mysql_query("DELETE FROM volunteer_positions_signup WHERE users_id = {$u['id']}");
		if(count($u['volunteer_positions']) > 0){
			$query = "INSERT INTO volunteer_positions_signup (users_id, conferences_id, volunteer_positions_id) VALUES({$u['id']},{$conference['id']},";
			$query .= implode('), (' . $u['id'] . ', ' . $conference['id'] . ', ', $u['volunteer_positions']);
			$query .= ")";
			mysql_query($query);
		}
	}
	if(mysql_error() != '') return mysql_error();

	/* Record all the data in orig that we saved so subsequent
	 * calls to user_save don't try to overwrite data already
	 * saved to the database */
	unset($u['orig']);
	$orig = $u;
	$u['orig'] = $orig; 

	// and return a notification of success
	return 'ok';
}

// mark the role as complete if it's qualifications are met
function user_complete_role($users_id, $role){
	// avoid SQL injections
	$role = mysql_real_escape_string($role);
	$users_id *= 1;

	// get the id of the role
	$row = mysql_fetch_assoc(mysql_query("SELECT id FROM roles WHERE type = '$role'"));
	if(!is_array($row)){
		return false;
	}
	$roles_id = $row['id'];

	// does this user have the given role?
	$row = mysql_fetch_array(mysql_query("SELECT * FROM user_roles WHERE users_id = $users_id AND roles_id = $roles_id"));
	if(!is_array($row)){
		return false;
	}
	
	// ok, it's a valid role and the specified user has it.  Now let's see if we can mark it as complete
	$user = user_load($users_id);
	$result = user_check_role_complete($user, $role);

	if($result == 'ok'){
		return true;
	}else{
		return false;
	}

}

// mark the role as being incomplete - not a verb sadly
function user_uncomplete_role($users_id, $role){
	// avoid SQL injections
	$role = mysql_real_escape_string($role);
	$users_id *= 1;

	// get the id of the role
	$row = mysql_fetch_assoc(mysql_query("SELECT id FROM roles WHERE type = '$role'"));
	if(!is_array($row)){
		return false;
	}
	$roles_id = $row['id'];

	// and update said role for the given user id
	return mysql_query("UPDATE user_roles SET complete = 'no' WHERE users_id = $users_id AND roles_id = $roles_id");

}

// activate the specified role for the specified user if they have that role
function user_activate_role($users_id, $roles_id){
	// Make sure the role is indeed there
	$query = "SELECT * FROM user_roles WHERE roles_id = $roles_id AND users_id = $users_id";
	$data = mysql_fetch_array(mysql_query($query));
	if(!is_array($data)){
		// can't be activated if you don't have it!
		return false;
	}

	return mysql_query("UPDATE user_roles SET active='yes' WHERE users_id = $users_id AND roles_id = $roles_id");
}

// deactivate the specified role for the specified user if they have that role
function user_deactivate_role($users_id, $roles_id){
	// Make sure the role is indeed there
	$query = "SELECT * FROM user_roles WHERE roles_id = $roles_id AND users_id = $users_id";
	$data = mysql_fetch_array(mysql_query($query));
	if(!is_array($data)){
		// can't be deactivated if you don't have it!
		return false;
	}

	return mysql_query("UPDATE user_roles SET active='no' WHERE users_id = $users_id AND roles_id = $roles_id");
}

// Remove a role for a user.
// now just a skin on top of account_remove_role
function user_remove_role(&$u, $role)
{
	global $roles;
	$result = account_remove_role($u['accounts_id'], $roles[$role]['id'], $u['conferences_id']);

	// Delete the role
	if(array_key_exists($role, $u['roles'])) {
		unset($u['roles'][$role]);
	}
	return $result;
}

/* If role is specified, just delete the role from the user.
 * If not, delete the whole user, all roles */
function user_delete($u, $role=false)
{
	$finish_delete = false;

	if(!is_array($u)) {
		$u = user_load($u);
	}  
	if($role != false) {
		account_remove_role($u['accounts_id'], $roles[$role]['id'], $u['conferences_id']);
		if(array_key_exists($role, $u['roles'])) {
			unset($u['roles'][$role]);
		}

		if(count($u['roles']) == 0) {
			/* No roles left, finish the delete */
			$finish_delete = true;
		}
	} else {
		/* Delete the whole user, every role */
		foreach(array_keys($u['roles']) as $r){
			account_remove_role($u['accounts_id'], $roles[$r]['id'], $u['conferences_id']);
			if(array_key_exists($role, $u['roles'])) {
				unset($u['roles'][$role]);
			}
		}

		$finish_delete = true;
	}

	if($finish_delete) {
		mysql_query("UPDATE users SET deleted='yes', deleteddatetime=NOW() WHERE id='{$u['id']}'");
		return true;
	}

	/* User had some other role, so delete was not completed. */
	return false;
}

/* Purge functions. These completely eliminate all traces of a user from the
 * database.  This action cannot be undone.  We prefer the committee to use the
 * "delete" functions, which simply mark the account as "deleted". */
function user_purge($u, $role=false)
{
	/* Delete the user, then completely delete them from
	 * the DB if delete returns true, that is, if there's
	 * no other role blocking the delete/purge */
	$finish_purge = user_delete($u, $role);

	if($finish_purge == true) {
		mysql_query("DELETE FROM users WHERE id='{$u['id']}'");
		return true;
	}

	/* Not purged, some other role existed */
	return false;
}


/* Duplicate a row in the users table, or any one of the users_* tables. */
function user_dupe_row($db, $key, $val, $newval)
{
	global $conference;
	$nullfields = array('deleteddatetime'); /* Fields that can be null */
	$q = mysql_query("SELECT * FROM $db WHERE $key='$val'");
	if(mysql_num_rows($q) != 1) {
		echo "ERROR duplicating row in $db: $key=$val NOT FOUND.\n";
		exit;
	}
	$i = mysql_fetch_assoc($q);
	$i[$key] = $newval;

	foreach($i as $k=>$v) {
		if($v == NULL && in_array($k, $nullfields)) 
			$i[$k] = 'NULL';
		else if($k == 'conferences_id')
			$i[$k] = $conference['id'];
		else
			$i[$k] = '\''.mysql_escape_string($v).'\'';
	}

	$keys = '`'.join('`,`', array_keys($i)).'`';
	$vals = join(',', array_values($i));

	$q = "INSERT INTO $db ($keys) VALUES ($vals)";
//	echo "Dupe Query: [$q]";
	$r = mysql_query($q);
	echo mysql_error();

	$id = mysql_insert_id();
	return $id;
}

/* Returns true if loaded user ($u) is allowed to add role $role to their
 * profile.  THis is intended as a last-stop mechanism, preventing, for example
 * a student from co-existing with any other role . */
function user_add_role_allowed(&$u, $role)
{
	foreach(array_keys($u['orig']['roles']) as $ur) {
		switch($ur) {
		case 'student':
			/* Student cant' add any other role */
			return false;

		default:
			if($role == 'student') {
				/* No role can add the student role */
				return false;
			}

			/* All other roles can coexist (even the fair role) */
			break;
		}
	}
	return true;
}

// Set the user's school to the one specifed.  Verifying the school code is needed
// here, as it will be called from both the web interface and the API.
// returns true on success, false otherwise
function user_set_school($u, $schoolId, $schoolCode){
	$returnval = false;
	// make sure the id and code match
	$tally = mysql_result(mysql_query("SELECT COUNT(*) FROM schools WHERE id = '$schoolId' AND accesscode = '$schoolCode'"), 0);
	if($tally == 1){
		if(mysql_query("UPDATE users SET schools_id = $schoolId WHERE id = " . $u['id'])){
			$u['schools_id'] = $schoolId;
			$returnval = true;
		}
	}
	return $returnval;
}

// Add a role for a user.
// now just a skin on top of account_add_role
function user_add_role(&$u, $role, $password = null){
	$row = mysql_fetch_assoc(mysql_query("SELECT conferences_id FROM users WHERE id = " . $u['id']));
	$conferences_id = $row['conferences_id'];
	$row = mysql_fetch_assoc(mysql_query("SELECT id FROM roles WHERE `type` = '$role'"));
	$roleId = $row['id'];

	$result = account_add_role($u['accounts_id'], $roleId, $conferences_id, $password);
	if($result == 'ok'){
		// we need this "if" because account_add_role will return "ok" if they already have this role
		if(!in_array($role, $_SESSION['roles'])){
		       $_SESSION['roles'][] = $role;
		}

	}
	return $result;
}

function user_create($accounts_id, $conferences_id=0)
{
	global $config, $conference;

	if($conferences_id == 0) $conferences_id = $conference['id'];

	/* Make sure the user doesn't already exist */
	$q = mysql_query("SELECT id FROM users WHERE accounts_id='$accounts_id' AND conferences_id='$conferences_id'");
	echo mysql_error();
	if(mysql_num_rows($q)) {
		echo "ERROR: user_create called for a user that already exists.\n";
		exit;
	}

	$fields = array(
		'accounts_id' => $accounts_id,
		'conferences_id' => $conferences_id,
	);

	/* Get old user data if available */
	$results = mysql_fetch_assoc(mysql_query("SELECT * FROM users WHERE accounts_id = '$accounts_id' ORDER BY id DESC LIMIT 1"));
	if(is_array($results)){
		$skipfields = array('id', 'created', 'lastlogin', 'year', 'accounts_id', 'conferences_id', 'deleted', 'deleteddatetime');
		foreach($results as $fname => $value){
			if(!in_array($fname, $skipfields) && $value != null){
				$fields[$fname] = $value;
			}
		}
	}

	/* Create the user */
	$fieldList = array_keys($fields);
	$query = "INSERT INTO users(`created`, `" . implode('`,`', $fieldList) . "`) VALUES(NOW(), '" . implode("','", $fields) . "')";

	mysql_query($query);
	$id = mysql_insert_id();

	/* Return a loaded user with no roles */
	return user_load($id);
}


/* Perform some checks.  Make sure the person is logged in, and that their
 * password hasn't expired (the password_expired var is set in the login page) 
 */
function user_auth_required($all_required = array(), $one_required = array())
{
	global $config;
	$ok = true;

	unset($_SESSION['request_uri']);
	if(!isset($_SESSION['roles']) || !isset($_SESSION['accounts_id'])) {
		message_push(error(i18n("You must login to view that page")));
		$_SESSION['request_uri'] = $_SERVER['REQUEST_URI'];
		header("location: {$config['SFIABDIRECTORY']}/user_login.php");
		exit;
	}

	/* Make sure the user has each role in $all_required, this returns
	 * an array in the same order as $all_required, with all members
	 * in $all_required that are also in the session roles */
	if(!is_array($all_required)) $all_required = array($all_required);

	$match = array_intersect($all_required, $_SESSION['roles']);
	if($all_required != $match) {
		/* Something is missing */
		$ok = false;
	}

	/* Make sure the user has one role in $one_required */
	if(!is_array($one_required)) $one_required = array($one_required);
	if(count($one_required)) {
		$match = array_intersect($one_required, $_SESSION['roles']);
		if(count($match) == 0) {
			/* Missing any role in $one_required */
			$ok = false;
		}
	}

	if(!$ok) {
		message_push(error(i18n("You do not have permission to view that page")));
		header("location: {$config['SFIABDIRECTORY']}/user_login.php");
		exit;
	}

	/* Forward to password expired, remember the target URI */
	if($_SESSION['password_expired'] == true) {
		$_SESSION['request_uri'] = $_SERVER['REQUEST_URI'];
		header("location: {$config['SFIABDIRECTORY']}/user_edit.php");
		exit;
	}

	/* Return the first role that matched, this retains the previous
	 * behaviour */
	return $match[0];	
}

/* Perform some checks.  Make sure the person is logged in, and that their
 * password hasn't expired (the password_expired var is set in the login page) 
 */
function api_user_auth_required($all_required = array(), $one_required = array())
{
	global $config;
	$ok = true;
	$ret=array();

	if(!isset($_SESSION['roles']) || !isset($_SESSION['accounts_id'])) {
		$ret['status']="error";
		$ret['error']="Not logged in";
		return $ret;
	}

	/* Make sure the user has each role in $all_required, this returns
	 * an array in the same order as $all_required, with all members
	 * in $all_required that are also in the session roles */
	if(!is_array($all_required)) $all_required = array($all_required);

	$match = array_intersect($all_required, $_SESSION['roles']);
	if($all_required != $match) {
		/* Something is missing */
		$ok = false;
	}

	/* Make sure the user has one role in $one_required */
	if(!is_array($one_required)) $one_required = array($one_required);
	if(count($one_required)) {
		$match = array_intersect($one_required, $_SESSION['roles']);
		if(count($match) == 0) {
			/* Missing any role in $one_required */
			$ok = false;
		}
	}

	if(!$ok) {
		$ret['status']="error";
		$ret['error']="You do not have permission to access that information";
		return $ret;
	}

	/* Forward to password expired, remember the target URI */
	if($_SESSION['password_expired'] == true) {
		$ret['status']="error";
		$ret['error']="Your password has expired";
		return $ret;
	}
	$ret['status']="ok";
	$ret['match']=$match[0];
	return $ret;
}


function user_volunteer_registration_status()
{
	global $config;
//	$now = date('Y-m-d H:i:s');
  //      if($now < $config['dates']['judgeregopen']) return "notopenyet";
//	if($now > $config['dates']['judgeregclose']) return "closed";
	return "open";
}

function user_teacher_registration_status(){
	return "open";
}

function user_judge_registration_status()
{
	global $config;
	$now = date('Y-m-d H:i:s');
	if(array_key_exists('judgeregopen', $config['dates'])){
		if($now < $config['dates']['judgeregopen']) return "notopenyet";
		if($now > $config['dates']['judgeregclose']) return "closed";
	}
	return "open";
}

$user_fields_map = array(
	/* Account -- Email requirement is set based on username, which
	 * is always required.  Password is not required unless they type
	 * in the field, in which case the form validator kicks 
	 * (checks pass1==pass2 and all that) */
//	'email' => array('email'),
	/* Personal */
	'salutation' => array('salutation'),
	'name' => array('firstname','lastname'),
	'sex' => array('sex'),
	'phonehome' => array('phonehome'),
	'phonecell' => array('phonecell'),
	'birthdate' => array('birthdate'),
	'lang' => array('lang'),
	'address' => array('address', 'address2', 'postalcode'),
	'city' => array('city'),
	'province' => array('province'),
	'firstaid' => array('firstaid','cpr'),
	/* Organization */
	'org' => array('organization'),
	'phonework' => array('phonework'),
	'fax' => array('fax'),
);

/* Return fields to show based on role.  In the user editor, many
 * fields are always shown and some have hard-coded requirements, but
 * any in this list can be made optionally-required or not shown
 * at all */
function user_fields_enabled($role)
{
	global $config, $user_fields_map;
	$ret = array('firstname','lastname');
	$fields = $config["{$role}_personal_fields"];
	if($fields != '') {
		$fields = explode(',', $fields);
		foreach($fields as $f) {
			$ret = array_merge($ret, $user_fields_map[$f]);
		}
	}
	return $ret;
}

/* Return required fields.  Some fields are always shown and can be
 * set to required.  Some have hard-coded requirement status.  This is only
 * for the fields where the requirement can be configured.  Not for ALL fields
 * the user sees */
function user_fields_required($role)
{
	global $config, $user_fields_map;
	$ret = array('firstname','lastname');
	$required = $config["{$role}_personal_required"];
	if($required != '') {
		$fields = explode(',', $required);
		foreach($fields as $f) {
			$ret = array_merge($ret, $user_fields_map[$f]);
		}
	}
	/* Filter some elements that are never required.  
	 *	- address2
	 */
	$ret = array_diff($ret, array('address2'));
	return $ret;
}

function user_all_fields_required($roles) {
	$ret=array();
	foreach($roles AS $role) {
		$ret=array_merge($ret,user_fields_required($role));
	}
	return $ret;
}

//this function checks if $field is set in the user record, if it is, it returns it, otherwise, it returns false __AND__ redirects to the redirect page.
function user_field_required($field,$redirect) {
	$u=user_load($_SESSION['users_id']);
	if($u[$field])
		return $u[$field];
	else {
		header("Location: $redirect");
	}

}

/* user_{$role}_login() is called with a full $u loaded */

function user_fair_login($u) 
{
	/* Double check, make sure the user is of this role */
	if(!array_key_exists('fair', $u['roles'])) {
		echo "ERROR: attempted to login fair on a non-fair user\n";
		exit;
	}

	$_SESSION['fairs_id'] = $u['fairs_id'];// == 'yes') ? true : false;
}

function superuser_required() {
	//first, they have to be logged in
	user_auth_required();

	//next, they need superuser
	if($_SESSION['superuser']!="yes") {
		send_header("Superuser access required");
		send_footer();
		exit;
	}
}

function try_login($user, $pass) 
{
	/* Ensure sanity of inputs */
	/* User could be a username, or could be an email, check */
	if(!account_valid_user($user) && !account_valid_email($user)) {
		return false;
	}

	/* Don't check for a valid password, administrators can set any password they'd like, but
	 * there has to be a password */
	if(!strlen($pass)) {
		return false;
	}

	$user = mysql_real_escape_string($user);
	$q = mysql_query("SELECT id,password,deleted FROM accounts WHERE username='$user'");
	echo mysql_error();

	if(mysql_num_rows($q) < 1) return false;

	$r = mysql_fetch_assoc($q);

	/* See if the user account has been deleted */
	if($r['deleted'] == 'yes') return false;

	/* See if the password matches */
	if($r['password'] != $pass) return false;

	/* Login successful */
	return $r['id'];
}

function updateSessionRoles($u=null) {
	if(!$u)
		$u=user_load($_SESSION['users_id']);
	$_SESSION['roles']=array();
	if($u && is_array($u['roles'])) {
		foreach($u['roles'] AS $r=>$rd) {
			if($rd['active']=="yes" || $r=='admin' || $r=='config' || $r=='committee')
				$_SESSION['roles'][]=$r;
		}
	}
}

function user_conference_load($accounts_id,$conferences_id) {
	global $config;
	if(! ($accounts_id && $conferences_id))
		return $config['SFIABDIRECTORY']."/index.php";

	/* Use the active conference to find the user id to load */
	/* FIXME: Need to be able to handle the case where there is no
	 * active conference, but one step at a time */
	$q = mysql_query("SELECT id FROM users WHERE accounts_id=$accounts_id AND conferences_id=$conferences_id");
	if(mysql_num_rows($q) == 0) {
		/* FIXME: this should probably just return false, but for now, see if there's an error */
//		return false;
//		header("location: user_edit.php");
//		echo "No user {$accounts_id} for conference {$_SESSION['conferences_id']}";
		return $config['SFIABDIRECTORY']."/user_main.php";
	} 
	if(mysql_num_rows($q) > 1) {
		echo "DATABASE ERROR: More than one user for account $accounts_id  conference {$conferences_id}";
		exit;
	}
	$uid = mysql_fetch_assoc($q);
	$id = $uid['id'];

	$u = user_load($id);

	$_SESSION['name']="{$u['firstname']} {$u['lastname']}";
	$_SESSION['users_id']=$u['id'];
	updateSessionRoles();
	/* Load the password expiry for each user role, and
	 * find the longest expiry, which is the one we'll use
	 * for this user to determine if the passwd has
	 * expired. */
	$longest_expiry = 0;
	foreach(array_keys($u['roles']) as $r) {
		$e = $config["{$r}_password_expiry_days"];
		if($e == 0) {
			/* Catch a never expire case. */
			$longest_expiry = 0;
			break;
		} else if($e > $longest_expiry) {
			$longest_expiry = $e;
		}
	}

	if($u['passwordset'] == '0000-00-00') {
		/* Force the password to expire */
		$_SESSION['password_expired'] = true;
	} else if($longest_expiry == 0) {
		/* Never expires */
		unset($_SESSION['password_expired']);
	} else {
		/* Check expiry */
		$expires = date('Y-m-d', strtotime("{$u['passwordset']} +$longest_expiry days"));
		$now = date('Y-m-d');
		if($now > $expires) {
			$_SESSION['password_expired'] = true;
		} else {
			unset($_SESSION['password_expired']);
		}
	}
	/* If password_expired == true, the main page (or any
	 * other user page) will catch this and require
	 * them to set a password */

	/* Call login functions for each role */
	foreach(array_keys($u['roles']) as $r) {
		if(is_callable("user_{$r}_login")) {
			call_user_func_array("user_{$r}_login", array($u));
		}
	}

//	mysql_query("UPDATE accounts SET lastlogin=NOW() 
//			WHERE id={$u['id']}");

		/* Setup multirole so a multirole user can switch if they want to
		 * without logging in/out */
/*		if(count($u['roes']) > 1) {
			$_SESSION['multirole'] = true;
		} else  {
			$_SESSION['multirole'] = false;
		}
*/
		/* See if there is a redirect, and do that instead of
		 * taking them to their main page */
/*		if($redirect != '') {
			switch($redirect) {
			case 'roleadd':
				if(!user_valid_role($multirole_data)) 
					$multirole_data = '';

				header("location: user_multirole.php?action=add&role=$multirole_data");
				exit;
			case 'roleattached':
				message_push(happy(i18n('The %1 role has been attached to your account', array($roles[$role]['name']))));
				message_push(notice(i18n('Use the [Switch Roles] link in the upper right to change roles while you are logged in')));
				header("location: {$role}_main.php");
				exit;
				
			}
		}
*/
	/* Is there a saved requesT_uri from a failed login attempt?, if so 
	 * take them there */
	if(array_key_exists('request_uri', $_SESSION)) {
	//	header("location: {$_SESSION['request_uri']}");
		unset($_SESSION['request_uri']);
		return $_SESSION['request_uri'];
	}
	return "user_main.php";
//	header("location: user_main.php");
	//exit;
}


?>