Blame test/recipes/90-test_includes.t

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