eventmachine-maglev- 0.12.10 → 1.0.0.beta.4

data/tests/test_pure.rb

@@ -1,76 +1,36 @@
-# $Id$
-#
-# Author:: Francis Cianfrocca (gmail: blackhedd)
-# Homepage::  http://rubyeventmachine.com
-# Date:: 8 April 2006
-# 
-# See EventMachine and EventMachine::Connection for documentation and
-# usage examples.
-#
-#----------------------------------------------------------------------------
-#
-# Copyright (C) 2006-07 by Francis Cianfrocca. All Rights Reserved.
-# Gmail: blackhedd
-# 
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of either: 1) the GNU General Public License
-# as published by the Free Software Foundation; either version 2 of the
-# License, or (at your option) any later version; or 2) Ruby's License.
-# 
-# See the file COPYING for complete licensing information.
-#
-#---------------------------------------------------------------------------
-#
-#
-# 
-
-$:.unshift "../lib"
-require 'eventmachine'
-require 'test/unit'
+require 'em_test_helper'
 
 class TestPure < Test::Unit::TestCase
 
-
-  Host,Port = "0.0.0.0", 9060
-
+  def setup
+    @port = next_port
+  end
 
   # These tests are intended to exercise problems that come up in the
   # pure-Ruby implementation. However, we DON'T constrain them such that
   # they only run in pure-Ruby. These tests need to work identically in
   # any implementation.
 
-  def setup
-  end
-
-  def teardown
-  end
-
   #-------------------------------------
 
   # The EM reactor needs to run down open connections and release other resources
   # when it stops running. Make sure this happens even if user code throws a Ruby
   # exception.
-  # One way to see this is to run identical tests that open a TCP server and throw
-  # an exception. (We do this twice because an exception aborts a test. We make the
-  # two tests identical except for the method name because we can't predict the order
-  # in which the test harness will run them.)
   # If exception handling is incorrect, the second test will fail with a no-bind error
   # because the TCP server opened in the first test will not have been closed.
-  #
-  def run_exception
-      EM.run {
-        EM.start_server Host, Port
-        raise "an exception"
-      }
-  end
-  def test_exception_1
-    assert_raises( RuntimeError ) { run_exception }
-  end
-  def test_exception_2
-    ex_class = RUBY_PLATFORM == 'java' ? NativeException : RuntimeError
-    assert_raises( ex_class ) { run_exception }
-  end
 
+  def test_exception_handling_releases_resources
+    exception = Class.new(StandardError)
+
+    2.times do
+      assert_raises(exception) do
+        EM.run do
+          EM.start_server "127.0.0.1", @port
+          raise exception
+        end
+      end
+    end
+  end
 
   # Under some circumstances, the pure Ruby library would emit an Errno::ECONNREFUSED
   # exception on certain kinds of TCP connect-errors.
@@ -87,13 +47,16 @@ class TestPure < Test::Unit::TestCase
       raise "should never get here"
     end
   end
+
   def test_connrefused
-    EM.run {
-      EM.connect "0.0.0.0", 60001, TestConnrefused
-    }
+    assert_nothing_raised do
+      EM.run {
+        setup_timeout(2)
+        EM.connect "127.0.0.1", @port, TestConnrefused
+      }
+    end
   end
 
-
   # Make sure connection_completed gets called as expected with TCP clients. This is the
   # opposite of test_connrefused.
   # If the test fails, it will hang because EM.stop never gets called.
@@ -104,13 +67,13 @@ class TestPure < Test::Unit::TestCase
     end
   end
   def test_connaccepted
-    timeout = false
-    EM.run {
-      EM.start_server "0.0.0.0", 60002
-      EM.connect "0.0.0.0", 60002, TestConnaccepted
-      EM::Timer.new(1) {timeout = true; EM.stop}
-    }
-    assert_equal( false, timeout )
+    assert_nothing_raised do
+      EM.run {
+        EM.start_server "127.0.0.1", @port
+        EM.connect "127.0.0.1", @port, TestConnaccepted
+        setup_timeout(1)
+      }
+    end
   end
 
   def test_reactor_running

data/tests/test_queue.rb

@@ -1,8 +1,6 @@
-$:.unshift "../lib"
-require 'eventmachine'
-require 'test/unit'
+require 'em_test_helper'
 
-class TestEventMachineQueue < Test::Unit::TestCase
+class TestEMQueue < Test::Unit::TestCase
   def test_queue_push
     s = 0
     EM.run do
@@ -41,4 +39,12 @@ class TestEventMachineQueue < Test::Unit::TestCase
     EM.run { EM.next_tick { EM.stop } }
     assert_equal 1, x
   end
+
+  def test_num_waiting
+    q = EM::Queue.new
+    many = 3
+    many.times { q.pop {} }
+    EM.run { EM.next_tick { EM.stop } }
+    assert_equal many, q.num_waiting
+  end
 end

data/tests/test_resolver.rb

@@ -0,0 +1,55 @@
+require 'em_test_helper'
+
+class TestResolver < Test::Unit::TestCase
+  def test_a
+    EM.run {
+      d = EM::DNS::Resolver.resolve "google.com"
+      d.errback { assert false }
+      d.callback { |r|
+        assert r
+        EM.stop
+      }
+    }
+  end
+
+  def test_bad_host
+    EM.run {
+      d = EM::DNS::Resolver.resolve "asdfasasdf"
+      d.callback { assert false }
+      d.errback  { assert true; EM.stop }
+    }
+  end
+
+  def test_garbage
+    assert_raises( ArgumentError ) {
+      EM.run {
+        EM::DNS::Resolver.resolve 123
+      }
+    }
+  end
+
+  def test_a_pair
+    EM.run {
+      d = EM::DNS::Resolver.resolve "google.com"
+      d.errback { assert false }
+      d.callback { |r|
+        assert_equal(Array, r.class)
+        assert r.size > 1
+        EM.stop
+      }
+    }
+  end
+
+  def test_localhost
+    EM.run {
+      d = EM::DNS::Resolver.resolve "localhost"
+      d.errback { assert false }
+      d.callback { |r|
+        assert_equal("127.0.0.1", r.first)
+        assert_equal(Array, r.class)
+
+        EM.stop
+      }
+    }
+  end
+end

data/tests/test_running.rb

@@ -1,32 +1,4 @@
-# $Id$
-#
-# Author:: Francis Cianfrocca (gmail: blackhedd)
-# Homepage::  http://rubyeventmachine.com
-# Date:: 8 April 2006
-# 
-# See EventMachine and EventMachine::Connection for documentation and
-# usage examples.
-#
-#----------------------------------------------------------------------------
-#
-# Copyright (C) 2006-07 by Francis Cianfrocca. All Rights Reserved.
-# Gmail: blackhedd
-# 
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of either: 1) the GNU General Public License
-# as published by the Free Software Foundation; either version 2 of the
-# License, or (at your option) any later version; or 2) Ruby's License.
-# 
-# See the file COPYING for complete licensing information.
-#
-#---------------------------------------------------------------------------
-#
-#
-# 
-
-$:.unshift "../lib"
-require 'eventmachine'
-require 'test/unit'
+require 'em_test_helper'
 
 class TestRunning < Test::Unit::TestCase
   def test_running

data/tests/test_sasl.rb

@@ -1,32 +1,4 @@
-# $Id$
-#
-# Author:: Francis Cianfrocca (gmail: blackhedd)
-# Homepage::  http://rubyeventmachine.com
-# Date:: 8 April 2006
-# 
-# See EventMachine and EventMachine::Connection for documentation and
-# usage examples.
-#
-#----------------------------------------------------------------------------
-#
-# Copyright (C) 2006-07 by Francis Cianfrocca. All Rights Reserved.
-# Gmail: blackhedd
-# 
-# This program is free software; you can redistribute it and/or modify
-# it under the terms of either: 1) the GNU General Public License
-# as published by the Free Software Foundation; either version 2 of the
-# License, or (at your option) any later version; or 2) Ruby's License.
-# 
-# See the file COPYING for complete licensing information.
-#
-#---------------------------------------------------------------------------
-#
-#
-# 
-
-$:.unshift "../lib"
-require 'eventmachine'
-require 'test/unit'
+require 'em_test_helper'
 
 
 class TestSASL < Test::Unit::TestCase
@@ -35,7 +7,6 @@ class TestSASL < Test::Unit::TestCase
   # we'll use TCP so this test will work on Windows. As far as the
   # protocol handlers are concerned, there's no difference.
 
-  Host,Port = "127.0.0.1",9560
   TestUser,TestPsw = "someone", "password"
 
   class SaslServer < EM::Connection
@@ -49,14 +20,18 @@ class TestSASL < Test::Unit::TestCase
     include EM::Protocols::SASLauthclient
   end
 
+  def setup
+    @port = next_port
+  end
+
   def test_sasl
     resp = nil
     EM.run {
-      EM.start_server( Host, Port, SaslServer )
+      EM.start_server( "127.0.0.1", @port, SaslServer )
 
-      c = EM.connect( Host, Port, SaslClient )
+      c = EM.connect( "127.0.0.1", @port, SaslClient )
       d = c.validate?( TestUser, TestPsw )
-      d.timeout 2
+      d.timeout 1
       d.callback {
         resp = true
         EM.stop