summaryrefslogtreecommitdiffstats
path: root/plugins/t/check_procs.t
diff options
context:
space:
mode:
authorTon Voon <tonvoon@users.sourceforge.net>2008-02-28 16:21:59 (GMT)
committerTon Voon <tonvoon@users.sourceforge.net>2008-02-28 16:21:59 (GMT)
commit9f3d864fd3e47d4e728b196b1b6948a8a5e47e4e (patch)
treeffaf70a0a09e40cf706f1362a01450f76e845d18 /plugins/t/check_procs.t
parentf00e6a9676154eaac8aed140c49bde76e52d6cee (diff)
downloadmonitoring-plugins-9f3d864fd3e47d4e728b196b1b6948a8a5e47e4e.tar.gz
Reverted check_procs for solaris back to using pst3 due to truncation
for argument fields using other methods git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@1937 f882894a-f735-0410-b71e-b25c423dba1c
Diffstat (limited to 'plugins/t/check_procs.t')
-rw-r--r--plugins/t/check_procs.t44
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
8use strict; 8use strict;
9use Test; 9use Test::More;
10use NPTest; 10use NPTest;
11 11
12use vars qw($tests);
13BEGIN {$tests = 12; plan tests => $tests}
14
15my $t; 12my $t;
16 13
17$t += checkCmd( "./check_procs -w 100000 -c 100000", 0, '/^PROCS OK: [0-9]+ process(es)?$/' ); 14if (`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
20my $result;
21
22$result = NPTest->testCmd( "./check_procs -w 100000 -c 100000" );
23is( $result->return_code, 0, "Checking less than 10000 processes" );
24like( $result->output, '/^PROCS OK: [0-9]+ process(es)?$/', "Output correct" );
25
26$result = NPTest->testCmd( "./check_procs -w 100000 -c 100000 -s Z" );
27is( $result->return_code, 0, "Checking less than 100000 zombie processes" );
28like( $result->output, '/^PROCS OK: [0-9]+ process(es)? with /', "Output correct" );
29
30$result = NPTest->testCmd( "./check_procs -w 0 -c 100000" );
31is( $result->return_code, 1, "Checking warning if processes > 0" );
32like( $result->output, '/^PROCS WARNING: [0-9]+ process(es)?$/', "Output correct" );
33
34$result = NPTest->testCmd( "./check_procs -w 0 -c 0" );
35is( $result->return_code, 2, "Checking critical if processes > 0" );
36like( $result->output, '/^PROCS CRITICAL: [0-9]+ process(es)?$/', "Output correct" );
37
38$result = NPTest->testCmd( "./check_procs -w 0 -c 0 -s S" );
39is( $result->return_code, 2, "Checking critical if sleeping processes" );
40like( $result->output, '/^PROCS CRITICAL: [0-9]+ process(es)? with /', "Output correct" );
41
42$result = NPTest->testCmd( "./check_procs -w 0 -c 100000 -p 1" );
43is( $result->return_code, 1, "Checking warning for processes by parentid = 1" );
44like( $result->output, '/^PROCS WARNING: [0-9]+ process(es)? with PPID = 1/', "Output correct" );
23 45
24exit(0) if defined($Test::Harness::VERSION);
25exit($tests - $t);