bitcoin-ruby 0.0.1

data/spec/bitcoin/fixtures/rawtx-c99c49da4c38af669dea436d3e73780dfdb6c1ecf9958baa52960e8baee30e73.json

@@ -0,0 +1,24 @@
+{
+  "hash":"c99c49da4c38af669dea436d3e73780dfdb6c1ecf9958baa52960e8baee30e73",
+  "ver":1,
+  "vin_sz":1,
+  "vout_sz":1,
+  "lock_time":0,
+  "size":225,
+  "in":[
+    {
+      "prev_out":{
+        "hash":"406b2b06bcd34d3c8733e6b79f7a394c8a431fbf4ff5ac705c93f4076bb77602",
+        "n":0
+      },
+      "scriptSig":"3046022100d23459d03ed7e9511a47d13292d3430a04627de6235b6e51a40f9cd386f2abe3022100e7d25b080f0bb8d8d5f878bba7d54ad2fda650ea8d158a33ee3cbd11768191fd00 04b0e2c879e4daf7b9ab68350228c159766676a14f5815084ba166432aab46198d4cca98fa3e9981d0a90b2effc514b76279476550ba3663fdcaff94c38420e9d5",
+      "sequence":0
+    }
+  ],
+  "out":[
+    {
+      "value":"0.04000000",
+      "scriptPubKey":"OP_DUP OP_HASH160 9a7b0f3b80c6baaeedce0a0842553800f832ba1f OP_EQUALVERIFY OP_CHECKSIG"
+    }
+  ]
+}

data/spec/bitcoin/fixtures/rawtx-de35d060663750b3975b7997bde7fb76307cec5b270d12fcd9c4ad98b279c28c.json

@@ -0,0 +1,23 @@
+{
+  "hash":"de35d060663750b3975b7997bde7fb76307cec5b270d12fcd9c4ad98b279c28c",
+  "ver":1,
+  "vin_sz":1,
+  "vout_sz":1,
+  "lock_time":0,
+  "size":221,
+  "in":[
+    {
+      "prev_out":{
+        "hash":"14925a9b197f15b6ba973313354c19ac9ae044c7e1b5518925ab773f52f6adc8",
+        "n":1
+      },
+      "scriptSig":"3044022032b6ee603a6df9f1830bd760e0347c1844a6623e99a8696321e56dadc01571a90220139ff8000df587633d338c79f343f7258d49c41e7a3b0e21557024cd25fcf0e101 04ef74b6f3e660a29d0e29edcdcd6e662554f61abf90ccadc699aef81bbd273eec270555f933b2053098981eb5343fc2f1f381b493e4da5ca051d69ed12d347aa5"
+    }
+  ],
+  "out":[
+    {
+      "value":"1.00000000",
+      "scriptPubKey":"OP_HASH160 8f55563b9a19f321c211e9b9f38cdf686ea07845 OP_EQUAL"
+    }
+  ]
+}

data/spec/bitcoin/fixtures/rawtx-testnet-a220adf1902c46a39db25a24bc4178b6a88440f977a7e2cabfdd8b5c1dd35cfb.json

@@ -0,0 +1,27 @@
+{
+  "hash":"a220adf1902c46a39db25a24bc4178b6a88440f977a7e2cabfdd8b5c1dd35cfb",
+  "ver":1,
+  "vin_sz":1,
+  "vout_sz":2,
+  "lock_time":0,
+  "size":295,
+  "in":[
+    {
+      "prev_out":{
+        "hash":"0000000000000000000000000000000000000000000000000000000000000000",
+        "n":4294967295
+      },
+      "coinbase":"b713e387dc308380489f496835dbb7c8a764924bea50842983f6e14d710d70092d10400300000000eb02534c805d49b09676fc1947152834e21cc574a25bbb683d19e3460000000000f2052a0100000000000000f559065821baa74c"
+    }
+  ],
+  "out":[
+    {
+      "value":"49.21875000",
+      "scriptPubKey":"044868e50c8454c1dd51f824bf81a944c6aaed24fb348f7c44aaea4a2630fd8e0d1b5590c2402494d8f80bc6ffd4d4bc4f336b1a84fa2f07e4f4498d4f77ff315f OP_CHECKSIG"
+    },
+    {
+      "value":"0.78125000",
+      "scriptPubKey":"0489175c7658845fd7c33d61029ebf4042e8386443ff6e6628fdb5ac938c31072dc61cee691ae1e8355c3a87cb4813cc9bf036fdb09078d35eacf9e9ab52374ebe OP_CHECKSIG"
+    }
+  ]
+}

data/spec/bitcoin/fixtures/rawtx-testnet-e232e0055dbdca88bbaa79458683195a0b7c17c5b6c524a8d146721d4d4d652f.json

@@ -0,0 +1,41 @@
+{
+  "hash":"e232e0055dbdca88bbaa79458683195a0b7c17c5b6c524a8d146721d4d4d652f",
+  "ver":1,
+  "vin_sz":3,
+  "vout_sz":2,
+  "lock_time":0,
+  "size":732,
+  "in":[
+    {
+      "prev_out":{
+        "hash":"b0975fbd0c2d2966537cec3419d9d969ae7448da48f9e635bce6db39066ec071",
+        "n":1
+      },
+      "scriptSig":"304402200117cdd3ec6259af29acea44db354a6f57ac10d8496782033f5fe0febfd77f1b02202ceb02d60dbb43e6d4e03e5b5fbadc031f8bbb3c6c34ad307939947987f600bf01 0452d63c092209529ca2c75e056e947bc95f9daffb371e601b46d24377aaa3d004ab3c6be2d6d262b34d736b95f3b0ef6876826c93c4077d619c02ebd974c7facd"
+    },
+    {
+      "prev_out":{
+        "hash":"f82b768f4c45d4f15620738698d9abec32fc15804161ba05ec4377aa66a85aa6",
+        "n":0
+      },
+      "scriptSig":"3046022100ea0a9b41c9372837e52898205c7bebf86b28936a3ee725672d0ca8f434f876f0022100beb7243a51fbc0997e55cb519d3b9cbd59f7aba68d80ba1e8adbb53443cda3c001 043efd1ca3cffc50638031281d227ff347a3a27bc145e2f846891d29f87bc068c27710559c4d9cd71f7e9e763d6e2753172406eb1ed1fadcaf9a8972b4270f05b4"
+    },
+    {
+      "prev_out":{
+        "hash":"06002eef0a08a65adec4b2313c30185cb2ec55f173722a3a731bee5141d166d8",
+        "n":0
+      },
+      "scriptSig":"3045022052210f95f6b413c74ce12cfc1b14a36cb267f9fa3919fa6e20dade1cd570439f022100b9e5b325f312904804f043d06c6ebc8e4b1c6cd272856c48ab1736b9d562e10c01 0423fdddfe7e4d70d762dd6596771e035f4b43d54d28c2231be1102056f81f067914fe4fb6fd6e3381228ee5587ddd2028c846025741e963d9b1d6cf2c2dea0dbc"
+    }
+  ],
+  "out":[
+    {
+      "value":"0.03338000",
+      "scriptPubKey":"048a33e9fd2de28137574cc69fe5620199abe37b7d08a51c528876fe6c5fa7fc28535f5a667244445e79fffc9df85ec3d79d77693b1f37af0e2d7c1fa2e7113a48 OP_CHECKSIG"
+    },
+    {
+      "value":"1.23000000",
+      "scriptPubKey":"2 OP_TOALTSTACK 0 OP_TOALTSTACK OP_TUCK OP_CHECKSIG OP_SWAP OP_HASH160 3cd1def404e12a85ead2b4d3f5f9f817fb0d46ef OP_EQUAL OP_BOOLAND OP_FROMALTSTACK OP_ADD OP_TOALTSTACK OP_TUCK OP_CHECKSIG OP_SWAP OP_HASH160 6a4e7d5f798e90e84db9244d4805459f87275943 OP_EQUAL OP_BOOLAND OP_FROMALTSTACK OP_ADD OP_TOALTSTACK OP_TUCK OP_CHECKSIG OP_SWAP OP_HASH160 486efdd300987a054510b4ce1148d4ad290d911e OP_EQUAL OP_BOOLAND OP_FROMALTSTACK OP_ADD OP_TOALTSTACK OP_FROMALTSTACK OP_FROMALTSTACK OP_GREATERTHANOREQUAL"
+    }
+  ]
+}

data/spec/bitcoin/fixtures/txdp-1.txt

@@ -0,0 +1,32 @@
+-----BEGIN-TRANSACTION-3fX59xPj-------------------------------------------------
+_TXDIST_fabfb5da_3fX59xPj_00a0
+010000000292807c8e70a28c687daea2998d6273d074e56fa8a55a0b10556974cf2b526e61000000
+0000ffffffffe3c1ee0711611b01af3dee55b1484f0d6b65d17dce4eff0e6e06242e6cf457e10000
+000000ffffffff02b0feea0b000000001976a91457996661391fa4e95bed27d7e8fe47f47cb8e428
+88ac00a0acb9030000001976a914dc504e07b1107110f601fb679dd3f56cee9ff71e88ac00000000
+0100000001eb626e4f73d88f415a8e8cb32b8d73eed47aa1039d0ed2f013abdc741ce6828c010000
+008c493046022100b0da540e4924518f8989a9da798ca2d9e761b69a173b8cc41a3e3e3c6d77cd50
+022100ecfa61730e58005338420516744ef680428dcfc05022dec70a851365c8575b190141042dc5
+be3afa5887aee4a377032ed014361b0b9b61eb3ea6b8a8821bfe13ee4b65cd25d9630e4f227a53e8
+bf637f85452c9981bcbd64ef77e22ce97b0f547c783effffffff0200d6117e030000001976a914cf
+f580fd243f64f0ad7bf69faf41c0bf42d86d8988ac00205fa0120000001976a9148d573ef6984fd9
+f8847d420001f7ac49b222a24988ac000000000100000001f2782db40ae147398a31cff9c7cc3423
+014a073a92e463741244330cc304168f000000008c493046022100c9311b9eef0cc69219cb96838f
+dd621530a80c46269a00dccc66498bc03ccf7a0221003742ee652a0a76fd28ad81aa73bb7f7a0a6a
+81850af58f62d9a184d10e5eec30014104f815e8ef4cad584e04974889d7636e8933803d2e72991d
+b5288c9e953c2465533905f98b7b688898c7c1f0708f2e49f0dd0abc06859ffed5144e8a1018a4e8
+63ffffffff02008c8647000000001976a914d4e211215967f8e3744693bf85f47eb4ee9567fc88ac
+603d4e95010000001976a914e9a6b50901c1969d2b0fd43a3ccfa3fef3291efe88ac00000000
+_TXINPUT_00_150.00000000
+_SIG_mzUYGfqGpyXmppYpmWJ31Y4zTxR4ZCod22_00_008c
+4930460221007699967c3ec09d072599558d2e7082fae0820206b63aa66afea124634ed11a080221
+0003346f7e963e645ecae2855026dc7332eb7237012539b34cd441c3cef97fbd4d01410497d5e1a0
+0e1db90e893d1f2e547e2ee83b5d6bf4ddaa3d514e6dc2d94b6bcb5a72be1fcec766b8c382502caa
+9ec09fe478bad07d3f38ff47b2eb42e681c384cc
+_TXINPUT_01_12.00000000
+_SIG_mzvaN8JUhHLz3Gdec1zBRxs5rNaYLQnbD1_01_008c
+49304602210081554f8b08a1ad8caa69e34f4794d54952dac7c5efcf2afe080985d6bd5b00770221
+00dea20ca3dbae1d15ec61bec57b4b8062e7d7c47614aba032c5a32f651f471cfd014104c30936d2
+456298a566aa76fefeab8a7cb7a91e8a936a11757c911b4c669f0434d12ab0936fc13986b156156f
+9b389ed244bbb580112be07dbe23949a4764dffb
+-------END-TRANSACTION-3fX59xPj-------------------------------------------------

data/spec/bitcoin/fixtures/txdp-2-signed.txt

@@ -0,0 +1,19 @@
+-----BEGIN-TRANSACTION-7Q74Wkre-------------------------------------------------
+_TXDIST_fabfb5da_7Q74Wkre_0077
+01000000019e2427307130506eafdda0af0f63b8e3193ca69576051176e9eb72822f9483b1000000
+0000ffffffff0200943577000000001976a91419b8a1e3a0bbd0263d7a739b08e60f38dbfd7d5988
+ac60a86659000000001976a9142d6b96901d5f345be776993073c4a2480f3c73a988ac0000000001
+0000000107142cfa30008349f67e64a0ad4300814b27c2e264a187727f64f2bf746bce9f00000000
+8c4930460221009eb7baac7ae0c161617c5ee59f6fe9c47cc11dd3472845e9268e739dfc064b6e02
+210025ebb1a8f4b2136fb67ae2e737ad38667b83ceccbb3c3ca47b98a2d0cb7d916f014104e74942
+d869b34395a2a75449056ac62db4209af97f34980e50f0882b9487e9bb556df5b3d6668c3e1dabdc
+23e65e36a54dc7b0c8aa0ce235315b454e0cc2373affffffff02b0ff9cd0000000001976a9144ece
+746ce438fb05e8482914ebd26f06bc57aac588ac002f6859000000001976a91419b8a1e3a0bbd026
+3d7a739b08e60f38dbfd7d5988ac00000000
+_TXINPUT_00_34.99949999
+_SIG_mnheKkGdmw8d1fUV15XZbfmLR6AjQjVthy_00_008c
+49304602210087bc1ff770c6cb3c7e47b9a3acb7dce678c16350f29acaa92e4ab231692256cf0221
+002da46fc1f39e132e726dea46a6e87e4278e85d36ccd393e39e931b89d55fc3a2014104955ec564
+6652d1b5bb14b2f867ef8879bcf224f1eab01072147fdfe0992440a234b36792937a23df736e8430
+613da6f0466bfc5505f2ad41b056131b7af13086
+-------END-TRANSACTION-7Q74Wkre-------------------------------------------------

data/spec/bitcoin/fixtures/txdp-2-unsigned.txt

@@ -0,0 +1,14 @@
+-----BEGIN-TRANSACTION-7Q74Wkre-------------------------------------------------
+_TXDIST_fabfb5da_7Q74Wkre_0077
+01000000019e2427307130506eafdda0af0f63b8e3193ca69576051176e9eb72822f9483b1000000
+0000ffffffff0200943577000000001976a91419b8a1e3a0bbd0263d7a739b08e60f38dbfd7d5988
+ac60a86659000000001976a9142d6b96901d5f345be776993073c4a2480f3c73a988ac0000000001
+0000000107142cfa30008349f67e64a0ad4300814b27c2e264a187727f64f2bf746bce9f00000000
+8c4930460221009eb7baac7ae0c161617c5ee59f6fe9c47cc11dd3472845e9268e739dfc064b6e02
+210025ebb1a8f4b2136fb67ae2e737ad38667b83ceccbb3c3ca47b98a2d0cb7d916f014104e74942
+d869b34395a2a75449056ac62db4209af97f34980e50f0882b9487e9bb556df5b3d6668c3e1dabdc
+23e65e36a54dc7b0c8aa0ce235315b454e0cc2373affffffff02b0ff9cd0000000001976a9144ece
+746ce438fb05e8482914ebd26f06bc57aac588ac002f6859000000001976a91419b8a1e3a0bbd026
+3d7a739b08e60f38dbfd7d5988ac00000000
+_TXINPUT_00_34.99950000
+-------END-TRANSACTION-7Q74Wkre-------------------------------------------------

data/spec/bitcoin/key_spec.rb

@@ -0,0 +1,123 @@
+require_relative 'spec_helper'
+
+describe "Bitcoin::Key" do
+
+  before do
+    Bitcoin.network = :bitcoin
+    @key_data = {
+      :priv => "2ebd3738f59ae4fd408d717bf325b4cb979a409b0153f6d3b4b91cdfe046fb1e",
+      :pub => "045fcb2fb2802b024f371cc22bc392268cc579e47e7936e0d1f05064e6e1103b8a81954eb6d3d33b8b6e73e9269013e843e83919f7ce4039bb046517a0cad5a3b1" }
+    @key = Bitcoin::Key.new(@key_data[:priv], @key_data[:pub])
+  end
+
+  it "should generate a key" do
+    k = Bitcoin::Key.generate
+    k.priv.size.should == 64
+    k.pub.size.should == 130
+    #p k.priv, k.pub
+  end
+
+  it "should create empty key" do
+    k = Bitcoin::Key.new
+    k.priv.should == nil
+    k.pub.should == nil
+  end
+
+  it "should create key from priv + pub" do
+    k = Bitcoin::Key.new(@key_data[:priv], @key_data[:pub])
+    k.priv.should == @key_data[:priv]
+    k.pub.should == @key_data[:pub]
+  end
+
+  it "should create key from only priv" do
+    k = Bitcoin::Key.new(@key_data[:priv])
+    k.priv.should == @key_data[:priv]
+    k.pub.should == @key_data[:pub]
+  end
+
+  it "should create key from only pub" do
+    k = Bitcoin::Key.new(nil, @key_data[:pub])
+    k.pub.should == @key_data[:pub]
+  end
+
+  it "should set public key" do
+    k = Bitcoin::Key.new
+    k.pub = @key_data[:pub]
+    k.pub.should == @key_data[:pub]
+  end
+
+  it "should set private key" do
+    k = Bitcoin::Key.new
+    k.priv = @key_data[:priv]
+    k.priv.should == @key_data[:priv]
+    k.pub.should == @key_data[:pub]
+  end
+
+  it "should get addr" do
+    @key.addr.should == "1JbYZRKyysprVjSSBobs8LX6QVjzsscQNU"
+  end
+
+  it "should sign data" do
+    @key.sign("foobar").size.should >= 69
+  end
+
+  it "should verify signature" do
+    sig = @key.sign("foobar")
+    key2 = Bitcoin::Key.new(nil, @key.pub)
+    @key.verify("foobar", sig).should == true
+  end
+
+  it "should export private key in base58 format" do
+    Bitcoin.network = :bitcoin
+    str = Bitcoin::Key.new("e9873d79c6d87dc0fb6a5778633389f4453213303da61f20bd67fc233aa33262").to_base58
+    str.should == "5Kb8kLf9zgWQnogidDA76MzPL6TsZZY36hWXMssSzNydYXYB9KF"
+    Bitcoin.network = :testnet
+    str = Bitcoin::Key.new("d21fa2c7ad710ffcd9bcc22a9f96357bda1a2521ca7181dd610140ecea2cecd8").to_base58
+    str.should == "93BTVFoqffueSaC5fqjLjLyn29S41JzvAZm2hC35SYMoYDXT1bY"
+    Bitcoin.network = :bitcoin
+  end
+
+  it "should import private key in base58 format" do
+    Bitcoin.network = :bitcoin
+    key = Bitcoin::Key.from_base58("5Kb8kLf9zgWQnogidDA76MzPL6TsZZY36hWXMssSzNydYXYB9KF")
+    key.priv.should == "e9873d79c6d87dc0fb6a5778633389f4453213303da61f20bd67fc233aa33262"
+    key.addr.should == "1CC3X2gu58d6wXUWMffpuzN9JAfTUWu4Kj"
+    Bitcoin.network = :testnet
+    key = Bitcoin::Key.from_base58("93BTVFoqffueSaC5fqjLjLyn29S41JzvAZm2hC35SYMoYDXT1bY")
+    key.priv.should == "d21fa2c7ad710ffcd9bcc22a9f96357bda1a2521ca7181dd610140ecea2cecd8"
+    key.addr.should == "n3eH91H14mSnGx4Va2ngtLFCeLPRyYymRg"
+    Bitcoin.network = :bitcoin
+  end
+
+end
+
+begin
+  describe "Bitcoin::OpenSSL_EC" do
+    Bitcoin::OpenSSL_EC
+
+    it 'resolves public from private key' do
+      Bitcoin.network = :testnet
+      privkey = ["56e28a425a7b588973b5db962a09b1aca7bdc4a7268cdd671d03c52a997255dc"].pack("H*")
+      pubkey =  ["04324c6ebdcf079db6c9209a6b715b955622561262cde13a8a1df8ae0ef030eaa1552e31f8be90c385e27883a9d82780283d19507d7fa2e1e71a1d11bc3a52caf3"].pack("H*")
+
+      Bitcoin::OpenSSL_EC.regenerate_key(privkey).should == [privkey, pubkey].map{|i| i.unpack("H*")[0] }
+
+      [
+        ["b51386f8275d49d8d30287d7b1afa805790bdd1fe8b13d22d25928c67ea55d02", "0470305ae5278a22499980286d9c513861d89e7b7317c8b891c554d5c8fdd256b03daa0340be4104f8c84cfa98f0da8f16567fcdd3a00fd993adbbe91695671a56"],
+        ["d8ebece51adc5fb99dd6994bcb8fa1221d01576fd76af9134ab36f8d4698b55c", "047503421850d3a6eecb7c9de33b367c4d3f96a34ff257ad0c34e234e29f3672525c6b4353ce6fdc9de3f885fdea798982e2252e610065dbdb62cd8cab1fe45822"],
+        ["c95c79fb0cc1fe47b384751df0627be40bbe481ec94eeafeb6dc40e94c40de43", "04b746ca07e718c7ca26d4eeec037492777f48bb5c750e972621698f699f530535c0ffa96dad581102d0471add88e691af85955d1fd42f68506f8092fddfe0c47a"],
+        ["5b61f807cc938b0fd3ec8f6006737d0002ceca09f296204138c4459de8a856f6", "0487357bf30c13d47d955666f42f87690cfd18be96cc74cda711da74bf76b08ebc6055aba30680e6288df14bda68c781cbf71eaad096c3639e9724c5e26f3acf54"]
+      ].each{|key|
+        privkey, pubkey = [ key.first ].pack("H*")
+        Bitcoin::OpenSSL_EC.regenerate_key(privkey).should == key
+      }
+
+      250.times.map{
+        keypair = Bitcoin.generate_key;
+        Bitcoin::OpenSSL_EC.regenerate_key(keypair.first) == keypair
+      }.all?.should == true
+    end
+
+  end
+rescue LoadError
+end

data/spec/bitcoin/network_spec.rb

@@ -0,0 +1,48 @@
+require_relative 'spec_helper.rb'
+
+describe 'Bitcoin::network' do
+
+  it 'returns network descriptor' do
+    Bitcoin.network = :bitcoin
+    net = Bitcoin::network
+    net[:magic_head].should == "\xF9\xBE\xB4\xD9"
+    net[:address_version].should == "00"
+    net[:genesis_hash].should == "000000000019d6689c085ae165831e934ff763ae46a2a6c172b3f1b60a8ce26f"
+  end
+  
+  it 'can be set to main net' do
+    Bitcoin::network = :bitcoin
+    Bitcoin::network.should == Bitcoin::NETWORKS[:bitcoin]
+  end
+  
+  class Test_Handler
+    attr_reader :inv
+    def on_inv_transaction inv
+      @inv = inv
+    end
+  end
+  
+  it 'uses correct magic_head when parsing a message' do
+    pkt = ["f9 be b4 d9 69 6e 76 00 00 00 00 00 00 00 00 00 49 00 00 00 11 ea 1c 91 02 01 00 00 00 e0 41 c2 38 f7 32 1a 68 0a 34 06 bf fd 72 12 e3 d1 2c b5 12 2a 8c 0b 52 76 de 82 30 b1 00 7a 42 01 00 00 00 33 00 09 71 a9 70 7b 6c 6d 6e 77 aa 2e ac 43 f3 e5 67 84 cb 61 b2 35 fb 8d fe e0 86 8b 40 7c f3".split(" ").join].pack("H*")
+
+    parser1 = Bitcoin::Protocol::Parser.new(handler1 = Test_Handler.new)
+    parser2 = Bitcoin::Protocol::Parser.new(handler2 = Test_Handler.new)
+
+    Bitcoin::network = :testnet
+    parser2.parse(pkt).should == ""
+    handler2.inv.should == nil
+
+    Bitcoin::network = :bitcoin
+    parser1.parse(pkt).should == ''
+    handler1.inv.should == ["f37c408b86e0fe8dfb35b261cb8467e5f343ac2eaa776e6d6c7b70a971090033"].pack("H*")
+  end
+
+  it 'uses correct magic head when creating a message' do
+    Bitcoin::network = :testnet
+    Bitcoin::Protocol.pkt('foo', "bar")[0...4].should == "\xFA\xBF\xB5\xDA"
+
+    Bitcoin::network = :bitcoin
+    Bitcoin::Protocol.pkt('foo', "bar")[0...4].should == "\xF9\xBE\xB4\xD9"
+  end
+
+end

data/spec/bitcoin/protocol/addr_spec.rb

@@ -0,0 +1,68 @@
+require_relative '../spec_helper.rb'
+
+describe 'Bitcoin::Protocol::Parser (addr)' do
+
+  it 'parses address packet' do
+    pkt = [
+      "f9 be b4 d9 61 64 64 72 00 00 00 00 00 00 00 00 1f 00 00 00 e8 b4 c9 ba 01 2b dd d7 4d 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff 52 53 de 04 20 8d"
+      .split(" ").join].pack("H*")
+
+    class Addr_Handler < Bitcoin::Protocol::Handler
+      attr_reader :addr
+      def on_addr(addr); (@addr ||= []) << addr; end
+    end
+
+    parser = Bitcoin::Protocol::Parser.new( handler = Addr_Handler.new )
+    parser.parse(pkt + "AAAA").should == "AAAA"
+
+    handler.addr.size              .should == 1
+    handler.addr.first.alive?      .should == false
+    handler.addr.map{|i| i.values }.should == [
+      [1305992491, 1, "82.83.222.4", 8333]
+    ]
+  end
+
+end
+
+describe 'Bitcoin::Protocol::Addr' do
+
+  before do
+    @pkt = [
+      "2b dd d7 4d 01 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 ff ff 52 53 de 04 20 8d"
+      .split(" ").join].pack("H*")
+  end
+
+  it 'parse addr payload' do
+    addr = Bitcoin::Protocol::Addr.new(@pkt)
+    addr.values.should == [1305992491, 1, "82.83.222.4", 8333]
+  end
+
+  it 'initalize time, service and port' do
+    addr = Bitcoin::Protocol::Addr.new(nil)
+    t = Time.now.to_i; (t-10..t+10).include?(addr[:time]).should == true
+    addr[:service]  .should == 1
+    addr[:port]     .should == Bitcoin.network[:default_port]
+    addr[:ip]       .should == "127.0.0.1"
+  end
+
+  it 'addr payload' do
+    addr = Bitcoin::Protocol::Addr.new
+    addr[:time] = 1305992491
+    addr[:service] = 1
+    addr[:ip] = "82.83.222.4"
+    addr[:port] = 8333
+    addr.to_payload.should == @pkt
+    addr.to_payload.bytesize.should == 30
+  end
+
+
+  it 'pack addr packet' do
+    addr = Bitcoin::Protocol::Addr.new
+    addr[:time] = 1305992491
+    addr[:service] = 1
+    addr[:ip] = "82.83.222.4"
+    addr[:port] = 8333
+    Bitcoin::Protocol::Addr.pkt(addr).should ==
+      Bitcoin::Protocol.pkt("addr", "\x01" + addr.to_payload)
+  end
+end