\n"; print "

"; print "\n"; if ($UID) { print "\n"; } print "

"; print "\n"; print "\n"; print ""; print ""; print ""; print "\n"; # Only TUs or Devs can promote/demote/suspend a user if ($UTYPE == "Trusted User" || $UTYPE == "Developer") { print ""; print ""; print ""; print "\n"; print ""; print ""; print "\n"; } print ""; print ""; print ""; print "\n"; print ""; print ""; print "\n"; print ""; print ""; print "\n"; print ""; print ""; print ""; print "\n"; print ""; print ""; print ""; print "\n"; print ""; print ""; print ""; print "\n"; print "\n"; print ""; print ""; print ""; print "\n"; print "


".__("Username").":	(".__("required").")
".__("Account Type").":
".__("Account Suspended").":	"; } else { print " />"; } print "
".__("Email Address").":	(".__("required").")
".__("Password").":	"; if ($A != "UpdateAccount") { print " (".__("required").")"; } print "
".__("Re-type password").":	"; if ($A != "UpdateAccount") { print " (".__("required").")"; } print "
".__("Real Name").":
".__("IRC Nick").":
".__("Language").":

	"; if ($A == "UpdateAccount") { print " "; } else { print " "; } print ""; print "

\n"; print "\n"; return; } # function display_account_form() # process form input from a new/edit account form # function process_account_form($UTYPE,$TYPE,$A,$U="",$T="",$S="",$E="", $P="",$C="",$R="",$L="",$I="",$UID=0) { # UTYPE: The user's account type # TYPE: either "edit" or "new" # A: what parent "form" name to use # U: value to display for username # T: value to display for account type # S: value to display for account suspended # E: value to display for email address # P: password value # C: confirm password value # R: value to display for RealName # L: value to display for Language preference # I: value to display for IRC nick # N: new package notify value # UID: database Users.ID value # error check and process request for a new/modified account global $SUPPORTED_LANGS; if(isset($_COOKIE['AURSID'])) { $editor_user = uid_from_sid($_COOKIE['AURSID']); } else { $editor_user = null; } $dbh = db_connect(); $error = ""; if (empty($E) || empty($U)) { $error = __("Missing a required field."); } if ($TYPE == "new") { # they need password fields for this type of action # if (empty($P) || empty($C)) { $error = __("Missing a required field."); } } else { if (!$UID) { $error = __("Missing User ID"); } } if (!$error && !valid_username($U) && !user_is_privileged($editor_user)) $error = __("The username is invalid.") . "

" . __("It must be between %s and %s characters long", USERNAME_MIN_LEN, USERNAME_MAX_LEN ) . "
" . __("Start and end with a letter or number") . "
" . __("Can contain only one period, underscore or hyphen.") . "

"; if (!$error && $P && $C && ($P != $C)) { $error = __("Password fields do not match."); } if (!$error && $P != '' && !good_passwd($P)) $error = __("Your password must be at least %s characters.",PASSWD_MIN_LEN); if (!$error && !valid_email($E)) { $error = __("The email address is invalid."); } if ($UTYPE == "Trusted User" && $T == 3) { $error = __("A Trusted User cannot assign Developer status."); } if (!$error && !array_key_exists($L, $SUPPORTED_LANGS)) { $error = __("Language is not currently supported."); } if (!$error) { # check to see if this username is available # NOTE: a race condition exists here if we care... # $q = "SELECT COUNT(*) AS CNT FROM Users "; $q.= "WHERE Username = '".db_escape_string($U)."'"; if ($TYPE == "edit") { $q.= " AND ID != ".intval($UID); } $result = db_query($q, $dbh); if ($result) { $row = mysql_fetch_array($result); if ($row[0]) { $error = __("The username, %h%s%h, is already in use.", "", htmlspecialchars($U,ENT_QUOTES), ""); } } } if (!$error) { # check to see if this email address is available # NOTE: a race condition exists here if we care... # $q = "SELECT COUNT(*) AS CNT FROM Users "; $q.= "WHERE Email = '".db_escape_string($E)."'"; if ($TYPE == "edit") { $q.= " AND ID != ".intval($UID); } $result = db_query($q, $dbh); if ($result) { $row = mysql_fetch_array($result); if ($row[0]) { $error = __("The address, %h%s%h, is already in use.", "", htmlspecialchars($E,ENT_QUOTES), ""); } } } if ($error) { print "".$error."
\n"; display_account_form($UTYPE, $A, $U, $T, $S, $E, "", "", $R, $L, $I, $UID); } else { if ($TYPE == "new") { # no errors, go ahead and create the unprivileged user $salt = generate_salt(); $P = salted_hash($P, $salt); $escaped = array_map('db_escape_string', array($U, $E, $P, $salt, $R, $L, $I)); $q = "INSERT INTO Users (" . "AccountTypeID, Suspended, Username, Email, Passwd, Salt" . ", RealName, LangPreference, IRCNick) " . "VALUES (1, 0, '" . implode("', '", $escaped) . "')"; $result = db_query($q, $dbh); if (!$result) { print __("Error trying to create account, %h%s%h: %s.", "", htmlspecialchars($U,ENT_QUOTES), "", mysql_error($dbh)); } else { # account created/modified, tell them so. # print __("The account, %h%s%h, has been successfully created.", "", htmlspecialchars($U,ENT_QUOTES), ""); print "

\n"; print __("Click on the Home link above to login."); print "

\n"; } } else { # no errors, go ahead and modify the user account $q = "UPDATE Users SET "; $q.= "Username = '".db_escape_string($U)."'"; if ($T) { $q.= ", AccountTypeID = ".intval($T); } if ($S) { $q.= ", Suspended = 1"; } else { $q.= ", Suspended = 0"; } $q.= ", Email = '".db_escape_string($E)."'"; if ($P) { $salt = generate_salt(); $hash = salted_hash($P, $salt); $q .= ", Passwd = '$hash', Salt = '$salt'"; } $q.= ", RealName = '".db_escape_string($R)."'"; $q.= ", LangPreference = '".db_escape_string($L)."'"; $q.= ", IRCNick = '".db_escape_string($I)."'"; $q.= " WHERE ID = ".intval($UID); $result = db_query($q, $dbh); if (!$result) { print __("Error trying to modify account, %h%s%h: %s.", "", htmlspecialchars($U,ENT_QUOTES), "", mysql_error($dbh)); } else { print __("The account, %h%s%h, has been successfully modified.", "", htmlspecialchars($U,ENT_QUOTES), ""); } } } return; } # search existing accounts # function search_accounts_form() { include("search_accounts_form.php"); return; } # search results page # function search_results_page($UTYPE,$O=0,$SB="",$U="",$T="", $S="",$E="",$R="",$I="") { # UTYPE: what account type the user belongs to # O: what row offset we're at # SB: how to sort the results # U: value to display for username # T: value to display for account type # S: value to display for account suspended # E: value to display for email address # R: value to display for RealName # I: value to display for IRC nick $HITS_PER_PAGE = 50; if ($O) { $OFFSET = intval($O); } else { $OFFSET = 0; } if ($OFFSET < 0) { $OFFSET = 0; } $search_vars = array(); $q = "SELECT Users.*, AccountTypes.AccountType "; $q.= "FROM Users, AccountTypes "; $q.= "WHERE AccountTypes.ID = Users.AccountTypeID "; if ($T == "u") { $q.= "AND AccountTypes.ID = 1 "; $search_vars[] = "T"; } elseif ($T == "t") { $q.= "AND AccountTypes.ID = 2 "; $search_vars[] = "T"; } elseif ($T == "d") { $q.= "AND AccountTypes.ID = 3 "; $search_vars[] = "T"; } if ($S) { $q.= "AND Users.Suspended = 1 "; $search_vars[] = "S"; } if ($U) { $q.= "AND Username LIKE '%".db_escape_string($U)."%' "; $search_vars[] = "U"; } if ($E) { $q.= "AND Email LIKE '%".db_escape_string($E)."%' "; $search_vars[] = "E"; } if ($R) { $q.= "AND RealName LIKE '%".db_escape_string($R)."%' "; $search_vars[] = "R"; } if ($I) { $q.= "AND IRCNick LIKE '%".db_escape_string($I)."%' "; $search_vars[] = "I"; } switch ($SB) { case 't': $q.= "ORDER BY AccountTypeID, Username "; break; case 'r': $q.= "ORDER BY RealName, AccountTypeID "; break; case 'i': $q.= "ORDER BY IRCNick, AccountTypeID "; break; case 'v': $q.= "ORDER BY LastVoted, Username "; break; default: $q.= "ORDER BY Username, AccountTypeID "; break; } $search_vars[] = "SB"; $q.= "LIMIT " . $HITS_PER_PAGE . " OFFSET " . $OFFSET; $dbh = db_connect(); $result = db_query($q, $dbh); if (!$result) { print __("No results matched your search criteria."); } else { $num_rows = mysql_num_rows($result); if ($num_rows) { print "\n"; print ""; print "\n"; print ""; print ""; print ""; print "\n"; print "

"; print "\n"; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; print "\n"; $i = 0; while ($row = mysql_fetch_assoc($result)) { if ($i % 2) { $c = "data1"; } else { $c = "data2"; } print ""; print ""; print ""; print ""; print ""; print ""; print ""; print ""; } else { $edit_url = "account.php?Action=DisplayAccount&ID=".$row["ID"]; print ""; print "Edit"; } print "\n"; $i++; } print "

"; print "".__("Username")."	"; print "".__("Type")."	"; print "".__("Status")."	"; print "".__("Real Name")."	"; print "".__("IRC Nick")."	"; print "".__("Last Voted")."	"; print "".__("Edit Account")."
"; print "".$row["Username"]."	"; print "".$row["AccountType"]; print "	"; if ($row["Suspended"]) { print __("Suspended"); } else { print __("Active"); } print "	"; $row["RealName"] ? print htmlspecialchars($row["RealName"],ENT_QUOTES) : print " "; print "	"; $row["IRCNick"] ? print htmlspecialchars($row["IRCNick"],ENT_QUOTES) : print " "; print "	"; $row["LastVoted"] ? print date("Ymd", $row["LastVoted"]) : print __("Never"); print "	"; if ($UTYPE == "Trusted User" && $row["AccountType"] == "Developer") { # TUs can't edit devs # print "

\n"; print "

"; print "\n"; print "

\n"; } else { print "

\n"; print __("No more results to display."); print "

\n"; } } return; } # Display non-editable account info # function display_account_info($U="", $T="", $E="", $R="", $I="") { # U: value to display for username # T: value to display for account type # E: value to display for email address # R: value to display for RealName # I: value to display for IRC nick global $SUPPORTED_LANGS; print "\n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print " \n"; print "


".__("Username").":	".$U."
".__("Account Type").":	"; if ($T == "User") { print __("User"); } elseif ($T == "Trusted User") { print __("Trusted User"); } elseif ($T == "Developer") { print __("Developer"); } print "
".__("Email Address").":	".htmlspecialchars($E,ENT_QUOTES)."
".__("Real Name").":	".htmlspecialchars($R,ENT_QUOTES)."
".__("IRC Nick").":	".htmlspecialchars($I,ENT_QUOTES)."
".__("View this user's packages")."

\n"; return; } /* * Returns SID (Session ID) and error (error message) in an array * SID of 0 means login failed. */ function try_login() { global $MAX_SESSIONS_PER_USER, $PERSISTENT_COOKIE_TIMEOUT; $login_error = ""; $new_sid = ""; $userID = null; if ( isset($_REQUEST['user']) || isset($_REQUEST['passwd']) ) { $userID = valid_user($_REQUEST['user']); if ( user_suspended( $userID ) ) { $login_error = "Account Suspended."; } elseif ( $userID && isset($_REQUEST['passwd']) && valid_passwd($userID, $_REQUEST['passwd']) ) { $logged_in = 0; $num_tries = 0; # Account looks good. Generate a SID and store it. $dbh = db_connect(); while (!$logged_in && $num_tries < 5) { if ($MAX_SESSIONS_PER_USER) { # Delete all user sessions except the # last ($MAX_SESSIONS_PER_USER - 1). $q = "DELETE s.* FROM Sessions s "; $q.= "LEFT JOIN (SELECT SessionID FROM Sessions "; $q.= "WHERE UsersId = " . $userID . " "; $q.= "ORDER BY LastUpdateTS DESC "; $q.= "LIMIT " . ($MAX_SESSIONS_PER_USER - 1) . ") q "; $q.= "ON s.SessionID = q.SessionID "; $q.= "WHERE s.UsersId = " . $userID . " "; $q.= "AND q.SessionID IS NULL;"; db_query($q, $dbh); } $new_sid = new_sid(); $q = "INSERT INTO Sessions (UsersID, SessionID, LastUpdateTS)" ." VALUES (" . $userID . ", '" . $new_sid . "', UNIX_TIMESTAMP())"; $result = db_query($q, $dbh); # Query will fail if $new_sid is not unique if ($result) { $logged_in = 1; break; } $num_tries++; } if ($logged_in) { # set our SID cookie if (isset($_POST['remember_me']) && $_POST['remember_me'] == "on") { # Set cookies for 30 days. $cookie_time = time() + $PERSISTENT_COOKIE_TIMEOUT; # Set session for 30 days. $q = "UPDATE Sessions SET LastUpdateTS = $cookie_time "; $q.= "WHERE SessionID = '$new_sid'"; db_query($q, $dbh); } else $cookie_time = 0; setcookie("AURSID", $new_sid, $cookie_time, "/", null, !empty($_SERVER['HTTPS']), true); header("Location: " . $_SERVER['PHP_SELF'].'?'.$_SERVER['QUERY_STRING']); $login_error = ""; } else { $login_error = "Error trying to generate session id."; } } else { $login_error = __("Bad username or password."); } } return array('SID' => $new_sid, 'error' => $login_error); } /* * Only checks if the name itself is valid * Longer or equal to USERNAME_MIN_LEN * Shorter or equal to USERNAME_MAX_LEN * Starts and ends with a letter or number * Contains at most ONE dot, hyphen, or underscore * Returns the username if it is valid * Returns nothing if it isn't valid */ function valid_username( $user ) { if (!empty($user)) { #Is username at not too short or too long? if ( strlen($user) >= USERNAME_MIN_LEN && strlen($user) <= USERNAME_MAX_LEN ) { $user = strtolower($user); # Does username: # start and end with a letter or number # contain only letters and numbers, # and at most has one dash, period, or underscore if ( preg_match("/^[a-z0-9]+[.\-_]?[a-z0-9]+$/", $user) ) { #All is good return the username return $user; } } } return; } /* * Checks if the username is valid and if it exists in the database * Returns the username ID or nothing */ function valid_user( $user ) { /* if ( $user = valid_username($user) ) { */ if ( $user ) { $dbh = db_connect(); $q = "SELECT ID FROM Users WHERE Username = '" . db_escape_string($user). "'"; $result = db_query($q, $dbh); # Is the username in the database? if ($result) { $row = mysql_fetch_row($result); return $row[0]; } } return; } function good_passwd( $passwd ) { if ( strlen($passwd) >= PASSWD_MIN_LEN ) { return true; } return false; } /* Verifies that the password is correct for the userID specified. * Returns true or false */ function valid_passwd( $userID, $passwd ) { if ( strlen($passwd) > 0 ) { $dbh = db_connect(); # get salt for this user $salt = get_salt($userID); if ($salt) { # use salt $passwd_q = "SELECT ID FROM Users" . " WHERE ID = " . $userID . " AND Passwd = '" . salted_hash($passwd, $salt) . "'"; $result = db_query($passwd_q, $dbh); if ($result) { $passwd_result = mysql_fetch_row($result); if ($passwd_result[0]) { return true; } } } else { # check without salt $nosalt_q = "SELECT ID FROM Users". " WHERE ID = " . $userID . " AND Passwd = '" . md5($passwd) . "'"; $result = db_query($nosalt_q, $dbh); if ($result) { $nosalt_row = mysql_fetch_row($result); if ($nosalt_row[0]) { # password correct, but salt it first if (!save_salt($userID, $passwd)) { trigger_error("Unable to salt user's password;" . " ID " . $userID, E_USER_WARNING); return false; } return true; } } } } return false; } /* * Is the user account suspended? */ function user_suspended( $id ) { if (!$id) { return false; } $dbh = db_connect(); $q = "SELECT Suspended FROM Users WHERE ID = " . $id; $result = db_query($q, $dbh); if ($result) { $row = mysql_fetch_row($result); if ($result[0] == 1 ) { return true; } } return false; } /* * This should be expanded to return something */ function user_delete( $id ) { $dbh = db_connect(); $q = "DELETE FROM Users WHERE ID = " . $id; db_query($q, $dbh); return; } /* * A different way of determining a user's privileges * rather than account_from_sid() */ function user_is_privileged( $id ) { $dbh = db_connect(); $q = "SELECT AccountTypeID FROM Users WHERE ID = " . $id; $result = db_query($q, $dbh); if ($result) { $row = mysql_fetch_row($result); if( $result[0] > 1) { return $result[0]; } } return 0; } # Clear out old expired sessions. function clear_expired_sessions($dbh = null) { global $LOGIN_TIMEOUT; if (empty($dbh)) { $dbh = db_connect(); } $q = "DELETE FROM Sessions WHERE LastUpdateTS < (UNIX_TIMESTAMP() - $LOGIN_TIMEOUT)"; db_query($q, $dbh); return; }