Mirrors/ldap2dns
1
0
Fork 0
mirror of https://github.com/bklang/ldap2dns.git synced 2025-10-27 14:24:15 -04:00
Code Issues Packages Projects Releases Wiki Activity

Applied fix from Adrian Goins (http://www.arces.net) to fix TXT records

Browse Source 
git-svn-id: https://svn.alkaloid.net/gpl/ldap2dns/trunk@297 06cd67b6-e706-0410-b29e-9de616bca6e9
This commit is contained in:
Ben Klang
2006-03-20 02:03:28 +00:00
parent 8ffab03cef
commit ab013de4e7
1 changed files with 1 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
scripts/axfr2ldap.pl
View File

@@ -206,7 +206,7 @@ sub read_zone
$attr{'DNScname'} = lc $5;
add_attrs(\%attr, $zonename);
} elsif ($rr->type eq "CNAME" || $rr->type eq "TXT") {
die "Invalid ", $rr->type, " record for ", $rr->name, " " unless ($rr->string =~ /^([0-9a-zA-Z_.+-]+)\.\s+(\d+)\s+(\w+)\s+(\w+)\s+([0-9a-zA-Z_.+-]+)/);
die "Invalid ", $rr->type, " record for ", $rr->name, " " unless ($rr->string =~ /^([0-9a-zA-Z_.+-]+)\.\s+(\d+)\s+(\w+)\s+(\w+)\s+([0-9a-zA-Z_.+-\s\"=:]+)/);
die "Corrupt ", $rr->type, " record for ", $rr->name, " " unless ($1 eq $rr->name && $2 eq $rr->ttl && $3 eq $rr->class && $4 eq $rr->type);
my %attr;