123456789101112131415161718192021222324252627 |
- #! /usr/bin/perl
- use strict;
- use warnings;
- use OpenSSL::Test qw/:DEFAULT data_file/;
- use OpenSSL::Test::Utils;
- setup("test_includes");
- plan skip_all => "test_includes doesn't work without posix-io"
- if disabled("posix-io");
- plan tests => # The number of tests being performed
- 5
- + ($^O eq "VMS" ? 2 : 0);
- ok(run(test(["conf_include_test", data_file("includes.cnf")])), "test directory includes");
- ok(run(test(["conf_include_test", data_file("includes-file.cnf")])), "test file includes");
- ok(run(test(["conf_include_test", data_file("includes-eq.cnf")])), "test includes with equal character");
- ok(run(test(["conf_include_test", data_file("includes-eq-ws.cnf")])), "test includes with equal and whitespaces");
- if ($^O eq "VMS") {
- ok(run(test(["conf_include_test", data_file("vms-includes.cnf")])),
- "test directory includes, VMS syntax");
- ok(run(test(["conf_include_test", data_file("vms-includes-file.cnf")])),
- "test file includes, VMS syntax");
- }
- ok(run(test(["conf_include_test", data_file("includes-broken.cnf"), "f"])), "test broken includes");
|