mojombo-erlectricity 0.2.1 → 1.0.0

data/test/matcher_spec.rb

@@ -4,23 +4,37 @@ def false_match(matcher, arg)
    matcher.matches?(arg).should == false
 end
 
+context "A matcher whose condition is a String (the class object" do
+  setup do
+    @matcher = Erlectricity::Matcher.new(nil, Erlectricity::TypeCondition.new(String), nil)
+  end
+
+  specify "should match any string" do
+    @matcher.matches?("foo").should == true
+  end
+
+  specify "should not match symbols" do
+    @matcher.matches?(:foo).should == false
+  end
+end
+
 context "A matcher whose condition is Symbol (the class object)" do
   setup do
     @matcher = Erlectricity::Matcher.new(nil, Erlectricity::TypeCondition.new(Symbol), nil)
   end
-  
+
   specify "should match any symbol" do
     @matcher.matches?(:foo).should == true
     @matcher.matches?(:bar).should == true
     @matcher.matches?(:baz).should == true
   end
-  
+
   specify "should not match strings" do
     @matcher.matches?("foo").should == false
     @matcher.matches?("bar").should == false
     @matcher.matches?("baz").should == false
   end
-  
+
   specify "should not match a arrays" do
     @matcher.matches?([:foo]).should == false
     @matcher.matches?([:foo, :bar]).should == false
@@ -32,11 +46,11 @@ context "a matcher whose condition is a symbol" do
   setup do
     @matcher = Erlectricity::Matcher.new(nil, Erlectricity::StaticCondition.new(:foo), nil)
   end
-  
+
   specify "should match that symbol" do
     @matcher.matches?(:foo).should == true
   end
-  
+
   specify "should not match any other symbol" do
     @matcher.matches?(:bar).should == false
     @matcher.matches?(:baz).should == false
@@ -44,16 +58,14 @@ context "a matcher whose condition is a symbol" do
 end
 
 context "a matcher whose matcher is an array" do
-  setup do
-  end
-  
+
   specify "should match if all of its children match" do
     Erlectricity::Matcher.new(nil, [Erlectricity::StaticCondition.new(:speak), Erlectricity::TypeCondition.new(Object)], nil).matches?([:paste, "haha"]).should == false
-    
+
     matcher = Erlectricity::Matcher.new(nil, [Erlectricity::StaticCondition.new(:foo), Erlectricity::StaticCondition.new(:bar)], nil)
     matcher.matches?([:foo, :bar]).should == true
   end
-  
+
   specify "should not match any of its children dont match" do
     matcher = Erlectricity::Matcher.new(nil, [Erlectricity::StaticCondition.new(:foo), Erlectricity::StaticCondition.new(:bar)], nil)
     matcher.matches?([:foo]).should == false
@@ -61,9 +73,9 @@ context "a matcher whose matcher is an array" do
     matcher.matches?([:fooo, :barr]).should == false
     matcher.matches?([3, :bar]).should == false
   end
-  
+
   specify "should not match if arg isn't an array" do
     matcher = Erlectricity::Matcher.new(nil, [Erlectricity::StaticCondition.new(:foo), Erlectricity::StaticCondition.new(:bar)], nil)
     matcher.matches?(:foo).should == false
   end
-end
+end

data/test/port_spec.rb

@@ -9,7 +9,7 @@ context "A port" do
     port.receive.should == :bar
     port.receive.should == nil
   end
-  
+
   specify "should read_from_input if the queue gets empty" do
     port = FakePort.new(:bar)
     port.queue.clear
@@ -18,18 +18,17 @@ context "A port" do
     port.receive.should == :bar
     port.receive.should == nil
   end
-  
+
   specify "should put the terms in skipped at the front of queue when restore_skipped is called" do
     port = FakePort.new(:baz)
     port.queue.clear
     port.queue << :bar
     port.skipped << :foo
     port.restore_skipped
-    
+
     port.receive.should == :foo
     port.receive.should == :bar
     port.receive.should == :baz
     port.receive.should == nil
-    
   end
 end

data/test/receiver_spec.rb

@@ -13,21 +13,20 @@ def simple_receiver_and_port(*terms, &block)
     end
 end
 
-
 context "When a receiver is passed a message that matches two match blocks it" do
   setup do
     @port = FakePort.new([:foo, :foo])
     @receiver = Erlectricity::Receiver.new(@port) do |f|
-      f.when(:foo, :foo) do
+      f.when([:foo, :foo]) do
         :first
       end
-      
-      f.when(:foo, Erl.any) do
+
+      f.when([:foo, Erl.any]) do
         :second
       end
     end
   end
-  
+
   specify "should run the first matching receiver's block" do
     @receiver.run.should == :first
   end
@@ -39,17 +38,17 @@ context "A receiver" do
     simple_receiver_and_port(:bar).run.should == :matched
     simple_receiver_and_port(:bar, :baz).run.should == :matched
   end
-  
+
   specify "should process another message if the matched block returns the results of receive_loop" do
     recv = simple_receiver_and_port(:foo, :bar, :baz) do |f|
       f.when(:bar) {  }
       f.when(Erl.any) { f.receive_loop }
     end
-    
+
     recv.run
     recv.port.terms.should == [:baz]
   end
-  
+
   specify "should properly nest" do
     @port = FakePort.new(:foo, :bar, :baz)
     @receiver = Erlectricity::Receiver.new(@port) do |f|
@@ -57,18 +56,18 @@ context "A receiver" do
         f.receive do |g|
           g.when(:bar){ :ok }
         end
-        f.receive_loop  
+        f.receive_loop
       end
-      
+
       f.when(:baz) do
         :done
       end
     end
-    
+
     @receiver.run.should == :done
     @port.terms.should == []
   end
-  
+
   specify "should queue up skipped results and restore them when a match happens" do
     @port = FakePort.new(:foo, :baz, :bar)
     @receiver = Erlectricity::Receiver.new(@port) do |f|
@@ -76,30 +75,29 @@ context "A receiver" do
         f.receive do |g|
           g.when(:bar){ :ok }
         end
-        f.receive_loop  
+        f.receive_loop
       end
-      
+
       f.when(:baz) do
         :done
       end
     end
-    
+
     @receiver.run.should == :done
-    @port.terms.should == []  
+    @port.terms.should == []
   end
-  
+
   specify "should expose bindings to the matched block" do
     @port = FakePort.new(:foo, :bar, :baz)
     results = []
     @receiver = Erlectricity::Receiver.new(@port) do |f|
       f.when(Erl.atom) do |bindinated|
         results << bindinated
-        f.receive_loop  
+        f.receive_loop
       end
     end
-    
+
     @receiver.run.should == nil
     results.should == [:foo, :bar, :baz]
   end
-
 end

data/test/test_helper.rb

@@ -1,21 +1,24 @@
 $:.unshift(File.dirname(__FILE__) + '/../lib')
+
 require 'erlectricity'
 require 'rubygems'
 require 'test/unit'
 require 'test/spec'
+require 'stringio'
+
+$stdout.sync = true
 
 class Test::Unit::TestCase
-  
   def run_erl(code)
     cmd = %Q{erl -noshell -eval "A = #{code.split.join(' ')}, io:put_chars(A)." -s erlang halt}
     `#{cmd}`
   end
-  
+
   def encode_packet(code)
     bin = run_erl("term_to_binary(#{code})")
     [bin.length, bin].pack("Na#{bin.length}")
   end
-  
+
   def word_length
     (1.size * 8) - 2
   end
@@ -24,7 +27,7 @@ end
 class FakePort < Erlectricity::Port
   attr_reader :sent
   attr_reader :terms
-  
+
   def initialize(*terms)
     @terms = terms
     @sent = []
@@ -34,8 +37,9 @@ class FakePort < Erlectricity::Port
   def send(term)
     sent << term
   end
-  
+
   private
+
   def read_from_input
     @terms.shift
   end

metadata

@@ -1,53 +1,53 @@
 --- !ruby/object:Gem::Specification 
 name: mojombo-erlectricity
 version: !ruby/object:Gem::Version 
-  version: 0.2.1
+  version: 1.0.0
 platform: ruby
 authors: 
 - Scott Fleckenstein
+- Tom Preston-Werner
 autorequire: 
 bindir: bin
 cert_chain: []
 
-date: 2008-06-04 00:00:00 -07:00
+date: 2009-04-29 00:00:00 -07:00
 default_executable: 
-dependencies: 
-- !ruby/object:Gem::Dependency 
-  name: concurrent
-  version_requirement: 
-  version_requirements: !ruby/object:Gem::Requirement 
-    requirements: 
-    - - "="
-      - !ruby/object:Gem::Version 
-        version: 0.2.2
-    version: 
-description: A library to interface erlang and ruby through the erlang port system
-email: nullstyle@gmail.com
+dependencies: []
+
+description: 
+email: tom@mojombo.com
 executables: []
 
 extensions: 
 - ext/extconf.rb
 extra_rdoc_files: 
-- History.txt
-- Manifest.txt
-- README.txt
+- LICENSE
+- README.md
 files: 
-- CONTRIBUTORS
 - History.txt
-- Manifest.txt
-- README.txt
+- LICENSE
+- README.md
 - Rakefile
+- VERSION.yml
+- examples/echo/README.md
+- examples/echo/echo.erl
+- examples/echo/echo.rb
 - examples/gruff/gruff.erl
 - examples/gruff/gruff_provider.rb
-- examples/gruff/gruff_run.erl
-- examples/gruff/stat_run.erl
+- examples/gruff/gruff_run.sh
+- examples/gruff/stat_run.sh
 - examples/gruff/stat_writer.erl
+- examples/simple/README.md
+- examples/simple/rerl.rb
+- examples/simple/rerl.sh
+- examples/tinderl/README.md
 - examples/tinderl/tinderl.erl
 - examples/tinderl/tinderl.rb
 - ext/decoder.c
 - ext/extconf.rb
 - lib/erlectricity.rb
 - lib/erlectricity/condition.rb
+- lib/erlectricity/conditions/boolean.rb
 - lib/erlectricity/conditions/hash.rb
 - lib/erlectricity/conditions/static.rb
 - lib/erlectricity/conditions/type.rb
@@ -67,7 +67,6 @@ files:
 - lib/erlectricity/types/pid.rb
 - lib/erlectricity/types/reference.rb
 - lib/erlectricity/version.rb
-- setup.rb
 - test/condition_spec.rb
 - test/decode_spec.rb
 - test/encode_spec.rb
@@ -75,14 +74,12 @@ files:
 - test/port_spec.rb
 - test/receiver_spec.rb
 - test/spec_suite.rb
-- test/test_erlectricity.rb
 - test/test_helper.rb
 has_rdoc: true
-homepage: http://erlectricity.rubyforge.org
+homepage: http://github.com/mojombo/erlectricity
 post_install_message: 
 rdoc_options: 
-- --main
-- README.txt
+- --charset=UTF-8
 require_paths: 
 - lib
 - ext
@@ -101,10 +98,20 @@ required_rubygems_version: !ruby/object:Gem::Requirement
 requirements: []
 
 rubyforge_project: erlectricity
-rubygems_version: 1.0.1
+rubygems_version: 1.2.0
 signing_key: 
 specification_version: 2
 summary: A library to interface erlang and ruby through the erlang port system
 test_files: 
-- test/test_erlectricity.rb
+- test/condition_spec.rb
+- test/decode_spec.rb
+- test/encode_spec.rb
+- test/matcher_spec.rb
+- test/port_spec.rb
+- test/receiver_spec.rb
+- test/spec_suite.rb
 - test/test_helper.rb
+- examples/echo/echo.rb
+- examples/gruff/gruff_provider.rb
+- examples/simple/rerl.rb
+- examples/tinderl/tinderl.rb

data/CONTRIBUTORS

@@ -1,2 +0,0 @@
-Tom Preston-Werner
-  - provided the C extension that replaces the ruby decoder

data/Manifest.txt

@@ -1,45 +0,0 @@
-CONTRIBUTORS
-History.txt
-Manifest.txt
-README.txt
-Rakefile
-examples/gruff/gruff.erl
-examples/gruff/gruff_provider.rb
-examples/gruff/gruff_run.erl
-examples/gruff/stat_run.erl
-examples/gruff/stat_writer.erl
-examples/tinderl/tinderl.erl
-examples/tinderl/tinderl.rb
-ext/decoder.c
-ext/extconf.rb
-lib/erlectricity.rb
-lib/erlectricity/condition.rb
-lib/erlectricity/conditions/hash.rb
-lib/erlectricity/conditions/static.rb
-lib/erlectricity/conditions/type.rb
-lib/erlectricity/constants.rb
-lib/erlectricity/decoder.rb
-lib/erlectricity/encoder.rb
-lib/erlectricity/errors/decode_error.rb
-lib/erlectricity/errors/encode_error.rb
-lib/erlectricity/errors/erlectricity_error.rb
-lib/erlectricity/matcher.rb
-lib/erlectricity/port.rb
-lib/erlectricity/receiver.rb
-lib/erlectricity/types/function.rb
-lib/erlectricity/types/list.rb
-lib/erlectricity/types/new_function.rb
-lib/erlectricity/types/new_reference.rb
-lib/erlectricity/types/pid.rb
-lib/erlectricity/types/reference.rb
-lib/erlectricity/version.rb
-setup.rb
-test/condition_spec.rb
-test/decode_spec.rb
-test/encode_spec.rb
-test/matcher_spec.rb
-test/port_spec.rb
-test/receiver_spec.rb
-test/spec_suite.rb
-test/test_erlectricity.rb
-test/test_helper.rb

data/README.txt

@@ -1,43 +0,0 @@
-erlectricity
-  by Scott Fleckenstein
-     Tom Preston-Werner
-     
-     http://github.com/mojombo/erlectricity
-     
-== DESCRIPTION:
-
-Erlectricity allows a Ruby program to receive and respond to Erlang messages
-sent over the Erlang binary protocol.
-
-== INSTALL:
-
-$ gem install erlectricity
-
-== USAGE (Ruby side):
-
-require 'rubygems'
-require 'erlectricity'
-require 'stringio'
-
-receive do |f|
-  f.when(:echo, String) do |text|
-    f.send!(:result, "You said: #{text}")
-    f.receive_loop
-  end
-end
-
-== USAGE (Erlang side):
-
--module(echo).
--export([test/0]).
-
-test() ->
-  Cmd = "ruby echo.rb",
-  Port = open_port({spawn, Cmd}, [{packet, 4}, use_stdio, exit_status, binary]), 
-  Payload = term_to_binary({echo, <<"hello world!">>}),
-  port_command(Port, Payload),
-  receive
-    {Port, {data, Data}} ->
-      {result, Text} = binary_to_term(Data),
-      io:format("~p~n", [Text])
-  end.