racket 1.0.10

data/test/l3/ts_ipv6.rb

@@ -0,0 +1,26 @@
+# $Id: ts_ipv6.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestIPV6 <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::L3::IPv6.new }
+    assert_nothing_raised() { Racket::L3::IPv6.new(Racket::Misc.randstring(30)) }
+  end
+
+  def test_convert
+    long = rand(0xFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF)
+    ipv6 = Racket::L3::Misc.long2ipv6(long)
+
+    assert_equal(long, Racket::L3::Misc.ipv62long(ipv6))
+    assert_equal(ipv6, Racket::L3::Misc.long2ipv6(long))
+    assert_nothing_raised { Racket::L3::IPv6.new("a:b:c::1") }
+    assert_nothing_raised { Racket::L3::Misc.soll_mcast_addr6(ipv6) }
+    mac = Racket::L2::Misc.randommac
+    assert_nothing_raised { Racket::L3::Misc.soll_mcast_mac(mac) }
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/l3/ts_misc.rb

@@ -0,0 +1,31 @@
+# $Id: ts_misc.rb 135 2009-12-06 20:39:40Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestL3Misc <  Test::Unit::TestCase
+  def test_misc 
+    assert_nothing_raised {
+      Racket::L3::Misc.checksum(Racket::Misc.randstring(rand(2048)))
+    }
+
+    mac = "6e:f1:eb:b7:c8:72"
+    ll = "fe80::6cf1:ebff:feb7:c872"
+    assert_equal(ll, Racket::L3::Misc.linklocaladdr(mac))
+
+    ipv4 = Racket::L3::Misc.randomipv4
+    lipv4 = Racket::L3::Misc.ipv42long(ipv4)
+    ipv6 = Racket::L3::Misc.randomipv6
+    lipv6 = Racket::L3::Misc.ipv62long(ipv6)
+
+    assert_equal(ipv4, Racket::L3::Misc.long2ipv4(lipv4))
+    assert_equal(ipv6, Racket::L3::Misc.long2ipv6(lipv6))
+
+    ipv6 = "a:0:0:0f:0:1"
+    zipv6 = "a::f:0:1"
+    assert_equal(zipv6, Racket::L3::Misc.compressipv6(ipv6))
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/l4/ts_icmp.rb

@@ -0,0 +1,38 @@
+# $Id: ts_icmp.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestICMP <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::L4::ICMP.new }
+    assert_nothing_raised() { Racket::L4::ICMP.new(Racket::Misc.randstring(20)) }
+  end
+
+  def test_raw
+    binary="\x9e\x96\x00\x35\x00\x0c\x69\x4f\x66\x6f\x6f\x0a"
+    binary="\x08\x00\x05\x7e\xab\x58\x00\x01\x78\xf1\x09\x4b\x00\x00\x00\x00\xce\xe6\x05\x00\x00\x00\x00\x00\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b"
+    assert_nothing_raised() { i = Racket::L4::ICMP.new(binary) }
+    i = Racket::L4::ICMP.new(binary)
+    assert_equal(i.type, 8)
+    assert_equal(i.code, 0)
+    assert_equal(i.checksum, 0x057e)
+    assert_equal(i.payload,
+    "\xab\x58\x00\x01\x78\xf1\x09\x4b\x00\x00\x00\x00\xce\xe6\x05\x00\x00\x00\x00\x00\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b\x0c\x0d\x0e\x0f\x0a\x0b")
+  end
+
+  def test_build
+    i = Racket::L4::ICMP.new
+    assert_nothing_raised() {
+      i.type = 8
+      i.code = 0 
+      i.payload = "thisisatest"
+      i.fix!
+    }
+    assert_equal(i.checksum, 30152)
+  end
+  
+end
+# vim: set ts=2 et sw=2:

data/test/l4/ts_tcp.rb

@@ -0,0 +1,55 @@
+# $Id: ts_tcp.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestTCP <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::L4::TCP.new }
+    assert_nothing_raised() { Racket::L4::TCP.new(Racket::Misc.randstring(20)) }
+  end
+
+  def test_attrs
+    binary="\x90\xef\x08\xae\x47\x87\xa0\x34\x00\x00\x00\x00\xa0\x02\x16\xd0\xc2\x17\x00\x00\x02\x04\x05\xb4\x04\x02\x08\x0a\x03\x0f\xc8\x6e\x00\x00\x00\x00\x01\x03\x03\x07"
+   
+    assert_nothing_raised() { i = Racket::L4::TCP.new(binary) }
+    i = Racket::L4::TCP.new(binary)
+    assert_equal(i.dst_port, 2222)
+    assert_equal(i.src_port, 37103)
+    assert_equal(i.flag_syn, 1)
+    assert_equal(i.flag_ack, 0)
+    assert_equal(i.seq, 0x4787a034)
+    assert_equal(i.ack, 0)
+    assert_equal(i.window, 5840)
+    assert_equal(i.checksum, 0xc217)
+    assert_equal(i.payload,
+    "\x02\x04\x05\xb4\x04\x02\x08\x0a\x03\x0f\xc8\x6e\x00\x00\x00\x00\x01\x03\x03\x07")
+
+  end
+
+  def test_build_no_options
+    i = Racket::L4::TCP.new
+    assert_nothing_raised() {
+      i.src_port = 44781 
+      i.dst_port = 5190 
+      i.seq = 0x4e3e537a
+      i.ack = 0xbdca7ef8
+      i.flag_ack = 1
+      i.flag_psh = 1
+      i.offset = 5
+      i.window = 61200
+      i.payload = "\x2a\x05\x0b\xca\x00\x00"
+    }
+
+    i.checksum!("192.168.1.10", "64.12.26.128")
+    assert_equal(i.checksum, 0xccf8)
+  end
+  
+  def test_build_with_options
+    i = Racket::L4::TCP.new
+    i.add_option(1, "blah")
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/l4/ts_udp.rb

@@ -0,0 +1,40 @@
+# $Id: ts_udp.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestUDP <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::L4::UDP.new }
+    assert_nothing_raised() { Racket::L4::UDP.new(Racket::Misc.randstring(20)) }
+  end
+
+  def test_raw
+    binary="\x9e\x96\x00\x35\x00\x0c\x69\x4f\x66\x6f\x6f\x0a"
+    assert_nothing_raised() { i = Racket::L4::UDP.new(binary) }
+    i = Racket::L4::UDP.new(binary)
+    assert_equal(i.dst_port, 53)
+    assert_equal(i.src_port, 40598)
+    assert_equal(i.checksum, 0x694f)
+    assert_equal(i.len, 12)
+    assert_equal(i.payload, "foo\n")
+  end
+
+  def test_build
+    i = Racket::L4::UDP.new
+    assert_nothing_raised() {
+      i.src_port = 50243 
+      i.dst_port = 53
+      i.payload = "hhahahahahah"
+      i.fix!("192.168.1.10", "1.2.3.4")
+    }
+
+    assert_equal(i.checksum, 0x2623)
+    assert_equal(i.len, 20)
+
+  end
+  
+end
+# vim: set ts=2 et sw=2:

data/test/misc/ts_lv.rb

@@ -0,0 +1,59 @@
+# $Id: ts_lv.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestLV <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::Misc::LV.new(2) }
+    assert_nothing_raised() { Racket::Misc::LV.new(2,4,1,1,6) }
+  end
+
+  def test_decode
+    t1 = Racket::Misc::LV.new(2)
+    s1 = "\x00\x0b\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67"
+    t1.decode!(s1)
+    assert_equal(t1.lengths[0], 11)
+    assert_equal(t1.values[0], "spoofed.org")
+
+    t2 = Racket::Misc::LV.new(1,2,2,4)
+    s2 = "\x02\xab\xcd\x00\x01\xff\x00\x04\xde\xad\xba\xbe\x00\x00\x00\x0a\xff\xff\xff\xff\xff\xff\xff\xff\xff\xffwtf?"
+    t2.decode!(s2)
+    assert_equal(t2.lengths[0], 2)
+    assert_equal(t2.values[0], "\xab\xcd")
+    assert_equal(t2.lengths[1], 1)
+    assert_equal(t2.values[1], "\xff")
+    assert_equal(t2.lengths[2], 4)
+    assert_equal(t2.values[2], "\xde\xad\xba\xbe")
+    assert_equal(t2.lengths[3], 10)
+    assert_equal(t2.values[3], "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")
+    assert_equal(t2.rest, "wtf?")
+  end
+
+  def test_encode
+    t1 = Racket::Misc::LV.new(2)
+    s1 = "\x00\x0bspoofed.org"
+    t1.decode!(s1)
+    assert_equal(t1.encode, s1)
+    assert_equal("#{t1}", s1)
+
+    t2 = Racket::Misc::LV.new(1,2,2)
+    s2 = "\x01\xff\x00\x02\xff\xff\x00\x0bspoofed.org\xff\xff\xffwtf?"
+    t2.decode!(s2)
+    assert_equal(t2.encode, s2.slice(0, s2.size - 7))
+    assert_equal("#{t2}", s2.slice(0, s2.size - 7))
+
+    t3 = Racket::Misc::LV.new(1,1,1)
+    t3.lengths = [2,2,2]
+    t3.values = ["ww", "tt", "ff"]
+    assert_equal(t3.encode, "\x02ww\x02tt\x02ff")
+
+    t3 = Racket::Misc::LV.new(1,1,1)
+    t3.lengths = [2,2,4]
+    t3.values = ["ww", "tt", "ff"]
+    assert_equal(t3.encode, "\x02ww\x02tt\x04ff\00\00")
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/misc/ts_orderedhash.rb

@@ -0,0 +1,33 @@
+# $Id: ts_orderedhash.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestBitField <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::Misc::OrderedHash.new }
+  end
+  def test_order
+    oh = Racket::Misc::OrderedHash.new
+    ("a".."z").each { |c|
+        oh[c] = c.unpack("c")[0]
+    } 
+
+    97.upto(122) { |v| 
+      assert_equal(oh[sprintf("%c", v)], v)      
+    } 
+
+    assert_nil(oh['kajf'])
+    
+    copy = []
+    oh.each_key { |k| copy << k }
+    0.upto(25) { |v|
+      assert_equal(copy[v], sprintf("%c", 97 + v))
+    }
+
+    assert_nil(copy[205])
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/misc/ts_tlv.rb

@@ -0,0 +1,47 @@
+# $Id: ts_tlv.rb 147 2009-12-13 02:45:09Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestTLV <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::Misc::TLV.new(2,4) }
+  end
+
+  def test_decode
+    t = Racket::Misc::TLV.new(4,2)
+    s = "\x08\x05\x0c\x23\x00\x0b\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\xff\x00\xba"
+    t.decode!(s)
+
+    assert_equal(t.type, 0x08050c23)
+    assert_equal(t.length, 11)
+    assert_equal(t.value, "spoofed.org")
+    assert_equal(t.rest, "\xff\x00\xba")
+
+    t2 = Racket::Misc::TLV.new(1,1,8)
+    s2 = "\x02\x01\xaa\xbb\xcc\xdd\xee\xff"
+    t2.decode!(s2)
+    assert_equal(t2.type, 2)
+    assert_equal(t2.length, 1)
+    assert_equal(t2.value, "\xaa\xbb\xcc\xdd\xee\xff")
+
+    t3 = Racket::Misc::TLV.new(1,1,8,false)
+    s3 = "\x02\x01\xaa\xbb\xcc\xdd\xee\xff\x11\x22"
+    t3.decode!(s3)
+    assert_equal(t3.type, 2)
+    assert_equal(t3.length, 1)
+    assert_equal(t3.value, "\xaa\xbb\xcc\xdd\xee\xff\x11\x22")
+
+  end
+
+  def test_encode
+    t = Racket::Misc::TLV.new(4,2)
+    s = "\x08\x05\x0c\x23\x00\x0b\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\xff\xff"
+    t.decode!(s)
+    assert_equal(t.encode, s.slice(0, s.length - 2))
+    assert_equal("#{t}", s.slice(0, s.length - 2))
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/misc/ts_vt.rb

@@ -0,0 +1,56 @@
+# $Id: ts_vt.rb 129 2009-11-29 01:37:06Z jhart $
+
+$:.unshift File.join(File.dirname(__FILE__), "../..", "lib")
+
+require 'test/unit'
+require 'racket'
+
+class TestVT <  Test::Unit::TestCase
+  def test_init
+    assert_nothing_raised() { Racket::Misc::VT.new(2) }
+    assert_nothing_raised() { Racket::Misc::VT.new(2,4,4,4,4,4,12,3) }
+  end
+
+  def test_decode
+    s1 = "\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\x00\x01\x02\x03\x04\xab\xcd\xef"
+    t1 = Racket::Misc::VT.new
+    t1.decode!(s1)
+    assert_equal(t1.value, "spoofed.org")
+    assert_equal(t1.types.size, 0)
+    assert_equal(t1.rest, "\x01\x02\x03\x04\xab\xcd\xef")
+
+    t2 = Racket::Misc::VT.new(4)
+    s2 = "\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\x00\x01\x02\x03\x04"
+    t2.decode!(s2)
+
+    assert_equal(t2.types[0], 0x01020304)
+    assert_equal(t2.value, "spoofed.org")
+    assert_equal(t2.rest, "")
+
+    t3 = Racket::Misc::VT.new(1,2,2,4)
+    s3 = "\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\x00\x01\x02\x03\x04\x05\xde\xad\xba\xbe\x11\xff"
+    t3.decode!(s3)
+
+    assert_equal(t3.types[0], 0x01)
+    assert_equal(t3.types[1], 0x0203)
+    assert_equal(t3.types[2], 0x0405)
+    assert_equal(t3.types[3], 0xdeadbabe)
+    assert_equal(t3.value, "spoofed.org")
+    assert_equal(t3.rest, "\x11\xff")
+  end
+
+  def test_encode
+    t1 = Racket::Misc::VT.new(4)
+    s1 = "\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\x00\x01\x02\x03\x04"
+    t1.decode!(s1)
+    assert_equal(t1.encode, s1)
+    assert_equal("#{t1}", s1)
+
+    t2 = Racket::Misc::VT.new(1,2,2,4)
+    s2 = "\x73\x70\x6f\x6f\x66\x65\x64\x2e\x6f\x72\x67\x00\x01\x02\x03\x04\x05\xde\xad\xba\xbe\xff\xff"
+    t2.decode!(s2)
+    assert_equal(t2.encode, s2.slice(0, s2.size - 2))
+    assert_equal("#{t2}", s2.slice(0, s2.size - 2))
+  end
+end
+# vim: set ts=2 et sw=2:

data/test/ts_all.rb

@@ -0,0 +1,14 @@
+# $Id: ts_all.rb 90 2009-11-27 08:22:20Z jhart $
+
+#require 'rubygems'
+
+(2..5).each do |l|
+  Dir.glob(File.join(File.dirname(__FILE__) + "/l#{l}", '*.rb')).each do |f|
+    require f
+  end
+end
+
+Dir.glob(File.join(File.dirname(__FILE__) + "/misc", '*.rb')).each do |f|
+  require f
+end
+# vim: set ts=2 et sw=2:

metadata

@@ -0,0 +1,182 @@
+--- !ruby/object:Gem::Specification 
+name: racket
+version: !ruby/object:Gem::Version 
+  hash: 3
+  prerelease: 
+  segments: 
+  - 1
+  - 0
+  - 10
+  version: 1.0.10
+platform: ruby
+authors: 
+- Jon Hart
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-12-14 00:00:00 Z
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: pcaprub
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: bit-struct
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+description: Ruby Gem for reading and writing raw packets
+email: jhart@spoofed.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- README
+files: 
+- examples/dhcp-spew
+- examples/ipv6
+- examples/egp
+- examples/hsrp
+- examples/icmpv6-spew
+- examples/sctp
+- examples/tcp
+- examples/stp-send
+- examples/igmpv2
+- examples/dhcp
+- examples/udp
+- examples/vtp
+- examples/ntp2
+- examples/igrp-send
+- examples/icmp-recv
+- examples/cdp-spew
+- examples/arp-send
+- examples/synflood
+- examples/arp-send2
+- examples/icmpv6
+- examples/tcp2udp
+- examples/vrrp
+- examples/icmp-spew
+- examples/igmpv1
+- examples/ntp
+- examples/hsrp_takeover
+- examples/dns
+- examples/cdp
+- lib/racket.rb
+- lib/racket/l2.rb
+- lib/racket/l5/ntp.rb
+- lib/racket/l5/dns.rb
+- lib/racket/l5/hsrp.rb
+- lib/racket/l5/bootp.rb
+- lib/racket/l5/misc.rb
+- lib/racket/l3.rb
+- lib/racket/l2/snap.rb
+- lib/racket/l2/llc.rb
+- lib/racket/l2/ethernet.rb
+- lib/racket/l2/misc.rb
+- lib/racket/l2/eightotwodotthree.rb
+- lib/racket/l2/vtp.rb
+- lib/racket/l2/vlan.rb
+- lib/racket/l3/egp.rb
+- lib/racket/l3/ipv4.rb
+- lib/racket/l3/arp.rb
+- lib/racket/l3/cdp.rb
+- lib/racket/l3/misc.rb
+- lib/racket/l3/ipv6.rb
+- lib/racket/l3/stp.rb
+- lib/racket/l4.rb
+- lib/racket/l4/igrp.rb
+- lib/racket/l4/igmpv2.rb
+- lib/racket/l4/igmpv1.rb
+- lib/racket/l4/vrrp.rb
+- lib/racket/l4/sctp.rb
+- lib/racket/l4/icmp.rb
+- lib/racket/l4/udp.rb
+- lib/racket/l4/misc.rb
+- lib/racket/l4/gre.rb
+- lib/racket/l4/icmpv6.rb
+- lib/racket/l4/tcp.rb
+- lib/racket/racket.rb
+- lib/racket/l5.rb
+- lib/racket/misc.rb
+- lib/racket/misc/raw.rb
+- lib/racket/misc/tlv.rb
+- lib/racket/misc/misc.rb
+- lib/racket/misc/orderedhash.rb
+- lib/racket/misc/lv.rb
+- lib/racket/misc/vt.rb
+- lib/racket/racketpart.rb
+- test/l2/ts_vlan.rb
+- test/l2/ts_misc.rb
+- test/l2/ts_ethernet.rb
+- test/ts_all.rb
+- test/l3/ts_ipv6.rb
+- test/l3/ts_misc.rb
+- test/l3/ts_ipv4.rb
+- test/l4/ts_tcp.rb
+- test/l4/ts_udp.rb
+- test/l4/ts_icmp.rb
+- test/misc/ts_lv.rb
+- test/misc/ts_orderedhash.rb
+- test/misc/ts_vt.rb
+- test/misc/ts_tlv.rb
+- README
+homepage: http://spoofed.org/files/racket/
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- -A rest,octets,hex_octets,unsigned,signed,text,rest
+- -p
+- -m
+- README
+- -W http://spoofed.org/files/racket/src/%s
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.8.12
+signing_key: 
+specification_version: 3
+summary: Packet foo
+test_files: 
+- test/ts_all.rb