distorted, Makefile: Introduce the wireless reverse zone.

This is CIDR-delegated and set up for dynamic DNS population.

diff --git a/Makefile.m4 b/Makefile.m4
index 9d64f8ac8c4a47759d776799b7476cebe17e3645..3758d4a333bcf3ff1a4dd1cf9d36e84f364ad050 100644 (file)
--- a/Makefile.m4
+++ b/Makefile.m4
@@ -36,7 +36,7 @@ m4_divert(-1)
 
 DOMAIN([distorted], [inet, fretwank],
        [distorted.org.uk, dhcp.distorted.org.uk,
 
 DOMAIN([distorted], [inet, fretwank],
        [distorted.org.uk, dhcp.distorted.org.uk,

-        198.29.172.in-addr.arpa,
+        198.29.172.in-addr.arpa, wireless.198.29.172.in-addr.arpa,

         199.29.172.in-addr.arpa, dhcp.199.29.172.in-addr.arpa])
 DOMAIN([harlequin], [inet], [harlequin.org.uk])
 
         199.29.172.in-addr.arpa, dhcp.199.29.172.in-addr.arpa])
 DOMAIN([harlequin], [inet], [harlequin.org.uk])
 

diff --git a/distorted.lisp b/distorted.lisp
index 7cae689ba4ddb9b56c7de0e0b48aff3056dea2f3..c0cde05d6d5bbcd0f3cc7195ad59b2af2c4d7e40 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -100,7 +100,12 @@ (defrevzone trusted
 
 (defrevzone untrusted
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 
 (defrevzone untrusted
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))

-  :reverse untrusted)
+  :reverse untrusted
+  #+subnet/fretwank (wireless :ns (metalzone.ns vampire.ns))
+  #+subnet/fretwank (@ :cidr-delegation
+                      (wireless
+                       (wireless
+                        198.29.172.wireless.198.29.172.in-addr.arpa))))

 
 (defzone dhcp.distorted.org.uk
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
 
 (defzone dhcp.distorted.org.uk
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))


@@ -108,3 +113,7 @@ (defzone dhcp.distorted.org.uk
 
 (defzone dhcp.199.29.172.in-addr.arpa
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire)))
 
 (defzone dhcp.199.29.172.in-addr.arpa
   :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire)))

+
+(defzone wireless.198.29.172.in-addr.arpa
+  :ns ((metalzone.ns :ip metalzone) (vampire.ns :ip vampire))
+  :reverse ((wireless :bytes 4)))