hprevalence 0.1.1 → 0.2.0

data/test/simple_engine_with_soap_test.rb

@@ -0,0 +1,94 @@
+$:.unshift(File.dirname(__FILE__) + "/../lib/")
+
+require 'hprevalence'
+require 'internal/marshallers/soap_marshaller'
+require 'test/unit'
+require 'abstract_hprevalence_testcase'
+require 'models/task_model'
+
+class SimpleEngineWithSoapTest < Test::Unit::TestCase
+  include AbstractHPrevalenceTestHelper
+  
+  def setup
+    reset_dir 'store/engine_soap_test'
+    load_engine
+  end
+  
+  def teardown
+    @engine.close
+  end
+  
+  def load_engine
+    teardown unless @engine.nil?
+  
+    @engine = HPrevalence::EngineBuilder.build( @target_dir, SoapMarshaller.new() ) { 
+      TaskDatabase.new() 
+    }
+    
+    assert_not_nil @engine
+    @system = @engine.system
+    assert_not_nil @system
+  end
+  
+  def test_add_task
+    task = Task.new( 'put the cat out', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    
+    assert_equal 1, @system.tasks.length
+    
+    load_engine
+    
+    assert_equal 1, @system.tasks.length
+    assert_equal 'put the cat out', @system.tasks[0].name
+    assert_equal 'Before go sleep, put the cat out otherwise he will meow during the night', @system.tasks[0].contents
+  end
+
+  def test_same_object
+    task = Task.new( 'first', 'content' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    @engine.execute_command( SetPriorityTaskCommand.new('first') )
+    
+    assert_equal 1, @system.tasks.length
+    assert_not_nil @system.priority_task
+    
+    load_engine
+    
+    assert_not_nil @system.priority_task
+    assert_equal 1, @system.tasks.length
+    assert_equal @system.priority_task, @system.tasks[0]
+  end
+
+  def test_add_and_remove
+    task = Task.new( 'one', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    task = Task.new( 'two', 'Brush your teeth before go to bed' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+
+    assert_equal 2, @system.tasks.length
+
+    @engine.execute_command( RemoveTaskCommand.new( 'two' ) )
+    
+    assert_equal 1, @system.tasks.length
+    
+    load_engine
+    
+    assert_equal 1, @system.tasks.length
+    assert_equal 'one', @system.tasks[0].name
+    assert_equal 'Before go sleep, put the cat out otherwise he will meow during the night', @system.tasks[0].contents
+  end
+  
+  def test_snapshot
+    task = Task.new( 'one', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    task = Task.new( 'two', 'Brush your teeth before go to bed' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+
+    assert_equal 2, @system.tasks.length
+    @engine.take_snapshot
+    
+    load_engine
+    
+    assert_equal 2, @system.tasks.length
+  end
+  
+end

data/test/simple_engine_with_yaml_test.rb

@@ -0,0 +1,94 @@
+$:.unshift(File.dirname(__FILE__) + "/../lib/")
+
+require 'hprevalence'
+require 'internal/marshallers/yaml_marshaller'
+require 'test/unit'
+require 'abstract_hprevalence_testcase'
+require 'models/task_model'
+
+class SimpleEngineWithSoapTest < Test::Unit::TestCase
+  include AbstractHPrevalenceTestHelper
+  
+  def setup
+    reset_dir 'store/engine_yaml_test'
+    load_engine
+  end
+  
+  def teardown
+    @engine.close
+  end
+  
+  def load_engine
+    teardown unless @engine.nil?
+  
+    @engine = HPrevalence::EngineBuilder.build( @target_dir, YamlMarshaller.new() ) { 
+      TaskDatabase.new() 
+    }
+    
+    assert_not_nil @engine
+    @system = @engine.system
+    assert_not_nil @system
+  end
+  
+  def atest_add_task
+    task = Task.new( 'put the cat out', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    
+    assert_equal 1, @system.tasks.length
+    
+    load_engine
+    
+    assert_equal 1, @system.tasks.length
+    assert_equal 'put the cat out', @system.tasks[0].name
+    assert_equal 'Before go sleep, put the cat out otherwise he will meow during the night', @system.tasks[0].contents
+  end
+
+  def test_same_object
+    task = Task.new( 'first', 'content' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    @engine.execute_command( SetPriorityTaskCommand.new('first') )
+    
+    assert_equal 1, @system.tasks.length
+    assert_not_nil @system.priority_task
+    
+    load_engine
+    
+    assert_not_nil @system.priority_task
+    assert_equal 1, @system.tasks.length
+    assert_equal @system.priority_task, @system.tasks[0]
+  end
+
+  def atest_add_and_remove
+    task = Task.new( 'one', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    task = Task.new( 'two', 'Brush your teeth before go to bed' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+
+    assert_equal 2, @system.tasks.length
+
+    @engine.execute_command( RemoveTaskCommand.new( 'two' ) )
+    
+    assert_equal 1, @system.tasks.length
+    
+    load_engine
+    
+    assert_equal 1, @system.tasks.length
+    assert_equal 'one', @system.tasks[0].name
+    assert_equal 'Before go sleep, put the cat out otherwise he will meow during the night', @system.tasks[0].contents
+  end
+  
+  def atest_snapshot
+    task = Task.new( 'one', 'Before go sleep, put the cat out otherwise he will meow during the night' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+    task = Task.new( 'two', 'Brush your teeth before go to bed' )
+    @engine.execute_command( AddTaskCommand.new( task ) )
+
+    assert_equal 2, @system.tasks.length
+    @engine.take_snapshot
+    
+    load_engine
+    
+    assert_equal 2, @system.tasks.length
+  end
+  
+end

metadata

@@ -3,8 +3,8 @@ rubygems_version: 0.8.1
 specification_version: 1
 name: hprevalence
 version: !ruby/object:Gem::Version 
-  version: 0.1.1
-date: 2004-10-27
+  version: 0.2.0
+date: 2004-11-25
 summary: Ruby based prevalence engine.
 require_paths: 
   - lib
@@ -30,23 +30,25 @@ files:
   - "./rake.rb"
   - "./rakefile.rb"
   - "./lib/hprevalence.rb"
-  - "./lib/transparent.rb"
   - "./lib/internal/command_logger.rb"
   - "./lib/internal/iomanager.rb"
   - "./lib/internal/serializer.rb"
   - "./lib/internal/store_manager.rb"
+  - "./lib/internal/marshallers/default.rb"
+  - "./lib/internal/marshallers/soap_marshaller.rb"
+  - "./lib/internal/marshallers/yaml_marshaller.rb"
+  - "./samples/simple/main.rb"
+  - "./samples/simple/task_model.rb"
+  - "./samples/transparent/task_model.rb"
   - "./test/abstract_hprevalence_testcase.rb"
-  - "./test/circular_reference_test.rb"
   - "./test/command_logger_test.rb"
   - "./test/default_model_serializer_test.rb"
-  - "./test/dvd_store_model.rb"
   - "./test/file_io_manager_test.rb"
-  - "./test/natural_object_model_test.rb"
-  - "./test/project_model.rb"
-  - "./test/restoring_test.rb"
+  - "./test/marshaller_test.rb"
   - "./test/simple_engine_test.rb"
-  - "./test/task_model.rb"
-  - "./test/transparent_module_test.rb"
+  - "./test/simple_engine_with_soap_test.rb"
+  - "./test/simple_engine_with_yaml_test.rb"
+  - "./test/models/task_model.rb"
 test_files: []
 rdoc_options: []
 extra_rdoc_files: []

data/lib/transparent.rb

@@ -1,245 +0,0 @@
-
-module HPrevalence
-  
-  module Transparent
-    
-    module CustomBehavior
-      
-      def self.included(type)
-        class << type
-          def method_added(symbol)
-            self.instance_eval do
-              @readonly_attributes ||= []
-              hierarchy = self
-              while hierarchy = hierarchy.superclass
-                if (hierarchy.instance_eval {instance_variables.include? '@readonly_attributes'})
-                  @readonly_attributes |= hierarchy.instance_eval {@readonly_attributes}
-                end
-              end
-            end
-          end
-          
-          def attr_proxy_attribute( *symbols )
-            @proxied_attributes ||= []
-            symbols.each do |symbol|
-              self.instance_eval {
-                @proxied_attributes ||= []
-                @proxied_attributes << symbol
-              }
-            end
-          end
-          
-          def attr_proxy_method( *symbols )
-            @proxied_attributes ||= []
-            symbols.each do |symbol|
-              self.instance_eval {
-                @proxied_methods ||= []
-                @proxied_methods << symbol
-              }
-            end
-          end
-          
-          def attr_read_only( *symbols )
-            symbols.each do |symbol|
-              self.instance_eval {
-                @readonly_attributes ||= []
-                @readonly_attributes << symbol
-              }
-            end
-          end
-        end
-      end
-      
-      def _read_only_attributes()
-        self.class.instance_eval { @readonly_attributes ||= [] }
-      end
-      
-      def _proxied_attributes()
-        self.class.instance_eval { @proxied_attributes ||= [] }
-      end
-      
-      def _proxied_methods()
-        self.class.instance_eval { @proxied_methods ||= [] }
-      end
-      
-      def _should_proxy( symbol )
-        if _proxied_attributes().include?( symbol )
-          return true if _symbol2proxy(symbol).nil?
-        elsif _proxied_methods().include?( symbol )
-          return true
-        end
-        false
-      end
-      
-      def _symbol2proxy( symbol )
-        self.instance_eval { 
-          @symbol2proxy ||= {}
-          @symbol2proxy[symbol]
-        }
-      end
-      
-      def _set_proxy( symbol, proxy )
-        self.instance_eval { 
-          @symbol2proxy ||= {}
-          @symbol2proxy[symbol] = proxy
-        }
-      end
-      
-    end
-    
-    class AutomaticCommand
-      
-      def initialize( proxy_id, symbol, *args )
-        @proxy_id, @symbol, @args = proxy_id, symbol, args
-      end
-      
-      def execute(system)
-        TransparentEngine.current() { |engine|
-          proxy = engine.proxy_by_id(@proxy_id)
-          raise 'Could not obtain proxy' if proxy.nil? 
-          return proxy.target.send(@symbol, *arguments)
-        }
-      end
-      
-      protected
-      
-      def arguments()
-        @args ||= []
-      end
-      
-    end
-    
-    class NestedAutomaticCommand < AutomaticCommand
-      
-      attr_reader :related_symbol, :parent_proxy_id
-      
-      def initialize( related_symbol, parent_proxy_id, proxy_id, symbol, *args )
-        super( proxy_id, symbol, *args )
-        raise 'Missing related_symbol' if related_symbol.nil?
-        raise 'Missing parent_proxy_id' if parent_proxy_id.nil?
-        @related_symbol, @parent_proxy_id = related_symbol, parent_proxy_id
-      end
-      
-      def execute(system)
-        TransparentEngine.current() { |engine|
-          proxy = engine.proxy_by_id(@proxy_id, @related_symbol, @parent_proxy_id)
-          raise 'Could not obtain proxy' if proxy.nil? 
-          return proxy.target.send(@symbol, *arguments)
-        }
-      end
-    end
-    
-    class TransparentProxy
-      attr_accessor :target, :proxy_id, :engine_id
-      
-      def initialize(target, new_id = Guid.new)
-        raise 'A proxy must have a target' if target.nil?
-        raise 'Strange. A proxy is supposed to exist within an engine' unless Thread.current[:engine]
-        @proxy_id = new_id
-        @engine_id = Thread.current[:engine].engine_id
-        Thread.current[:engine].register_proxy(self)
-        @target = target
-        @is_custom = target.kind_of?(CustomBehavior)
-#        puts  "New proxy with id #{@proxy_id.to_s} for #{target.class.to_s}"
-      end
-      
-      def method_missing(symbol, *args, &block)
-        # puts  "Sending #{symbol} to #{@target.to_s} args #{args.to_s}"
-        raise NoMethodError, "Undefined method" unless @target.respond_to?(symbol)
-        
-        if (@is_custom)
-          if (@target._read_only_attributes.include?(symbol) )
-            return @target.send(symbol, *args, &block)
-          elsif (args.length == 0 && @target._should_proxy(symbol) )
-            # Attribute being accessed
-            return TransparentEngine.create_nested_proxy( @proxy_id, symbol, @engine_id )
-          elsif (args.length != 0 && @target._should_proxy(symbol) )
-            # Method being accessed
-            result = proceed(symbol, *args, &block)
-            return TransparentEngine.create_result_proxy( result, @engine_id )
-            #            return TransparentProxy.new( result )
-          else
-            nested_proxy = @target._symbol2proxy(symbol)
-            # Returns the nested proxy associated with this symbol
-            # puts "Returning nested proxy for #{symbol} if #{nested_proxy.class.to_s}"
-            return nested_proxy unless nested_proxy.nil? 
-          end
-        end
-        
-        proceed(symbol, *args, &block)
-      end
-      
-      def _dump(depth)
-        references = Thread.current[:references]
-        if (references)
-          if (references[self])
-#            puts "> serializing placeholder #{@proxy_id.to_s}"
-            [@proxy_id.to_s, @engine_id.to_s].pack("A40A40")
-          else
-#            puts "> serializing proxy       #{@proxy_id.to_s}"
-            references[self] = true
-            [@proxy_id.to_s, @engine_id.to_s].pack("A40A40") + Marshal.dump(@target, depth)
-          end
-        else
-          [@proxy_id.to_s, @engine_id.to_s].pack("A40A40")
-        end
-      end
-      
-      def TransparentProxy._load(buffer)
-        proxy = TransparentProxy.allocate
-        list = buffer.unpack("A40A40a*")
-        proxy.proxy_id = Guid.from_s( list[0] )
-        proxy.engine_id = Guid.from_s( list[1] )
-        TransparentEngine.current() { |engine|
-          proxy = engine.restore(proxy)
-          proxy.target = Marshal.load(list[2]) if (list[2] > "")
-        }
-        proxy
-      end   
-      
-      protected
-      
-      def build_command( symbol, *args )
-        AutomaticCommand.new( @proxy_id, symbol, *args )
-      end
-      
-      def proceed(symbol, *args, &block)
-        engine = TransparentEngine.current
-        result = nil
-        
-        if (engine.nil?)
-          # In this case the invocation happens on the object by user code
-          raise "Blocks are not supported... yet" if block_given?
-          
-          TransparentEngine.within_engine( @engine_id ) { |engine|
-            result = engine.execute_command( build_command(symbol, *args) )
-          }
-        else
-          # In this case the invocation is happening within an execute_command
-          result = @target.send(symbol, *args)
-        end
-        result 
-      end
-      
-    end
-    
-    class NestedTransparentProxy < TransparentProxy
-      attr_reader :related_symbol, :parent_proxy_id, :args
-      
-      def initialize(target, symbol, parent_proxy_id, *args)
-        raise 'A nested-proxy must have a symbol' if symbol.nil?
-        super(target)
-        @related_symbol, @parent_proxy_id, @args = symbol, parent_proxy_id, args
-      end
-      
-      protected 
-      
-      def build_command( symbol, *args )
-        NestedAutomaticCommand.new( @related_symbol, @parent_proxy_id, @proxy_id, symbol, *args )
-      end
-      
-    end
-    
-  end
-  
-end