diff options
Diffstat (limited to 'plugins/t/negate.t')
-rw-r--r-- | plugins/t/negate.t | 31 |
1 files changed, 25 insertions, 6 deletions
diff --git a/plugins/t/negate.t b/plugins/t/negate.t index 989bf01f..0afe3ae6 100644 --- a/plugins/t/negate.t +++ b/plugins/t/negate.t | |||
@@ -8,8 +8,8 @@ use strict; | |||
8 | use Test::More; | 8 | use Test::More; |
9 | use NPTest; | 9 | use NPTest; |
10 | 10 | ||
11 | # 15 tests in the first part and 32 in the last loop | 11 | # 15 tests in the first part, 9 in timeout tests and 2 * 32 in the last loops |
12 | plan tests => 47; | 12 | plan tests => 88; |
13 | 13 | ||
14 | my $res; | 14 | my $res; |
15 | 15 | ||
@@ -53,18 +53,37 @@ is( $res->output, "No data returned from command", "Bad command, as expected (tr | |||
53 | $res = NPTest->testCmd( './negate $PWD/check_dummy 0 \'$$ a dummy okay\'' ); | 53 | $res = NPTest->testCmd( './negate $PWD/check_dummy 0 \'$$ a dummy okay\'' ); |
54 | is( $res->output, 'OK: $$ a dummy okay', 'Proves that $$ is not being expanded again' ); | 54 | is( $res->output, 'OK: $$ a dummy okay', 'Proves that $$ is not being expanded again' ); |
55 | 55 | ||
56 | |||
57 | my %state = ( | 56 | my %state = ( |
58 | ok => 0, | 57 | ok => 0, |
59 | warning => 1, | 58 | warning => 1, |
60 | critical => 2, | 59 | critical => 2, |
61 | unknown => 3, | 60 | unknown => 3, |
62 | ); | 61 | ); |
63 | foreach my $current_state (qw(ok warning critical unknown)) { | 62 | |
64 | foreach my $new_state (qw(ok warning critical unknown)) { | 63 | # Timeout tests |
64 | $res = NPTest->testCmd( "./negate -t 2 /bin/sh -c 'sleep 5'" ); | ||
65 | is( $res->output, 'CRITICAL - Plugin timed out after 2 seconds' ); | ||
66 | |||
67 | foreach my $state (keys(%state)) { | ||
68 | $res = NPTest->testCmd( "./negate -t 2 -T $state /bin/sh -c 'sleep 5'" ); | ||
69 | is( $res->return_code, $state{$state}, "Got timeout state $state" ); | ||
70 | is( $res->output, uc($state)." - Plugin timed out after 2 seconds", "Timeout state $state output"); | ||
71 | } | ||
72 | |||
73 | foreach my $current_state (keys(%state)) { | ||
74 | foreach my $new_state (keys(%state)) { | ||
65 | $res = NPTest->testCmd( "./negate --$current_state=$new_state ./check_dummy ".$state{$current_state}." 'Fake $new_state'" ); | 75 | $res = NPTest->testCmd( "./negate --$current_state=$new_state ./check_dummy ".$state{$current_state}." 'Fake $new_state'" ); |
66 | is( $res->return_code, $state{$new_state}, "Got fake $new_state" ); | 76 | is( $res->return_code, $state{$new_state}, "Got fake $new_state" ); |
67 | is( $res->output, uc($current_state).": Fake $new_state" ); | 77 | is( $res->output, uc($current_state).": Fake $new_state", "Fake $new_state output"); |
78 | } | ||
79 | } | ||
80 | |||
81 | # Same as aboce with substitute | ||
82 | foreach my $current_state (keys(%state)) { | ||
83 | foreach my $new_state (keys(%state)) { | ||
84 | $res = NPTest->testCmd( "./negate -s --$current_state=$new_state ./check_dummy ".$state{$current_state}." 'Fake $new_state'" ); | ||
85 | is( $res->return_code, $state{$new_state}, "Got fake $new_state (with substitute)" ); | ||
86 | is( $res->output, uc($new_state).": Fake $new_state", "Substitued fake $new_state output"); | ||
68 | } | 87 | } |
69 | } | 88 | } |
70 | 89 | ||