RubyGems - hprevalence - Versions diffs - 0.1.1 → 0.2.0 - Mend

hprevalence 0.1.1 → 0.2.0

This diff represents the content of publicly available package versions that have been released to one of the supported registries. The information contained in this diff is provided for informational purposes only and reflects changes between package versions as they appear in their respective public registries.

Files changed (26) hide show

data/lib/hprevalence.rb +28 -181
data/lib/internal/command_logger.rb +11 -34
data/lib/internal/marshallers/default.rb +17 -0
data/lib/internal/marshallers/soap_marshaller.rb +26 -0
data/lib/internal/marshallers/yaml_marshaller.rb +22 -0
data/lib/internal/serializer.rb +38 -52
data/lib/internal/store_manager.rb +9 -24
data/rakefile.rb +1 -1
data/samples/simple/main.rb +10 -0
data/{test → samples/simple}/task_model.rb +0 -12
data/samples/transparent/task_model.rb +36 -0
data/test/command_logger_test.rb +2 -6
data/test/default_model_serializer_test.rb +9 -8
data/test/marshaller_test.rb +68 -0
data/test/models/task_model.rb +91 -0
data/test/simple_engine_test.rb +22 -5
data/test/simple_engine_with_soap_test.rb +94 -0
data/test/simple_engine_with_yaml_test.rb +94 -0
metadata +12 -10
data/lib/transparent.rb +0 -245
data/test/circular_reference_test.rb +0 -96
data/test/dvd_store_model.rb +0 -97
data/test/natural_object_model_test.rb +0 -143
data/test/project_model.rb +0 -99
data/test/restoring_test.rb +0 -54
data/test/transparent_module_test.rb +0 -115

data/test/circular_reference_test.rb DELETED

@@ -1,96 +0,0 @@
-$:.unshift(File.dirname(__FILE__) + "/../lib/")
-require 'hprevalence'
-require 'transparent'
-require 'abstract_hprevalence_testcase'
-require 'dvd_store_model'
-require 'test/unit'
-class Item
-  attr_accessor :sub_item
-  def initialize( sub )
-    @sub_item = sub
-  end
-end
-class SampleDatabase
-  include HPrevalence::Transparent::CustomBehavior
-  attr_reader :list
-  attr_proxy_attribute :list
-  attr_proxy_method :create_item
-  def initialize()
-    @list = []
-  end
-  def create_item( sub = nil )
-    Item.new( sub )
-  end
-end
-class CircularReferenceTest < Test::Unit::TestCase
-  include AbstractHPrevalenceTestHelper
-  def setup
-    reset_dir 'store/circular_test'
-    ensure_dir
-    load_engine
-  end
-  def teardown
-    @engine.close
-  end
-  def load_engine
-    teardown unless @engine.nil?
-    @engine = HPrevalence::EngineBuilder.build_transparent( @target_dir ) {
-      SampleDatabase.new()
-    }
-    assert_not_nil @engine
-    @system = @engine.system
-    assert_not_nil @system
-  end
-  def test_simple
-    item = @system.create_item()
-    @system.list << item
-    load_engine
-    assert_equal 1, @system.list.length
-  end
-  def test_circular
-    item = @system.create_item()
-    item.sub_item = item
-    @system.list << item
-    load_engine
-    assert_equal 1, @system.list.length
-    item = @system.list[0]
-    assert_equal item, item.sub_item
-  end
-  def test_circular_with_snapshot
-    item = @system.create_item()
-    item.sub_item = item
-    @system.list << item
-    @engine.take_snapshot
-    load_engine
-    assert_equal 1, @system.list.length
-    item = @system.list[0]
-    assert_equal item, item.sub_item
-  end
-end

data/test/dvd_store_model.rb DELETED

@@ -1,97 +0,0 @@
-$:.unshift(File.dirname(__FILE__) + "/../lib/")
-require 'transparent'
-class AbstractCollection
-  include Enumerable
-  include HPrevalence::Transparent::CustomBehavior
-  attr_read_only :each
-  def initialize()
-    @list = []
-  end
-  def add( item )
-    @list << item
-    item
-  end
-  def each()
-    @list.each { |item|
-      yield(item)
-    }
-  end
-  def length
-    @list.length
-  end
-end
-class DvdCollection < AbstractCollection
-  # include HPrevalence::Transparent::CustomBehavior
-  def initialize()
-    super
-  end
-end
-class DvdStore
-  include HPrevalence::Transparent::CustomBehavior
-  attr_reader :available_items
-  attr_reader :available_categories
-  attr_reader :customers
-  attr_proxy_attribute :available_items, :available_categories, :customers
-  attr_proxy_method :create_dvd
-  attr_read_only :total_customers
-  def initialize()
-    @available_items = DvdCollection.new()
-    @available_categories = []
-    @customers = []
-  end
-  def total_customers
-    @customers.length
-  end
-  def create_dvd( dvd )
-    dvd
-  end
-end
-class Category
-  attr_reader :name
-  def initialize( name )
-    @name = name
-  end
-end
-class Dvd
-  attr_accessor :name, :price, :categories
-  def initialize( name, price, *categories )
-    @name, @price = name, price
-    @categories = *categories.dup()
-  end
-end
-class Customer
-  attr_accessor :name, :items_bought, :prefered_categories
-  def initialize( name )
-    @name = name
-    @items_bought = []
-    @prefered_categories = []
-  end
-end

data/test/natural_object_model_test.rb DELETED

@@ -1,143 +0,0 @@
-$:.unshift(File.dirname(__FILE__) + "/../lib/")
-require 'hprevalence'
-require 'transparent'
-require 'abstract_hprevalence_testcase'
-require 'dvd_store_model'
-require 'test/unit'
-class NaturalObjectModelTest < Test::Unit::TestCase
-  include AbstractHPrevalenceTestHelper
-  def setup
-    reset_dir 'store/natural_test'
-    ensure_dir
-    load_engine
-  end
-  def teardown
-    @engine.close
-  end
-  def load_engine
-    teardown unless @engine.nil?
-    @engine = HPrevalence::EngineBuilder.build_transparent( @target_dir ) {
-      DvdStore.new()
-    }
-    assert_not_nil @engine
-    @system = @engine.system
-    assert_not_nil @system
-  end
-  def test_depth_1
-    assert_equal 0, @system.total_customers
-    fiction = Category.new('Fiction')
-    comedy = Category.new('Comedy')
-    @system.available_categories << fiction
-    @system.available_categories << comedy
-    dvd1 = @system.create_dvd( Dvd.new( 'Fight Club', 22.1, fiction ) )
-    dvd2 = @system.create_dvd( Dvd.new( 'Monty Python and the Holy Grail', 15, comedy ) )
-    @system.available_items.add( dvd1 )
-    @system.available_items.add( dvd2 )
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-    load_engine
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-  end
-  def test_read_only_each
-    assert_equal 0, @system.total_customers
-    fiction = Category.new('Fiction')
-    comedy = Category.new('Comedy')
-    @system.available_categories << fiction
-    @system.available_categories << comedy
-    dvd1 = @system.create_dvd( Dvd.new( 'Fight Club', 22.1, fiction ) )
-    dvd2 = @system.create_dvd( Dvd.new( 'Monty Python and the Holy Grail', 15, comedy ) )
-    @system.available_items.add( dvd1 )
-    @system.available_items.add( dvd2 )
-    @system.available_items.each() do |item|
-    end
-  end
-  def test_more_engine_loads
-    load_engine
-    assert_equal 0, @system.total_customers
-    fiction = Category.new('Fiction')
-    comedy = Category.new('Comedy')
-    @system.available_categories << fiction
-    @system.available_categories << comedy
-    assert_equal 0, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-    @system.available_items.add( Dvd.new( 'Fight Club', 22.1, fiction ) )
-    @system.available_items.add( Dvd.new( 'Monty Python and the Holy Grail', 15, comedy ) )
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-    load_engine
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-    horror = Category.new('Horror')
-    @system.available_categories << horror
-    @system.available_items.add( Dvd.new( 'Pet Sematary - 1989', 22.6, horror ) )
-    @system.available_items.add( Dvd.new( 'Fawlty Towers - 12 episodes', 40.6, comedy ) )
-    assert_equal 4, @system.available_items.length
-    assert_equal 3, @system.available_categories.length
-    load_engine
-    assert_equal 4, @system.available_items.length
-    assert_equal 3, @system.available_categories.length
-  end
-  def test_depth_with_snapshot
-    assert_equal 0, @system.total_customers
-    fiction = Category.new('Fiction')
-    comedy = Category.new('Comedy')
-    @system.available_categories << fiction
-    @system.available_categories << comedy
-    @system.available_items.add( Dvd.new( 'Fight Club', 22.1, fiction ) )
-    @system.available_items.add( Dvd.new( 'Monty Python and the Holy Grail', 15, comedy ) )
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-    @engine.take_snapshot
-    load_engine
-    assert_equal 2, @system.available_items.length
-    assert_equal 2, @system.available_categories.length
-  end
-end

data/test/project_model.rb DELETED

@@ -1,99 +0,0 @@
-$:.unshift(File.dirname(__FILE__) + "/../lib/")
-require 'hprevalence'
-require 'transparent'
-class ModelBase
-  include HPrevalence::Transparent::CustomBehavior
-  attr_read_only :ident
-  attr_reader :ident
-  attr_accessor :name
-  def initialize(name, id_val = name)
-    @ident, @name = id_val, name
-  end
-end
-class ModelArrayBase
-  include Enumerable
-  include HPrevalence::Transparent::CustomBehavior
-  attr_read_only :[], :each, :length
-  def initialize()
-    @list = []
-  end
-  def add( item )
-    @list << item
-  end
-  def each
-    @list.each { |item| yield(item) }
-  end
-  def [](index)
-    if (index.kind_of?(Integer))
-      return @list[index]
-    elsif (index.kind_of?(String))
-      return find { |item| item.ident == index }
-    end
-  end
-  def length
-    @list.length
-  end
-end
-class User < ModelBase
-  attr_reader :password
-  def initialize(name, password)
-    super(name)
-    @password = password
-  end
-end
-class Project < ModelBase
-  attr_reader :owner
-  def initialize(name, idVal, owner)
-    super(name, idVal)
-    @owner = owner
-  end
-end
-class UserCollection < ModelArrayBase
-  def initialize()
-    super
-  end
-end
-class ProjectCollection < ModelArrayBase
-  def initialize()
-    super
-  end
-end
-class ApplicationDatabase
-  include HPrevalence::Transparent::CustomBehavior
-  attr_reader :users, :projects
-  attr_proxy_attribute :users, :projects
-  attr_proxy_method :create_user, :create_project
-  def initialize
-    @users = UserCollection.new()
-    @projects = ProjectCollection.new()
-  end
-  def create_user( login, pass )
-    User.new( login, pass )
-  end
-  def create_project( name, id, user )
-    Project.new( name, id, user )
-  end
-end

data/test/restoring_test.rb DELETED

@@ -1,54 +0,0 @@
-$:.unshift(File.dirname(__FILE__) + "/../lib/")
-require 'hprevalence'
-require 'transparent'
-require 'abstract_hprevalence_testcase'
-require 'project_model'
-require 'test/unit'
-class RestoringTest < Test::Unit::TestCase
-  include AbstractHPrevalenceTestHelper
-  def setup
-    @target_dir = create_dir_name('store/fixed')
-    load_engine
-  end
-  def teardown
-    @engine.close
-  end
-  def load_engine
-    teardown unless @engine.nil?
-    @engine = HPrevalence::EngineBuilder.build_transparent( @target_dir ) {
-      ApplicationDatabase.new()
-    }
-    assert_not_nil @engine
-    @system = @engine.system
-    assert_not_nil @system
-  end
-  def test_a
-    teardown
-    reset_dir 'store/fixed'
-    setup
-    user = @system.create_user( "test", "test" )
-    @system.users.add( user ) unless @system.users.length != 0
-    project = @system.create_project( 'cas', 'Castle', user )
-    @system.projects.add( project )
-  end
-  def atest_aaa
-    assert_equal 1, @system.users.length
-    assert_equal 1, @system.projects.length
-  end
-end