dnsruby 1.1

data/test/tc_header.rb

@@ -0,0 +1,104 @@
+#--
+#Copyright 2007 Nominet UK
+#
+#Licensed under the Apache License, Version 2.0 (the "License");
+#you may not use this file except in compliance with the License. 
+#You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0 
+#
+#Unless required by applicable law or agreed to in writing, software 
+#distributed under the License is distributed on an "AS IS" BASIS, 
+#WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
+#See the License for the specific language governing permissions and 
+#limitations under the License.
+#++
+require 'rubygems'
+require 'test/unit'
+require 'dnsruby'
+include Dnsruby
+class TestHeader < Test::Unit::TestCase
+  def test_header
+    header = Header.new();
+    assert(header, "new() returned something")
+    
+    header.id=41
+    assert_equal(header.id, 41, "id() works")
+    
+    header.qr=true
+    assert_equal(header.qr, true, "qr() works")
+    
+    header.opcode="QUERY"
+    assert_equal(OpCode.Query, header.opcode, 
+                      "opcode() works")
+    header.opcode=OpCode::Query
+    assert_equal(header.opcode.string, "Query", 
+                      "opcode() works")
+    
+    
+    header.aa=true
+    assert_equal(header.aa, true, "aa() works")
+    
+    header.tc=false
+    assert_equal(header.tc, false, "tc() works")
+    
+    header.rd=true
+    assert_equal(header.rd, true, "rd() works")
+    
+    header.ad=true
+    assert_equal(header.ad, true, "rd() works")
+
+    header.cd=true
+    assert_equal(header.cd, true, "rd() works")
+
+    header.ra=true
+    assert_equal(header.ra, true, "ra() works")
+    
+    header.qr=true
+    assert_equal(header.qr, true, "qr() works")
+    
+    header.rcode="NOERROR"
+    assert_equal(header.rcode, RCode::NOERROR, "rcode() works")
+    header.rcode=RCode.NOERROR
+    assert_equal(header.rcode.string, "NOERROR", "rcode() works")
+    
+    header.qdcount=1
+    header.ancount=2
+    header.nscount=3
+    header.arcount=3
+    
+    
+    # Reenable when support for CD is there
+    #header.cd=0
+    #assert_equal(header.cd, 0, "cd() works")
+    data = header.data
+    
+    header2 = Header.new_from_data(data);
+    
+    assert(header==(header2), 'Headers are the same');
+    
+    #
+    #  Is header.inspect remotely sane?
+    #
+    assert(header.to_s =~ /opcode = Query/, 'inspect() has opcode correct');
+    assert(header.to_s =~ /ancount = 2/,    'inspect() has ancount correct');
+    
+    header = Header.new;
+    
+    #
+    # Check that the aliases work properly.
+    #
+    header.zocount=(0);
+    header.prcount=(1);
+    header.upcount=(2);
+    header.adcount=(3);
+    
+    assert_equal(header.zocount, 0, 'zocount works');
+    assert_equal(header.prcount, 1, 'prcount works');
+    assert_equal(header.upcount, 2, 'upcount works');
+    assert_equal(header.adcount, 3, 'adcount works');
+    
+    
+    
+  end
+end

data/test/tc_misc.rb

@@ -0,0 +1,139 @@
+#--
+#Copyright 2007 Nominet UK
+#
+#Licensed under the Apache License, Version 2.0 (the "License");
+#you may not use this file except in compliance with the License. 
+#You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0 
+#
+#Unless required by applicable law or agreed to in writing, software 
+#distributed under the License is distributed on an "AS IS" BASIS, 
+#WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
+#See the License for the specific language governing permissions and 
+#limitations under the License.
+#++
+require 'rubygems'
+require 'test/unit'
+require 'dnsruby'
+class TestMisc < Test::Unit::TestCase
+  def test_wildcard
+    # test to make sure that wildcarding works.
+    #
+    rr = Dnsruby::RR.create('*.t.dnsruby.validation-test-servers.nominet.org.uk 60 IN A 10.0.0.1')
+    
+    assert(rr, 'RR got made')
+    
+    assert_equal('*.t.dnsruby.validation-test-servers.nominet.org.uk', rr.name.to_s,    'Name is correct'   )
+    assert_equal(60,      rr.ttl,               'TTL is correct'    )
+    assert_equal(Dnsruby::Classes.IN,   rr.klass,              'CLASS is correct'  )
+    assert_equal(Dnsruby::Types.A,    rr.type,               'TYPE is correct'   )
+    assert_equal('10.0.0.1', rr.address.to_s,        'Address is correct')
+  end
+  
+  def test_misc
+    
+    #
+    # Make sure the underscore in SRV hostnames work.
+    #
+    srv = Dnsruby::RR.create('_rvp._tcp.t.dnsruby.validation-test-servers.nominet.org.uk. 60 IN SRV 0 0 80 im.bastardsinc.biz')
+    
+    assert(!$@,  'No errors')
+    assert(srv, 'SRV got made')
+    
+    
+    #~ # Test that the 5.005 Use of uninitialized value at
+    #~ # /usr/local/lib/perl5/site_perl/5.005/Net/DNS/RR.pm line 639. bug is gone
+    rr = Dnsruby::RR.create('mx.t.dnsruby.validation-test-servers.nominet.org.uk 60 IN MX 10 a.t.dnsruby.validation-test-servers.nominet.org.uk')
+    assert(rr, 'RR created')
+    
+    assert_equal(rr.preference, 10, 'Preference works')
+    
+    
+    
+    mx = Dnsruby::RR.create('mx.t.dnsruby.validation-test-servers.nominet.org.uk 60 IN MX 0 mail.dnsruby.validation-test-servers.nominet.org.uk')
+    
+    assert(mx.to_s =~ /0 mail.dnsruby.validation-test-servers.nominet.org.uk/) # was 'like'
+    assert_equal(mx.preference, 0)
+    assert_equal(mx.exchange.to_s, 'mail.dnsruby.validation-test-servers.nominet.org.uk')
+    
+    srv = Dnsruby::RR.create('srv.t.dnsruby.validation-test-servers.nominet.org.uk 60 IN SRV 0 2 3 target.dnsruby.validation-test-servers.nominet.org.uk')
+    
+#    # @todo@ Absolute name issues
+#    assert(srv.inspect =~ /0 2 3 target.dnsruby.validation-test-servers.nominet.org.uk\./)
+#    assert_equal(srv.rdatastr, '0 2 3 target.dnsruby.validation-test-servers.nominet.org.uk.')
+    
+    
+    
+  end
+  
+  def test_TXT_RR
+    
+    #
+    #
+    # Below are some thests that have to do with TXT RRs 
+    #
+    #
+    
+    
+    # QUESTION SECTION:
+    #txt2.t.net-dns.org.		IN	TXT
+    
+    # ANSWER SECTION:
+    #txt2.t.net-dns.org.	60	IN	TXT	"Net-DNS\ complicated $tuff" "sort of \" text\ and binary \000 data"
+    
+    # AUTHORITY SECTION:
+    #net-dns.org.		3600	IN	NS	ns1.net-dns.org.
+    #net-dns.org.		3600	IN	NS	ns.ripe.net.
+    #net-dns.org.		3600	IN	NS	ns.hactrn.net.
+    
+    # ADDITIONAL SECTION:
+    #ns1.net-dns.org.	3600	IN	A	193.0.4.49
+    #ns1.net-dns.org.	3600	IN	AAAA
+    
+    uuencodedPacket=%w{
+11 99 85 00 00 01
+00 01 00 03 00 02 04 74  78 74 32 01 74 07 6e 65
+74 2d 64 6e 73 03 6f 72  67 00 00 10 00 01 c0 0c
+00 10 00 01 00 00 00 3c  00 3d 1a 4e 65 74 2d 44
+4e 53 3b 20 63 6f 6d 70  6c 69 63 61 74 65 64 20
+24 74 75 66 66 21 73 6f  72 74 20 6f 66 20 22 20
+74 65 78 74 3b 20 61 6e  64 20 62 69 6e 61 72 79
+20 00 20 64 61 74 61 c0  13 00 02 00 01 00 00 0e
+10 00 06 03 6e 73 31 c0  13 c0 13 00 02 00 01 00
+00 0e 10 00 0d 02 6e 73  04 72 69 70 65 03 6e 65
+74 00 c0 13 00 02 00 01  00 00 0e 10 00 0c 02 6e
+73 06 68 61 63 74 72 6e  c0 93 c0 79 00 01 00 01
+00 00 0e 10 00 04 c1 00  04 31 c0 79 00 1c 00 01
+00 00 0e 10 00 10 20 01  06 10 02 40 00 03 00 00
+12 34 be 21 e3 1e                               
+}
+    
+    uuencodedPacket.map!{|e| e.hex}
+    packetdata = uuencodedPacket.pack('c*')
+    packetdata.gsub!("\s*", "")
+    
+    packet     = Dnsruby::Message.decode(packetdata)
+    txtRr=(packet.answer)[0]
+    assert_equal('Net-DNS; complicated $tuff',txtRr.strings[0],"First Char string in TXT RR read from wireformat")
+    
+    # Compare the second char_str this contains a NULL byte (space NULL
+    # space=200020 in hex)
+    
+    temp = (txtRr.strings)[1].unpack('H*')[0]
+    #    #assert_equal(unpack('H*',(TXTrr.char_str_list())[1]),"736f7274206f66202220746578743b20616e642062696e61727920002064617461", "Second Char string in TXT RR read from wireformat")
+    assert_equal("736f7274206f66202220746578743b20616e642062696e61727920002064617461", temp,"Second Char string in TXT RR read from wireformat")
+    
+    
+    txtRr2=Dnsruby::RR.create('txt2.t.dnsruby.validation-test-servers.nominet.org.uk.	60	IN	TXT  "Test1 \" \ more stuff"  "Test2"')
+    
+    assert_equal((txtRr2.strings)[0],'Test1 "  more stuff', "First arg string in TXT RR read from zonefileformat")
+    assert_equal((txtRr2.strings)[1],'Test2',"Second Char string in TXT RR read from zonefileformat")
+    
+    
+    #    txtRr3   = RR.create("baz.example.com 3600 HS TXT '\"' 'Char Str2'")
+    txtRr3   = Dnsruby::RR.create("baz.example.com 3600 IN TXT '\"' 'Char Str2'")
+    
+    assert_equal( (txtRr3.strings)[0],'"',"Escaped \" between the  single quotes")
+  end
+end

data/test/tc_name.rb

@@ -0,0 +1,53 @@
+#--
+#Copyright 2007 Nominet UK
+#
+#Licensed under the Apache License, Version 2.0 (the "License");
+#you may not use this file except in compliance with the License. 
+#You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0 
+#
+#Unless required by applicable law or agreed to in writing, software 
+#distributed under the License is distributed on an "AS IS" BASIS, 
+#WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
+#See the License for the specific language governing permissions and 
+#limitations under the License.
+#++
+require 'rubygems'
+require 'test/unit'
+require 'dnsruby'
+include Dnsruby
+class TestName < Test::Unit::TestCase
+  def test_label_length
+    Name::Label.set_max_length(Name::Label::MaxLabelLength) # Other tests may have changed this  
+    # Test max label length = 63
+    begin
+      name = Name.create("a.b.12345678901234567890123456789012345678901234567890123456789012345.com")
+      assert(false, "Label of more than max=63 allowed")
+    rescue ResolvError
+    end
+  end
+  
+  def test_name_length
+    # Test max name length=255
+    begin
+      name = Name.create("1234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123456789012345678901234567890123.com")
+      assert(false, "Name of length > 255 allowed")
+    rescue ResolvError
+    end
+  end
+  
+  def test_absolute
+    n = Name.create("example.com")
+    assert(!n.absolute?)
+    n = Name.create("example.com.")
+    assert(n.absolute?)
+  end
+
+  def test_wild
+    n = Name.create("example.com")
+    assert(!n.wild?)
+    n = Name.create("*.example.com.")
+    assert(n.wild?)
+  end
+end

data/test/tc_nsec.rb

@@ -0,0 +1,36 @@
+require 'test/unit'
+require 'dnsruby'
+
+class NsecTest < Test::Unit::TestCase
+  INPUT = "alfa.example.com. 86400 IN NSEC host.example.com. ( " +
+    "A MX RRSIG NSEC TYPE1234 )"
+  include Dnsruby
+  def test_nsec_from_string
+    nsec = Dnsruby::RR.create(INPUT)
+    assert_equal("host.example.com", nsec.next_domain.to_s)
+    assert_equal([Types.A, Types.MX, Types.RRSIG, Types.NSEC, Types.TYPE1234], nsec.types)
+    
+    nsec2 = Dnsruby::RR.create(nsec.to_s)
+    assert(nsec2.to_s == nsec.to_s)
+  end
+
+  def test_nsec_from_data
+    nsec = Dnsruby::RR.create(INPUT)
+    m = Dnsruby::Message.new
+    m.add_additional(nsec)
+    data = m.encode
+    m2 = Dnsruby::Message.decode(data)
+    nsec3 = m2.additional()[0]
+    assert_equal(nsec.to_s, nsec3.to_s)
+  end
+  
+  def test_nsec_types
+    # Test types in last section to 65536.
+    #Test no zeros
+    nsec = Dnsruby::RR.create(INPUT)
+    nsec.add_type(Types.TYPE65534)
+    assert(nsec.types.include?(Types.TYPE65534))
+    assert(nsec.to_s.include?(Types.TYPE65534.string))
+  end
+  
+end

data/test/tc_nsec3.rb

@@ -0,0 +1,63 @@
+require 'test/unit'
+require 'dnsruby'
+
+class Nsec3Test < Test::Unit::TestCase
+  INPUT = "2t7b4g4vsa5smi47k61mv5bv1a22bojr.example. 3600 IN NSEC3 1 1 12 aabbccdd ( " + 
+    "2vptu5timamqttgl4luu9kg21e0aor3s A RRSIG )"
+  include Dnsruby
+  def test_nsec_from_string
+    nsec = Dnsruby::RR.create(INPUT)
+    assert_equal("2vptu5timamqttgl4luu9kg21e0aor3s", nsec.next_hashed.to_s)
+    assert_equal([Types.A, Types.RRSIG], nsec.types)
+    assert(nsec.opt_out?)
+    assert_equal(12, nsec.iterations)
+    assert_equal("aabbccdd", nsec.salt)
+    assert_equal(Dnsruby::Algorithms.RSAMD5, nsec.hash_alg)
+    
+    nsec2 = Dnsruby::RR.create(nsec.to_s)
+    assert(nsec2.to_s == nsec.to_s)
+  end
+
+  def test_nsec_from_data
+    nsec = Dnsruby::RR.create(INPUT)
+    m = Dnsruby::Message.new
+    m.add_additional(nsec)
+    data = m.encode
+    m2 = Dnsruby::Message.decode(data)
+    nsec3 = m2.additional()[0]
+    assert_equal(nsec.to_s, nsec3.to_s)
+  end
+  
+  def test_nsec_other_stuff
+    nsec = Dnsruby::RR.create(INPUT)
+    begin
+      nsec.salt_length=256
+      fail
+    rescue DecodeError
+    end
+    begin
+      nsec.hash_length=256
+      fail
+    rescue DecodeError
+    end
+    begin
+      nsec.hash_alg = 8
+      fail
+    rescue DecodeError
+    end
+    begin
+      nsec.flags = 2
+      fail
+    rescue DecodeError
+    end
+  end
+  
+  def test_nsec_types
+    # Test types in last section to 65536.
+    #Test no zeros
+    nsec = Dnsruby::RR.create(INPUT)
+    nsec.add_type(Types.TYPE65534)
+    assert(nsec.types.include?(Types.TYPE65534))
+    assert(nsec.to_s.include?(Types.TYPE65534.string))
+  end
+end

data/test/tc_nsec3param.rb

@@ -0,0 +1,30 @@
+require 'test/unit'
+require 'dnsruby'
+
+class Nsec3ParamTest < Test::Unit::TestCase
+  INPUT = "example. 3600 IN NSEC3PARAM 1 0 12 aabbccdd"
+
+  include Dnsruby
+  def test_nsec_from_string
+    nsec = Dnsruby::RR.create(INPUT)
+
+    assert_equal(Dnsruby::Algorithms.RSAMD5, nsec.hash_alg)
+    assert_equal(0, nsec.flags)
+    assert_equal(12, nsec.iterations)
+    assert_equal("aabbccdd", nsec.salt)
+    
+    nsec2 = Dnsruby::RR.create(nsec.to_s)
+    assert(nsec2.to_s == nsec.to_s)
+  end
+
+  def test_nsec_from_data
+    nsec = Dnsruby::RR.create(INPUT)
+    m = Dnsruby::Message.new
+    m.add_additional(nsec)
+    data = m.encode
+    m2 = Dnsruby::Message.decode(data)
+    nsec3 = m2.additional()[0]
+    assert_equal(nsec.to_s, nsec3.to_s)
+  end
+  
+end

data/test/tc_packet.rb

@@ -0,0 +1,179 @@
+#--
+#Copyright 2007 Nominet UK
+#
+#Licensed under the Apache License, Version 2.0 (the "License");
+#you may not use this file except in compliance with the License. 
+#You may obtain a copy of the License at
+#
+#     http://www.apache.org/licenses/LICENSE-2.0 
+#
+#Unless required by applicable law or agreed to in writing, software 
+#distributed under the License is distributed on an "AS IS" BASIS, 
+#WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 
+#See the License for the specific language governing permissions and 
+#limitations under the License.
+#++
+require 'rubygems'
+require 'test/unit'
+require 'dnsruby'
+include Dnsruby
+class TestPacket < Test::Unit::TestCase
+  def test_packet
+    domain = "example.com"
+    type = "MX"
+    klass = "IN"
+      
+    packet = Message.new(domain, type, klass)
+      
+    assert(packet,                                 'new() returned something');         #2
+    assert(packet.header,                         'header() method works');            #3
+    assert_instance_of(Header,packet.header,'header() returns right thing');     #4
+      
+      
+    question = packet.question;
+    assert(question && question.length == 1,             'question() returned right number of items'); #5
+    #      assert_instance_of(Net::DNS::Question,question[0], 'question() returned the right thing');       #6
+      
+    answer = packet.answer;
+    assert(answer.length == 0,     'answer() works when empty');     #7
+      
+      
+    authority = packet.authority;
+    assert(authority.length == 0,  'authority() works when empty');  #8
+      
+    additional = packet.additional;
+    assert(additional.length == 0, 'additional() works when empty'); #9
+      
+    packet.add_answer(RR.create(   { 
+          :name    => "a1.example.com", 
+          :type    => Types.A,  
+          :address => "10.0.0.1"}));
+    assert_equal(1, packet.header.ancount, 'First push into answer section worked');      #10
+      
+      
+    packet.add_answer(RR.create({:name    => "a2.example.com",
+          :type    => "A", :address => "10.0.0.2"}));
+    assert_equal(packet.header.ancount, 2, 'Second push into answer section worked');     #11
+      
+      
+    packet.add_authority(RR.create({:name    => "a3.example.com",
+          :type    => "A",
+          :address => "10.0.0.3"}));
+    assert_equal(1, packet.header.nscount, 'First push into authority section worked');   #12
+      
+      
+    packet.add_authority(RR.create( {
+          :name    => "a4.example.com",
+          :type    => "A",
+          :address => "10.0.0.4"}));
+    assert_equal(2, packet.header.nscount, 'Second push into authority section worked');  #13
+      
+    packet.add_additional(RR.create({
+          :name    => "a5.example.com",
+          :type    => "A",
+          :address => "10.0.0.5"}));
+    assert_equal(1, packet.header.adcount, 'First push into additional section worked');  #14
+      
+    packet.add_additional(RR.create(  {
+          :name    => "a6.example.com",
+          :type    => Types.A,
+          :address => "10.0.0.6"}));
+    assert_equal(2, packet.header.adcount, 'Second push into additional section worked'); #15
+      
+    data = packet.encode;
+      
+    packet2 = Message.decode(data);
+      
+    assert(packet2, 'new() from data buffer works');   #16
+
+    assert_equal(packet.to_s, packet2.to_s, 'inspect() works correctly');  #17
+      
+      
+    string = packet2.to_s
+    6.times do |count|
+      ip = "10.0.0.#{count+1}";
+      assert(string =~ /#{ip}/,  "Found #{ip} in packet");  # 18 though 23
+    end
+      
+    assert_equal(1, packet2.header.qdcount, 'header question count correct');   #24
+    assert_equal(2, packet2.header.ancount, 'header answer count correct');     #25
+    assert_equal(2, packet2.header.nscount, 'header authority count correct');  #26 
+    assert_equal(2, packet2.header.adcount, 'header additional count correct'); #27
+      
+      
+      
+    # Test using a predefined answer. This is an answer that was generated by a bind server.
+    #
+      
+    #      data=["22cc85000001000000010001056461636874036e657400001e0001c00c0006000100000e100025026e730472697065c012046f6c6166c02a7754e1ae0000a8c0000038400005460000001c2000002910000000800000050000000030"].pack("H*");
+    uuencodedPacket =%w{
+22 cc 85 00 00 01 00 00 00 01 00 01 05 64 61 63 
+68 74 03 6e 65 74 00 00 1e 00 01 c0 0c 00 06 00 
+01 00 00 0e 10 00 25 02 6e 73 04 72 69 70 65 c0 
+12 04 6f 6c 61 66 c0 2a 77 54 e1 ae 00 00 a8 c0 
+00 00 38 40 00 05 46 00 00 00 1c 20 00 00 29 10 
+00 00 00 80 00 00 05 00 00 00 00 30
+    }
+    uuencodedPacket.map!{|e| e.hex}
+    packetdata = uuencodedPacket.pack('c*')
+
+    packet3 = Message.decode(packetdata)
+    assert(packet3,                                 'new(\data) returned something');         #28
+      
+    assert_equal(packet3.header.qdcount, 1, 'header question count in syntetic packet correct');   #29
+    assert_equal(packet3.header.ancount, 0, 'header answer count in syntetic packet correct');     #30
+    assert_equal(packet3.header.nscount, 1, 'header authority count in syntetic packet  correct'); #31 
+    assert_equal(packet3.header.adcount, 1, 'header additional in sytnetic  packet correct');      #32
+      
+    rr=packet3.additional;
+      
+    assert_equal(Types.OPT, rr[0].type, "Additional section packet is EDNS0 type");                         #33
+    assert_equal(4096, rr[0].klass.code, "EDNS0 packet size correct");                                     #34
+      
+    # In theory its valid to have multiple questions in the question section.
+    # Not many servers digest it though.
+      
+    packet.add_question("bla.foo", Types::TXT, Classes.CH)
+    question = packet.question
+    assert_equal(2, question.length,             'question() returned right number of items poptest:2'); #36            
+  end    
+  
+  def get_test_packet
+    packet=Message.new("254.9.11.10.in-addr.arpa","PTR","IN")
+      
+    packet.add_answer(RR.create(%q[254.9.11.10.in-addr.arpa 86400 IN PTR host-84-11-9-254.customer.example.com]));
+      
+    packet.add_authority(RR.create("9.11.10.in-addr.arpa 86400 IN NS autons1.example.com"));
+    packet.add_authority(RR.create("9.11.10.in-addr.arpa 86400 IN NS autons2.example.com"));
+    packet.add_authority(RR.create("9.11.10.in-addr.arpa 86400 IN NS autons3.example.com"));
+    return packet
+  end
+      
+      
+  def test_push
+    packet = get_test_packet
+    data=packet.encode
+      
+    packet2=Message.decode(data)
+      
+    assert_equal(packet.to_s,packet2.to_s,"Packet to data and back (failure indicates brasserten dn_comp)");  #39      
+  end
+  
+  def test_rrset
+    packet = get_test_packet
+    packet.each_section do |section|
+ #     print "#{section.rrsets}\n"
+    end
+    packet.section_rrsets.each do |section, rrsets|
+#      print "section = #{section}, rrsets = #{rrsets.length}\n"
+    end
+    assert(packet.authority.rrsets.length == 1)
+    assert(packet.question.rrsets.length == 1)
+    assert(packet.answer.rrsets.length == 1)
+    assert(packet.additional.rrsets.length == 0)
+    assert(packet.authority.rrsets[0].length == 3)
+#    assert(packet.additional.rrsets[0].length == 0)
+    assert(packet.question.rrsets[0].length == 1)
+    assert(packet.answer.rrsets[0].length == 1)
+  end
+end