summaryrefslogtreecommitdiff
path: root/menu.pl
diff options
context:
space:
mode:
authorchristopherm <christopherm@4979c152-3d1c-0410-bac9-87ea11338e46>2006-12-07 16:07:09 +0000
committerchristopherm <christopherm@4979c152-3d1c-0410-bac9-87ea11338e46>2006-12-07 16:07:09 +0000
commit28d7f77a764f54c962251ea690613ab1771b1ef7 (patch)
treeb0e129e56595f3089a6b430f45744f0831ef0680 /menu.pl
parentd36dfea54ce0a8c42936821815fea1e63bc77e6f (diff)
removing if ($myconfig{password}) clause, as I cannot see why one would want this
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@738 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'menu.pl')
-rwxr-xr-xmenu.pl51
1 files changed, 24 insertions, 27 deletions
diff --git a/menu.pl b/menu.pl
index a1166a90..e54fdd2d 100755
--- a/menu.pl
+++ b/menu.pl
@@ -152,39 +152,36 @@ if ($form->{action}) {
sub check_password {
- if ($myconfig{password}) {
+ require "bin/pw.pl";
- require "bin/pw.pl";
-
- if ($form->{password}) {
- if (! Session::password_check($form, $form->{login}, $form->{password})) {
- if ($ENV{HTTP_USER_AGENT}) {
- &getpassword;
- } else {
- $form->error(__FILE__.':'.__LINE__.': '.$locale->text('Access Denied!'));
- }
- exit;
+ if ($form->{password}) {
+ if (! Session::password_check($form, $form->{login}, $form->{password})) {
+ if ($ENV{HTTP_USER_AGENT}) {
+ &getpassword;
} else {
- Session::session_create($form);
+ $form->error(__FILE__.':'.__LINE__.': '.$locale->text('Access Denied!'));
}
-
+ exit;
} else {
- if ($ENV{HTTP_USER_AGENT}) {
- $ENV{HTTP_COOKIE} =~ s/;\s*/;/g;
- @cookies = split /;/, $ENV{HTTP_COOKIE};
- foreach (@cookies) {
- ($name,$value) = split /=/, $_, 2;
- $cookie{$name} = $value;
- }
-
- #check for valid session
- if(!Session::session_check($cookie{"LedgerSMB"}, $form)){
- &getpassword(1);
- exit;
- }
- } else {
+ Session::session_create($form);
+ }
+
+ } else {
+ if ($ENV{HTTP_USER_AGENT}) {
+ $ENV{HTTP_COOKIE} =~ s/;\s*/;/g;
+ @cookies = split /;/, $ENV{HTTP_COOKIE};
+ foreach (@cookies) {
+ ($name,$value) = split /=/, $_, 2;
+ $cookie{$name} = $value;
+ }
+
+ #check for valid session
+ if(!Session::session_check($cookie{"LedgerSMB"}, $form)){
+ &getpassword(1);
exit;
}
+ } else {
+ exit;
}
}
}