diff options
Diffstat (limited to 'plugins/t')
-rw-r--r-- | plugins/t/check_procs.t | 44 |
1 files changed, 32 insertions, 12 deletions
diff --git a/plugins/t/check_procs.t b/plugins/t/check_procs.t index b8c2e8a..2a41ac5 100644 --- a/plugins/t/check_procs.t +++ b/plugins/t/check_procs.t | |||
@@ -6,20 +6,40 @@ | |||
6 | # | 6 | # |
7 | 7 | ||
8 | use strict; | 8 | use strict; |
9 | use Test; | 9 | use Test::More; |
10 | use NPTest; | 10 | use NPTest; |
11 | 11 | ||
12 | use vars qw($tests); | ||
13 | BEGIN {$tests = 12; plan tests => $tests} | ||
14 | |||
15 | my $t; | 12 | my $t; |
16 | 13 | ||
17 | $t += checkCmd( "./check_procs -w 100000 -c 100000", 0, '/^PROCS OK: [0-9]+ process(es)?$/' ); | 14 | if (`uname -s` eq "SunOS\n") { |
18 | $t += checkCmd( "./check_procs -w 100000 -c 100000 -s Z", 0, '/^PROCS OK: [0-9]+ process(es)? with /' ); | 15 | plan skip_all => "Ignoring tests on solaris because of pst3"; |
19 | $t += checkCmd( "./check_procs -w 0 -c 10000000", 1, '/^PROCS WARNING: [0-9]+ process(es)?$/' ); | 16 | } else { |
20 | $t += checkCmd( "./check_procs -w 0 -c 0", 2, '/^PROCS CRITICAL: [0-9]+ process(es)?$/' ); | 17 | plan tests => 12; |
21 | $t += checkCmd( "./check_procs -w 0 -c 0 -s S", 2, '/^PROCS CRITICAL: [0-9]+ process(es)? with /' ); | 18 | } |
22 | $t += checkCmd( "./check_procs -w 0 -c 10000000 -p 1", 1, '/^PROCS WARNING: [0-9]+ process(es)? with PPID = 1/' ); | 19 | |
20 | my $result; | ||
21 | |||
22 | $result = NPTest->testCmd( "./check_procs -w 100000 -c 100000" ); | ||
23 | is( $result->return_code, 0, "Checking less than 10000 processes" ); | ||
24 | like( $result->output, '/^PROCS OK: [0-9]+ process(es)?$/', "Output correct" ); | ||
25 | |||
26 | $result = NPTest->testCmd( "./check_procs -w 100000 -c 100000 -s Z" ); | ||
27 | is( $result->return_code, 0, "Checking less than 100000 zombie processes" ); | ||
28 | like( $result->output, '/^PROCS OK: [0-9]+ process(es)? with /', "Output correct" ); | ||
29 | |||
30 | $result = NPTest->testCmd( "./check_procs -w 0 -c 100000" ); | ||
31 | is( $result->return_code, 1, "Checking warning if processes > 0" ); | ||
32 | like( $result->output, '/^PROCS WARNING: [0-9]+ process(es)?$/', "Output correct" ); | ||
33 | |||
34 | $result = NPTest->testCmd( "./check_procs -w 0 -c 0" ); | ||
35 | is( $result->return_code, 2, "Checking critical if processes > 0" ); | ||
36 | like( $result->output, '/^PROCS CRITICAL: [0-9]+ process(es)?$/', "Output correct" ); | ||
37 | |||
38 | $result = NPTest->testCmd( "./check_procs -w 0 -c 0 -s S" ); | ||
39 | is( $result->return_code, 2, "Checking critical if sleeping processes" ); | ||
40 | like( $result->output, '/^PROCS CRITICAL: [0-9]+ process(es)? with /', "Output correct" ); | ||
41 | |||
42 | $result = NPTest->testCmd( "./check_procs -w 0 -c 100000 -p 1" ); | ||
43 | is( $result->return_code, 1, "Checking warning for processes by parentid = 1" ); | ||
44 | like( $result->output, '/^PROCS WARNING: [0-9]+ process(es)? with PPID = 1/', "Output correct" ); | ||
23 | 45 | ||
24 | exit(0) if defined($Test::Harness::VERSION); | ||
25 | exit($tests - $t); | ||