X-Git-Url: https://git.distorted.org.uk/~mdw/zones/blobdiff_plain/668d8477199b901515e9de79341568b13cdb4521..f233386bcb08606a2006ae1fcb1428b074477d4d:/distorted.lisp diff --git a/distorted.lisp b/distorted.lisp index 22f6726..a0493dc 100644 --- a/distorted.lisp +++ b/distorted.lisp @@ -161,13 +161,17 @@ #p"https-stratocaster"))) (www-cache :tlsa (3127 #1=(:trust-anchor-assertion :certificate :sha-256 #p"distorted-ca"))) - (mail :tlsa ((:submission :imap :imaps) #1# #3#)) - (mail :tlsa (:smtp #1# - (:domain-issued-certificate - :public-key :sha-256 #p"smtps-stratocaster"))) - ((bugs lists) :tlsa (:smtp #1# - (:domain-issued-certificate - :public-key :sha-256 #p"smtps-telecaster"))) + (mail :tlsa ((:submission :imap :imaps) #1#)) + (mail :tlsa (:smtp + #+view/inside #1# + #-view/inside (:domain-issued-certificate + :public-key :sha-256 + #p"smtps-stratocaster"))) + ((bugs lists) :tlsa (:smtp + #+view/inside #1# + #-view/inside (:domain-issued-certificate + :public-key :sha-256 + #p"smtps-telecaster"))) :svc #+view/inside stratocaster.colo #-view/inside stratocaster.jump (cabal :svc stratocaster.colo :sshfp "stratocaster") @@ -238,10 +242,17 @@ (guvnor (dmz :addr guvnor.dmz)) (nat (dmz :addr nat.dmz)) - ;; Wireless gateway. + ;; Wireless access points. (wireless :net wireless) (evolution (safe :addr evolution.safe)) (evolution :alias evo) + (kitkat :alias ap0) + (kitkat (safe :addr kitkat.safe)) + (lunch :alias ap1) + (lunch (safe :addr lunch.safe)) + + ;; Printer. + (burntaxe (safe :addr burntaxe.safe)) ;; Switches. (grigsby :alias tp0) @@ -304,6 +315,8 @@ (crybaby :abbrev cb) (crybaby (vpn :addr crybaby.vpn :sshfp "crybaby") (hippo :addr crybaby.hippo :sshfp "crybaby")) + (spirit (vpn :addr spirit.vpn :sshfp "spirit") + (hippo :addr spirit.hippo :sshfp "spirit")) (terror (vpn :addr terror.vpn :sshfp "terror")) (orange :abbrev o) (orange (vpn :addr orange.vpn :sshfp "orange")) @@ -366,6 +379,7 @@ (crybaby :addr crybaby.unsafe) (lespaul :addr lespaul.unsafe) (gretsch :addr gretsch.unsafe) + (spirit :addr spirit.unsafe) (haze :addr haze.unsafe) (invader :addr invader.safe) (marauder :addr marauder.safe))