2015-12-29 14:12:36 -05:00
|
|
|
#! /usr/bin/perl
|
|
|
|
|
|
|
|
use strict;
|
|
|
|
use warnings;
|
|
|
|
use OpenSSL::Test qw/:DEFAULT top_dir top_file/;
|
2016-01-11 17:20:39 +01:00
|
|
|
use OpenSSL::Test::Utils;
|
2015-12-29 14:12:36 -05:00
|
|
|
|
|
|
|
setup("test_dane");
|
|
|
|
|
2016-01-11 17:20:39 +01:00
|
|
|
plan skip_all => "test_dane uses ec which is not supported by this OpenSSL build"
|
|
|
|
if disabled("ec");
|
|
|
|
|
2015-12-29 14:12:36 -05:00
|
|
|
plan tests => 1; # The number of tests being performed
|
|
|
|
|
|
|
|
ok(run(test(["danetest", "example.com",
|
|
|
|
top_file("test", "danetest.pem"),
|
|
|
|
top_file("test", "danetest.in")])), "dane tests");
|