Changeset 942 for branches/cname-collision
- Timestamp:
- 12/23/25 16:31:22 (19 hours ago)
- File:
-
- 1 edited
-
branches/cname-collision/DNSDB.pm (modified) (5 diffs)
Legend:
- Unmodified
- Added
- Removed
-
branches/cname-collision/DNSDB.pm
r941 r942 740 740 unless $args{addr} && !$args{addr}->{isv6}; 741 741 742 return ('FAIL', $errstr) unless $self->_cname_collision(%args);743 744 742 # coerce IP/value to normalized form for storage 745 743 ${$args{val}} = $args{addr}->addr; 746 744 } 745 746 return ('FAIL', $errstr) unless $self->_cname_collision(%args); 747 747 748 748 return ('OK','OK'); … … 798 798 } 799 799 } 800 801 return ('FAIL', $errstr) unless $self->_cname_collision(%args); 800 802 801 803 return ('OK','OK'); … … 1007 1009 } 1008 1010 1011 return ('FAIL', $errstr) unless $self->_cname_collision(%args); 1012 1009 1013 return ('WARN',$warnflag) if $warnflag; 1010 1014 … … 1062 1066 1063 1067 } 1068 1069 return ('FAIL', $errstr) unless $self->_cname_collision(%args); 1064 1070 1065 1071 return ('OK','OK'); … … 1092 1098 ${$args{val}} =~ /\.arpa$/; 1093 1099 } 1100 1101 return ('FAIL', $errstr) unless $self->_cname_collision(%args); 1094 1102 1095 1103 # Could arguably put a WARN return here on very long (>512) records
Note:
See TracChangeset
for help on using the changeset viewer.
![[ DNS Administrator ]](/fx/dnsadmin-logo.png)