X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=dsa-nagios-checks%2Fchecks%2Fdsa-check-zone-rrsig-expiration;h=e6a7b7f6fbd07d6f0086348b5edffcda90374c08;hb=6061b9404bbd8bffc22206cb809c8bf8ed781fba;hp=e3652ac260a1799b27d5c968b86170f373630480;hpb=1c12591d0baaacd649e027435b9b07075f915d5f;p=mirror%2Fdsa-nagios.git

diff --git a/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration b/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration
index e3652ac..e6a7b7f 100755
--- a/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration
+++ b/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration
@@ -45,6 +45,8 @@
 #  - add -s option to configure udp packet size.  default changed from 4k to 1k
 # Copyright (c) 2013 Peter Palfrader <peter@palfrader.org>
 #  - add -r option to override initial refs.
+# Copyright (c) 2014 Peter Palfrader <peter@palfrader.org>
+#  - Do not ask for RRSIG directly, instead ask for SOA with dnssec data
 
 
 # usage
@@ -146,7 +148,7 @@ sub do_recursion {
 			$pkt = $res->send($zone, 'SOA');
 			last if $pkt;
 		}
-		print STDERR "No response to seed query for $zone SOA from $prettyrefs, retrying.\n" if $opts{d};
+		print STDERR "No response to seed query for $zone SOA from $prettyrefs.\n" if $opts{d};
 		critical("No response to seed query for $zone from $prettyrefs.") unless $pkt;
 		critical($pkt->header->rcode . " from " . $pkt->answerfrom)
 			unless ($pkt->header->rcode eq 'NOERROR');
@@ -288,7 +290,6 @@ sub send_query {
 	my $res = Net::DNS::Resolver->new;
 	$res->nameserver($server) if $server;
 	$res->udp_timeout($opts{t});
-	$res->udp_timeout($opts{t});
 	$res->dnssec(1);
 	$res->retry(2);
 	$res->udppacketsize($opts{s});