• Home
  • Line#
  • Scopes#
  • Navigate#
  • Raw
  • Download
1#! /usr/bin/perl
2
3use strict;
4use warnings;
5use OpenSSL::Test qw/:DEFAULT data_file/;
6use OpenSSL::Test::Utils;
7
8setup("test_includes");
9
10plan skip_all => "test_includes doesn't work without posix-io"
11    if disabled("posix-io");
12
13plan tests =>                   # The number of tests being performed
14    5
15    + ($^O eq "VMS" ? 2 : 0);
16
17ok(run(test(["conf_include_test", data_file("includes.cnf")])), "test directory includes");
18ok(run(test(["conf_include_test", data_file("includes-file.cnf")])), "test file includes");
19ok(run(test(["conf_include_test", data_file("includes-eq.cnf")])), "test includes with equal character");
20ok(run(test(["conf_include_test", data_file("includes-eq-ws.cnf")])), "test includes with equal and whitespaces");
21if ($^O eq "VMS") {
22    ok(run(test(["conf_include_test", data_file("vms-includes.cnf")])),
23       "test directory includes, VMS syntax");
24    ok(run(test(["conf_include_test", data_file("vms-includes-file.cnf")])),
25       "test file includes, VMS syntax");
26}
27ok(run(test(["conf_include_test", data_file("includes-broken.cnf"), "f"])), "test broken includes");
28