Lisp: Change Lisp-to-JSON conventions.
[distorted-ansible] / hosts / hosts.lisp
CommitLineData
3f6c5992
MW
1;;; -*-lisp-*-
2
3;;;--------------------------------------------------------------------------
4;;; House network.
5
6;; ibanez and guests.
7
8(defhost ibanez
9 :hypervisor :kvm
10 :os :debian
11 :location house
aa2cd939 12 :server #(:multihome :ntp))
3f6c5992
MW
13
14(defhost radius
15 :vm-host ibanez
16 :os :debian
aa2cd939 17 :server #(:router :dns :syslog :vpn))
3f6c5992
MW
18
19(defhost roadstar
20 :vm-host ibanez
21 :os :debian
aa2cd939 22 :server #(:multihome :dns :ftp :http :nfs :www-cache :rsync :munin))
3f6c5992
MW
23
24(defhost jem
25 :vm-host ibanez
26 :os :debian
aa2cd939 27 :server #(:multihome :login :rsync :http :nfs :mail))
3f6c5992
MW
28
29(defhost artist
30 :vm-host ibanez
31 :os :debian
aa2cd939 32 :server #(:router :login :http :rsync :mail))
3f6c5992
MW
33
34;; Other servers.
35
36(defhost vampire
37 :os :debian
38 :location house
aa2cd939 39 :server #(:router :ntp :vpn :nfs))
3f6c5992
MW
40
41(defhost groove
42 :os :debian
43 :location house
aa2cd939 44 :server #(:http))
3f6c5992
MW
45
46;; Clients.
47
48(defhost gibson
49 :os :debian
50 :location house
51 :client t)
52
53(defhost crybaby
54 :os :debian
55 :location :mobile
56 :client t)
57
58;;;--------------------------------------------------------------------------
59;;; Colocated servers.
60
61;; fender and guests.
62
63(defhost fender
64 :hypervisor :kvm
65 :os :debian
66 :location jump
aa2cd939 67 :server #(:multihome :ntp))
3f6c5992
MW
68
69(defhost precision
70 :vm-host fender
71 :os :debian
aa2cd939 72 :server #(:router :dns :vpn))
3f6c5992
MW
73
74(defhost telecaster
75 :vm-host fender
76 :os :debian
aa2cd939 77 :server #(:multihome :dns :ftp :http :rsync :munin :nfs))
3f6c5992
MW
78
79(defhost stratocaster
80 :vm-host fender
81 :os :debian
aa2cd939 82 :server #(:multihome :login :rsync :http :nfs :mail-hub))
3f6c5992
MW
83
84(defhost jazz
85 :vm-host fender
86 :os :debian
aa2cd939 87 :server #(:multihome :login :http :mail :vpn))
3f6c5992
MW
88
89;;;----- That's all, folks --------------------------------------------------