oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

bugfix [ 990710 ] Users can't change own passwords

Browse source
This commit is contained in:
JT Smith 2004-07-14 16:25:50 +00:00
parent c2b41a4896
commit e1320cebb6
3 changed files with 11 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

12
lib/WebGUI/Auth/WebGUI.pm
View file

@ -191,6 +191,8 @@ sub createAccountSave {
}
my $properties;
$properties->{changeUsername} = $session{setting}{webguiChangeUsername};
$properties->{changePassword} = $session{setting}{webguiChangePassword};
$properties->{identifier} = Digest::MD5::md5_base64($password);
$properties->{passwordLastUpdated} = time();
$properties->{passwordTimeout} = $session{setting}{webguiPasswordTimeout};
@ -219,18 +221,18 @@ sub displayAccount {
return $self->displayLogin($_[0]) if ($self->userId == 1);
my $userData = $self->getParams;
$vars->{'account.message'} = $_[0] if ($_[0]);
if($userData->{changeUsername}){
$vars->{'account.noform'} = 1;
if($userData->{changeUsername} || (!defined $userData->{changeUsername} && $session{setting}{webguiChangeUsername})){
$vars->{'account.form.username'} = WebGUI::Form::text({"name"=>"authWebGUI.username","value"=>$self->username});
$vars->{'account.form.username.label'} = WebGUI::International::get(50);
$vars->{'account.noform'} = 0;
}
if($userData->{changePassword}){
if($userData->{changePassword} || (!defined $userData->{changePassword} && $session{setting}{webguiChangePassword})){
$vars->{'account.form.password'} = WebGUI::Form::password({"name"=>"authWebGUI.identifier","value"=>"password"});
$vars->{'account.form.password.label'} = WebGUI::International::get(51);
$vars->{'account.form.passwordConfirm'} = WebGUI::Form::password({"name"=>"authWebGUI.identifierConfirm","value"=>"password"});
$vars->{'account.form.passwordConfirm.label'} = WebGUI::International::get(2,'AuthWebGUI');
}
if(!$userData->{changeUsername} && !$userData->{changePassword}){
$vars->{'account.noform'} = "true";
$vars->{'account.noform'} = 0;
}
$vars->{'account.nofields'} = WebGUI::International::get(22,'AuthWebGUI');
return $self->SUPER::displayAccount("updateAccount",$vars);

3
lib/WebGUI/Operation/Settings.pm
View file

@ -20,6 +20,7 @@ use WebGUI::International;
use WebGUI::Operation::Shared;
use WebGUI::Privilege;
use WebGUI::Session;
use WebGUI::Style;
use WebGUI::SQL;
use WebGUI::URL;
@ -149,7 +150,7 @@ sub www_editUserSettings {
my ($output, $f, $cmd, $html);
$output .= helpIcon("user settings edit");
$output .= '<h1>'.WebGUI::International::get(117).'</h1>';
$output .= WebGUI::Form::_javascriptFile("swapLayers.js");
WebGUI::Style::setScript($session{config}{extrasURL}."/swapLayers.js",{language=>"Javascript"});
$output .= '<script language="JavaScript" > var active="'.$session{setting}{authMethod}.'"; </script>';
$f = WebGUI::HTMLForm->new("","","","","","border='0' cellpadding='0' cellspacing='0' width='800'");
$f->hidden("op","saveSettings");