Imported Upstream version 1.1.6

[platform/upstream/pam.git] / libpamc / test / agents / secret@here

diff --git a/libpamc/test/agents/secret@here b/libpamc/test/agents/secret@here
index afdcbaa..8d82c01 100755 (executable)
--- 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 {
     }
 
 }
-