mirror of
https://github.com/openssl/openssl.git
synced 2024-12-15 06:01:37 +08:00
e25b4db754
The exception is the test recipe that tests 'openssl fipsinstall'. However, that one uses a different output file name, so it's safe. Reviewed-by: Tomas Mraz <tomas@openssl.org> (Merged from https://github.com/openssl/openssl/pull/14320)
83 lines
2.8 KiB
Perl
83 lines
2.8 KiB
Perl
#! /usr/bin/env perl
|
|
# Copyright 2007-2021 The OpenSSL Project Authors. All Rights Reserved.
|
|
# Copyright Nokia 2007-2019
|
|
# Copyright Siemens AG 2015-2019
|
|
#
|
|
# 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
|
|
# in the file LICENSE in the source distribution or at
|
|
# https://www.openssl.org/source/license.html
|
|
|
|
use strict;
|
|
use warnings;
|
|
|
|
use POSIX;
|
|
use File::Compare qw/compare_text/;
|
|
use OpenSSL::Test qw/:DEFAULT with srctop_file srctop_dir bldtop_dir result_file/;
|
|
use OpenSSL::Test::Utils;
|
|
|
|
BEGIN {
|
|
setup("test_cmp_cli");
|
|
}
|
|
use lib srctop_dir('Configurations');
|
|
use lib bldtop_dir('.');
|
|
|
|
plan skip_all => "These tests are not supported in a fuzz build"
|
|
if config('options') =~ /-DFUZZING_BUILD_MODE_UNSAFE_FOR_PRODUCTION/;
|
|
|
|
plan skip_all => "These tests are not supported in a no-cmp build"
|
|
if disabled("cmp");
|
|
|
|
my $app = bldtop_dir("apps/openssl cmp");
|
|
|
|
my @cmp_basic_tests = (
|
|
[ "show help", [ "-help" ], 1 ],
|
|
[ "CLI option not starting with '-'", [ "days", "1" ], 0 ],
|
|
[ "unknown CLI option", [ "-dayss" ], 0 ],
|
|
[ "bad int syntax: non-digit", [ "-days", "a/" ], 0 ],
|
|
[ "bad int syntax: float", [ "-days", "3.14" ], 0 ],
|
|
[ "bad int syntax: trailing garbage", [ "-days", "314_+" ], 0 ],
|
|
[ "bad int: out of range", [ "-days", "2147483648" ], 0 ],
|
|
);
|
|
|
|
my @cmp_server_tests = (
|
|
[ "with polling", [ "-poll_count", "1" ], 1 ],
|
|
[ "with loader_attic engine", [ "-engine", "loader_attic"],
|
|
!disabled('dynamic-engine') &&
|
|
!disabled("deprecated-3.0") ]
|
|
);
|
|
|
|
plan tests => @cmp_basic_tests + @cmp_server_tests;
|
|
|
|
foreach (@cmp_basic_tests) {
|
|
my $title = $$_[0];
|
|
my $params = $$_[1];
|
|
my $expected = $$_[2];
|
|
ok($expected == run(cmd([$app, "-config", '""', @$params])),
|
|
$title);
|
|
}
|
|
|
|
# these use the mock server directly in the cmp app, without TCP
|
|
foreach (@cmp_server_tests) {
|
|
my $title = $$_[0];
|
|
my $extra_args = $$_[1];
|
|
my $expected = $$_[2];
|
|
my $secret = "pass:test";
|
|
my $rsp_cert = srctop_file('test', 'certs', 'ee-cert-1024.pem');
|
|
my $outfile = result_file("test.certout.pem");
|
|
ok($expected ==
|
|
run(cmd([$app, "-config", '""', @$extra_args,
|
|
"-use_mock_srv", "-srv_ref", "mock server",
|
|
"-srv_secret", $secret,
|
|
"-rsp_cert", $rsp_cert,
|
|
"-cmd", "cr",
|
|
"-subject", "/CN=any",
|
|
"-newkey", srctop_file('test', 'certs', 'ee-key-1024.pem'),
|
|
"-secret", $secret,
|
|
"-ref", "client under test",
|
|
"-certout", $outfile]))
|
|
&& compare_text($outfile, $rsp_cert) == 0,
|
|
$title);
|
|
# not unlinking $outfile
|
|
}
|