eventmachine-win32 0.7.0 → 0.7.2

data/tests/test_basic.rb

@@ -1,38 +1,28 @@
-# $Id: test_basic.rb 225 2006-08-10 08:53:52Z blackhedd $
-#
-# Author:: blackhedd (gmail address: garbagecat10).
-# Date:: 8 Apr 2006
-#
-# Copyright (C) 2006 by Francis Cianfrocca. All Rights Reserved.
-#
-# This program is made available under the terms of the GPL version 2.
+# $Id: test_basic.rb 323 2007-05-22 22:22:43Z blackhedd $
 #
+# 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 by Francis Cianfrocca. All Rights Reserved.
-#
-# Gmail: garbagecat10
-#
+# 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 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.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# 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'

data/tests/test_eventables.rb

@@ -1,38 +1,28 @@
-# $Id: test_eventables.rb 252 2006-09-02 19:23:20Z blackhedd $
-#
-# Author:: blackhedd (gmail address: garbagecat10).
-# Date:: 8 Apr 2006
-#
-# Copyright (C) 2006 by Francis Cianfrocca. All Rights Reserved.
-#
-# This program is made available under the terms of the GPL version 2.
+# $Id: test_eventables.rb 323 2007-05-22 22:22:43Z blackhedd $
 #
+# 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 by Francis Cianfrocca. All Rights Reserved.
-#
-# Gmail: garbagecat10
-#
+# 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 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.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# 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'

data/tests/test_exc.rb

@@ -0,0 +1,57 @@
+# $Id: test_exc.rb 323 2007-05-22 22:22:43Z blackhedd $
+#
+# 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'
+
+class TestSomeExceptions < Test::Unit::TestCase
+
+
+    # Read the commentary in EventMachine#run.
+    # This test exercises the ensure block in #run that makes sure
+    # EventMachine#release_machine gets called even if an exception is
+    # thrown within the user code. Without the ensured call to release_machine,
+    # the second call to EventMachine#run will fail with a C++ exception
+    # because the machine wasn't cleaned up properly.
+
+    def test_a
+	assert_raise(RuntimeError) {
+	    EventMachine.run {
+		raise "some exception"
+	    }
+	}
+    end
+
+    def test_b
+	assert_raise(RuntimeError) {
+	    EventMachine.run {
+		raise "some exception"
+	    }
+	}
+    end
+
+
+end
+

data/tests/test_futures.rb

@@ -0,0 +1,136 @@
+# $Id: test_futures.rb 323 2007-05-22 22:22:43Z blackhedd $
+#
+# 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'
+
+
+
+class TestFutures < Test::Unit::TestCase
+
+  def setup
+  end
+
+  def teardown
+  end
+
+  def test_future
+      assert_equal(100, EventMachine::Deferrable.future(100) )
+
+      p1 = proc { 100 + 1 }
+      assert_equal(101, EventMachine::Deferrable.future(p1) )
+  end
+
+
+
+  class MyFuture
+      include EventMachine::Deferrable
+      def initialize *args
+	  super
+	  set_deferred_status :succeeded, 40
+      end
+  end
+
+  class MyErrorFuture
+      include EventMachine::Deferrable
+      def initialize *args
+	  super
+	  set_deferred_status :failed, 41
+      end
+  end
+
+
+  def test_future_1
+      # Call future with one additional argument and it will be treated as a callback.
+      def my_future
+	  MyFuture.new
+      end
+
+      value = nil
+      EventMachine::Deferrable.future my_future, proc {|v| value=v}
+      assert_equal( 40, value )
+  end
+
+
+  def test_future_2
+      # Call future with two additional arguments and they will be treated as a callback
+      # and an errback.
+      value = nil
+      EventMachine::Deferrable.future MyErrorFuture.new, nil, proc {|v| value=v}
+      assert_equal( 41, value )
+  end
+
+
+  def test_future_3
+      # Call future with no additional arguments but with a block, and the block will be
+      # treated as a callback.
+      value = nil
+      EventMachine::Deferrable.future MyFuture.new do |v|
+	  value=v
+      end
+      assert_equal( 40, value )
+  end
+
+
+  class RecursiveCallback
+      include EventMachine::Deferrable
+  end
+
+  # A Deferrable callback can call #set_deferred_status to change the values
+  # passed to subsequent callbacks.
+  #
+  def test_recursive_callbacks
+      n = 0 # counter assures that all the tests actually run.
+      rc = RecursiveCallback.new
+      rc.callback {|a|
+	  assert_equal(100, a)
+	  n += 1
+	  rc.set_deferred_status :succeeded, 101, 101
+      }
+      rc.callback {|a,b|
+	  assert_equal(101, a)
+	  assert_equal(101, b)
+	  n += 1
+	  rc.set_deferred_status :succeeded, 102, 102, 102
+      }
+      rc.callback {|a,b,c|
+	  assert_equal(102, a)
+	  assert_equal(102, b)
+	  assert_equal(102, c)
+	  n += 1
+      }
+      rc.set_deferred_status :succeeded, 100
+      assert_equal(3, n)
+  end
+
+  def test_syntactic_sugar
+	  rc = RecursiveCallback.new
+	  rc.set_deferred_success 100
+	  rc.set_deferred_failure 200
+  end
+
+end
+

data/tests/test_hc.rb

@@ -1,38 +1,28 @@
-# $Id: test_hc.rb 281 2006-11-20 03:17:22Z blackhedd $
-#
-# Author:: blackhedd (gmail address: garbagecat10).
-# Date:: 8 Apr 2006
-#
-# Copyright (C) 2006 by Francis Cianfrocca. All Rights Reserved.
-#
-# This program is made available under the terms of the GPL version 2.
+# $Id: test_hc.rb 323 2007-05-22 22:22:43Z blackhedd $
 #
+# 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 by Francis Cianfrocca. All Rights Reserved.
-#
-# Gmail: garbagecat10
-#
+# 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 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.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# 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'

data/tests/test_httpclient.rb

@@ -1,44 +1,37 @@
-# $Id: test_httpclient.rb 226 2006-08-10 08:55:49Z blackhedd $
-#
-# Author:: blackhedd (gmail address: garbagecat10).
-# Date:: 8 Apr 2006
-#
-# Copyright (C) 2006 by Francis Cianfrocca. All Rights Reserved.
-#
-# This program is made available under the terms of the GPL version 2.
+# $Id: test_httpclient.rb 323 2007-05-22 22:22:43Z blackhedd $
 #
+# 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 by Francis Cianfrocca. All Rights Reserved.
-#
-# Gmail: garbagecat10
-#
+# 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 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.
-#
-# This program is distributed in the hope that it will be useful,
-# but WITHOUT ANY WARRANTY; without even the implied warranty of
-# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-# GNU General Public License for more details.
-#
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
+# 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'
 
 class TestHttpClient < Test::Unit::TestCase
 
+    Localhost = "127.0.0.1"
+    Localport = 9801
+
   def setup
   end
 
@@ -79,7 +72,6 @@ class TestHttpClient < Test::Unit::TestCase
     EventMachine.run {
       c = EventMachine::Protocols::HttpClient.send :request, :host => "www.bayshorenetworks.com", :port => 80
       c.callback {|result|
-p result
         ok = true;
         EventMachine.stop
       }
@@ -89,6 +81,95 @@ p result
   end
 
 
+  #-----------------------------------------
+
+  # Test a server that returns a page with a zero content-length.
+  # This caused an early version of the HTTP client not to generate a response,
+  # causing this test to hang. Observe, there was no problem with responses
+  # lacking a content-length, just when the content-length was zero.
+  #
+  class EmptyContent < EventMachine::Connection
+      def initialize *args
+	  super
+      end
+      def receive_data data
+	  send_data "HTTP/1.0 404 ...\r\nContent-length: 0\r\n\r\n"
+	  close_connection_after_writing
+      end
+  end
+
+  def test_http_empty_content
+      ok = false
+      EventMachine.run {
+	  EventMachine.start_server "127.0.0.1", 9701, EmptyContent
+	  c = EventMachine::Protocols::HttpClient.send :request, :host => "127.0.0.1", :port => 9701
+	  c.callback {|result|
+	      ok = true
+	      EventMachine.stop
+	  }
+      }
+      assert ok
+  end
+
+  #---------------------------------------
+
+  class PostContent < EventMachine::Protocols::LineAndTextProtocol
+      def initialize *args
+	  super
+	  @lines = []
+      end
+      def receive_line line
+	  if line.length > 0
+	      @lines << line
+	  else
+	      process_headers
+	  end
+      end
+      def receive_binary_data data
+	  @post_content = data
+	  send_response
+      end
+      def process_headers
+	  if @lines.first =~ /\APOST ([^\s]+) HTTP\/1.1\Z/
+	      @uri = $1.dup
+	  else
+	      raise "bad request"
+	  end
+	  @lines.each {|line|
+	      if line =~ /\AContent-length:\s*(\d+)\Z/i
+		  @content_length = $1.dup.to_i
+	      elsif line =~ /\AContent-type:\s*(\d+)\Z/i
+		  @content_type = $1.dup
+	      end
+	  }
+
+	  raise "invalid content length" unless @content_length
+	  set_binary_mode @content_length
+      end
+      def send_response
+	  send_data "HTTP/1.1 200 ...\r\nConnection: close\r\nContent-length: 10\r\nContent-type: text/html\r\n\r\n0123456789"
+	  close_connection_after_writing
+      end
+  end
+
+  def test_post
+      response = nil
+      EventMachine.run {
+	  EventMachine.start_server Localhost, Localport, PostContent
+	  EventMachine.add_timer(2) {raise "timed out"}
+	  c = EventMachine::Protocols::HttpClient.request :host=>Localhost,
+	      :port=>Localport, :method=>:post, :request=>"/aaa", :content=>"XYZ",
+	      :content_type=>"text/plain"
+          c.callback {|r|
+	      response = r
+	      EventMachine.stop
+	  }
+      }
+
+      assert_equal( 200, response[:status] )
+      assert_equal( "0123456789", response[:content] )
+  end
+
 end