Add SSL_new_session_ticket() API
[oweals/openssl.git] / test / recipes / 20-test_dgst.t
index 1080770f53a35a22de887930e8c1296ea483d6ca..c10da5a9f43cebba69e93607940fbe1825130fbc 100644 (file)
@@ -1,5 +1,5 @@
 #! /usr/bin/env perl
-# Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
+# Copyright 2017-2020 The OpenSSL Project Authors. All Rights Reserved.
 #
 # Licensed under the Apache License 2.0 (the "License").  You may not use
 # this file except in compliance with the License.  You can obtain a copy
@@ -11,6 +11,7 @@ use strict;
 use warnings;
 
 use File::Spec;
+use File::Basename;
 use OpenSSL::Test qw/:DEFAULT with srctop_file/;
 use OpenSSL::Test::Utils;
 
@@ -26,29 +27,28 @@ sub tsignverify {
     my $data_to_sign = srctop_file('test', 'README');
     my $other_data = srctop_file('test', 'README.external');
 
+    my $sigfile = basename($privkey, '.pem') . '.sig';
     plan tests => 4;
 
     ok(run(app(['openssl', 'dgst', '-sign', $privkey,
-                '-out', 'testdgst.sig',
+                '-out', $sigfile,
                 $data_to_sign])),
        $testtext.": Generating signature");
 
     ok(run(app(['openssl', 'dgst', '-prverify', $privkey,
-                '-signature', 'testdgst.sig',
+                '-signature', $sigfile,
                 $data_to_sign])),
        $testtext.": Verify signature with private key");
 
     ok(run(app(['openssl', 'dgst', '-verify', $pubkey,
-                '-signature', 'testdgst.sig',
+                '-signature', $sigfile,
                 $data_to_sign])),
        $testtext.": Verify signature with public key");
 
     ok(!run(app(['openssl', 'dgst', '-verify', $pubkey,
-                 '-signature', 'testdgst.sig',
+                 '-signature', $sigfile,
                  $other_data])),
        $testtext.": Expect failure verifying mismatching data");
-
-    unlink 'testdgst.sig';
 }
 
 SKIP: {