From fc8104032d99984c4bc3bdc6a8994126bcd25681 Mon Sep 17 00:00:00 2001
From: Peter Palfrader <peter@palfrader.org>
Date: Fri, 1 Jan 2016 17:40:46 +0100
Subject: Make TLSA records without swede

---
 letsencrypt-helpers/make-tlsa | 16 ++++++++++------
 1 file changed, 10 insertions(+), 6 deletions(-)

diff --git a/letsencrypt-helpers/make-tlsa b/letsencrypt-helpers/make-tlsa
index 6a88b92..7b7b59e 100755
--- a/letsencrypt-helpers/make-tlsa
+++ b/letsencrypt-helpers/make-tlsa
@@ -6,17 +6,21 @@ set -u
 cd ~/certs
 
 for crt in *-combined.crt; do
+  digest=$(openssl rsa -pubout -outform DER < ${crt%-combined.crt}.key 2>/dev/null | sha256sum | awk '{print $1}')
+
+  ports="443"
+  portsfile="${crt%-combined.crt}.ports"
+  if [ -e "$portsfile" ] ; then
+    ports=$(cat "$portsfile")
+  fi
+
   (
   openssl x509 -noout -text < "$crt" | awk '/X509v3 Subject Alternative Name/ {getline;gsub(/ /, "", $0); print}' | tr ',' '\n' | awk -F: '$1=="DNS" {print $2}';
   openssl x509 -noout -subject < "$crt"| sed -e 's/^subject.*CN=\([a-zA-Z0-9\.\-\*]*\).*$/\1/'
   ) | sort -u | while read cn; do
-    ports="443"
-    portsfile="${crt%-combined.crt}.ports"
-    if [ -e "$portsfile" ] ; then
-      ports=$(cat "$portsfile")
-    fi
     for port in $ports; do
-      ~/swede/swede create --output rfc --usage=3 --selector=1 --mtype=1 --certificate "$crt" --port "$port" "$cn"
+      #~/swede/swede create --output rfc --usage=3 --selector=1 --mtype=1 --certificate "$crt" --port "$port" "$cn"
+      printf "_%d.tcp.%-40s IN TLSA 3 1 1 %s\n" "${port}" "${cn}." "${digest}"
     done
   done
 done
-- 
cgit v1.2.3