Changeset 518 for trunk

Timestamp:

06/07/13 18:41:45 (12 years ago)

Author:

Kris Deugau

Message:

/trunk

Use -1 to flag records to use tinydns' auto-TTL (mis?)feature.
Records appear to have a 1-day TTL when configured this way.

0 is required for records that really truly have a 0 TTL.

Location:

trunk

Files:

• DNSDB.pm (modified) (2 diffs)
• tiny-import.pl (modified) (10 diffs)

trunk/DNSDB.pm

@@ -4915 +4915 @@
 
         # support tinydns' auto-TTL
-        $ttl = '' if $ttl == '0';
+        $ttl = '' if $ttl == -1;
 
         # Spaces are evil.
@@ -4999 +4999 @@
 
         # support tinydns' auto-TTL
-        $ttl = '' if $ttl == '0';
+        $ttl = '' if $ttl == -1;
 
         _printrec_tiny(*ZONECACHE, 'y', \%recflags, $revzone,

trunk/tiny-import.pl

@@ -263 +263 @@
       $host =~ s/^=//;
       $host =~ s/\.$//;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -290 +290 @@
       $host =~ s/\.$//;
       $host =~ s/^\\052/*/;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -324 +324 @@
       $ns =~ s/\.$//;
       $ns = "$ns.ns.$zone" if $ns !~ /\./;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -358 +358 @@
       $rip =~ s/^\^//;
       $rip =~ s/\.$//;
-      $ttl = 0 if !$ttl;
+      $ttl = 1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -389 +389 @@
       $host =~ s/\.$//;
       $host =~ s/^\\052/*/;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -410 +410 @@
       $master =~ s/\.$//;
       $contact =~ s/\.$//;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -436 +436 @@
       $host =~ s/\.$//;
       $host = "$host.mx.$zone" if $host !~ /\./;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -461 +461 @@
       $fqdn =~ s/^\\052/*/;
       _deoctal(\$rdata);
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -488 +488 @@
       $ns =~ s/\.$//;
       $ns = "$ns.ns.$fqdn" if $ns !~ /\./;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;
@@ -556 +556 @@
       $fqdn =~ s/\.$//;
       $fqdn =~ s/^\\052/*/;
-      $ttl = 0 if !$ttl;
+      $ttl = -1 if !$ttl;
       $stamp = '' if !$stamp;
       $loc = '' if !$loc;