From: Mark Wooding <mdw@distorted.org.uk>
Date: Fri, 31 May 2024 17:41:05 +0000 (+0100)
Subject: hosts.lisp, distorted.lisp: Include better entries for the scanner.
X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/zones/commitdiff_plain/a45e1496029c64fbac6c6c0a830f0598634eefda?ds=inline

hosts.lisp, distorted.lisp: Include better entries for the scanner.

The stupid thing can't be configured with a static IPv6 address, so
we'll have to make do with the SLAAC address.
---

diff --git a/distorted.lisp b/distorted.lisp
index d32bba5..2269c98 100644
--- a/distorted.lisp
+++ b/distorted.lisp
@@ -443,6 +443,7 @@ (defrevzone trusted
        national.distorted.org.uk.
        eggle.distorted.org.uk.)
   :reverse unsafe
+  :reverse safe
   :reverse vpn
   :reverse its
   :reverse any
diff --git a/hosts.lisp b/hosts.lisp
index 182989c..ceb3ae7 100644
--- a/hosts.lisp
+++ b/hosts.lisp
@@ -115,6 +115,7 @@ (defhost gretsch.unsafe ((:ipv6 unsafe "3a2c:4aff:fe6d:e768")))
 (defhost spirit.unsafe ((:ipv6 unsafe "568d:5aff:fed9:18b8")))
 (defhost invader.safe ((:ipv6 safe "a00:27ff:fe94:a5d7")))
 (defhost marauder.safe ((:ipv6 safe "a00:27ff:fe6a:7846")))
+(defhost unicorn.safe ((:ipv6 safe "20e:c6ff:fe90:a926")))
 
 ;; Safe network.
 (defhost radius.safe (safe 1))
@@ -126,7 +127,7 @@ (defhost tritan.safe (safe 6))
 (defhost kitkat.safe (safe 7))
 (defhost lunch.safe (safe 8))
 (defhost burntaxe.safe (safe 9))
-(defhost unicorn.safe (safe 10))
+(defhost unicorn.safe ((:ipv4 safe 10)))
 
 ;; Wireless network.
 (defhost radius.untrusted (untrusted 1))