Add testcase for TLSA record access

diff --git a/test/confs/5890 b/test/confs/5890
new file mode 100644 (file)
index 0000000..bd0b77d
--- /dev/null
+++ b/test/confs/5890
@@ -0,0 +1,10 @@
+# Exim test configuration 5890
+# DANE common
+
+exim_path = EXIM_PATH
+host_lookup_order = bydns
+primary_hostname = myhost.test.ex
+spool_directory = DIR/spool
+
+# ----- Main settings -----
+

diff --git a/test/scripts/5890-DANE/5890 b/test/scripts/5890-DANE/5890
new file mode 100644 (file)
index 0000000..fd7b6d6
--- /dev/null
+++ b/test/scripts/5890-DANE/5890
@@ -0,0 +1,12 @@
+# Expansion test for DANE.
+#
+# Some systems seem to use 1-byte fields for the leading
+# 3 fields in a TLSA record, others 2-bytes.
+# We need the result to match the string in dnszones-src/db.test.ex
+
+exim -be
+
+dnslookup tpda: ${lookup dnsdb {tlsa=_1225._tcp.dane512ee.test.ex} \
+                        {$value}{none}}
+
+****

diff --git a/test/scripts/5890-DANE/REQUIRES b/test/scripts/5890-DANE/REQUIRES
new file mode 100644 (file)
index 0000000..2314a32
--- /dev/null
+++ b/test/scripts/5890-DANE/REQUIRES
@@ -0,0 +1,2 @@
+support Experimental_DANE
+running IPv4

diff --git a/test/stdout/5890 b/test/stdout/5890
new file mode 100644 (file)
index 0000000..815d959
--- /dev/null
+++ b/test/stdout/5890
@@ -0,0 +1,4 @@
+> 
+> dnslookup tpda: 3 1 2 3d5eb81b1dfc3f93c1fa8819e3fb3fdb41bb590441d5f3811db17772f4bc6de29bdd7c4f4b723750dda871b99379192b3f979f03db1252c4f08b03ef7176528d000000
+> 
+>