diff options
author | Mattias Päivärinta <mattias.paivarinta@iis.se> | 2017-09-21 11:14:35 +0200 |
---|---|---|
committer | Mattias Päivärinta <mattias.paivarinta@iis.se> | 2017-09-21 13:27:38 +0200 |
commit | 66760177ac5402f16008442a30ff381da97bb381 (patch) | |
tree | e40480de9b986f67e4681cb5d1bc687095efee02 /t | |
parent | 8d7857032b4fbce85cee7f145dea71a552aafea7 (diff) |
Revert "Add support to explicitly extract and look at OPT records."
This reverts commit ae0b150752c0e025e2a5847f72758ae24ec70601.
Conflicts:
t/dnssec.t
t/optrr.t
Diffstat (limited to 't')
-rw-r--r-- | t/optrr.t | 25 |
1 files changed, 0 insertions, 25 deletions
diff --git a/t/optrr.t b/t/optrr.t deleted file mode 100644 index a9cc93f..0000000 --- a/t/optrr.t +++ /dev/null @@ -1,25 +0,0 @@ -use Test::More; - -use_ok('Net::LDNS'); - -SKIP: { - skip 'no network', 8 if $ENV{TEST_NO_NETWORK}; - - my $r = Net::LDNS->new('192.5.6.30'); - isa_ok($r, 'Net::LDNS'); - ok($r->dnssec(1), 'DO flag set.'); - - my $p = $r->query('net', 'SOA'); - - skip 'Remote server not responding.', 6 if not $p; - isa_ok($p, 'Net::LDNS::Packet'); - - my $rr = $p->opt_rr; - isa_ok($rr, 'Net::LDNS::RR::OPT'); - is($rr->udp_size, 4096, 'UDP size is 4096.'); - is($rr->extended_rcode, 0, 'Extended RCODE is zero.'); - is($rr->edns_version, 0, 'EDNS version is 0.'); - ok(($rr->edns_z & 0x8000), 'DO bit is set in flags.'); -} - -done_testing; |