tmm1-em-spec 0.1.0

data/README

@@ -0,0 +1,40 @@
+Simple BDD API for testing asynchronous Ruby/EventMachine code
+  (c) 2008 Aman Gupta (tmm1)
+
+
+The API is identical to Bacon, except that you must explicitly call 'done' after all the current behavior's assertions have been made:
+
+  require 'em/spec'
+
+  EM.describe EventMachine do
+
+    should 'have timers' do
+      start = Time.now
+
+      EM.add_timer(0.5){
+        (Time.now-start).should.be.close 0.5, 0.1
+        done
+      }
+    end
+
+    should 'have periodic timers' do
+      num = 0
+      start = Time.now
+
+      timer = EM.add_periodic_timer(0.5){
+        if (num += 1) == 2
+          (Time.now-start).should.be.close 1.0, 0.1
+          EM.__send__ :cancel_timer, timer
+          done
+        end
+      }
+    end
+
+  end
+
+
+Resources:
+
+  Git repository: http://github.com/tmm1/em-spec
+  Bacon: http://groups.google.com/group/comp.lang.ruby/browse_thread/thread/30b07b651b0662fd
+  Initial announcement: http://groups.google.com/group/eventmachine/browse_thread/thread/8b4e7ead72f9d013

data/lib/em/spec.rb

@@ -0,0 +1,58 @@
+require File.dirname(__FILE__) + '/../ext/fiber18'
+
+require 'bacon'
+
+class Bacon::Context
+  unless method_defined? :_it
+    alias :_it :it
+    def it *args
+      _it(*args){ if block_given? then yield; Fiber.yield end }
+    end
+    def done() $bacon_fiber.resume if $bacon_fiber end
+    alias :resume :done
+  end
+end
+
+require 'eventmachine'
+
+module EventMachine
+  def self.spec *args, &blk
+    raise ArgumentError, 'block required' unless block_given?
+    raise 'EventMachine reactor already running' if EM.reactor_running?
+
+    EM.run{
+      Bacon.summary_on_exit
+      ($bacon_fiber = Fiber.new{
+                        Bacon::Context.new(args.join(' '), &blk)
+                        EM.stop_event_loop
+                      }).resume
+    }
+  end
+  class << self; alias :describe :spec; end
+end
+
+EM.describe EventMachine do
+
+  should 'have timers' do
+    start = Time.now
+
+    EM.add_timer(0.5){
+      (Time.now-start).should.be.close 0.5, 0.1
+      done
+    }
+  end
+
+  should 'have periodic timers' do
+    num = 0
+    start = Time.now
+
+    timer = EM.add_periodic_timer(0.5){
+      if (num += 1) == 2
+        (Time.now-start).should.be.close 1.0, 0.1
+        EM.__send__ :cancel_timer, timer
+        done
+      end
+    }
+  end
+
+end if __FILE__ == $0

data/lib/ext/em.rb

@@ -0,0 +1,37 @@
+begin
+  require 'eventmachine'
+rescue LoadError
+  require 'rubygems'
+  require 'eventmachine'
+end
+
+# copied from EM trunk, will be removed when 0.12.1 is released
+if EM::VERSION < '0.12.1'
+    
+  def EventMachine::run blk=nil, tail=nil, &block
+    @tails ||= []
+    tail and @tails.unshift(tail)
+
+    if reactor_running?
+      (b = blk || block) and b.call # next_tick(b)
+    else
+      @conns = {}
+      @acceptors = {}
+      @timers = {}
+      begin
+        @reactor_running = true
+        initialize_event_machine
+        (b = blk || block) and add_timer(0, b)
+        run_machine
+      ensure
+        release_machine
+        @reactor_running = false
+      end
+
+      until @tails.empty?
+        @tails.pop.call
+      end
+    end
+  end
+
+end

data/lib/ext/fiber18.rb

@@ -0,0 +1,70 @@
+# Poor Man's Fiber (API compatible Thread based Fiber implementation for Ruby 1.8)
+# (c) 2008 Aman Gupta (tmm1)
+
+unless defined? Fiber
+  require 'thread'
+
+  class FiberError < StandardError; end
+
+  class Fiber
+    def initialize
+      raise ArgumentError, 'new Fiber requires a block' unless block_given?
+
+      @yield = Queue.new
+      @resume = Queue.new
+
+      @thread = Thread.new{ @yield.push [ *yield(*@resume.pop) ] }
+      @thread.abort_on_exception = true
+      @thread[:fiber] = self
+    end
+    attr_reader :thread
+
+    def resume *args
+      raise FiberError, 'dead fiber called' unless @thread.alive?
+      @resume.push(args)
+      result = @yield.pop
+      result.size > 1 ? result : result.first
+    end
+    
+    def yield *args
+      @yield.push(args)
+      result = @resume.pop
+      result.size > 1 ? result : result.first
+    end
+    
+    def self.yield *args
+      raise FiberError, "can't yield from root fiber" unless fiber = Thread.current[:fiber]
+      fiber.yield(*args)
+    end
+
+    def self.current
+      Thread.current[:fiber] or raise FiberError, 'not inside a fiber'
+    end
+
+    def inspect
+      "#<#{self.class}:0x#{self.object_id.to_s(16)}>"
+    end
+  end
+end
+
+if __FILE__ == $0
+  f = Fiber.new{ puts 'hi'; p Fiber.yield(1); puts 'bye'; :done }
+  p f.resume
+  p f.resume(2)
+end
+
+__END__
+
+$ ruby fbr.rb 
+hi
+1
+2
+bye
+:done
+
+$ ruby1.9 fbr.rb 
+hi
+1
+2
+bye
+:done

metadata

@@ -0,0 +1,64 @@
+--- !ruby/object:Gem::Specification 
+name: tmm1-em-spec
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Aman Gupta
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-08-01 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: eventmachine
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.12.0
+    version: 
+description: Bacon based BDD API for Ruby/EventMachine
+email: em-spec@tmm1.net
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- README
+- lib/em/spec.rb
+- lib/ext/em.rb
+- lib/ext/fiber18.rb
+has_rdoc: false
+homepage: http://github.com/tmm1/em-spec
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: Bacon based BDD API for Ruby/EventMachine
+test_files: []
+