hosts.lisp, distorted.lisp: Allocate an IPv6 range for DHCP.

[zones] / binswood.lisp

diff --git a/binswood.lisp b/binswood.lisp
index 18943dcd36c2a48ef5e90776c8cc5f1c36a7feba..957273c4502522a03f8999a07e2d51c9fd130113 100644 (file)
--- a/binswood.lisp
+++ b/binswood.lisp
@@ -18,7 +18,8 @@ (defzone binswood.org.uk
        (telecaster.ns :ip telecaster)
        (national.ns :ip national)
        (mythic-beasts-1.ns :ip mythic-ns1)
-       (mythic-beasts-2.ns :ip mythic-ns2))
+       (mythic-beasts-2.ns :ip mythic-ns2)
+       (mythic-beasts-3.ns :ip mythic-ns3))
 
   ;; Internal hosts.
   (binswrt :a binswrt.binswood)
@@ -29,9 +30,19 @@ (defzone binswood.org.uk
 
   ;; Dynamic addresses.
   (dyn :ns ((radius.ns.dyn :ip radius)
-           (precision.ns.dyn :ip precision)))
+           (vampire.ns.dyn :ip vampire)
+           (precision.ns.dyn :ip precision)
+           (telecaster.ns.dyn :ip telecaster)
+           (national.ns.dyn :ip national)))
   (ext :cname ext.dyn))
 
+(defzone dyn.binswood.org.uk
+  :ns ((radius.ns :ip radius)
+       (vampire.ns :ip vampire)
+       (precision.ns :ip precision)
+       (telecaster.ns :ip telecaster)
+       (national.ns :ip national)))
+
 (defrevzone binswood
   :ns ((radius.ns :ip radius)
        (precision.ns :ip precision))