initial commit

1 files changed, 71 insertions, 0 deletions

diff --git a/test/dhcp_test.rb b/test/dhcp_test.rb
new file mode 100644
index 0000000..d8eb0d7
--- /dev/null
+++ b/test/dhcp_test.rb
@@ -0,0 +1,71 @@
+# dhcp_test.rb
+# 4 de octubre de 2007
+#
+
+$:.unshift File.join(File.dirname(__FILE__),'..','lib')
+
+require 'test/unit'
+
+require 'dhcp'
+
+class TestDhcp_test < Test::Unit::TestCase
+#  def setup
+#  end
+#
+#  def teardown
+#  end
+
+  def test_packing
+    # assert_equal("foo", bar)
+
+    # assert, assert_block, assert_equal, assert_in_delta, assert_instance_of,
+    # assert_kind_of, assert_match, assert_nil, assert_no_match, assert_not_equal,
+    # assert_not_nil, assert_not_same, assert_nothing_raised, assert_nothing_thrown,
+    # assert_operator, assert_raise, assert_raises, assert_respond_to, assert_same,
+    # assert_send, assert_throws
+
+    d = DHCP::Discover.new
+    expected = [
+      d.op, d.htype, d.hlen, d.hops, 
+      d.xid, 
+      d.secs, d.flags, 
+      d.ciaddr, 
+      d.yiaddr, 
+      d.siaddr, 
+      d.giaddr,
+      ]
+    expected += d.chaddr
+    expected += [0x00]*192
+    expected << $DHCP_MAGIC
+    
+    payload = d.pack
+    
+    actual = payload.unpack('C4Nn2N4C16C192N')
+    
+    assert_equal expected, actual, 'pack does not work'
+  end
+
+  def test_size
+    d = DHCP::Discover.new
+    payload = d.pack
+    assert_equal 300, payload.size, 'size of the payload does not match'
+  end
+
+  def test_eql?
+    d1 = DHCP::Discover.new
+    d2 = DHCP::Discover.new
+    
+    assert_not_equal d1, d2, '.eql? two messages with different xid field are considered equal'   
+    assert_equal true, d1.options.eql?(d1.options), 'eql? is not working for comparing option arrays'
+  end
+  
+  def test_from_udp_payload 
+    d1 = DHCP::Discover.new
+    d2 = DHCP::Message.from_udp_payload(d1.pack)
+    
+    #assert_equal d1, d2, 'udp data is not correctly parsed'
+    puts d1.eql?(d2)
+    puts(d1 == d2)
+  end
+  
+end