oneliner 0.2.6

data/tests/superstring_test.rb

@@ -0,0 +1,50 @@
+
+require File.join(File.dirname(__FILE__), 'test_helper')
+
+class SuperStringTest < Test::Unit::TestCase
+
+  def test_decoding
+    1.upto(8) do |i|
+      print "[#{5 ** i}]"
+      STDOUT.flush
+      size_test(5 ** i)
+    end
+  end
+
+  def test_hack
+    20.times do
+      size = rand(1024)
+      s = "x" * size
+      bites = rand(128) + 1
+      l = s.hack(bites)
+      assert_equal((size.to_f / bites).ceil, l.size)
+      assert_equal(s, l.join)
+      l.each_with_index do |e, index|
+        if index == l.size - 1
+          assert(e.size <= bites)
+        else
+          assert_equal(bites, e.size, "element #{index} of #{l.inspect} should be of size #{bites}")
+        end
+      end
+    end
+  end
+
+  def test_weird_string
+    s = Oneliner::SuperString.new(open(File.join(File.dirname(__FILE__), 'weird_string')).read)
+    s.encode(20)
+  end
+
+  private
+
+  def size_test(size)
+    s = Oneliner::SuperString.new(" " * size)
+    s2 = Oneliner::SuperString.new
+    assert(!s2.decode!(s.encode(s.size + 8)))
+    while !s2.decode!(s.encode((s.size * (0.1)).ceil + 8))
+      print "."
+      STDOUT.flush
+    end
+    assert_equal(s, s2)
+  end
+
+end

data/tests/test_helper.rb

@@ -0,0 +1,35 @@
+
+home = File.expand_path(File.dirname(__FILE__))
+$: << File.join(home, "..", "lib")
+
+require 'pp'
+require 'test/unit'
+require 'benchmark'
+require 'oneliner'
+
+def bm(label = "", options = {})
+  n = options[:n] || 1000
+  width = options[:width] || 50
+  Benchmark.benchmark(" " * width + Benchmark::Tms::CAPTION, width, Benchmark::Tms::FMTSTR, "ms/call") do |b|
+    times = b.report("#{n}x#{label}") do
+      n.times do
+        yield
+      end
+    end
+    [times * 1000 / n.to_f]
+  end
+end
+
+class Test::Unit::TestCase
+
+  def assert_within(timeout, &block)
+    t = Time.new
+    rval = yield
+    while !rval && t > Time.new - timeout
+      rval = yield
+      sleep(0.05)
+    end
+    assert(rval)
+  end
+
+end

data/tests/weird_string

@@ -0,0 +1,473 @@
+--- !ruby/object:Archipelago::Pirate::Captain 
+chest_eval_files: 
+- ./script/overloads.rb
+chests_having_evaluated: 
+  ? 
+    - 3c9722f35eb844bd09cc8563ce359ae9fa209107
+    - 2007-03-15 14:29:26.778436 +01:00
+  : !ruby/object:Set 
+    hash: 
+      ./script/overloads.rb: true
+
+initial_lookup_timeout: 5
+initial_service_update_interval: 1
+jockey: &id005 !ruby/object:Archipelago::Disco::Jockey 
+  incoming: !ruby/object:Queue 
+    que: []
+
+    waiting: 
+    - &id001 !ruby/object:Thread {}
+
+  initial_lookup_standoff: 0.1
+  listener: !ruby/object:UDPSocket {}
+
+  listener_thread: !ruby/object:Thread {}
+
+  local_services: !ruby/object:Archipelago::Disco::ServiceLocker 
+    hash: {}
+
+    jockey: *id005
+  lookup_timeout: 10
+  multiaddress: 234.2.4.2
+  multiport: 25242
+  new_service_semaphore: !ruby/object:MonitorMixin::ConditionVariable 
+    monitor: !ruby/object:Archipelago::Current::Lock 
+      archipelago_current_synchronized_lock_by_object: {}
+
+      mon_count: 0
+      mon_entering_queue: []
+
+      mon_owner: !ruby/object:Thread {}
+
+      mon_waiting_queue: []
+
+    waiters: []
+
+  outgoing: !ruby/object:Queue 
+    que: []
+
+    waiting: 
+    - &id012 !ruby/object:Thread {}
+
+  picker_thread: *id001
+  remote_services: !ruby/object:Archipelago::Disco::ServiceLocker 
+    hash: 
+      41559f282ebdfc7348a43aba911d05252b74b742: !ruby/object:Archipelago::Disco::Record 
+        attributes: 
+          :service: &id002 !ruby/object:DRb::DRbObject 
+            ref: 9827790
+            uri: druby://dhcp1-150.local.adocca.net:53830
+          :class: Archipelago::Tranny::Manager
+          :validator: *id002
+          :published_at: 2007-03-15 14:29:26.584411 +01:00
+          :service_id: 41559f282ebdfc7348a43aba911d05252b74b742
+      49d4d1383d4e9ec41c38bdd2659d7041fc9ffbec: !ruby/object:Archipelago::Disco::Record 
+        attributes: 
+          :service: &id003 !ruby/object:DRb::DRbObject 
+            ref: 9527210
+            uri: druby://dhcp1-150.local.adocca.net:53830
+          :class: Archipelago::Dump::Site
+          :validator: *id003
+          :published_at: 2007-03-15 14:29:26.737298 +01:00
+          :service_id: 49d4d1383d4e9ec41c38bdd2659d7041fc9ffbec
+      3c9722f35eb844bd09cc8563ce359ae9fa209107: !ruby/object:Archipelago::Disco::Record 
+        attributes: 
+          :service: &id004 !ruby/object:DRb::DRbObject 
+            ref: 9521410
+            uri: druby://dhcp1-150.local.adocca.net:53830
+          :class: Archipelago::Treasure::Chest
+          :validator: *id004
+          :published_at: 2007-03-15 14:29:26.778436 +01:00
+          :service_id: 3c9722f35eb844bd09cc8563ce359ae9fa209107
+    jockey: *id005
+  sender: !ruby/object:UDPSocket {}
+
+  service_change_subscribers_by_event_type: 
+    :found: 
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id007 !ruby/object:Archipelago::Disco::Query 
+            attributes: 
+              :class: Archipelago::Dump::Site
+              :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11204190
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id010 
+            :class: Archipelago::Treasure::Chest
+            :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11399580
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id011 
+            :class: Archipelago::Tranny::Manager
+            :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11399580
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id009 
+            :class: Archipelago::Tranny::Manager
+            :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11380640
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id006 !ruby/object:Archipelago::Disco::Query 
+            attributes: 
+              :class: Archipelago::Dump::Site
+              :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11213820
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: &id008 
+            :class: Archipelago::Treasure::Chest
+            :unicast_reply: dhcp1-150.local.adocca.net:25244
+        - 11380640
+      : !ruby/object:Proc {}
+
+    :lost: 
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id006
+        - 11213820
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id007
+        - 11204190
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id008
+        - 11380640
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id009
+        - 11380640
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id010
+        - 11399580
+      : !ruby/object:Proc {}
+
+      ? 
+        - !ruby/object:Archipelago::Disco::Query 
+          attributes: *id011
+        - 11399580
+      : !ruby/object:Proc {}
+
+  shouter_thread: *id012
+  subscribed_services: !ruby/object:Set 
+    hash: 
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id009
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id007
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id011
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id006
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id008
+      : true
+
+      !ruby/object:Archipelago::Disco::Query ? 
+        attributes: *id010
+      : true
+
+  thrifty_caching: true
+  thrifty_publishing: false
+  thrifty_replying: true
+  unicast_address: dhcp1-150.local.adocca.net:25244
+  unilistener: !ruby/object:UDPSocket {}
+
+  unilistener_thread: !ruby/object:Thread {}
+
+  unisender: !ruby/object:UDPSocket {}
+
+  valid: true
+  validation_interval: 30
+  validator_thread: !ruby/object:Thread {}
+
+jockey_options: {}
+
+maximum_service_update_interval: 60
+service_descriptions: 
+  :chests: *id008
+  :trannies: *id009
+service_update_thread: !ruby/object:Thread {}
+
+services: 
+  :chests: !ruby/object:Archipelago::Disco::ServiceLocker 
+    hash: !ruby/object:RBTree {}
+
+    jockey: 
+  :trannies: !ruby/object:Archipelago::Disco::ServiceLocker 
+    hash: !ruby/object:RBTree {}
+
+    jockey: 
+transaction: 
+yar_counter: 0