plugins/check_dns-serial
changeset 0 676230d2d1ae
child 1 cff9b7e57f19
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/plugins/check_dns-serial	Sun Dec 28 16:44:41 2014 +0100
@@ -0,0 +1,20 @@
+#! /usr/bin/perl
+use 5.014;
+use strict;
+use warnings;
+use GetOpt:::Long;
+use Net::DNS;
+
+sub get_domains {
+    return qw(schlittermann.de);
+}
+
+# query the serial from
+# - the nameservers known from the ns records
+# - from the primary master if this is not one of the 
+#   NS for the zone
+# - from a list of additional (hidden) servers
+#
+# OK - if the serial numbers are in sync
+# WARNING - if there is some difference
+# CRITICAL - if the serial cannot be found at one of the sources