From fcbf63e62c627deae76c1b8cb8c0876c536ed811 Mon Sep 17 00:00:00 2001 From: Jari Vetoniemi Date: Mon, 16 Mar 2020 18:49:26 +0900 Subject: Fresh start --- jni/ruby/test/rinda/test_rinda.rb | 810 +++++++++++++++++++++++++++++++++++ jni/ruby/test/rinda/test_tuplebag.rb | 172 ++++++++ 2 files changed, 982 insertions(+) create mode 100644 jni/ruby/test/rinda/test_rinda.rb create mode 100644 jni/ruby/test/rinda/test_tuplebag.rb (limited to 'jni/ruby/test/rinda') diff --git a/jni/ruby/test/rinda/test_rinda.rb b/jni/ruby/test/rinda/test_rinda.rb new file mode 100644 index 0000000..812b437 --- /dev/null +++ b/jni/ruby/test/rinda/test_rinda.rb @@ -0,0 +1,810 @@ +require 'test/unit' + +require 'drb/drb' +require 'drb/eq' +require 'rinda/ring' +require 'rinda/tuplespace' +require 'timeout' +require 'singleton' + +module Rinda + +class MockClock + include Singleton + + class MyTS < Rinda::TupleSpace + def keeper_thread + nil + end + end + + def initialize + @now = 2 + @reso = 1 + @ts = MyTS.new + @ts.write([2, :now]) + @inf = 2**31 - 1 + end + + def now + @now.to_f + end + + def at(n) + n + end + + def _forward(n=nil) + now ,= @ts.take([nil, :now]) + @now = now + n + @ts.write([@now, :now]) + end + + def forward(n) + while n > 0 + _forward(@reso) + n -= @reso + Thread.pass + end + end + + def rewind + @ts.take([nil, :now]) + @ts.write([@inf, :now]) + @ts.take([nil, :now]) + @now = 2 + @ts.write([2, :now]) + end + + def sleep(n=nil) + now ,= @ts.read([nil, :now]) + @ts.read([(now + n)..@inf, :now]) + 0 + end +end + +module Time + def sleep(n) + @m.sleep(n) + end + module_function :sleep + + def at(n) + n + end + module_function :at + + def now + defined?(@m) && @m ? @m.now : 2 + end + module_function :now + + def rewind + @m.rewind + end + module_function :rewind + + def forward(n) + @m.forward(n) + end + module_function :forward + + @m = MockClock.instance +end + +class TupleSpace + def sleep(n) + Kernel.sleep(n * 0.01) + end +end + +module TupleSpaceTestModule + def sleep(n) + if Thread.current == Thread.main + Time.forward(n) + else + Time.sleep(n) + end + end + + def thread_join(th) + while th.alive? + Kernel.sleep(0.1) + sleep(1) + end + th.value + end + + def test_00_tuple + tuple = Rinda::TupleEntry.new([1,2,3]) + assert(!tuple.canceled?) + assert(!tuple.expired?) + assert(tuple.alive?) + end + + def test_00_template + tmpl = Rinda::Template.new([1,2,3]) + assert_equal(3, tmpl.size) + assert_equal(3, tmpl[2]) + assert(tmpl.match([1,2,3])) + assert(!tmpl.match([1,nil,3])) + + tmpl = Rinda::Template.new([/^rinda/i, nil, :hello]) + assert_equal(3, tmpl.size) + assert(tmpl.match(['Rinda', 2, :hello])) + assert(!tmpl.match(['Rinda', 2, Symbol])) + assert(!tmpl.match([1, 2, :hello])) + assert(tmpl.match([/^rinda/i, 2, :hello])) + + tmpl = Rinda::Template.new([Symbol]) + assert_equal(1, tmpl.size) + assert(tmpl.match([:hello])) + assert(tmpl.match([Symbol])) + assert(!tmpl.match(['Symbol'])) + + tmpl = Rinda::Template.new({"message"=>String, "name"=>String}) + assert_equal(2, tmpl.size) + assert(tmpl.match({"message"=>"Hello", "name"=>"Foo"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo", "1"=>2})) + assert(!tmpl.match({"message"=>"Hi", "name"=>"Foo", "age"=>1})) + assert(!tmpl.match({"message"=>"Hello", "no_name"=>"Foo"})) + + assert_raise(Rinda::InvalidHashTupleKey) do + Rinda::Template.new({:message=>String, "name"=>String}) + end + tmpl = Rinda::Template.new({"name"=>String}) + assert_equal(1, tmpl.size) + assert(tmpl.match({"name"=>"Foo"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo"})) + assert(!tmpl.match({"message"=>:symbol, "name"=>"Foo", "1"=>2})) + assert(!tmpl.match({"message"=>"Hi", "name"=>"Foo", "age"=>1})) + assert(!tmpl.match({"message"=>"Hello", "no_name"=>"Foo"})) + + tmpl = Rinda::Template.new({"message"=>String, "name"=>String}) + assert_equal(2, tmpl.size) + assert(tmpl.match({"message"=>"Hello", "name"=>"Foo"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo", "1"=>2})) + assert(!tmpl.match({"message"=>"Hi", "name"=>"Foo", "age"=>1})) + assert(!tmpl.match({"message"=>"Hello", "no_name"=>"Foo"})) + + tmpl = Rinda::Template.new({"message"=>String}) + assert_equal(1, tmpl.size) + assert(tmpl.match({"message"=>"Hello"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo", "1"=>2})) + assert(!tmpl.match({"message"=>"Hi", "name"=>"Foo", "age"=>1})) + assert(!tmpl.match({"message"=>"Hello", "no_name"=>"Foo"})) + + tmpl = Rinda::Template.new({"message"=>String, "name"=>nil}) + assert_equal(2, tmpl.size) + assert(tmpl.match({"message"=>"Hello", "name"=>"Foo"})) + assert(!tmpl.match({"message"=>"Hello", "name"=>"Foo", "1"=>2})) + assert(!tmpl.match({"message"=>"Hi", "name"=>"Foo", "age"=>1})) + assert(!tmpl.match({"message"=>"Hello", "no_name"=>"Foo"})) + + assert_raise(Rinda::InvalidHashTupleKey) do + @ts.write({:message=>String, "name"=>String}) + end + + @ts.write([1, 2, 3]) + assert_equal([1, 2, 3], @ts.take([1, 2, 3])) + + @ts.write({'1'=>1, '2'=>2, '3'=>3}) + assert_equal({'1'=>1, '2'=>2, '3'=>3}, @ts.take({'1'=>1, '2'=>2, '3'=>3})) + + entry = @ts.write(['1'=>1, '2'=>2, '3'=>3]) + assert_raise(Rinda::RequestExpiredError) do + assert_equal({'1'=>1, '2'=>2, '3'=>3}, @ts.read({'1'=>1}, 0)) + end + entry.cancel + end + + def test_00_DRbObject + ro = DRbObject.new(nil, "druby://host:1234") + tmpl = Rinda::DRbObjectTemplate.new + assert(tmpl === ro) + + tmpl = Rinda::DRbObjectTemplate.new("druby://host:1234") + assert(tmpl === ro) + + tmpl = Rinda::DRbObjectTemplate.new("druby://host:12345") + assert(!(tmpl === ro)) + + tmpl = Rinda::DRbObjectTemplate.new(/^druby:\/\/host:/) + assert(tmpl === ro) + + ro = DRbObject.new_with(12345, 1234) + assert(!(tmpl === ro)) + + ro = DRbObject.new_with("druby://foo:12345", 1234) + assert(!(tmpl === ro)) + + tmpl = Rinda::DRbObjectTemplate.new(/^druby:\/\/(foo|bar):/) + assert(tmpl === ro) + + ro = DRbObject.new_with("druby://bar:12345", 1234) + assert(tmpl === ro) + + ro = DRbObject.new_with("druby://baz:12345", 1234) + assert(!(tmpl === ro)) + end + + def test_inp_rdp + assert_raise(Rinda::RequestExpiredError) do + @ts.take([:empty], 0) + end + + assert_raise(Rinda::RequestExpiredError) do + @ts.read([:empty], 0) + end + end + + def test_ruby_talk_264062 + th = Thread.new { @ts.take([:empty], 1) } + sleep(10) + assert_raise(Rinda::RequestExpiredError) do + thread_join(th) + end + + th = Thread.new { @ts.read([:empty], 1) } + sleep(10) + assert_raise(Rinda::RequestExpiredError) do + thread_join(th) + end + end + + def test_symbol_tuple + @ts.write([:symbol, :symbol]) + @ts.write(['string', :string]) + assert_equal([[:symbol, :symbol]], @ts.read_all([:symbol, nil])) + assert_equal([[:symbol, :symbol]], @ts.read_all([Symbol, nil])) + assert_equal([], @ts.read_all([:nil, nil])) + end + + def test_core_01 + 5.times do + @ts.write([:req, 2]) + end + + assert_equal([[:req, 2], [:req, 2], [:req, 2], [:req, 2], [:req, 2]], + @ts.read_all([nil, nil])) + + taker = Thread.new(5) do |count| + s = 0 + count.times do + tuple = @ts.take([:req, Integer]) + assert_equal(2, tuple[1]) + s += tuple[1] + end + @ts.write([:ans, s]) + s + end + + assert_equal(10, thread_join(taker)) + assert_equal([:ans, 10], @ts.take([:ans, 10])) + assert_equal([], @ts.read_all([nil, nil])) + end + + def test_core_02 + taker = Thread.new(5) do |count| + s = 0 + count.times do + tuple = @ts.take([:req, Integer]) + assert_equal(2, tuple[1]) + s += tuple[1] + end + @ts.write([:ans, s]) + s + end + + 5.times do + @ts.write([:req, 2]) + end + + assert_equal(10, thread_join(taker)) + assert_equal([:ans, 10], @ts.take([:ans, 10])) + assert_equal([], @ts.read_all([nil, nil])) + end + + def test_core_03_notify + notify1 = @ts.notify(nil, [:req, Integer]) + notify2 = @ts.notify(nil, {"message"=>String, "name"=>String}) + + 5.times do + @ts.write([:req, 2]) + end + + 5.times do + tuple = @ts.take([:req, Integer]) + assert_equal(2, tuple[1]) + end + + 5.times do + assert_equal(['write', [:req, 2]], notify1.pop) + end + 5.times do + assert_equal(['take', [:req, 2]], notify1.pop) + end + + @ts.write({"message"=>"first", "name"=>"3"}) + @ts.write({"message"=>"second", "name"=>"1"}) + @ts.write({"message"=>"third", "name"=>"0"}) + @ts.take({"message"=>"third", "name"=>"0"}) + @ts.take({"message"=>"first", "name"=>"3"}) + + assert_equal(["write", {"message"=>"first", "name"=>"3"}], notify2.pop) + assert_equal(["write", {"message"=>"second", "name"=>"1"}], notify2.pop) + assert_equal(["write", {"message"=>"third", "name"=>"0"}], notify2.pop) + assert_equal(["take", {"message"=>"third", "name"=>"0"}], notify2.pop) + assert_equal(["take", {"message"=>"first", "name"=>"3"}], notify2.pop) + end + + def test_cancel_01 + entry = @ts.write([:removeme, 1]) + assert_equal([[:removeme, 1]], @ts.read_all([nil, nil])) + entry.cancel + assert_equal([], @ts.read_all([nil, nil])) + + template = nil + taker = Thread.new do + @ts.take([:take, nil], 10) do |t| + template = t + Thread.new do + template.cancel + end + end + end + + sleep(2) + + assert_raise(Rinda::RequestCanceledError) do + assert_nil(thread_join(taker)) + end + + assert(template.canceled?) + + @ts.write([:take, 1]) + + assert_equal([[:take, 1]], @ts.read_all([nil, nil])) + end + + def test_cancel_02 + entry = @ts.write([:removeme, 1]) + assert_equal([[:removeme, 1]], @ts.read_all([nil, nil])) + entry.cancel + assert_equal([], @ts.read_all([nil, nil])) + + template = nil + reader = Thread.new do + @ts.read([:take, nil], 10) do |t| + template = t + Thread.new do + template.cancel + end + end + end + + sleep(2) + + assert_raise(Rinda::RequestCanceledError) do + assert_nil(thread_join(reader)) + end + + assert(template.canceled?) + + @ts.write([:take, 1]) + + assert_equal([[:take, 1]], @ts.read_all([nil, nil])) + end + + class SimpleRenewer + def initialize(sec, n = 1) + @sec = sec + @n = n + end + + def renew + return -1 if @n <= 0 + @n -= 1 + return @sec + end + end + + def test_00_renewer + tuple = Rinda::TupleEntry.new([1,2,3], true) + assert(!tuple.canceled?) + assert(tuple.expired?) + assert(!tuple.alive?) + + tuple = Rinda::TupleEntry.new([1,2,3], 1) + assert(!tuple.canceled?) + assert(!tuple.expired?) + assert(tuple.alive?) + sleep(2) + assert(tuple.expired?) + assert(!tuple.alive?) + + @renewer = SimpleRenewer.new(1,2) + tuple = Rinda::TupleEntry.new([1,2,3], @renewer) + assert(!tuple.canceled?) + assert(!tuple.expired?) + assert(tuple.alive?) + sleep(1) + assert(!tuple.canceled?) + assert(!tuple.expired?) + assert(tuple.alive?) + sleep(2) + assert(tuple.expired?) + assert(!tuple.alive?) + end +end + +class TupleSpaceTest < Test::Unit::TestCase + include TupleSpaceTestModule + + def setup + ThreadGroup.new.add(Thread.current) + @ts = Rinda::TupleSpace.new(1) + end + def teardown + # implementation-dependent + @ts.instance_eval{ + if th = @keeper + th.kill + th.join + end + } + end +end + +class TupleSpaceProxyTest < Test::Unit::TestCase + include TupleSpaceTestModule + + def setup + ThreadGroup.new.add(Thread.current) + @ts_base = Rinda::TupleSpace.new(1) + @ts = Rinda::TupleSpaceProxy.new(@ts_base) + end + def teardown + # implementation-dependent + @ts_base.instance_eval{ + if th = @keeper + th.kill + th.join + end + } + end + + def test_remote_array_and_hash + # Don't remove ary/hsh local variables. + # These are necessary to protect objects from GC. + ary = [1, 2, 3] + @ts.write(DRbObject.new(ary)) + assert_equal([1, 2, 3], @ts.take([1, 2, 3], 0)) + hsh = {'head' => 1, 'tail' => 2} + @ts.write(DRbObject.new(hsh)) + assert_equal({'head' => 1, 'tail' => 2}, + @ts.take({'head' => 1, 'tail' => 2}, 0)) + end + + def test_take_bug_8215 + service = DRb.start_service(nil, @ts_base) + + uri = service.uri + + args = [EnvUtil.rubybin, *%W[-rdrb/drb -rdrb/eq -rrinda/ring -rrinda/tuplespace -e]] + + take = spawn(*args, <<-'end;', uri) + uri = ARGV[0] + DRb.start_service + ro = DRbObject.new_with_uri(uri) + ts = Rinda::TupleSpaceProxy.new(ro) + th = Thread.new do + ts.take([:test_take, nil]) + end + Kernel.sleep(0.1) + th.raise(Interrupt) # causes loss of the taken tuple + ts.write([:barrier, :continue]) + Kernel.sleep + end; + + @ts_base.take([:barrier, :continue]) + + write = spawn(*args, <<-'end;', uri) + uri = ARGV[0] + DRb.start_service + ro = DRbObject.new_with_uri(uri) + ts = Rinda::TupleSpaceProxy.new(ro) + ts.write([:test_take, 42]) + end; + + status = Process.wait(write) + + assert_equal([[:test_take, 42]], @ts_base.read_all([:test_take, nil]), + '[bug:8215] tuple lost') + ensure + service.stop_service if service + signal = /mswin|mingw/ =~ RUBY_PLATFORM ? "KILL" : "TERM" + Process.kill(signal, write) if write && status.nil? + Process.kill(signal, take) if take + Process.wait(write) if write && status.nil? + Process.wait(take) if take + end + + @server = DRb.primary_server || DRb.start_service +end + +module RingIPv6 + def prepare_ipv6(r) + begin + Socket.getifaddrs.each do |ifaddr| + next unless ifaddr.addr + next unless ifaddr.addr.ipv6_linklocal? + next if ifaddr.name[0, 2] == "lo" + r.multicast_interface = ifaddr.ifindex + return ifaddr + end + rescue NotImplementedError + # ifindex() function may not be implemented on Windows. + return if + Socket.ip_address_list.any? { |addrinfo| addrinfo.ipv6? } + end + skip 'IPv6 not available' + end +end + +class TestRingServer < Test::Unit::TestCase + + def setup + @port = Rinda::Ring_PORT + + @ts = Rinda::TupleSpace.new + @rs = Rinda::RingServer.new(@ts, [], @port) + end + def teardown + # implementation-dependent + @ts.instance_eval{ + if th = @keeper + th.kill + th.join + end + } + @rs.shutdown + end + + def test_do_reply + with_timeout(10) {_test_do_reply} + end + + def _test_do_reply + called = nil + + callback = proc { |ts| + called = ts + } + + callback = DRb::DRbObject.new callback + + @ts.write [:lookup_ring, callback] + + @rs.do_reply + + wait_for(10) {called} + + assert_same @ts, called + end + + def test_do_reply_local + with_timeout(10) {_test_do_reply_local} + end + + def _test_do_reply_local + called = nil + + callback = proc { |ts| + called = ts + } + + @ts.write [:lookup_ring, callback] + + @rs.do_reply + + wait_for(10) {called} + + assert_same @ts, called + end + + def test_make_socket_unicast + v4 = @rs.make_socket('127.0.0.1') + + assert_equal('127.0.0.1', v4.local_address.ip_address) + assert_equal(@port, v4.local_address.ip_port) + end + + def test_make_socket_ipv4_multicast + v4mc = @rs.make_socket('239.0.0.1') + + if Socket.const_defined?(:SO_REUSEPORT) then + assert(v4mc.getsockopt(:SOCKET, :SO_REUSEPORT).bool) + else + assert(v4mc.getsockopt(:SOCKET, :SO_REUSEADDR).bool) + end + + assert_equal('0.0.0.0', v4mc.local_address.ip_address) + assert_equal(@port, v4mc.local_address.ip_port) + end + + def test_make_socket_ipv6_multicast + skip 'IPv6 not available' unless + Socket.ip_address_list.any? { |addrinfo| addrinfo.ipv6? } + + begin + v6mc = @rs.make_socket('ff02::1') + rescue Errno::EADDRNOTAVAIL + return # IPv6 address for multicast not available + end + + if Socket.const_defined?(:SO_REUSEPORT) then + assert v6mc.getsockopt(:SOCKET, :SO_REUSEPORT).bool + else + assert v6mc.getsockopt(:SOCKET, :SO_REUSEADDR).bool + end + + assert_equal('::1', v6mc.local_address.ip_address) + assert_equal(@port, v6mc.local_address.ip_port) + end + + def test_ring_server_ipv4_multicast + @rs.shutdown + @rs = Rinda::RingServer.new(@ts, [['239.0.0.1', '0.0.0.0']], @port) + v4mc = @rs.instance_variable_get('@sockets').first + + if Socket.const_defined?(:SO_REUSEPORT) then + assert(v4mc.getsockopt(:SOCKET, :SO_REUSEPORT).bool) + else + assert(v4mc.getsockopt(:SOCKET, :SO_REUSEADDR).bool) + end + + assert_equal('0.0.0.0', v4mc.local_address.ip_address) + assert_equal(@port, v4mc.local_address.ip_port) + end + + def test_ring_server_ipv6_multicast + skip 'IPv6 not available' unless + Socket.ip_address_list.any? { |addrinfo| addrinfo.ipv6? } + + @rs.shutdown + begin + @rs = Rinda::RingServer.new(@ts, [['ff02::1', '::1', 0]], @port) + rescue Errno::EADDRNOTAVAIL + return # IPv6 address for multicast not available + end + + v6mc = @rs.instance_variable_get('@sockets').first + + if Socket.const_defined?(:SO_REUSEPORT) then + assert v6mc.getsockopt(:SOCKET, :SO_REUSEPORT).bool + else + assert v6mc.getsockopt(:SOCKET, :SO_REUSEADDR).bool + end + + assert_equal('::1', v6mc.local_address.ip_address) + assert_equal(@port, v6mc.local_address.ip_port) + end + + def test_shutdown + @rs.shutdown + + assert_nil(@rs.do_reply, 'otherwise should hang forever') + end + + private + + def with_timeout(n) + aoe = Thread.abort_on_exception + Thread.abort_on_exception = true + tl0 = Thread.list + tl = nil + th = Thread.new(Thread.current) do |mth| + sleep n + (tl = Thread.list - tl0).each {|t|t.raise(Timeout::Error)} + mth.raise(Timeout::Error) + end + tl0 << th + rescue Timeout::Error => e + if tl + bt = e.backtrace + tl.each do |t| + begin + t.value + rescue Timeout::Error => e + bt.unshift("") + bt[0, 0] = e.backtrace + end + end + end + raise Timeout::Error, "timeout", bt + ensure + if th + th.kill + th.join + end + Thread.abort_on_exception = aoe + end + + def wait_for(n) + t = n + Process.clock_gettime(Process::CLOCK_MONOTONIC, :second) + until yield + if t < Process.clock_gettime(Process::CLOCK_MONOTONIC, :second) + flunk "timeout during waiting call" + end + sleep 0.1 + end + end +end + +class TestRingFinger < Test::Unit::TestCase + include RingIPv6 + + def setup + @rf = Rinda::RingFinger.new + end + + def test_make_socket_unicast + v4 = @rf.make_socket('127.0.0.1') + + assert(v4.getsockopt(:SOL_SOCKET, :SO_BROADCAST).bool) + ensure + v4.close if v4 + end + + def test_make_socket_ipv4_multicast + v4mc = @rf.make_socket('239.0.0.1') + + assert_equal(1, v4mc.getsockopt(:IPPROTO_IP, :IP_MULTICAST_LOOP).ipv4_multicast_loop) + assert_equal(1, v4mc.getsockopt(:IPPROTO_IP, :IP_MULTICAST_TTL).ipv4_multicast_ttl) + ensure + v4mc.close if v4mc + end + + def test_make_socket_ipv6_multicast + ifaddr = prepare_ipv6(@rf) + begin + v6mc = @rf.make_socket("ff02::1") + rescue Errno::EINVAL + # somehow Debian 6.0.7 needs ifname + v6mc = @rf.make_socket("ff02::1%#{ifaddr.name}") + end + + assert_equal(1, v6mc.getsockopt(:IPPROTO_IPV6, :IPV6_MULTICAST_LOOP).int) + assert_equal(1, v6mc.getsockopt(:IPPROTO_IPV6, :IPV6_MULTICAST_HOPS).int) + ensure + v6mc.close if v6mc + end + + def test_make_socket_ipv4_multicast_hops + @rf.multicast_hops = 2 + v4mc = @rf.make_socket('239.0.0.1') + assert_equal(2, v4mc.getsockopt(:IPPROTO_IP, :IP_MULTICAST_TTL).ipv4_multicast_ttl) + ensure + v4mc.close if v4mc + end + + def test_make_socket_ipv6_multicast_hops + ifaddr = prepare_ipv6(@rf) + @rf.multicast_hops = 2 + begin + v6mc = @rf.make_socket("ff02::1") + rescue Errno::EINVAL + # somehow Debian 6.0.7 needs ifname + v6mc = @rf.make_socket("ff02::1%#{ifaddr.name}") + end + assert_equal(2, v6mc.getsockopt(:IPPROTO_IPV6, :IPV6_MULTICAST_HOPS).int) + ensure + v6mc.close if v6mc + end + +end + +end + diff --git a/jni/ruby/test/rinda/test_tuplebag.rb b/jni/ruby/test/rinda/test_tuplebag.rb new file mode 100644 index 0000000..3e30127 --- /dev/null +++ b/jni/ruby/test/rinda/test_tuplebag.rb @@ -0,0 +1,172 @@ +require 'test/unit' +require 'rinda/tuplespace' + +class TestTupleBag < Test::Unit::TestCase + + def setup + @tb = Rinda::TupleBag.new + end + + def test_delete + assert_nothing_raised do + val = @tb.delete tup(:val, 1) + assert_equal nil, val + end + + t = tup(:val, 1) + @tb.push t + + val = @tb.delete t + + assert_equal t, val + + assert_equal [], @tb.find_all(tem(:val, 1)) + + t1 = tup(:val, 1) + t2 = tup(:val, 1) + @tb.push t1 + @tb.push t2 + + val = @tb.delete t1 + + assert_equal t1, val + + assert_equal [t2], @tb.find_all(tem(:val, 1)) + end + + def test_delete_unless_alive + assert_equal [], @tb.delete_unless_alive + + t1 = tup(:val, nil) + t2 = tup(:val, nil) + + @tb.push t1 + @tb.push t2 + + assert_equal [], @tb.delete_unless_alive + + t1.cancel + + assert_equal [t1], @tb.delete_unless_alive, 'canceled' + + t2.renew Object.new + + assert_equal [t2], @tb.delete_unless_alive, 'expired' + end + + def test_find + template = tem(:val, nil) + + assert_equal nil, @tb.find(template) + + t1 = tup(:other, 1) + @tb.push t1 + + assert_equal nil, @tb.find(template) + + t2 = tup(:val, 1) + @tb.push t2 + + assert_equal t2, @tb.find(template) + + t2.cancel + + assert_equal nil, @tb.find(template), 'canceled' + + t3 = tup(:val, 3) + @tb.push t3 + + assert_equal t3, @tb.find(template) + + t3.renew Object.new + + assert_equal nil, @tb.find(template), 'expired' + end + + def test_find_all + template = tem(:val, nil) + + t1 = tup(:other, 1) + @tb.push t1 + + assert_equal [], @tb.find_all(template) + + t2 = tup(:val, 2) + t3 = tup(:val, 3) + + @tb.push t2 + @tb.push t3 + + assert_equal [t2, t3], @tb.find_all(template) + + t2.cancel + + assert_equal [t3], @tb.find_all(template), 'canceled' + + t3.renew Object.new + + assert_equal [], @tb.find_all(template), 'expired' + end + + def test_find_all_template + tuple = tup(:val, 1) + + t1 = tem(:other, nil) + @tb.push t1 + + assert_equal [], @tb.find_all_template(tuple) + + t2 = tem(:val, nil) + t3 = tem(:val, nil) + + @tb.push t2 + @tb.push t3 + + assert_equal [t2, t3], @tb.find_all_template(tuple) + + t2.cancel + + assert_equal [t3], @tb.find_all_template(tuple), 'canceled' + + t3.renew Object.new + + assert_equal [], @tb.find_all_template(tuple), 'expired' + end + + def test_has_expires_eh + assert !@tb.has_expires? + + t = tup(:val, 1) + @tb.push t + + assert @tb.has_expires? + + t.renew Object.new + + assert !@tb.has_expires? + end + + def test_push + t = tup(:val, 1) + + @tb.push t + + assert_equal t, @tb.find(tem(:val, 1)) + end + + ## + # Create a tuple with +ary+ for its contents + + def tup(*ary) + Rinda::TupleEntry.new ary + end + + ## + # Create a template with +ary+ for its contents + + def tem(*ary) + Rinda::TemplateEntry.new ary + end + +end + -- cgit v1.2.3