chiark / gitweb /
binswood.lisp, hosts.lisp: Move network definition to specific file.
[zones] / binswood.lisp
1 ;;; Zone file for binswood.org.uk
2
3 (load "hosts.lisp" :verbose nil)
4 (setf *default-zone-admin* "hostmaster@distorted.org.uk")
5 (setf *default-zone-source* 'radius.distorted.org.uk.)
6
7 ;; Binswood.  Address range retroactively claimed from Cambridge G-RIN.
8 (defnet binswood.org.uk 10.165.27.0/24
9   (binswood 256))
10 (defhost netgear.binswood (binswood 1))
11 (defhost linksys.binswood (binswood 2))
12 (defhost mango.binswood (binswood 3))
13 (defhost hplaser.binswood (binswood 4))
14
15 (defzone binswood.org.uk
16
17   ;; Nameservers
18   :ns ((radius.ns :ip radius)
19        (precision.ns :ip precision)
20        (mythic-beasts-1.ns :ip mythic-ns1)
21        (mythic-beasts-2.ns :ip mythic-ns2))
22
23   ;; Internal hosts.
24   (netgear :a netgear.binswood)
25   (linksys :a linksys.binswood)
26   (mango :a mango.binswood)
27   (hplaser :a hplaser.binswood)
28
29   ;; Dynamic addresses.
30   (dyn :ns ((radius.ns.dyn :ip radius)
31             (precision.ns.dyn :ip precision)))
32   (ext :cname ext.dyn))
33
34 (defrevzone binswood
35   :ns ((radius.ns :ip radius)
36        (precision.ns :ip precision))
37   :reverse binswood)