From: ianmdlvl <ianmdlvl>
Date: Mon, 31 Dec 2001 18:02:49 +0000 (+0000)
Subject: Check our names and addresses.
X-Git-Tag: debian_version_2_2_0~37
X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~ian/git?p=chiark-utils.git;a=commitdiff_plain;h=0bfd000b8b4666a2104db802a0b3e24927b3ca25

Check our names and addresses.
---

diff --git a/scripts/named-conf b/scripts/named-conf
index a222db0..3ea8d08 100755
--- a/scripts/named-conf
+++ b/scripts/named-conf
@@ -367,6 +367,16 @@ sub zone_server_addr ($$$$) {
     zone_warning("configured as stealth but we [$addr]".
 		 " are published ($name $ww)")
 	if $cfg->{'s'} =~ m/u/ && grep { $_ eq $addr } @self_addr;
+
+    $name_is_self= grep { $_ eq $name } ($is_soa ? @self_soa : @self_ns);
+    $addr_is_self= grep { $_ eq $addr } @self_addr;
+    if ($name_is_self && !$addr_is_self) {
+	zone_warning("our name $name has wrong address $addr ($ww)");
+    } elsif (!$name_is_self && $addr_is_self) {
+	zone_warning(($is_soa ? "SOA ORIGIN maps to" : "delegated to").
+		     " our address $addr but to wrong".
+		     " name $name ($ww)");
+    }
 }
 
 sub zone_check_soa ($$) {