chiark / gitweb /
felixpearce.lisp: A records for web service.
[zones] / distorted.lisp
... / ...
CommitLineData
1;;; Zone file for distorted.org.uk
2
3(load "hosts.lisp" :verbose nil)
4
5;;;--------------------------------------------------------------------------
6;;; Other definitions.
7
8(setf *default-zone-admin* "hostmaster@distorted.org.uk")
9
10(setf *default-zone-source* 'radius.distorted.org.uk.)
11
12;;;--------------------------------------------------------------------------
13;;; Main zone definition.
14
15(defzone distorted.org.uk
16
17 ;; Nameservers.
18 :ns #+view/inside ((radius.ns :ip radius)
19 (vampire.ns :ip vampire))
20 #-view/inside ((radius.ns :ip radius)
21 (vampire.ns :ip vampire)
22 (mythic-beasts-1.ns :ip mythic-ns1)
23 (mythic-beasts-2.ns :ip mythic-ns2)
24 (chiark.ns :ip chiark.greenend.org.uk))
25
26 ;; Mail servers.
27 ((@ mail lists bugs cryptomail)
28 :mx mail
29 :srv ((:smtp mail)))
30
31 ;; Kerberos.
32 (_kerberos :txt "DISTORTED.ORG.UK")
33 :srv (((:kerberos :protocol :udp) krb)
34 ((:kerberos-master :protocol :udp :port 88) krb)
35 (:kerberos-adm krb)
36 ((:kpasswd :protocol :udp) krb))
37
38 ;; Other services.
39 :srv ((:http www)
40 (:ftp ftp))
41
42 ;; Entry is via little router box.
43 (dmz :net dmz)
44 (guvnor (inside :svc gate.dmz) (dmz :a guvnor.dmz))
45 (anon (dmz :a anon.dmz))
46 (gate (dmz :a gate.dmz))
47 (nat (dmz :a nat.dmz))
48
49 ;; Wireless gateway.
50 (wireless :net wireless)
51 (evolution (untrusted :a evolution.untrusted))
52
53 ;; Local services.
54 :svc vampire
55 ((www krb ftp rsync wiki git bugs mail db i2p rawk vox www-cache)
56 :svc vampire)
57
58 ;; Internal services.
59 #+view/inside ((ntp) :svc ibanez.unsafe)
60 #+view/inside ((wpad ntp1 news) :svc vampire.unsafe)
61
62 ;; Anonymity services.
63 (tor :svc #+view/inside vampire.unsafe
64 #-view/inside anon.dmz)
65
66 ;; Wired ethernet.
67 (wired :net wired)
68 (vampire (unsafe :a vampire.unsafe)
69 (dmz :a vampire.dmz)
70 (untrusted :a vampire.untrusted)
71 (iodine :a vampire.iodine))
72 (obsidian (safe :a obsidian.safe))
73 (ibanez (unsafe :a ibanez.unsafe)
74 (dmz :a ibanez.dmz))
75 (radius (unsafe :a radius.unsafe)
76 (dmz :a radius.dmz)
77 (untrusted :a radius.untrusted))
78 (roadstar (unsafe :a roadstar.unsafe)
79 (dmz :a roadstar.dmz))
80 (jem (unsafe :a jem.unsafe)
81 (dmz :a jem.dmz))
82 (artist (unsafe :a artist.unsafe)
83 (dmz :a artist.dmz))
84
85 ;; DHCP hosts.
86 (gibson :cname gibson.dhcp)
87 (lespaul :cname lespaul.dhcp)
88 (firebird :cname firebird.dhcp)
89 (marauder :cname marauder.dhcp)
90 (invader :cname invader.dhcp)
91
92 ;; Virtual network.
93 (virtual :net virtual)
94 (crybaby (virtual :a crybaby.virtual))
95 (terror (virtual :a terror.virtual))
96 (iodine :net iodine)
97
98 ;; ITS.
99 (its :net its)
100 (gw (its :a gw.its))
101 (mz (its :a mz.its))
102
103 ;; Delegations.
104 #+view/inside (dhcp :ns (radius.ns vampire.ns))
105 (io :ns ((ns.io :ip vampire))))
106
107;;;--------------------------------------------------------------------------
108;;; Other subsidiary zones.
109
110(defrevzone trusted
111 :ns ((radius.ns :ip radius)
112 (vampire.ns :ip vampire))
113 :reverse trusted
114 (dhcp :ns (radius.ns vampire.ns))
115 (@ :cidr-delegation
116 (dhcp (dhcp 199.29.172.dhcp.199.29.172.in-addr.arpa))))
117
118(defrevzone dmz
119 :ns ((radius.ns :ip radius)
120 (vampire.ns :ip vampire))
121 :reverse dmz)
122
123(defzone io.distorted.org.uk
124 :ns ((ns :ip vampire))
125 (about :txt "Fake zone used for IP-over-DNS tunnelling."))
126
127;;;----- That's all, folks --------------------------------------------------