Index: /branches/stable/dns-rpc.cgi
===================================================================
--- /branches/stable/dns-rpc.cgi	(revision 1055)
+++ /branches/stable/dns-rpc.cgi	(revision 1056)
@@ -22,7 +22,16 @@
 use warnings;
 
-# push "the directory the script is in" into @INC
-use FindBin;
-use lib "$FindBin::RealBin/";
+# Taint-safe (ish) voodoo to push "the directory the script is in" into @INC.
+# See https://secure.deepnet.cx/trac/dnsadmin/ticket/80 for more gory details on how we got here.
+use File::Spec ();
+use File::Basename ();
+my $path;
+BEGIN {
+    $path = File::Basename::dirname(File::Spec->rel2abs($0));
+    if ($path =~ /(.*)/) {
+        $path = $1;
+    }
+}
+use lib $path;
 
 use DNSDB;
@@ -374,4 +383,5 @@
 }
 
+
 =head3 revID
 
@@ -398,5 +408,4 @@
   return $revid;
 }
-
 
 
Index: /branches/stable/dns-upd-1.4.2.sql
===================================================================
--- /branches/stable/dns-upd-1.4.2.sql	(revision 1056)
+++ /branches/stable/dns-upd-1.4.2.sql	(revision 1056)
@@ -0,0 +1,18 @@
+-- Update formally known types from https://www.iana.org/assignments/dns-parameters/
+COPY rectypes (val, name, stdflag, listorder, alphaorder) FROM stdin;
+63	ZONEMD	255	255	255
+64	SVCB	255	255	255
+65	HTTPS	255	255	255
+259	DOA	255	255	255
+260	AMTRELAY	255	255	255
+261	RESINFO	5	255	255
+262	WALLET	5	255	255
+263	CLA	5	255	255
+264	IPN	5	255	255
+\.
+
+-- Enable CAA records in record edit/add page dropdown
+UPDATE rectypes SET listorder = 17, stdflag = 1 WHERE val = 257;
+
+-- Update dbversion
+UPDATE misc SET value='1.4.2' WHERE key='dbversion';