net-dns2 0.8.1

data/test/rr/classes_test.rb

@@ -0,0 +1,85 @@
+require 'test_helper'
+require 'net/dns/rr'
+
+class RRClassesTest < Test::Unit::TestCase
+
+  def setup
+    @classes = {
+    }
+    @regexp_string = "ANY|CH|HS|IN|NONE"
+  end
+
+
+  StrAndNum = [
+      ['IN'   ,   1],
+      ['CH'   ,   3],
+      ['HS'   ,   4],
+      ['NONE' , 254],
+      ['ANY'  , 255],
+  ]
+
+  StrAndNum.each do |str, num|
+    define_method "test_initialize_from_str_#{str}" do
+      instance = Net::DNS::RR::Classes.new(str)
+      assert_equal str, instance.to_s
+      assert_equal num, instance.to_i
+    end
+    define_method "test_initialize_from_num_#{num}" do
+      instance = Net::DNS::RR::Classes.new(num)
+      assert_equal str, instance.to_s
+      assert_equal num, instance.to_i
+    end
+  end
+
+  def test_initialize_should_raise_with_invalid_class
+    assert_raises(ArgumentError) { Net::DNS::RR::Classes.new(Hash.new) }
+  end
+
+
+  def test_inspect
+    assert_equal 1, Net::DNS::RR::Classes.new(1).inspect
+    assert_equal 1, Net::DNS::RR::Classes.new("IN").inspect
+  end
+
+  def test_to_s
+    assert_equal "IN", Net::DNS::RR::Classes.new(1).to_s
+    assert_equal "IN", Net::DNS::RR::Classes.new("IN").to_s
+  end
+
+  def test_to_i
+    assert_equal 1, Net::DNS::RR::Classes.new(1).to_i
+    assert_equal 1, Net::DNS::RR::Classes.new("IN").to_i
+  end
+
+
+  def test_self_default
+    # Default type should be ANY => 255
+    instance = Net::DNS::RR::Classes.new(nil)
+    assert_equal 1,    instance.to_i
+    assert_equal "IN", instance.to_s
+
+    # Let's change default behaviour
+    Net::DNS::RR::Classes.default = "CH"
+    instance = Net::DNS::RR::Classes.new(nil)
+    assert_equal 3,    instance.to_i
+    assert_equal "CH", instance.to_s
+
+    Net::DNS::RR::Classes.default = "IN"
+    instance = Net::DNS::RR::Classes.new(nil)
+    assert_equal 1,    instance.to_i
+    assert_equal "IN", instance.to_s
+  end
+
+  def test_self_valid?
+    assert  Net::DNS::RR::Classes.valid?("IN")
+    assert  Net::DNS::RR::Classes.valid?(1)
+    assert !Net::DNS::RR::Classes.valid?("Q")
+    assert !Net::DNS::RR::Classes.valid?(256)
+    assert_raises(ArgumentError) { Net::DNS::RR::Classes.valid?(Hash.new) }
+  end
+
+  def test_self_regexp
+    assert_equal @regexp_string, Net::DNS::RR::Classes.regexp
+  end
+
+end

data/test/rr/cname_test.rb

@@ -0,0 +1,97 @@
+require 'test_helper'
+require 'net/dns/rr'
+
+class RRCNAMETest < Test::Unit::TestCase
+
+  def setup
+    @rr_name    = "www.google.com."
+    @rr_type    = "CNAME"
+    @rr_cls     = "IN"
+    @rr_ttl     = 550317
+    @rr_value   = "www.l.google.com."
+    @rr_cname   = @rr_value
+
+    @rr_output  = "www.google.com.         550317  IN      CNAME   www.l.google.com."
+
+    @rr         = Net::DNS::RR::CNAME.new(:name => @rr_name, :cname => @rr_cname, :ttl => @rr_ttl)
+  end
+
+
+  def test_initialize_from_hash
+    @record = Net::DNS::RR::CNAME.new(:name => @rr_name, :cname => @rr_value, :ttl => @rr_ttl)
+    assert_equal @rr_output,  @record.to_s
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal @rr_ttl,     @record.ttl
+    assert_equal @rr_cname,   @record.cname
+    assert_equal @rr_value,   @record.value
+  end
+
+  def test_initialize_from_string
+    @record = Net::DNS::RR::CNAME.new("#{@rr_name} #{@rr_ttl} #{@rr_cls} #{@rr_type} #{@rr_value}")
+    assert_equal @rr_output,  @record.to_s
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal @rr_ttl,     @record.ttl
+    assert_equal @rr_cname,   @record.cname
+    assert_equal @rr_value,   @record.value
+  end
+
+  def test_parse
+    data = "\003www\006google\003com\000\000\005\000\001\000\be\255\000\022\003www\001l\006google\003com\000"
+    @record = Net::DNS::RR.parse(data)
+    assert_equal @rr_output,  @record.to_s
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal @rr_ttl,     @record.ttl
+    assert_equal @rr_cname,   @record.cname
+    assert_equal @rr_value,   @record.value
+  end
+
+
+  InvalidArguments = [
+    # FIXME: { :name => "google.com", :cname => "foo___bar" },
+    # FIXME: { :name => "google.com", :cname => "foo$bar" },
+    { :name => "google.com" },
+    Object.new,
+    Array.new(7),
+    "10800 IN CNAME",
+    "google.com. 10800 IN CNAME",
+  ]
+
+  InvalidArguments.each_with_index do |arguments, index|
+    define_method "test_initialize_should_raise_with_invalid_arguments_#{index}" do
+      assert_raises(ArgumentError) { p Net::DNS::RR::CNAME.new(arguments) }
+    end
+  end
+
+
+  def test_cname_getter
+    assert_equal  @rr_cname, @rr.cname
+  end
+
+
+  def test_value
+    assert_equal  @rr_value, @rr.value
+  end
+
+
+  def test_inspect
+    assert_equal  "www.google.com.         550317  IN      CNAME   www.l.google.com.",
+                  @rr.inspect
+  end
+
+  def test_to_s
+    assert_equal  "www.google.com.         550317  IN      CNAME   www.l.google.com.",
+                  @rr.to_s
+  end
+
+  def test_to_a
+    assert_equal  ["www.google.com.", 550317, "IN", "CNAME", "www.l.google.com."],
+                  @rr.to_a
+  end
+
+end

data/test/rr/hinfo_test.rb

@@ -0,0 +1,117 @@
+require 'test_helper'
+require 'net/dns/rr'
+require 'net/dns/rr/hinfo'
+
+class RRHINFOTest < Test::Unit::TestCase
+
+  def setup
+    @rr_name    = ""
+    @rr_type    = "HINFO"
+    @rr_cls     = "IN"
+    @rr_ttl     = nil
+    @rr_value   = %Q{"PC-Intel-700mhz" "Redhat Linux 7.1"}
+    @rr_output  = %Q{                                IN      HINFO   "PC-Intel-700mhz" "Redhat Linux 7.1"}
+
+    @rr_cpu     = "PC-Intel-700mhz"
+    @rr_os      = "Redhat Linux 7.1"
+
+    @rr         = Net::DNS::RR::HINFO.new(:name => @rr_name, :cpu => @rr_cpu, :os => @rr_os)
+  end
+
+
+  def test_initialize_from_hash
+    @record = Net::DNS::RR::HINFO.new(:name => @rr_name, :cpu => @rr_cpu, :os => @rr_os)
+    assert_equal @rr_output,  @record.to_s
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal 10800,       @record.ttl
+    assert_equal @rr_value,   @record.value
+
+    assert_equal @rr_cpu,     @record.cpu
+    assert_equal @rr_os,      @record.os
+  end
+
+  def test_initialize_from_string
+    @record = Net::DNS::RR::HINFO.new(%Q{#{@rr_name} #{@rr_ttl} #{@rr_cls} #{@rr_type} PC-Intel-700mhz "Redhat Linux 7.1"})
+    assert_equal @rr_output,  @record.to_s
+    assert_equal @rr_value,   @record.value
+
+    assert_equal @rr_cpu,     @record.cpu
+    assert_equal @rr_os,      @record.os
+  end
+
+  def test_initialize_from_string_without_quotes
+    @record = Net::DNS::RR::HINFO.new("#{@rr_name} #{@rr_ttl} #{@rr_cls} #{@rr_type} #{@rr_value}")
+    assert_equal @rr_output,  @record.to_s
+    # FIXME: assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal 10800,       @record.ttl
+    assert_equal @rr_value,   @record.value
+
+    assert_equal @rr_cpu,     @record.cpu
+    assert_equal @rr_os,      @record.os
+  end
+
+  # FIXME: Can't get valid data
+  # def test_parse
+  #   data = "\002in\000\000\r\000\001\000\000*0\000!\017PC-Intel-700mhz\020Redhat Linux 7.1"
+  #   @record = Net::DNS::RR.parse(data)
+  #   assert_equal @rr_output,  @record.to_s
+  #   assert_equal @rr_name,    @record.name
+  #   assert_equal @rr_type,    @record.type
+  #   assert_equal @rr_cls,     @record.cls
+  #   assert_equal @rr_ttl,     @record.ttl
+  #   assert_equal @rr_value,   @record.value
+  #
+  #   assert_equal @rr_cpu,     @record.cpu
+  #   assert_equal @rr_os,      @record.os
+  # end
+
+
+  InvalidArguments = [
+    { :name => "google.com" },
+    Object.new,
+    Array.new(7),
+    "10800 IN HINFO",
+    "IN HINFO",
+  ]
+
+  InvalidArguments.each_with_index do |arguments, index|
+    define_method "test_initialize_should_raise_with_invalid_arguments_#{index}" do
+      assert_raises(ArgumentError) { p Net::DNS::RR::HINFO.new(arguments) }
+    end
+  end
+
+
+  def test_cpu
+    assert_equal  @rr_cpu, @rr.cpu
+  end
+
+  def test_os
+    assert_equal  @rr_os, @rr.os
+  end
+
+
+  def test_value
+    assert_equal  %Q{"PC-Intel-700mhz" "Redhat Linux 7.1"}, @rr.value
+  end
+
+
+  def test_inspect
+    assert_equal  %Q{                                IN      HINFO   "PC-Intel-700mhz" "Redhat Linux 7.1"},
+                  @rr.inspect
+  end
+
+  def test_to_s
+    assert_equal  %Q{                                IN      HINFO   "PC-Intel-700mhz" "Redhat Linux 7.1"},
+                  @rr.to_s
+  end
+
+  def test_to_a
+    assert_equal  [nil, nil, "IN", "HINFO", %Q{"PC-Intel-700mhz" "Redhat Linux 7.1"}],
+                  @rr.to_a
+  end
+
+end

data/test/rr/mr_test.rb

@@ -0,0 +1,105 @@
+require 'test_helper'
+require 'net/dns/rr'
+
+class RRMRTest < Test::Unit::TestCase
+
+  def setup
+    @klass      = Net::DNS::RR::MR
+    @rr         = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.bornagain.edu.", :ttl => 9000)
+
+    @rr_name    = "eddie.movie.edu."
+    @rr_type    = "MR"
+    @rr_cls     = "IN"
+    @rr_ttl     = 9000
+    @rr_newname = "eddie.bornagain.edu."
+    @rr_value   = "eddie.bornagain.edu."
+    @rr_output  = "eddie.movie.edu.        9000    IN      MR      eddie.bornagain.edu."
+  end
+
+
+  def test_initialize_from_hash
+    @record = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.bornagain.edu.", :ttl => 9000)
+    assert_equal @rr_output,  @record.inspect
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal @rr_ttl,     @record.ttl
+    assert_equal @rr_newname, @record.newname
+  end
+
+  def test_initialize_from_string
+    @record = @klass.new("eddie.movie.edu.  9000  IN  MR  eddie.bornagain.edu.")
+    assert_equal @rr_output,  @record.inspect
+    assert_equal @rr_name,    @record.name
+    assert_equal @rr_type,    @record.type
+    assert_equal @rr_cls,     @record.cls
+    assert_equal @rr_ttl,     @record.ttl
+    assert_equal @rr_newname, @record.newname
+  end
+
+  # def test_parse
+  #   data = "\005eddie\005movie\003edu\000\000\t\000\001\000\000#(\000\025\005eddie\tbornagain\003edu\000"
+  #   @record = Net::DNS::RR.parse(data)
+  #   assert_equal @rr_output,  @record.inspect
+  #   assert_equal @rr_name,    @record.name
+  #   assert_equal @rr_type,    @record.type
+  #   assert_equal @rr_cls,     @record.cls
+  #   assert_equal @rr_ttl,     @record.ttl
+  #   assert_equal @rr_newname, @record.newname
+  # end
+
+
+  InvalidArguments = [
+    # FIXME: { :name => "eddie.movie.edu.", :newname => "foo___bar" },
+    # FIXME: { :name => "eddie.movie.edu.", :newname => "foo$bar" },
+    # FIXME: { :name => "eddie.movie.edu", :newname => "eddie.newname.edu." },
+    Object.new,
+    Array.new(7),
+    "9000  IN  MR",
+  ]
+
+  InvalidArguments.each_with_index do |arguments, index|
+    define_method "test_initialize_should_raise_with_invalid_arguments_#{index}" do
+      assert_raises(ArgumentError) { @klass.new(arguments) }
+    end
+  end
+
+  def test_initialize_should_raise_with_missing_newname
+    error = assert_raises(ArgumentError) { @klass.new(:name => "eddie.movie.edu.") }
+    assert_match /:newname/, error.message
+  end
+
+
+  def test_value
+    @rr = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.newname.edu.")
+    assert_equal  "eddie.newname.edu.", @rr.value
+
+    @rr = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.othername.edu.")
+    assert_equal  "eddie.othername.edu.", @rr.value
+  end
+
+  def test_newname
+    @rr = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.newname.edu.")
+    assert_equal  "eddie.newname.edu.", @rr.newname
+
+    @rr = @klass.new(:name => "eddie.movie.edu.", :newname => "eddie.othername.edu.")
+    assert_equal  "eddie.othername.edu.", @rr.newname
+  end
+
+
+  def test_inspect
+    assert_equal  "eddie.movie.edu.        9000    IN      MR      eddie.bornagain.edu.",
+                  @rr.inspect
+  end
+
+  def test_to_s
+    assert_equal  "eddie.movie.edu.        9000    IN      MR      eddie.bornagain.edu.",
+                  @rr.to_s
+  end
+
+  def test_to_a
+    assert_equal  ["eddie.movie.edu.", 9000, "IN", "MR", "eddie.bornagain.edu."],
+                  @rr.to_a
+  end
+
+end

data/test/rr/mx_test.rb

@@ -0,0 +1,112 @@
+require 'test_helper'
+require 'net/dns/rr'
+
+class RRMXTest < Test::Unit::TestCase
+
+  def setup
+    @rr_name        = "example.com."
+    @rr_type        = "MX"
+    @rr_cls         = "IN"
+    @rr_ttl         = 10000
+    @rr_preference  = 10
+    @rr_exchange    = "mail.example.com."
+    @rr_value       = "#{@rr_preference} #{@rr_exchange}"
+
+    @rr_output  = "example.com.            10000   IN      MX      10 mail.example.com."
+
+    @rr         = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail.example.com.", :ttl => 10000)
+  end
+
+
+  def test_initialize_from_hash
+    @record = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail.example.com.", :ttl => 10000)
+    assert_equal @rr_output,      @record.to_s
+    assert_equal @rr_name,        @record.name
+    assert_equal @rr_type,        @record.type
+    assert_equal @rr_cls,         @record.cls
+    assert_equal @rr_ttl,         @record.ttl
+    assert_equal @rr_preference,  @record.preference
+    assert_equal @rr_exchange,    @record.exchange
+  end
+
+  def test_initialize_from_string
+    @record = Net::DNS::RR::MX.new("example.com. 10000 IN MX 10 mail.example.com.")
+    assert_equal @rr_output,      @record.to_s
+    assert_equal @rr_name,        @record.name
+    assert_equal @rr_type,        @record.type
+    assert_equal @rr_cls,         @record.cls
+    assert_equal @rr_ttl,         @record.ttl
+    assert_equal @rr_preference,  @record.preference
+    assert_equal @rr_exchange,    @record.exchange
+  end
+
+  # FIXME: can't get it working with canned data
+  # def test_parse
+  #   data = "\001\220\006google\003com\004s9b2\005psmtp\003com\000"
+  #   @record = Net::DNS::RR.parse(data)
+  #   assert_equal @rr_output,      @record.to_s
+  #   assert_equal @rr_name,        @record.name
+  #   assert_equal @rr_type,        @record.type
+  #   assert_equal @rr_cls,         @record.cls
+  #   assert_equal @rr_ttl,         @record.ttl
+  #   assert_equal @rr_preference,  @record.preference
+  #   assert_equal @rr_exchange,    @record.exchange
+  # end
+
+
+  InvalidArguments = [
+    { :name => "google.com" },
+    Object.new,
+    Array.new(7),
+    "10800 IN NS",
+    "google.com. 10800 IN NS",
+  ]
+
+  InvalidArguments.each_with_index do |arguments, index|
+    define_method "test_initialize_should_raise_with_invalid_arguments_#{index}" do
+      assert_raises(ArgumentError) { p Net::DNS::RR::MX.new(arguments) }
+    end
+  end
+
+
+  def test_preference
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail.example.com.")
+    assert_equal  10, @rr.preference
+
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 100, :exchange => "mail.example.com.")
+    assert_equal  100, @rr.preference
+  end
+
+  def test_exchange
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail.example.com.")
+    assert_equal  "mail.example.com.", @rr.exchange
+
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail2.example.com.")
+    assert_equal  "mail2.example.com.", @rr.exchange
+  end
+
+  def test_value
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 10, :exchange => "mail.example.com.")
+    assert_equal  "10 mail.example.com.", @rr.value
+
+    @rr = Net::DNS::RR::MX.new(:name => "example.com.", :preference => 100, :exchange => "mail2.example.com.")
+    assert_equal  "100 mail2.example.com.", @rr.value
+  end
+
+
+  def test_inspect
+    assert_equal  "example.com.            10000   IN      MX      10 mail.example.com.",
+                  @rr.inspect
+  end
+
+  def test_to_s
+    assert_equal  "example.com.            10000   IN      MX      10 mail.example.com.",
+                  @rr.to_s
+  end
+
+  def test_to_a
+    assert_equal  ["example.com.", 10000, "IN", "MX", "10 mail.example.com."],
+                  @rr.to_a
+  end
+
+end