Changeset 893 for trunk/DNSDB.pm

Timestamp:

06/25/25 18:45:14 (6 days ago)

Author:

Kris Deugau

Message:

/trunk

Copy sub in from tiny-import.pl to convert octal escapes to normal
characters, so ExportBIND.pm can use it on stray TXT records. Exported
as-is these work fine in tinyDNS, but get weirdly unescaped when fed to
BIND et al (assuming they don't just reject the zone outright).

Should arguably remove the copy in tiny-import.pl and reference it from
DNSDB.pm

File:

• trunk/DNSDB.pm (modified) (1 diff)

trunk/DNSDB.pm

@@ -2159 +2159 @@
   return 1;
 } # _check_hostname_form()
+
+# Reverse a lurking tinydns-centric octal substitution
+sub _deoctal {
+  my $targ = shift;
+  while ($$targ =~ /\\(\d{3})/) {
+    my $sub = chr(oct($1));
+    $$targ =~ s/\\$1/$sub/g;
+  }
+} # _deoctal()