serializable_proc 0.1.1 → 0.2.0

metadata

@@ -1,13 +1,13 @@
 --- !ruby/object:Gem::Specification 
 name: serializable_proc
 version: !ruby/object:Gem::Version 
-  hash: 25
+  hash: 23
   prerelease: false
   segments: 
   - 0
-  - 1
-  - 1
-  version: 0.1.1
+  - 2
+  - 0
+  version: 0.2.0
 platform: ruby
 authors: 
 - NgTzeYang
@@ -15,7 +15,7 @@ autorequire:
 bindir: bin
 cert_chain: []
 
-date: 2010-08-16 00:00:00 +08:00
+date: 2010-08-18 00:00:00 +08:00
 default_executable: 
 dependencies: 
 - !ruby/object:Gem::Dependency 
@@ -68,21 +68,36 @@ files:
 - lib/serializable_proc.rb
 - lib/serializable_proc/binding.rb
 - lib/serializable_proc/fixes.rb
+- lib/serializable_proc/isolatable.rb
 - lib/serializable_proc/marshalable.rb
 - lib/serializable_proc/parsers.rb
 - lib/serializable_proc/parsers/pt.rb
 - lib/serializable_proc/parsers/rp.rb
-- lib/serializable_proc/sandboxer.rb
 - serializable_proc.gemspec
-- spec/extracting_bound_variables_spec.rb
-- spec/initializing_errors_spec.rb
-- spec/marshalling_spec.rb
-- spec/multiple_arities_serializable_proc_spec.rb
-- spec/one_arity_serializable_proc_spec.rb
-- spec/optional_arity_serializable_proc_spec.rb
-- spec/proc_like_spec.rb
+- spec/bounded_vars/class_vars_spec.rb
+- spec/bounded_vars/class_vars_within_block_scope_spec.rb
+- spec/bounded_vars/errors_spec.rb
+- spec/bounded_vars/global_vars_spec.rb
+- spec/bounded_vars/global_vars_within_block_scope_spec.rb
+- spec/bounded_vars/instance_vars_spec.rb
+- spec/bounded_vars/instance_vars_within_block_scope_spec.rb
+- spec/bounded_vars/local_vars_spec.rb
+- spec/bounded_vars/local_vars_within_block_scope_spec.rb
+- spec/code_block/errors_spec.rb
+- spec/code_block/multiple_arities_spec.rb
+- spec/code_block/optional_arity_spec.rb
+- spec/code_block/renaming_vars_spec.rb
+- spec/code_block/single_arity_spec.rb
+- spec/code_block/zero_arity_spec.rb
+- spec/proc_like/extras_spec.rb
+- spec/proc_like/invoking_with_args_spec.rb
+- spec/proc_like/invoking_with_class_vars_spec.rb
+- spec/proc_like/invoking_with_global_vars_spec.rb
+- spec/proc_like/invoking_with_instance_vars_spec.rb
+- spec/proc_like/invoking_with_local_vars_spec.rb
+- spec/proc_like/marshalling_spec.rb
+- spec/proc_like/others_spec.rb
 - spec/spec_helper.rb
-- spec/zero_arity_serializable_proc_spec.rb
 has_rdoc: true
 homepage: http://github.com/ngty/serializable_proc
 licenses: []
@@ -118,12 +133,27 @@ signing_key:
 specification_version: 3
 summary: Proc that can be serialized (as the name suggests)
 test_files: 
-- spec/initializing_errors_spec.rb
-- spec/extracting_bound_variables_spec.rb
-- spec/one_arity_serializable_proc_spec.rb
-- spec/zero_arity_serializable_proc_spec.rb
-- spec/multiple_arities_serializable_proc_spec.rb
-- spec/marshalling_spec.rb
-- spec/optional_arity_serializable_proc_spec.rb
+- spec/proc_like/extras_spec.rb
+- spec/proc_like/invoking_with_local_vars_spec.rb
+- spec/proc_like/invoking_with_instance_vars_spec.rb
+- spec/proc_like/invoking_with_class_vars_spec.rb
+- spec/proc_like/invoking_with_args_spec.rb
+- spec/proc_like/others_spec.rb
+- spec/proc_like/invoking_with_global_vars_spec.rb
+- spec/proc_like/marshalling_spec.rb
+- spec/code_block/multiple_arities_spec.rb
+- spec/code_block/zero_arity_spec.rb
+- spec/code_block/errors_spec.rb
+- spec/code_block/renaming_vars_spec.rb
+- spec/code_block/single_arity_spec.rb
+- spec/code_block/optional_arity_spec.rb
+- spec/bounded_vars/global_vars_within_block_scope_spec.rb
+- spec/bounded_vars/instance_vars_within_block_scope_spec.rb
+- spec/bounded_vars/errors_spec.rb
+- spec/bounded_vars/local_vars_within_block_scope_spec.rb
+- spec/bounded_vars/class_vars_spec.rb
+- spec/bounded_vars/local_vars_spec.rb
+- spec/bounded_vars/global_vars_spec.rb
+- spec/bounded_vars/instance_vars_spec.rb
+- spec/bounded_vars/class_vars_within_block_scope_spec.rb
 - spec/spec_helper.rb
-- spec/proc_like_spec.rb

data/lib/serializable_proc/sandboxer.rb

@@ -1,24 +0,0 @@
-class SerializableProc
-  module Sandboxer
-    class << self
-
-      def fsexp(sexp)
-        n_sexp, t_sexp = nil, sexp.inspect
-        while m = t_sexp.match(/^(.*?s\(:)((i|l|c|g)(asgn|var|vdecl))(,\ :)((|@|@@|\$)([\w]+))(\)|,)/)
-          orig, prepend, _, type, declare, join, _, _, name, append = m[0..-1]
-          declare.sub!('vdecl','asgn')
-          n_sexp = "#{n_sexp}#{prepend}l#{declare}#{join}#{type}var_#{name}#{append}"
-          t_sexp.sub!(orig,'')
-        end
-        eval(n_sexp ? "#{n_sexp}#{t_sexp}" : sexp.inspect)
-      end
-
-      def fvar(var)
-        @translate_var_maps ||= {'@' => 'ivar_', '@@' => 'cvar_', '$' => 'gvar_', '' => 'lvar_'}
-        m = var.to_s.match(/^(|@|@@|\$)(\w+)$/)
-        var.to_s.sub(m[1], @translate_var_maps[m[1]]).to_sym
-      end
-
-    end
-  end
-end

data/spec/extracting_bound_variables_spec.rb

@@ -1,99 +0,0 @@
-require File.join(File.dirname(__FILE__), 'spec_helper')
-
-describe 'Extracting bound variables' do
-
-  class << self
-    def m1    ; 'm1' ; end
-    def m2(x) ; 'm2(%s)' % x ; end
-  end
-
-  describe '>> extracting local variables' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should "handle outer-scoped ones" do
-      x, y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ x + y }, {:lvar_x => x, :lvar_y => y}
-    end
-
-    should "handle inner-scoped ones" do
-      x, y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{|x| z = 'wonder' ; %w{a b}.each{|y| puts z, x, y } },
-        {:lvar_x => x, :lvar_y => y, :lvar_z => nil}
-    end
-
-    # NOTE: Errors checking are found under ./initializing_errors_spec.rb
-
-  end
-
-  describe '>> extracting instance variables' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should 'handle outer-scoped ones' do
-      @x, @y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ @x + @y }, {:ivar_x => @x, :ivar_y => @y}
-    end
-
-    should "handle inner-scoped ones" do
-      @x, @y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ @z = 'wonder' ; %w{a b}.each{ puts @z, @x, @y } },
-        {:ivar_x => @x, :ivar_y => @y, :ivar_z => nil}
-    end
-
-    # NOTE: Errors checking are found under ./initializing_errors_spec.rb
-
-  end
-
-  describe '>> extracting class variables' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should 'handle outer-scoped ones' do
-      @@x, @@y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ @@x + @@y }, {:cvar_x => @@x, :cvar_y => @@y}
-    end
-
-    should "handle inner-scoped ones" do
-      @@x, @@y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ @@z = 'wonder' ; %w{a b}.each{ puts @@z, @@x, @@y } },
-        {:cvar_x => @@x, :cvar_y => @@y, :cvar_z => nil}
-    end
-
-    # NOTE: Errors checking are found under ./initializing_errors_spec.rb
-
-  end
-
-  describe '>> extracting global variables' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should 'handle outer-scoped ones' do
-      $x, $y = 'awe', 'some'
-      should_have_expected_binding SerializableProc.new{ $x + $y }, {:gvar_x => $x, :gvar_y => $y}
-    end
-
-    should "handle inner-scoped ones" do
-      $x, $y = 'awe', 'some'
-      should_have_expected_binding \
-        SerializableProc.new{ $z = 'wonder' ; %w{a b}.each{ puts $z, $x, $y } },
-        {:gvar_x => $x, :gvar_y => $y, :gvar_z => nil}
-    end
-
-    # NOTE: Errors checking are found under ./initializing_errors_spec.rb
-
-  end
-
-  describe '>> extracting method returns' do
-    should "not handle" do
-      SerializableProc.new { m1 + m2(3) }.binding_dump.should.be.empty
-    end
-  end
-
-end

data/spec/initializing_errors_spec.rb

@@ -1,95 +0,0 @@
-require File.join(File.dirname(__FILE__), 'spec_helper')
-
-describe 'Initializing errors' do
-
-  unless $parse_tree_installed
-    describe '>> SerializableProc::CannotAnalyseCodeError' do
-
-      extend SerializableProc::Spec::Helpers
-
-      should "raise if line has more than 1 'SerializableProc.new'" do
-        lambda {
-          SerializableProc.new {} ; SerializableProc.new { |arg| %w{a b}.map{|x| puts x } }
-        }.should.be raising_cannot_analyse_error("'SerializableProc.new'")
-      end
-
-      should "raise if line has more than 1 'Proc.new'" do
-        lambda {
-          p1 = Proc.new {} ; p2 = Proc.new { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line has more than 1 'lambda'" do
-        lambda {
-          p1 = lambda {} ; p2 = lambda { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line has more than 1 'proc'" do
-        lambda {
-          p1 = proc {} ; p2 = proc { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line mixes 'lambda' & 'proc'" do
-        lambda {
-          p1 = lambda {} ; p2 = proc { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line mixes 'Proc.new' & 'proc'" do
-        lambda {
-          p1 = Proc.new {} ; p2 = proc { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line mixes 'Proc.new' & 'lambda'" do
-        lambda {
-          p1 = Proc.new {} ; p2 = lambda { |arg| %w{a b}.map{|x| puts x } }
-          SerializableProc.new(&p2)
-        }.should.be raising_cannot_analyse_error("'lambda'/'proc'/'Proc.new'")
-      end
-
-      should "raise if line does not have lambda, proc, Proc.new or SerializableProc.new" do
-        lambda {
-          def create_serializable_proc(&block) ; SerializableProc.new(&block) ; end
-          create_serializable_proc { %w{a b}.map{|x| puts x } }
-        }.should.raise(SerializableProc::CannotAnalyseCodeError).
-          message.should.equal('Cannot find specified initializer !!')
-      end
-
-    end
-  end
-
-  describe '>> SerializableProc::CannotSerializeVariableError' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should "raise if local variable cannot be marshalled" do
-      f = Tempfile.new('fake')
-      lambda { SerializableProc.new{ f } }.should.be raising_cannot_serialize_variable_error('f')
-    end
-
-    should "raise if class variable cannot be marshalled" do
-      @@f = Tempfile.new('fake')
-      lambda { SerializableProc.new{ @@f } }.should.be raising_cannot_serialize_variable_error('@@f')
-    end
-
-    should "raise if instance variable cannot be marshalled" do
-      @f = Tempfile.new('fake')
-      lambda { SerializableProc.new{ @f } }.should.be raising_cannot_serialize_variable_error('@f')
-    end
-
-    should "raise if global variable cannot be marshalled" do
-      $f = Tempfile.new('fake')
-      lambda { SerializableProc.new{ $f } }.should.be raising_cannot_serialize_variable_error('$f')
-    end
-
-  end
-
-end

data/spec/proc_like_spec.rb

@@ -1,191 +0,0 @@
-require File.join(File.dirname(__FILE__), 'spec_helper')
-
-describe 'Being proc like' do
-
-  describe '>> ==' do
-
-    before do
-      @proc = SerializableProc.new{ %w{a b}.map{|x| x } }
-    end
-
-    should 'return true if comparing to itself' do
-      @proc.should.equal(@proc)
-    end
-
-    should 'return true if another SerializableProc has the same code' do
-      SerializableProc.new{ %w{a b}.map{|x| x } }.should.equal(@proc)
-    end
-
-    should 'return false if another SerializableProc does not have the same code' do
-      SerializableProc.new{ %w{b c}.map{|x| x } }.should.not.equal(@proc)
-    end
-
-  end
-
-  describe '>> call (alias [])' do
-
-    should 'return yield result given no arg' do
-      s_proc = SerializableProc.new { %w{b c}.map{|x| x } }
-      expected = %w{b c}
-      s_proc.call.should.equal(expected)
-      s_proc[].should.equal(expected)
-    end
-
-    should 'reflect bound instance variable value (unaffected by outside-scope change)' do
-      x, y = 'awe', 'some'
-      expected = 'hand' + y
-      s_proc = SerializableProc.new { x.sub!('awe','hand'); x + y }
-      x, y = 'wonder', 'ful'
-      s_proc.call.should.equal(expected)
-      s_proc[].should.equal(expected)
-    end
-
-    should 'not affect any outside-scope change to instance variable' do
-      x, y = 'awe', 'some'
-      s_proc = SerializableProc.new { x.sub!('awe','hand'); x + y }
-      x, y = 'wonder', 'ful'
-      s_proc.call ; s_proc[]
-      x.should.equal('wonder')
-      y.should.equal('ful')
-    end
-
-    should 'reflect bound instance variable value (unaffected by outside-scope change)' do
-      @x, @y = 'awe', 'some'
-      expected = 'hand' + @y
-      s_proc = SerializableProc.new { @x.sub!('awe','hand'); @x + @y }
-      @x, @y = 'wonder', 'ful'
-      s_proc.call.should.equal(expected)
-      s_proc[].should.equal(expected)
-    end
-
-    should 'not affect any outside-scope change to instance variable' do
-      @x, @y = 'awe', 'some'
-      s_proc = SerializableProc.new { @x.sub!('awe','hand'); @x + @y }
-      @x, @y = 'wonder', 'ful'
-      s_proc.call ; s_proc[]
-      @x.should.equal('wonder')
-      @y.should.equal('ful')
-    end
-
-    should 'reflect bound class variable value (unaffected by outside-scope change)' do
-      @@x, @@y = 'awe', 'some'
-      expected = 'hand' + @@y
-      s_proc = SerializableProc.new { @@x.sub!('awe','hand'); @@x + @@y }
-      @@x, @@y = 'wonder', 'ful'
-      s_proc.call.should.equal(expected)
-      s_proc[].should.equal(expected)
-    end
-
-    should 'not affect any outside-scope change to class variable' do
-      @@x, @@y = 'awe', 'some'
-      s_proc = SerializableProc.new { @@x.sub!('awe','hand'); @@x + @@y }
-      @@x, @@y = 'wonder', 'ful'
-      s_proc.call ; s_proc[]
-      @@x.should.equal('wonder')
-      @@y.should.equal('ful')
-    end
-
-    should 'reflect bound global variable value (unaffected by outside-scope change)' do
-      $x, $y = 'awe', 'some'
-      expected = 'hand' + $y
-      s_proc = SerializableProc.new { $x.sub!('awe','hand'); $x + $y }
-      $x, $y = 'wonder', 'ful'
-      s_proc.call.should.equal(expected)
-      s_proc[].should.equal(expected)
-    end
-
-    should 'not affect any outside-scope change to global variable' do
-      $x, $y = 'awe', 'some'
-      s_proc = SerializableProc.new { $x.sub!('awe','hand'); $x + $y }
-      $x, $y = 'wonder', 'ful'
-      s_proc.call ; s_proc[]
-      $x.should.equal('wonder')
-      $y.should.equal('ful')
-    end
-
-  end
-
-  describe '>> clone' do
-    should 'return a serializable proc that yields +ve ==' do
-      s_proc = SerializableProc.new { %w{b c}.map{|x| x } }
-      clone = s_proc.clone
-      clone.should.equal(s_proc)
-      clone.object_id.should.not.equal(s_proc.object_id)
-    end
-  end
-
-  describe '>> binding' do
-    should 'raise NotImplementedError' do
-      lambda { SerializableProc.new { x }.binding }.should.raise(NotImplementedError)
-    end
-    # should 'return binding that contains duplicated contextual reference values' do
-    #   x, @x, @@x, $x = 'lx', 'ix', 'cx', 'gx'
-    #   expected = {'x' => x.dup, '@x' => @x.dup, '@@x' => @@x.dup, '$x' => $x.dup}
-    #   s_proc = SerializableProc.new { [x, @x, @@x, $x] }
-    #   x, @x, @@x, $x = 'ly', 'iy', 'cy', 'gy'
-    #   expected.each{|k,v| s_proc.binding.eval(k).should.equal(v) }
-    # end
-  end
-
-  describe '>> to_proc' do
-
-    class << self
-      def work(&block) ; yield ; end
-    end
-
-    should 'return a non-serializable proc' do
-      o_proc = lambda { %w{b c}.map{|x| x } }
-      s_proc = SerializableProc.new(&o_proc)
-      n_proc = s_proc.to_proc
-      s_proc.should.not == n_proc
-      n_proc.class.should == Proc
-      n_proc.call.should.equal(o_proc.call)
-    end
-
-    should "support passing to a method using '&' char" do
-      s_proc = SerializableProc.new { %w{b c}.map{|x| x } }
-      work(&s_proc).should.equal(%w{b c})
-    end
-
-  end
-
-  describe '>> to_s' do
-
-    extend SerializableProc::Spec::Helpers
-
-    should 'return extracted code when debug is not specified' do
-      x, @x, @@x, $x = 'lx', 'ix', 'cx', 'gx'
-      SerializableProc.new{ [x,@x,@@x,$x] }.to_s.should.be \
-        having_same_semantics_as('lambda { [x, @x, @@x, $x] }')
-    end
-
-    should 'return extracted code when debug is turned off' do
-      x, @x, @@x, $x = 'lx', 'ix', 'cx', 'gx'
-      SerializableProc.new{ [x,@x,@@x,$x] }.to_s(false).should.be \
-        having_same_semantics_as('lambda { [x, @x, @@x, $x] }')
-    end
-
-    should 'return runnable code when debug is turned on' do
-      x, @x, @@x, $x = 'lx', 'ix', 'cx', 'gx'
-      SerializableProc.new{ [x,@x,@@x,$x] }.to_s(true).should.be \
-        having_same_semantics_as('lambda { [lvar_x, ivar_x, cvar_x, gvar_x] }')
-    end
-
-  end
-
-  describe '>> arity' do
-    {
-      __LINE__ => lambda { },
-      __LINE__ => lambda {|x| },
-      __LINE__ => lambda {|x,y| },
-      __LINE__ => lambda {|*x| },
-      __LINE__ => lambda {|x, *y| },
-      __LINE__ => lambda {|(x,y)| },
-    }.each do |debug, block|
-      should "return arity of initializing block [##{debug}]" do
-        SerializableProc.new(&block).arity.should.equal(block.arity)
-      end
-    end
-  end
-
-end