binswood.lisp: New master router; expunge dead devices.

diff --git a/binswood.lisp b/binswood.lisp
index 8cb184ffad0c51526d1444699aaf449672aea860..5356168dddba62886ba67219068420f7d10cb67d 100644 (file)
--- a/binswood.lisp
+++ b/binswood.lisp
@@ -7,12 +7,8 @@ (setf *default-zone-source* 'radius.distorted.org.uk.)
 ;; Binswood.  Address range retroactively claimed from Cambridge G-RIN.
 (defnet binswood.org.uk 10.165.27.0/24
   (binswood 256))
 ;; Binswood.  Address range retroactively claimed from Cambridge G-RIN.
 (defnet binswood.org.uk 10.165.27.0/24
   (binswood 256))

-(defhost netgear.binswood (binswood 1))
-(defhost linksys.binswood (binswood 2))
+(defhost binswrt.binswood (binswood 1))

 (defhost mango.binswood (binswood 3))
 (defhost mango.binswood (binswood 3))

-(defhost hplaser.binswood (binswood 4))
-(defhost wifi-client-1.binswood (binswood 5))
-(defhost hplaser2.binswood (binswood 6))

 
 (defzone binswood.org.uk
 
 
 (defzone binswood.org.uk
 


@@ -24,12 +20,8 @@ (defzone binswood.org.uk
        (mythic-beasts-2.ns :ip mythic-ns2))
 
   ;; Internal hosts.
        (mythic-beasts-2.ns :ip mythic-ns2))
 
   ;; Internal hosts.

-  (netgear :a netgear.binswood)
-  (linksys :a linksys.binswood)
+  (binswrt :a binswrt.binswood)

   (mango :a mango.binswood)
   (mango :a mango.binswood)

-  (hplaser :a hplaser.binswood)
-  (hplaser2 :a hplaser2.binswood)
-  (wifi-client-1 :a wifi-client-1.binswood)

 
   ;; External services.
   ((@ www) :svc stratocaster)
 
   ;; External services.
   ((@ www) :svc stratocaster)