Changeset 585 for trunk

Timestamp:

01/03/14 15:23:02 (11 years ago)

Author:

Kris Deugau

Message:

/trunk

Add .arpa detection to record update to match record add.

File:

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

trunk/DNSDB.pm

@@ -3967 +3967 @@
 
   # prep for validation
+  # Autodetect formal .arpa names
+  if ($$val =~ /\.arpa\.?$/) {
+    my ($code,$tmpval) = _zone2cidr($$val);
+    return ('FAIL', $tmpval) if $code eq 'FAIL';
+    $$val = $tmpval;
+  }
   my $addr = NetAddr::IP->new($$val);
   $$host =~ s/\.+$//;   # FQDNs ending in . are an internal detail, and really shouldn't be exposed in the UI.