distorted.lisp, odin.lisp: Reduce TTL for mail servers.
[zones] / binswood.lisp
CommitLineData
8dcb3700
MW
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
827f2f1e
MW
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))
625b0fd3 14(defhost wifi-client-1.binswood (binswood 5))
827f2f1e 15
8dcb3700
MW
16(defzone binswood.org.uk
17
18 ;; Nameservers
19 :ns ((radius.ns :ip radius)
20 (precision.ns :ip precision)
21 (mythic-beasts-1.ns :ip mythic-ns1)
22 (mythic-beasts-2.ns :ip mythic-ns2))
23
24 ;; Internal hosts.
25 (netgear :a netgear.binswood)
26 (linksys :a linksys.binswood)
27 (mango :a mango.binswood)
3981f7c3 28 (hplaser :a hplaser.binswood)
625b0fd3 29 (wifi-client-1 :a wifi-client-1.binswood)
8dcb3700 30
f11a3c23
MW
31 ;; External services.
32 ;;((@ www) :svc stratocaster)
33
8dcb3700
MW
34 ;; Dynamic addresses.
35 (dyn :ns ((radius.ns.dyn :ip radius)
36 (precision.ns.dyn :ip precision)))
37 (ext :cname ext.dyn))
38
39(defrevzone binswood
40 :ns ((radius.ns :ip radius)
41 (precision.ns :ip precision))
42 :reverse binswood)