Skip Menu |
 

This queue is for tickets about the Net-DNS-ZoneFile-Fast CPAN distribution.

Report information
The Basics
Id: 72997
Status: resolved
Priority: 0/
Queue: Net-DNS-ZoneFile-Fast

People
Owner: wjhns117 [...] hardakers.net
Requestors: mithro [...] mithis.com
Cc:
AdminCc:

Bug Information
Severity: (no value)
Broken in: (no value)
Fixed in: (no value)

Attachments


Subject: Adding support for DNSSec signed HTTPs certificates
MIME-Version: 1.0
X-Mailer: MIME-tools 5.427 (Entity 5.427)
X-RT-Original-Encoding: utf-8
Content-Type: multipart/mixed; boundary="----------=_1323143094-13645-150"
Content-Length: 0
Content-Type: text/plain; charset="UTF-8"
Content-Disposition: inline
Content-Transfer-Encoding: binary
Content-Length: 195
Download (untitled) / with headers
text/plain 195b
When using DNSSEC authenticated HTTPS as described at http://www.imperialviolet.org/2011/06/16/dnssecchrome.html the current code errors out about an unknown type. This patch fixes the problem.
Subject: perl-Net-DNS-ZoneFile-Fast.pm.patch
MIME-Version: 1.0
Content-Type: text/x-patch; name="perl-Net-DNS-ZoneFile-Fast.pm.patch"
X-Mailer: MIME-tools 5.427 (Entity 5.427)
Content-Disposition: inline; filename="perl-Net-DNS-ZoneFile-Fast.pm.patch"
Content-Transfer-Encoding: binary
Content-Length: 1250
--- /usr/share/perl5/Net/DNS/ZoneFile/Fast.pm 2011-12-05 10:11:31.000000000 +0000 +++ /usr/share/perl5/Net/DNS/ZoneFile/Fast.pm.new 2011-12-05 10:11:24.000000000 +0000 @@ -604,6 +604,33 @@ } else { error("bad txtdata in TXT"); } + } elsif (/\G(type[0-9]+)[ \t]+/igc) { + my $type = $1; + if (/\G\\#\s+(\d+)\s+\(\s(.*)$/gc) { + # multi-line + $sshfp = { + Line => $ln, + name => $domain, + type => uc $type, + ttl => $ttl, + class => "IN", + fptype => $1, + fingerprint => $2, + }; + $parse = \&parse_sshfp; + } elsif (/\G\\#\s+(\d+)\s+(.*)$pat_skip$/gc) { + push @zone, { + Line => $ln, + name => $domain, + type => uc $type, + ttl => $ttl, + class => "IN", + fptype => $1, + fingerprint => $2, + }; + } else { + error("bad data in in $type"); + } } elsif (/\G(sshfp)[ \t]+/igc) { if (/\G(\d+)\s+(\d+)\s+\(\s*$/gc) { # multi-line @@ -945,7 +972,7 @@ } elsif (/\Gany\s+tsig.*$/igc) { # XXX ignore tsigs } else { - error("unrecognized type"); + error("unrecognized type for $domain\n$_\n"); } }
MIME-Version: 1.0
X-Mailer: MIME-tools 5.427 (Entity 5.427)
Content-Disposition: inline
Content-Type: text/plain; charset="UTF-8"
Message-ID: <rt-3.8.HEAD-10497-1325201668-1526.72997-0-0 [...] rt.cpan.org>
Content-Transfer-Encoding: binary
X-RT-Original-Encoding: utf-8
Content-Length: 98
Applied the proposed patch and will be distributed in the next release (due out shortly). Thanks!


This service is sponsored and maintained by Best Practical Solutions and runs on Perl.org infrastructure.

Please report any issues with rt.cpan.org to rt-cpan-admin@bestpractical.com.