distorted.lisp: Remove the dynamic zones.

[zones] / distorted.lisp

diff --git a/distorted.lisp b/distorted.lisp
index 3ff1057543b4ad1dc146744c8d9d788a1ecc1494..2f88d8d81461b2052f07530b4a6d80e40322a61b 100644 (file)
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -103,27 +103,13 @@ (defrevzone trusted
   (@ :cidr-delegation
      (dhcp (dhcp 199.29.172.dhcp.199.29.172.in-addr.arpa))))
 
   (@ :cidr-delegation
      (dhcp (dhcp 199.29.172.dhcp.199.29.172.in-addr.arpa))))
 

-(defrevzone untrusted
-  :ns ((radius.ns :ip radius)
-       (vampire.ns :ip vampire))
-  :reverse untrusted)
-

 (defrevzone dmz
   :ns ((radius.ns :ip radius)
        (vampire.ns :ip vampire))
   :reverse dmz)
 
 (defrevzone dmz
   :ns ((radius.ns :ip radius)
        (vampire.ns :ip vampire))
   :reverse dmz)
 

-(defzone dhcp.distorted.org.uk
-  :ns ((radius.ns :ip radius)
-       (vampire.ns :ip vampire))
-  :net dhcp)
-

 (defzone io.distorted.org.uk
   :ns ((ns :ip vampire))
   (about :txt "Fake zone used for IP-over-DNS tunnelling."))
 
 (defzone io.distorted.org.uk
   :ns ((ns :ip vampire))
   (about :txt "Fake zone used for IP-over-DNS tunnelling."))
 

-(defzone dhcp.199.29.172.in-addr.arpa
-  :ns ((radius.ns :ip radius)
-       (vampire.ns :ip vampire)))
-

 ;;;----- That's all, folks --------------------------------------------------
 ;;;----- That's all, folks --------------------------------------------------