]> git.ipfire.org Git - thirdparty/openssl.git/blame - test/recipes/15-test_ecparam.t
Consolidate the locations where we have our internal perl modules
[thirdparty/openssl.git] / test / recipes / 15-test_ecparam.t
CommitLineData
691e302b
RL
1#! /usr/bin/env perl
2# Copyright 2017 The OpenSSL Project Authors. All Rights Reserved.
3#
4# Licensed under the OpenSSL license (the "License"). You may not use
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
10use strict;
11use warnings;
12
13use File::Spec;
102c9e12 14use if $^O ne "VMS", 'File::Glob' => qw/:bsd_glob/;
691e302b
RL
15use OpenSSL::Test qw/:DEFAULT data_file/;
16use OpenSSL::Test::Utils;
17
18setup("test_ecparam");
19
20plan skip_all => "EC isn't supported in this build"
a4750ce5 21 if disabled("ec") || disabled("ec2m");
691e302b
RL
22
23my @valid = glob(data_file("valid", "*.pem"));
24my @invalid = glob(data_file("invalid", "*.pem"));
25
26plan tests => scalar @valid + scalar @invalid;
27
28foreach (@valid) {
29 ok(run(app([qw{openssl ecparam -noout -check -in}, $_])));
30}
31
32foreach (@invalid) {
33 ok(!run(app([qw{openssl ecparam -noout -check -in}, $_])));
34}