From: Mark Wooding <mdw@distorted.org.uk>
Date: Thu, 1 Oct 2015 07:07:52 +0000 (+0100)
Subject: distorted.lisp, hosts.lisp: New virtual host `national'.
X-Git-Url: https://git.distorted.org.uk/~mdw/zones/commitdiff_plain/b577b999f3ba1da5a8a5151c2e1a2a20955936ad

distorted.lisp, hosts.lisp: New virtual host `national'.

Hosted by Linode in Dallas, TX.
---

diff --git a/distorted.lisp b/distorted.lisp
index 142b047..adc8f24 100644
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -210,6 +210,11 @@
 	(vpn :addr jazz.vpn :sshfp "jazz")
 	(iodine :addr jazz.iodine :sshfp "jazz"))
 
+  ;; Virtual hosts.
+  (national :abbrev n (linode :abbrev nl) (upn :abbrev ny))
+  (national (linode :addr national.linode)
+	    (upn :addr national.upn))
+
   ;; Media server (on loan to Good Technology HSTG).
   (jaguar :abbrev jag)
   (jaguar (jump :addr jaguar.jump :sshfp "jaguar"))
diff --git a/hosts.lisp b/hosts.lisp
index 845e969..78b3b3d 100644
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -80,6 +80,10 @@
 (defhost anon.jump (jump 13))
 (defhost blackhole.jump ((:ipv4 jump 14) (:ipv6 jump "::ffff")))
 
+;; Linode virtual hosts.
+(defhost national.linode ((:ipv4 "45.33.118.239")
+			  (:ipv6 "2600:3c00::f03c:91ff:fe3b:d7c1")))
+
 ;; Unsafe network.
 (defhost radius.unsafe (unsafe 1))
 (defhost roadstar.unsafe (unsafe 2))
@@ -121,6 +125,9 @@
 (defhost jazz.vpn ((:ipv4 vpn 7) (:ipv6 vpn "::7:1")))
 (defhost vampire.vpn ((:ipv4 vpn 8) (:ipv6 vpn "::8:1")))
 
+;; Untrusted private network.
+(defhost national.upn ((:ipv4 upn 1) (:ipv6 upn "::1:1")))
+
 ;; Iodine network.
 (defhost jazz.iodine (iodine 1))