VladPolskiy/webmin
1
0
Fork 0
mirror of https://github.com/webmin/webmin.git synced 2025-08-19 01:15:14 +00:00
Code Issues Packages Projects Releases Wiki Activity

Handle @include lines when looking for MD5 in PAM

Browse Source
This commit is contained in:
Jamie Cameron
2008-08-12 17:37:19 +00:00
parent 049059cf22
commit a01b2fa713
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
useradmin/linux-lib.pl
View File

@ -69,7 +69,8 @@ if (&foreign_check("pam")) {
&foreign_require("pam", "pam-lib.pl");
local @conf = &foreign_call("pam", "get_pam_config");
local ($svc) = grep { $_->{'name'} eq 'passwd' } @conf;
LOOP: foreach my $m (@{$svc->{'mods'}}) {
LOOP:
foreach my $m (@{$svc->{'mods'}}) {
if ($m->{'type'} eq 'password') {
if ($m->{'args'} =~ /md5/) { $md5++; }
elsif ($m->{'module'} =~ /pam_stack\.so/ &&
@ -87,6 +88,12 @@ if (&foreign_check("pam")) {
else { last; }
}
}
elsif ($m->{'include'}) {
# Include another section, with @ syntax
($svc) = grep { $_->{'name'} eq $m->{'include'} } @conf;
if ($svc) { goto LOOP }
else { last; }
}
}
}
elsif (&open_readfile(PAM, "/etc/pam.d/passwd")) {