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

[zones] / hosts.lisp

diff --git a/hosts.lisp b/hosts.lisp
index 845e969..78b3b3d 100644 (file)
--- 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))