]>
Commit | Line | Data |
---|---|---|
8f09ba47 | 1 | #! /usr/bin/env perl |
28428130 | 2 | # Copyright 2016-2018 The OpenSSL Project Authors. All Rights Reserved. |
8f09ba47 | 3 | # |
909f1a2e | 4 | # Licensed under the Apache License 2.0 (the "License"). You may not use |
8f09ba47 MC |
5 | # this file except in compliance with the License. You can obtain a copy |
6 | # in the file LICENSE in the source distribution or at | |
7 | # https://www.openssl.org/source/license.html | |
8 | ||
9 | ||
8f09ba47 | 10 | use OpenSSL::Test::Utils; |
5e30f2fd | 11 | use OpenSSL::Test qw/:DEFAULT srctop_file srctop_dir bldtop_dir bldtop_file/; |
76fd7a1d | 12 | use File::Temp qw(tempfile); |
8f09ba47 | 13 | |
5e30f2fd | 14 | BEGIN { |
2cb4b5f6 | 15 | setup("test_sslapi"); |
5e30f2fd MC |
16 | } |
17 | ||
18 | use lib srctop_dir('Configurations'); | |
19 | use lib bldtop_dir('.'); | |
20 | use platform; | |
21 | ||
8f09ba47 MC |
22 | |
23 | plan skip_all => "No TLS/SSL protocols are supported by this OpenSSL build" | |
24 | if alldisabled(grep { $_ ne "ssl3" } available_protocols("tls")); | |
25 | ||
5e30f2fd | 26 | plan tests => 2; |
8f09ba47 | 27 | |
76fd7a1d MC |
28 | (undef, my $tmpfilename) = tempfile(); |
29 | ||
5e30f2fd MC |
30 | |
31 | $ENV{OPENSSL_MODULES} = bldtop_dir("providers"); | |
32 | $ENV{OPENSSL_CONF_INCLUDE} = bldtop_dir("providers"); | |
33 | ||
34 | ok(run(app(['openssl', 'fipsinstall', | |
35 | '-out', bldtop_file('providers', 'fipsinstall.cnf'), | |
36 | '-module', bldtop_file('providers', platform->dso('fips')), | |
37 | '-provider_name', 'fips', '-mac_name', 'HMAC', | |
38 | '-macopt', 'digest:SHA256', '-macopt', 'hexkey:00', | |
39 | '-section_name', 'fips_sect'])), | |
40 | "fipsinstall"); | |
41 | ||
1a2a3a42 | 42 | ok(run(test(["sslapitest", srctop_dir("test", "certs"), |
76fd7a1d | 43 | srctop_file("test", "recipes", "90-test_sslapi_data", |
5e30f2fd MC |
44 | "passwd.txt"), $tmpfilename, "default", |
45 | srctop_file("test", "default.cnf")])), | |
76fd7a1d MC |
46 | "running sslapitest"); |
47 | ||
48 | unlink $tmpfilename; |