summaryrefslogtreecommitdiffstats
path: root/lib/tests/test_ini3.t
blob: 4b0be4c6d828b51b68480f658b1d624811f067d5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
#!/usr/bin/perl
use Test::More;
use strict;
use warnings;

if (! -e "./test_ini3") {
	plan skip_all => "./test_ini not compiled - please install tap library and/or enable parse-ini to test";
}

# array of argument arrays
#   - First value is the expected return code
#   - 2nd value is the NAGIOS_CONFIG_PATH
#     TODO: looks like we look in default path after looking trough this variable - shall we?
#   - 3rd value is the plugin name
#   - 4th is the ini locator
my @TESTS = (
	[3, undef, "section", "section_unknown@./config-tiny.ini"],
);

plan tests => scalar(@TESTS);

my $count=1;

foreach my $args (@TESTS) {
	my $rc = shift(@$args);
	if (my $env = shift(@$args)) {
		$ENV{"NAGIOS_CONFIG_PATH"} = $env;
	} else {
		delete($ENV{"NAGIOS_CONFIG_PATH"});
	}
	system {'./test_ini3'} @$args;
	cmp_ok($?>>8, '==', $rc, "Parse-ini die " . $count++);
}