25-test_x509.t revision 1.1.1.1
1#! /usr/bin/env perl 2# Copyright 2015-2016 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; 14use OpenSSL::Test qw/:DEFAULT srctop_file/; 15 16setup("test_x509"); 17 18plan tests => 5; 19 20require_ok(srctop_file('test','recipes','tconversion.pl')); 21 22subtest 'x509 -- x.509 v1 certificate' => sub { 23 tconversion("x509", srctop_file("test","testx509.pem")); 24}; 25subtest 'x509 -- first x.509 v3 certificate' => sub { 26 tconversion("x509", srctop_file("test","v3-cert1.pem")); 27}; 28subtest 'x509 -- second x.509 v3 certificate' => sub { 29 tconversion("x509", srctop_file("test","v3-cert2.pem")); 30}; 31 32subtest 'x509 -- pathlen' => sub { 33 ok(run(test(["v3ext", srctop_file("test/certs", "pathlen.pem")]))); 34} 35