mirror of
https://github.com/mozilla/gecko-dev.git
synced 2025-02-26 20:30:41 +00:00
Patch by Chris Baldwin <chris.baldwin@siara.com> -- allow optional
entry of the user's realname. Note that nothing actually makes use of this info at present.
This commit is contained in:
parent
c86e9b2cce
commit
54026d1e4e
@ -385,7 +385,7 @@ sub confirm_login {
|
||||
if (defined $::FORM{"PleaseMailAPassword"}) {
|
||||
my $realpwd;
|
||||
if ($realcryptpwd eq "") {
|
||||
$realpwd = InsertNewUser($enteredlogin);
|
||||
$realpwd = InsertNewUser($enteredlogin, "");
|
||||
} else {
|
||||
SendSQL("select password from profiles where login_name = " .
|
||||
SqlQuote($enteredlogin));
|
||||
|
@ -33,9 +33,11 @@ if (! defined $::FORM{'pwd1'}) {
|
||||
if (Param('useqacontact')) {
|
||||
$qacontactpart = ", the current QA Contact";
|
||||
}
|
||||
SendSQL("select emailnotification from profiles where login_name = " .
|
||||
SqlQuote($::COOKIE{'Bugzilla_login'}));
|
||||
my ($emailnotification) = (FetchSQLData());
|
||||
my $loginname = SqlQuote($::COOKIE{'Bugzilla_login'});
|
||||
SendSQL("select emailnotification,realname from profiles where login_name = " .
|
||||
$loginname);
|
||||
my ($emailnotification, $realname) = (FetchSQLData());
|
||||
$realname = value_quote($realname);
|
||||
print qq{
|
||||
<form method=post>
|
||||
<hr>
|
||||
@ -47,6 +49,11 @@ if (! defined $::FORM{'pwd1'}) {
|
||||
<tr>
|
||||
<td align=right>Re-enter your new password:</td>
|
||||
<td><input type=password name="pwd2"></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td align=right>Your real name (optional):</td>
|
||||
<td><input size=35 name=realname value="$realname"></td>
|
||||
</tr>
|
||||
</table>
|
||||
<hr>
|
||||
<table>
|
||||
@ -122,6 +129,13 @@ Please click <b>Back</b> and try again.\n";
|
||||
SendSQL("update profiles set emailnotification='$::FORM{'emailnotification'}' where login_name = " .
|
||||
SqlQuote($::COOKIE{'Bugzilla_login'}));
|
||||
|
||||
my $newrealname = $::FORM{'realname'};
|
||||
|
||||
if ($newrealname ne "") {
|
||||
$newrealname = SqlQuote($newrealname);
|
||||
SendSQL("update profiles set realname=$newrealname where login_name = " .
|
||||
SqlQuote($::COOKIE{'Bugzilla_login'}));
|
||||
}
|
||||
|
||||
PutHeader("Preferences updated.");
|
||||
print "
|
||||
|
@ -44,6 +44,7 @@ Content-type: text/html
|
||||
PutHeader("Create a new bugzilla account");
|
||||
|
||||
my $login = $::FORM{'login'};
|
||||
my $realname = $::FORM{'realname'};
|
||||
if (defined $login) {
|
||||
CheckEmailSyntax($login);
|
||||
if (DBname_to_id($login) != 0) {
|
||||
@ -53,7 +54,7 @@ if (defined $login) {
|
||||
print "the <b>E-mail me a password</b> button.\n";
|
||||
exit;
|
||||
}
|
||||
my $password = InsertNewUser($login);
|
||||
my $password = InsertNewUser($login, $realname);
|
||||
MailPassword($login, $password);
|
||||
print "A bugzilla account for <tt>$login</tt> has been created. The\n";
|
||||
print "password has been e-mailed to that address. When it is\n";
|
||||
@ -66,7 +67,8 @@ if (defined $login) {
|
||||
print q{
|
||||
To create a bugzilla account, all that you need to do is to enter a
|
||||
legitimate e-mail address. The account will be created, and its
|
||||
password will be mailed to you.
|
||||
password will be mailed to you. Optionally you may enter your real name
|
||||
as well.
|
||||
|
||||
<FORM method=get>
|
||||
<table>
|
||||
@ -74,6 +76,10 @@ password will be mailed to you.
|
||||
<td align=right><b>E-mail address:</b></td>
|
||||
<td><input size=35 name=login></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td align=right><b>Real name:</b></td>
|
||||
<td><input size=35 name=realname></td>
|
||||
</tr>
|
||||
</table>
|
||||
<input type=submit>
|
||||
};
|
||||
|
@ -353,7 +353,7 @@ sub GetVersionTable {
|
||||
|
||||
|
||||
sub InsertNewUser {
|
||||
my ($username) = (@_);
|
||||
my ($username, $realname) = (@_);
|
||||
my $password = "";
|
||||
for (my $i=0 ; $i<8 ; $i++) {
|
||||
$password .= substr("abcdefghijklmnopqrstuvwxyz", int(rand(26)), 1);
|
||||
@ -370,7 +370,9 @@ sub InsertNewUser {
|
||||
}
|
||||
}
|
||||
|
||||
SendSQL("insert into profiles (login_name, password, cryptpassword, groupset) values (@{[SqlQuote($username)]}, '$password', encrypt('$password'), $groupset)");
|
||||
$username = SqlQuote($username);
|
||||
$realname = SqlQuote($realname);
|
||||
SendSQL("insert into profiles (login_name, realname, password, cryptpassword, groupset) values ($username, $realname, '$password', encrypt('$password'), $groupset)");
|
||||
return $password;
|
||||
}
|
||||
|
||||
@ -406,7 +408,7 @@ sub DBNameToIdAndCheck {
|
||||
return $result;
|
||||
}
|
||||
if ($forceok) {
|
||||
InsertNewUser($name);
|
||||
InsertNewUser($name, "");
|
||||
$result = DBname_to_id($name);
|
||||
if ($result > 0) {
|
||||
return $result;
|
||||
|
Loading…
x
Reference in New Issue
Block a user