mirror of
https://github.com/Yubico/yubico-pam.git
synced 2025-02-20 21:54:16 +01:00
add some debug logging to ldap and ykval mocks
This commit is contained in:
parent
fe8eb203d9
commit
0e77cffb67
@ -67,6 +67,7 @@ sub search {
|
||||
$id = $objects{'sub:base=' . $reqData->{'baseObject'} . ':(' . $match->{'attributeDesc'} . '=' . $match->{'assertionValue'} . ')'};
|
||||
$base = $id->{'dn'};
|
||||
}
|
||||
warn "ldap search with " . $reqData->{'scope'};
|
||||
my @entries;
|
||||
if($id) {
|
||||
my $entry = Net::LDAP::Entry->new;
|
||||
|
@ -57,6 +57,7 @@ while(1) {
|
||||
if($clientdata =~ m/nonce=([a-zA-Z0-9]+).*otp=([cbdefghijklnrtuv]+)/) {
|
||||
my $nonce = $1;
|
||||
my $otp = $2;
|
||||
warn "validation for $otp (on port $port)";
|
||||
if($otps{$otp}) {
|
||||
my $status = $otps{$otp};
|
||||
$ret .= "nonce=$nonce\n";
|
||||
|
Loading…
x
Reference in New Issue
Block a user