\n"; print "\n"; if ($UID) { print "\n"; } print "\n"; print "\n"; print "\n"; print ""; print ""; print ""; print "\n"; if ($UTYPE == "Trusted User" || $UTYPE == "Developer") { # only TUs or Devs can promote/demote/suspend a user # 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 ""; 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 ($TYPE == "new") { print " (".__("required").")"; } print "
".__("Re-type password").":	"; if ($TYPE == "new") { print " (".__("required").")"; } print "
".__("Real Name").":
".__("IRC Nick").":
".__("Language").":
".__("New Package Notify").":	"; } else { print ">"; } print "

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

\n"; 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="",$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() { 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 '%".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 "\n"; print ""; print ""; print ""; print "\n"; 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 ""; 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 $row["RealName"] : print " "; print "	"; $row["IRCNick"] ? print $row["IRCNick"] : 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"; 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").":	".$E."
".__("Real Name").":	".$R."
".__("IRC Nick").":	".$I."
".__("View this user's packages")."

\n"; print "\n"; return; } # vim: ts=2 sw=2 noet ft=php ?>