diff options
Diffstat (limited to 'plugins/t')
-rw-r--r-- | plugins/t/check_dns.t | 5 | ||||
-rw-r--r-- | plugins/t/check_http.t | 4 | ||||
-rw-r--r-- | plugins/t/check_load.t | 4 | ||||
-rw-r--r-- | plugins/t/check_mysql.t | 11 |
4 files changed, 13 insertions, 11 deletions
diff --git a/plugins/t/check_dns.t b/plugins/t/check_dns.t index a85e2e76..bee1d34b 100644 --- a/plugins/t/check_dns.t +++ b/plugins/t/check_dns.t | |||
@@ -14,11 +14,10 @@ my $cmd; | |||
14 | my $str; | 14 | my $str; |
15 | my $t; | 15 | my $t; |
16 | 16 | ||
17 | $cmd = "./check_dns 127.0.0.1 -to 5"; | 17 | $str = `./check_dns $Cache::dnshost -to 5`; |
18 | $str = `$cmd`; | ||
19 | $t += ok $?>>8,0; | 18 | $t += ok $?>>8,0; |
20 | print "Test was: $cmd\n" if ($?); | 19 | print "Test was: $cmd\n" if ($?); |
21 | $t += ok $str, '/DNS ok - +[\.0-9]+ seconds response time, Address\(es\) is\/are /'; | 20 | $t += ok $str, '/DNS OK: +[\.0-9]+ seconds response time, /'; |
22 | 21 | ||
23 | $cmd = "./check_dns $Cache::nullhost -to 1"; | 22 | $cmd = "./check_dns $Cache::nullhost -to 1"; |
24 | $str = `$cmd`; | 23 | $str = `$cmd`; |
diff --git a/plugins/t/check_http.t b/plugins/t/check_http.t index 0c71794f..5be549ad 100644 --- a/plugins/t/check_http.t +++ b/plugins/t/check_http.t | |||
@@ -11,9 +11,9 @@ my $null = ''; | |||
11 | my $str; | 11 | my $str; |
12 | my $t; | 12 | my $t; |
13 | 13 | ||
14 | $str = `./check_http $Cache::hostname -wt 300 -ct 600`; | 14 | $str = `./check_http $Cache::httphost -wt 300 -ct 600`; |
15 | $t += ok $?>>8,0; | 15 | $t += ok $?>>8,0; |
16 | $t += ok $str, '/(HTTP\s[o|O][k|K]\s)?\s?HTTP\/1.[01]\s[0-9]{3}\s(OK|Found)\s-\s+([0-9]+|[0-9]+\.[0-9]+)\ssecond response time/'; | 16 | $t += ok $str, '/(HTTP\s[o|O][k|K]\s)?\s?HTTP\/1.[01]\s[0-9]{3}\s(OK|Found)\s-\s+[0-9]+\sbytes\sin\s+([0-9]+|[0-9]+\.[0-9]+)\sseconds/'; |
17 | 17 | ||
18 | $str = `./check_http $Cache::nullhost -wt 1 -ct 2`; | 18 | $str = `./check_http $Cache::nullhost -wt 1 -ct 2`; |
19 | $t += ok $?>>8,2; | 19 | $t += ok $?>>8,2; |
diff --git a/plugins/t/check_load.t b/plugins/t/check_load.t index fce168fc..414e09d6 100644 --- a/plugins/t/check_load.t +++ b/plugins/t/check_load.t | |||
@@ -15,13 +15,13 @@ $cmd = "./check_load -w 100,100,100 -c 100,100,100"; | |||
15 | $str = `$cmd`; | 15 | $str = `$cmd`; |
16 | $t += ok $?>>8,0; | 16 | $t += ok $?>>8,0; |
17 | print "Test was: $cmd\n" if ($?); | 17 | print "Test was: $cmd\n" if ($?); |
18 | $t += ok $str, '/^OK - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+$/'; | 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 | $cmd = "./check_load -w 0,0,0 -c 0,0,0"; |
21 | $str = `$cmd`; | 21 | $str = `$cmd`; |
22 | $t += ok $?>>8,2; | 22 | $t += ok $?>>8,2; |
23 | print "Test was: $cmd\n" unless ($?); | 23 | print "Test was: $cmd\n" unless ($?); |
24 | $t += ok $str, '/^CRITICAL - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+$/'; | 24 | $t += ok $str, '/^CRITICAL - load average: [0-9]\.?[0-9]+, [0-9]\.?[0-9]+, [0-9]\.?[0-9]+/'; |
25 | 25 | ||
26 | exit(0) if defined($Test::Harness::VERSION); | 26 | exit(0) if defined($Test::Harness::VERSION); |
27 | exit($tests - $t); | 27 | exit($tests - $t); |
diff --git a/plugins/t/check_mysql.t b/plugins/t/check_mysql.t index ae2a0087..0fae65fe 100644 --- a/plugins/t/check_mysql.t +++ b/plugins/t/check_mysql.t | |||
@@ -1,11 +1,12 @@ | |||
1 | #! /usr/bin/perl -w | 1 | #! /usr/bin/perl -w |
2 | 2 | ||
3 | use strict; | 3 | use strict; |
4 | use Helper; | ||
4 | use Cache; | 5 | use Cache; |
5 | use Test; | 6 | use Test; |
6 | use vars qw($tests); | 7 | use vars qw($tests); |
7 | 8 | ||
8 | BEGIN {$tests = 1; plan tests => $tests} | 9 | BEGIN {$tests = 2; plan tests => $tests} |
9 | 10 | ||
10 | exit(0) unless (-x "./check_mysql"); | 11 | exit(0) unless (-x "./check_mysql"); |
11 | 12 | ||
@@ -14,10 +15,12 @@ my $cmd; | |||
14 | my $str; | 15 | my $str; |
15 | my $t; | 16 | my $t; |
16 | 17 | ||
17 | $cmd = "./check_mysql -H 127.0.0.1 -P 3306"; | 18 | my $mysqlserver = get_option("mysqlserver","host for MYSQL tests"); |
19 | |||
20 | $cmd = "./check_mysql -H $mysqlserver -P 3306"; | ||
18 | $str = `$cmd`; | 21 | $str = `$cmd`; |
19 | $t += ok $?>>8,0; | 22 | $t += ok $?>>8,2; |
20 | print "Test was: $cmd\n" if ($?); | 23 | $t += ok $str, '/Access denied for user: /'; |
21 | 24 | ||
22 | exit(0) if defined($Test::Harness::VERSION); | 25 | exit(0) if defined($Test::Harness::VERSION); |
23 | exit($tests - $t); | 26 | exit($tests - $t); |