include_once("acctfuncs_po.inc");
# Display the standard Account form, pass in default values if any
#
function display_account_form($UTYPE,$A,$U="",$T="",$S="",
$E="",$P="",$C="",$R="",$L="",$I="",$N="",$UID=0) {
# UTYPE: what user type the form is being displayed for
# A: what "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: Users.ID value in case form is used for editing
global $SUPPORTED_LANGS;
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="",$N="",$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;
$dbh = db_connect();
$error = "";
if (!isset($E) || !isset($U)) {
$error = __("Missing a required field.");
}
if ($TYPE == "new") {
# they need password fields for this type of action
#
if (!isset($P) || !isset($C)) {
$error = __("Missing a required field.");
}
} else {
if (!$UID) {
$error = __("Missing User ID");
}
}
if (!$error && $P && $C && ($P != $C)) {
$error = __("Password fields do not match.");
}
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 = '".mysql_real_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.",
array("", $U, ""));
}
}
}
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 = '".mysql_real_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.",
array("", $E, ""));
}
}
}
if ($error) {
print "".$error."
\n";
display_account_form($UTYPE, $A, $U, $T, $S, $E, "", "",
$R, $L, $I, $N, $UID);
} else {
if ($TYPE == "new") {
# no errors, go ahead and create the unprivileged user
#
#md5hash the password
$P = md5($P);
$q = "INSERT INTO Users (AccountTypeID, Suspended, Username, Email, ";
$q.= "Passwd, RealName, LangPreference, IRCNick, NewPkgNotify) ";
$q.= "VALUES (1, 0, '".mysql_real_escape_string($U)."'";
$q.= ", '".mysql_real_escape_string($E)."'";
$q.= ", '".mysql_real_escape_string($P)."'";
$q.= ", '".mysql_real_escape_string($R)."'";
$q.= ", '".mysql_real_escape_string($L)."'";
$q.= ", '".mysql_real_escape_string($I)."'";
if ($N) {
$q.= ", 1)";
} else {
$q.= ", 0)";
}
$result = db_query($q, $dbh);
if (!$result) {
print __("Error trying to create account, %h%s%h: %s.",
array("", $U, "", mysql_error($dbh)));
} else {
# account created/modified, tell them so.
#
print __("The account, %h%s%h, has been successfully created.",
array("", $U, ""));
print "\n";
print __("Click on the Home link above to login.");
print "
\n";
}
} else {
# no errors, go ahead and modify the user account
#
#md5 hash the password
$q = "UPDATE Users SET ";
$q.= "Username = '".mysql_real_escape_string($U)."'";
if ($T) {
$q.= ", AccountTypeID = ".intval($T);
}
if ($S) {
$q.= ", Suspended = 1";
} else {
$q.= ", Suspended = 0";
}
$q.= ", Email = '".mysql_real_escape_string($E)."'";
if ($P) {
$q.= ", Passwd = '".mysql_real_escape_string(md5($P))."'";
}
$q.= ", RealName = '".mysql_real_escape_string($R)."'";
$q.= ", LangPreference = '".mysql_real_escape_string($L)."'";
$q.= ", IRCNick = '".mysql_real_escape_string($I)."'";
$q.= ", NewPkgNotify = ";
if ($N) {
$q.= "1 ";
} else {
$q.= "0 ";
}
$q.= "WHERE ID = ".intval($UID);
$result = db_query($q, $dbh);
if (!$result) {
print __("Error trying to modify account, %h%s%h: %s.",
array("", $U, "", mysql_error($dbh)));
} else {
print __("The account, %h%s%h, has been successfully modified.",
array("", $U, ""));
}
}
}
return;
}
# search existing accounts
#
function search_accounts_form() {
print "\n";
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 '%".mysql_real_escape_string($U)."%' ";
$search_vars[] = "U";
}
if ($E) {
$q.= "AND Email LIKE '%".mysql_real_escape_string($E)."%' ";
$search_vars[] = "E";
}
if ($R) {
$q.= "AND RealName LIKE '%".mysql_real_escape_string($R)."%' ";
$search_vars[] = "R";
}
if ($I) {
$q.= "AND IRCNick LIKE '%".mysql_real_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 ". $OFFSET . ", " . $HITS_PER_PAGE;
$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 "\n";
print "";
print "";
print "\n";
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 "".$row["Username"]." | ";
print "";
print "".$row["AccountType"];
print " | ";
print "";
if ($row["Suspended"]) {
print __("Suspended");
} else {
print __("Active");
}
print " | ";
print "";
$row["RealName"] ? print $row["RealName"] : print " ";
print " | ";
print "";
$row["IRCNick"] ? print $row["IRCNick"] : print " ";
print " | ";
print "";
$row["LastVoted"]
? print date("Ymd", $row["LastVoted"])
: print __("Never");
print " | ";
print "";
if ($UTYPE == "Trusted User" && $row["AccountType"] == "Developer") {
# TUs can't edit devs
#
print " | ";
} else {
$edit_url = "/account.php?Action=DisplayAccount&ID=".$row["ID"];
print "";
print "Edit";
}
print " \n";
$i++;
}
print " \n";
print " |
\n";
print "";
print "";
print "\n";
print " | ";
print "";
print "\n";
print " | ";
print "
\n";
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 " ".__("Username").": | \n";
print " ".$U." | \n";
print "
\n";
print " \n";
print " ".__("Account Type").": | \n";
print " ";
if ($T == "User") {
print __("User");
} elseif ($T == "Trusted User") {
print __("Trusted User");
} elseif ($T == "Developer") {
print __("Developer");
}
print " | \n";
print "
\n";
print " ".__("Email Address").": | \n";
print " ".$E." | \n";
print "
\n";
print " \n";
print " ".__("Real Name").": | \n";
print " ".$R." | \n";
print "
\n";
print " \n";
print " ".__("IRC Nick").": | \n";
print " ".$I." | \n";
print "
\n";
print " \n";
print " ".__("View this user's packages")." | \n";
print "
\n";
print "
\n";
print "\n";
return;
}
# vim: ts=2 sw=2 noet ft=php
?>