diff options
| author | Matthias Eble <psychotrahe@users.sourceforge.net> | 2008-06-09 19:47:36 +0000 |
|---|---|---|
| committer | Matthias Eble <psychotrahe@users.sourceforge.net> | 2008-06-09 19:47:36 +0000 |
| commit | d8577e19942b4885ac642513540fc1791a0fa38b (patch) | |
| tree | e31b28007cee8baf4c76ed5a3eb2312d0a6fdac8 /plugins/t | |
| parent | 5c3d4aea27de408cb7b04f5aab83558efbf841f4 (diff) | |
| download | monitoring-plugins-d8577e19942b4885ac642513540fc1791a0fa38b.tar.gz | |
Added testcases for check_dig
check_dig's -l option is mandatory now (#1986306)
git-svn-id: https://nagiosplug.svn.sourceforge.net/svnroot/nagiosplug/nagiosplug/trunk@2011 f882894a-f735-0410-b71e-b25c423dba1c
Diffstat (limited to 'plugins/t')
| -rw-r--r-- | plugins/t/check_dig.t | 85 |
1 files changed, 85 insertions, 0 deletions
diff --git a/plugins/t/check_dig.t b/plugins/t/check_dig.t new file mode 100644 index 00000000..937eec33 --- /dev/null +++ b/plugins/t/check_dig.t | |||
| @@ -0,0 +1,85 @@ | |||
| 1 | #! /usr/bin/perl -w -I .. | ||
| 2 | # | ||
| 3 | # Domain Name Server (DNS) Tests via check_dig | ||
| 4 | # | ||
| 5 | # $Id$ | ||
| 6 | # | ||
| 7 | |||
| 8 | use strict; | ||
| 9 | use Test::More; | ||
| 10 | use NPTest; | ||
| 11 | |||
| 12 | plan skip_all => "check_dig not compiled" unless (-x "check_dig"); | ||
| 13 | |||
| 14 | plan tests => 12; | ||
| 15 | |||
| 16 | my $successOutput = '/DNS OK - [\.0-9]+ seconds? response time/'; | ||
| 17 | |||
| 18 | my $hostname_valid = getTestParameter( | ||
| 19 | "NP_HOSTNAME_VALID", | ||
| 20 | "A valid (known to DNS) hostname", | ||
| 21 | "nagios.com" | ||
| 22 | ); | ||
| 23 | |||
| 24 | my $hostname_valid_ip = getTestParameter( | ||
| 25 | "NP_HOSTNAME_VALID_IP", | ||
| 26 | "The IP address of the valid hostname $hostname_valid", | ||
| 27 | "66.118.156.50", | ||
| 28 | ); | ||
| 29 | |||
| 30 | my $hostname_valid_reverse = getTestParameter( | ||
| 31 | "NP_HOSTNAME_VALID_REVERSE", | ||
| 32 | "The hostname of $hostname_valid_ip", | ||
| 33 | "66-118-156-50.static.sagonet.net.", | ||
| 34 | ); | ||
| 35 | |||
| 36 | my $hostname_invalid = getTestParameter( | ||
| 37 | "NP_HOSTNAME_INVALID", | ||
| 38 | "An invalid (not known to DNS) hostname", | ||
| 39 | "nosuchhost.altinity.com", | ||
| 40 | ); | ||
| 41 | |||
| 42 | my $dns_server = getTestParameter( | ||
| 43 | "NP_DNS_SERVER", | ||
| 44 | "A non default (remote) DNS server", | ||
| 45 | ); | ||
| 46 | |||
| 47 | my $res; | ||
| 48 | |||
| 49 | SKIP: { | ||
| 50 | skip "check_dig.t: not enough parameters given", | ||
| 51 | 12 unless ($hostname_valid && $hostname_valid_ip && $hostname_valid_reverse && $hostname_invalid && $dns_server); | ||
| 52 | |||
| 53 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -t 5"); | ||
| 54 | cmp_ok( $res->return_code, '==', 0, "Found $hostname_valid"); | ||
| 55 | like ( $res->output, $successOutput, "Output OK" ); | ||
| 56 | |||
| 57 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -t 5 -w 0.000001 -c 0.00001"); | ||
| 58 | cmp_ok( $res->return_code, '==', 2, "Critical threshold passed"); | ||
| 59 | |||
| 60 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -t 5 -w 0.000001 -c 5"); | ||
| 61 | cmp_ok( $res->return_code, '==', 1, "Warning threshold passed"); | ||
| 62 | |||
| 63 | $res = NPTest->testCmd("./check_dig -H $dns_server -t 1"); | ||
| 64 | cmp_ok( $res->return_code, '==', 3, "Invalid command line -l missing"); | ||
| 65 | |||
| 66 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_invalid -t 1"); | ||
| 67 | cmp_ok( $res->return_code, '==', 2, "Invalid $hostname_invalid"); | ||
| 68 | |||
| 69 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -t 5"); | ||
| 70 | cmp_ok( $res->return_code, '==', 0, "Found $hostname_valid on $dns_server"); | ||
| 71 | like ( $res->output, $successOutput, "Output OK" ); | ||
| 72 | |||
| 73 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -a $hostname_valid_ip -t 5"); | ||
| 74 | cmp_ok( $res->return_code, '==', 0, "Got expected address"); | ||
| 75 | |||
| 76 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $hostname_valid -a 10.10.10.10 -t 5"); | ||
| 77 | cmp_ok( $res->return_code, '==', 1, "Got wrong address"); | ||
| 78 | |||
| 79 | my $ip_reverse = $hostname_valid_ip; | ||
| 80 | $ip_reverse =~ s/(\d+)\.(\d+)\.(\d+)\.(\d+)/$4.$3.$2.$1.in-addr.arpa/; | ||
| 81 | $res = NPTest->testCmd("./check_dig -H $dns_server -l $ip_reverse -a $hostname_valid_reverse -T PTR -t 5"); | ||
| 82 | cmp_ok( $res->return_code, '==', 0, "Got expected fqdn"); | ||
| 83 | like ( $res->output, $successOutput, "Output OK"); | ||
| 84 | |||
| 85 | } | ||
