summaryrefslogtreecommitdiffstats
path: root/plugins/t/check_load.t
diff options
context:
space:
mode:
Diffstat (limited to 'plugins/t/check_load.t')
-rw-r--r--plugins/t/check_load.t30
1 files changed, 14 insertions, 16 deletions
diff --git a/plugins/t/check_load.t b/plugins/t/check_load.t
index 414e09d..8f954dc 100644
--- a/plugins/t/check_load.t
+++ b/plugins/t/check_load.t
@@ -1,27 +1,25 @@
1#! /usr/bin/perl -w 1#! /usr/bin/perl -w -I ..
2#
3# Load Average Tests via check_load
4#
5# $Id$
6#
2 7
3use strict; 8use strict;
4use Test; 9use Test;
5use vars qw($tests); 10use NPTest;
6 11
12use vars qw($tests);
7BEGIN {$tests = 4; plan tests => $tests} 13BEGIN {$tests = 4; plan tests => $tests}
8 14
9my $null = ''; 15my $successOutput = '/^OK - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+/';
10my $cmd; 16my $failureOutput = '/^CRITICAL - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+/';
11my $str;
12my $t;
13 17
14$cmd = "./check_load -w 100,100,100 -c 100,100,100"; 18my $t;
15$str = `$cmd`;
16$t += ok $?>>8,0;
17print "Test was: $cmd\n" if ($?);
18$t += ok $str, '/^OK - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+/';
19 19
20$cmd = "./check_load -w 0,0,0 -c 0,0,0"; 20$t += checkCmd( "./check_load -w 100,100,100 -c 100,100,100", 0, $successOutput );
21$str = `$cmd`; 21$t += checkCmd( "./check_load -w 0,0,0 -c 0,0,0", 2, $failureOutput );
22$t += ok $?>>8,2;
23print "Test was: $cmd\n" unless ($?);
24$t += ok $str, '/^CRITICAL - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+/';
25 22
26exit(0) if defined($Test::Harness::VERSION); 23exit(0) if defined($Test::Harness::VERSION);
27exit($tests - $t); 24exit($tests - $t);
25