diff options
Diffstat (limited to 'libpamc/test')
| -rwxr-xr-x | libpamc/test/agents/secret@here | 9 | ||||
| -rw-r--r-- | libpamc/test/modules/pam_secret.c | 2 | ||||
| -rw-r--r-- | libpamc/test/regress/test.libpamc.c | 4 | ||||
| -rwxr-xr-x | libpamc/test/regress/test.secret@here | 3 |
4 files changed, 8 insertions, 10 deletions
diff --git a/libpamc/test/agents/secret@here b/libpamc/test/agents/secret@here index afdcbaa8..8d82c013 100755 --- a/libpamc/test/agents/secret@here +++ b/libpamc/test/agents/secret@here @@ -41,7 +41,7 @@ for (;;) { ($reply_control, $reply_data) = HandleContinuation($data); } else { if ($debug) { - print STDERR + print STDERR "agent: unrecognized packet $control {$data} to read\n"; } ($reply_control, $reply_data) = (0x04, ""); @@ -133,7 +133,7 @@ sub HandleContinuation ($) { } my $expected_digest = CreateDigest($state{$key}); - my ($local_cookie, $remote_cookie, $shared_secret) + my ($local_cookie, $remote_cookie, $shared_secret) = split '\|', $state{$key}; delete $state{$key}; @@ -154,7 +154,7 @@ sub HandleContinuation ($) { print STDERR "agent: server appears to know the secret\n"; } - my $session_authenticated_ticket = + my $session_authenticated_ticket = CreateDigest($remote_cookie."|".$shared_secret."|".$local_cookie); # FIXME: Agent should set a derived session key environment @@ -183,7 +183,7 @@ sub ReadBinaryPrompt { # broken packet header return (-1, ""); } - + my ($length, $control) = unpack("N C", $buffer); if ($length < 5) { # broken packet length @@ -305,4 +305,3 @@ sub GetRandom { } } - diff --git a/libpamc/test/modules/pam_secret.c b/libpamc/test/modules/pam_secret.c index 6316f7f5..f1c74c6f 100644 --- a/libpamc/test/modules/pam_secret.c +++ b/libpamc/test/modules/pam_secret.c @@ -664,6 +664,6 @@ int pam_sm_setcred(pam_handle_t *pamh, int flags, old_data = NULL; D(("done (%d)", retval)); - + return retval; } diff --git a/libpamc/test/regress/test.libpamc.c b/libpamc/test/regress/test.libpamc.c index 91f8d121..b0fff9c6 100644 --- a/libpamc/test/regress/test.libpamc.c +++ b/libpamc/test/regress/test.libpamc.c @@ -172,7 +172,7 @@ void prompt_to_packet(pamc_bp_t prompt, struct internal_packet *packet) data_length = PAM_BP_LENGTH(prompt); packet->at = 0; append_data(packet, data_length, NULL); - + PAM_BP_EXTRACT(prompt, 0, data_length, packet->buffer); fprintf(stderr, "server received[%d]: {%d|0x%.2x|%s}\n", @@ -332,7 +332,7 @@ int main(int argc, char **argv) digest); } - + retval = pamc_end(&pch); fprintf(stderr, "server: agent(s) were %shappy to terminate\n", diff --git a/libpamc/test/regress/test.secret@here b/libpamc/test/regress/test.secret@here index 2e0b9b94..67fe22ec 100755 --- a/libpamc/test/regress/test.secret@here +++ b/libpamc/test/regress/test.secret@here @@ -94,7 +94,7 @@ sub ReadBinaryPrompt ($) { # broken packet header return (-1, ""); } - + my ($length, $control) = unpack("N C", $buffer); if ($length < 5) { # broken packet length @@ -149,4 +149,3 @@ sub IdentifyLocalSecret ($) { return $secret; } - |