X-Git-Url: https://git.adam-barratt.org.uk/?a=blobdiff_plain;f=dsa-nagios-checks%2Fchecks%2Fdsa-check-zone-rrsig-expiration-many;h=674dd1c2b000ead32e1f17a4effd2939b06f7182;hb=82ef7b493cfb8e47151e97d33ae08f397e2372b4;hp=cb8c41d9a663de94f16c142e53466b544056b278;hpb=eb17713861edd0686880b3912543027ffa0eae8d;p=mirror%2Fdsa-nagios.git

diff --git a/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration-many b/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration-many
index cb8c41d..674dd1c 100755
--- a/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration-many
+++ b/dsa-nagios-checks/checks/dsa-check-zone-rrsig-expiration-many
@@ -102,13 +102,9 @@ die ($USAGE) unless (scalar @ARGV == 1);
 my $INDIR = shift;
 
 
-my $count =
-	{ 'ok' => [],
-	  'warn' => [],
-	  'critical' => [],
-	  'unknown' => [],
-	  'unsigned' => [],
-	};
+my $states = [qw{critical warn unknown ok unsigned}];
+my $count =   { map { $_ => [] } @$states };
+my $details = { map { $_ => [] } @$states };
 
 
 my %dnsseczones;
@@ -135,7 +131,8 @@ for my $file (sort {$a cmp $b} (readdir INDIR)) {
 		$dnsseczones{$file} = {};
 		$dnsseczones{$file}->{'initial_refs'} = $initial_refs if defined $initial_refs;
 	} else {
-		push @{$count->{'unsigned'}}, $file;
+		push @{$count  ->{'unsigned'}}, $file;
+		push @{$details->{'unsigned'}}, "$file: marked unsigned or undelegated.\n";
 	};
 }
 closedir(INDIR);
@@ -154,8 +151,6 @@ if (defined $params->{'geozonedir'}) {
 	closedir(INDIR);
 }
 
-my @details;
-
 my %threads;
 for my $zone (sort {$a cmp $b} keys %dnsseczones) {
 	die "Duplicate zone $zone?\n"  if defined $threads{$zone};
@@ -171,12 +166,13 @@ while (time - $begin <= $params->{timeout}) {
 
 		my ($res, $det) = $threads{$zone}->join();
 
-		push @details, @$det;
+		my $type = ($res == 0) ? 'ok' :
+		           ($res == 1) ? 'warn' :
+		           ($res == 2) ? 'critical' :
+		                         'unknown';
 
-		if ($res == 0) { push @{$count->{'ok'}}, $zone; }
-		elsif ($res == 1) { push @{$count->{'warn'}}, $zone; }
-		elsif ($res == 2) { push @{$count->{'critical'}}, $zone; }
-		else { push @{$count->{'unknown'}}, $zone; };
+		push @{$details->{$type}}, @$det;
+		push @{$count  ->{$type}}, $zone;
 		delete $threads{$zone};
 	}
 	last if scalar keys %threads == 0;
@@ -184,33 +180,38 @@ while (time - $begin <= $params->{timeout}) {
 	sleep 1;
 }
 for my $zone (sort {$a cmp $b} keys %threads) {
-	push @{$count->{'warn'}}, $zone;
-	push @details, "$zone: timeout during check\n";
+	push @{$count  ->{'warn'}}, $zone;
+	push @{$details->{'warn'}}, "$zone: timeout during check\n";
 	$threads{$zone}->kill('KILL')->detach();
 }
 
-for my $k (keys %$count) {
-	@{$count->{$k}} = sort {$a cmp $b} @{$count->{$k}};
-}
-
-my $exit;
+my $exit = 0;
 my %state_mapping = (
 	'unknown' => 255,
 	'critical' => 2,
 	'warn' => 1,
+	'unsigned' => 0,
 	'ok' => 0 );
 
-for my $state (sort {$state_mapping{$b} <=> $state_mapping{$a}} keys %state_mapping) {
+for my $state (@$states) {
+	@{$count->{$state}}   = sort {$a cmp $b} @{$count->{$state}};
+	@{$details->{$state}} = sort {$a cmp $b} @{$details->{$state}};
+
 	if (scalar @{$count->{$state}}) {
 		printf "%s: %d", uc($state), scalar @{$count->{$state}};
 		if ($state_mapping{$state} > 0) {
 			print ": ", join(', ', @{$count->{$state}});
 		};
 		print "; ";
-		$exit = $state_mapping{$state} unless defined $exit;
+		$exit = $state_mapping{$state} if ($state_mapping{$state} > $exit);
 	};
 };
 printf "unsigned: %d", scalar @{$count->{'unsigned'}};
 print "\n";
-print $_ for (@details);
-exit ((defined $exit) ? $exit : 0);
+for my $state (@$states) {
+	for (@{$details->{$state}}) {
+		s/\|/;/g;
+		print $_;
+	}
+}
+exit $exit;