chiark / gitweb /
hosts.lisp, distorted.lisp: Proper assignments for colocated servers.
[zones] / hosts.lisp
CommitLineData
ff6c53ad
MW
1;;; -*-lisp-*-
2;;;
3;;; distorted.org.uk hosts and networks, and other useful addresses.
4
5;;;--------------------------------------------------------------------------
6;;; External hosts.
e80b4c2d 7
e80b4c2d 8(defhost boyle.nsict.org 85.158.42.162)
7605ad5e 9(defhost chiark.greenend.org.uk 212.13.197.229)
e80b4c2d 10(defhost mccoy.flatline.org.uk 80.74.241.31)
3dfd711e
MW
11(defhost mythic-ns1 69.56.173.190)
12(defhost mythic-ns2 93.93.128.67)
ff6c53ad
MW
13
14;;;--------------------------------------------------------------------------
15;;; Internal addresses.
16
17;; Externally routable DMZ.
18(defnet dmz 62.49.204.144/28)
19
38c2de7c
MW
20;; Externally routed colo range.
21(defnet jump 212.13.198.66/28)
22
ff6c53ad
MW
23;; (RFC1918 addresses are allocated from Cambridge G-RIN.)
24(defnet distorted.org.uk 172.29.198.0/23
25 (untrusted 256
26 (wireless 128)
27 (iodine 16))
28 (trusted 256
29 (wired 128
30 (unsafe 32)
31 (dhcp 32)
32 (safe 32))
33 (virtual 32)
38c2de7c
MW
34 (play 32
35 (its 4))
36 (colo 32)))
ff6c53ad
MW
37
38;;;--------------------------------------------------------------------------
39;;; Host allocations
40
41;; External addresses.
42(defhost guvnor.dmz (dmz 1))
43(defhost radius.dmz (dmz 2))
44(defhost roadstar.dmz (dmz 3))
45(defhost jem.dmz (dmz 4))
46(defhost artist.dmz (dmz 5))
47(defhost vampire.dmz (dmz 6))
48(defhost ibanez.dmz (dmz 9))
04db9729 49(defhost anon.dmz (dmz 12))
ff6c53ad
MW
50(defhost gate.dmz (dmz 13))
51(defhost nat.dmz (dmz 14))
52
38c2de7c
MW
53;; Colocated addresses.
54(defhost fender.jump (jump 5))
55(defhost precision.jump (jump 6))
56(defhost telecaster.jump (jump 7))
57(defhost stratocaster.jump (jump 8))
58(defhost jazz.jump (jump 9))
59
ff6c53ad
MW
60;; Unsafe network.
61(defhost radius.unsafe (unsafe 1))
62(defhost roadstar.unsafe (unsafe 2))
63(defhost jem.unsafe (unsafe 3))
64(defhost artist.unsafe (unsafe 4))
65(defhost vampire.unsafe (unsafe 5))
66(defhost ibanez.unsafe (unsafe 14))
67
68;; Safe network.
69(defhost tubescreamer.safe (safe 1))
70(defhost obsidian.safe (safe 2))
71
72;; Wireless network.
73(defhost radius.untrusted (untrusted 1))
74(defhost evolution.untrusted (untrusted 2))
75(defhost vampire.untrusted (untrusted 3))
76
77;; Virtual private network.
78(defhost crybaby.virtual (virtual 1))
79(defhost terror.virtual (virtual 2))
80
81;; Iodine network.
82(defhost vampire.iodine (iodine 1))
83
84;; Special network for ITS.
85;; It doesn't understand point-to-point links, so we need a little net.
86(defhost gw.its (its 1))
87(defhost mz.its (its 2))
88
38c2de7c
MW
89;; Internal (VPN) addresses for colocated services.
90(defhost fender.colo (colo 1))
91(defhost precision.colo (colo 2))
92(defhost telecaster.colo (colo 3))
93(defhost stratocaster.colo (colo 4))
94(defhost jazz.colo (colo 5))
95
ff6c53ad
MW
96;;;--------------------------------------------------------------------------
97;;; Host switch.
98
99(preferred-subnet-case
100 (dmz
101 (defhost radius radius.dmz)
102 (defhost vampire vampire.dmz))
103 (t
104 (defhost radius radius.unsafe)
105 (defhost vampire vampire.unsafe)))
106
107;;;----- That's all, folks --------------------------------------------------