ObjectModel 0.3.0

data/spec/ObjectModel/BasicSpec/BaseClass.rb

@@ -0,0 +1,7 @@
+class BaseClass
+	inherit Entity
+	
+	metadata do 
+		attribute :base_class_method, :string
+	end		
+end

data/spec/ObjectModel/BasicSpec/BaseTypes.rb

@@ -0,0 +1,11 @@
+class BaseTypes
+	inherit Entity
+	metadata do
+		attribute :string, :string
+		attribute :number, :number
+		attribute :boolean, :boolean
+		attribute :object, :object
+		attribute :data, :data
+		attribute :date, :date
+	end					
+end

data/spec/ObjectModel/BasicSpec/Descendant.rb

@@ -0,0 +1,5 @@
+class Descendant < BaseClass
+	metadata do
+		attribute :descendant_method
+	end			
+end

data/spec/ObjectModel/BasicSpec/EachTest.rb

@@ -0,0 +1,14 @@
+class EachTest
+	inherit Entity
+	
+	metadata do
+		attribute :a1, :string, :initialize => "a1"
+		attribute :a2, :string, :initialize => "a2"
+		
+		child :child
+		child :children, :bag
+		
+		reference :reference
+		reference :references, :bag
+	end
+end

data/spec/ObjectModel/BasicSpec/UpChild.rb

@@ -0,0 +1,10 @@
+class UpChild
+	inherit Entity
+	
+	def up_child params
+		:up_child
+	end
+	
+	metadata do
+	end
+end

data/spec/ObjectModel/BasicSpec/UpParent.rb

@@ -0,0 +1,11 @@
+class UpParent
+	inherit Entity
+	
+	def up_parent params
+		:up_parent
+	end
+	
+	metadata do
+		child :child
+	end
+end

data/spec/ObjectModel/ErrorsSpec/AfterCommitError.rb

@@ -0,0 +1,9 @@
+class AfterCommitError
+	inherit Entity
+	
+	metadata do
+		after :commit do
+			name.should_not! :be_nil
+		end
+	end
+end

data/spec/ObjectModel/ExtendedSpec/CustomInitialization.rb

@@ -0,0 +1,11 @@
+class CustomInitialization
+	inherit Entity
+	metadata do
+		attribute :string, :string, :initialize => lambda{|e| e.name}
+		attribute :number, :number, :initialize => 1
+		attribute :boolean, :boolean, :initialize => true
+		attribute :object, :object, :initialize => 45
+		attribute :data, :data, :initialize => lambda{|e| StreamID.new("sid")}
+		attribute :date, :date, :initialize => DateTime.new(2009, 1, 1)
+	end					
+end

data/spec/ObjectModel/ExtendedSpec/UpNotNil.rb

@@ -0,0 +1,8 @@
+class UpNotNil
+	inherit Entity
+	
+	metadata do
+		attribute :value, :object
+		child :child
+	end
+end

data/spec/ObjectModel/ExtendedSpec/UpParent.rb

@@ -0,0 +1,11 @@
+class UpParent
+	inherit Entity
+	
+	def up_parent params
+		:up_parent
+	end
+	
+	metadata do
+		child :child
+	end
+end

data/spec/ObjectModel/ValidationSpec/BaseTypes.rb

@@ -0,0 +1,11 @@
+class BaseTypes
+	inherit Entity
+	metadata do
+		attribute :string, :string
+		attribute :number, :number
+		attribute :boolean, :boolean
+		attribute :object, :object
+		attribute :data, :data
+		attribute :date, :date
+	end					
+end

data/spec/aspect_spec.rb

@@ -0,0 +1,55 @@
+require 'ObjectModel/require'
+require 'spec'
+
+module ObjectModel
+	module AspectSpec
+		describe "AspectSpec" do
+			class BaseClass
+				inherit Entity
+				metadata do
+					attribute :base, :string
+				end
+			end
+			
+			module AspectClass
+				inherit Entity
+				metadata do
+					attribute :aspect, :string
+				end
+			end
+			
+			
+			class ChildClass < BaseClass
+				inherit AspectClass
+				
+				metadata do
+					attribute :child, :string
+				end
+			end
+			
+			it "Aspect" do								
+				ChildClass.meta.attributes.keys.to_set.should == [:aspect, :child, :base].to_set
+			end
+			
+			it "Should be properly initialized" do					
+				@r.transaction{
+					c = ChildClass.new
+					c.base.should == ""
+					c.aspect.should == ""
+					c.child.should == ""
+				}					
+			end
+			
+			before :each do
+				ObjectModel::CONFIG[:directory] = "#{File.dirname __FILE__}/data"					
+				Repository.delete :test
+				@r = Repository.new :test
+			end
+			
+			after :each do
+				@r.close
+				Repository.delete :test
+			end
+		end
+	end
+end

data/spec/back_references_spec.rb

@@ -0,0 +1,161 @@
+require 'ObjectModel/require'
+require 'spec'
+
+module ObjectModel
+	module BackReferences
+		describe "BackReferences" do			
+			class SimpleEntity
+				inherit Entity
+				metadata do
+					reference :reference
+					reference :references, :bag
+				end
+			end	            
+			
+			it "Adding & Deleting" do
+				@r.transaction{				
+					e1 = SimpleEntity.new 'e1'
+					e2 = SimpleEntity.new 'e2'
+					
+					e1.reference = e2
+					e1.references << e2
+				}.commit
+				
+				@r['e1'].back_references.size.should == 0
+				@r['e2'].back_references.size.should == 2
+				
+				@r.transaction{
+					@r['e1'].reference = nil
+					@r['e1'].references.clear
+				}.commit					
+				
+				@r['e1'].back_references.size.should == 0
+				@r['e2'].back_references.size.should == 0
+			end
+			
+			class EntityWithVO
+				inherit Entity
+				metadata do
+					attribute :object, :object
+				end
+			end
+			
+			it "Shouldn't count ValueObjects" do
+				@r.transaction{
+					e = EntityWithVO.new 'e'
+					e.object = []
+				}.commit
+				@r['e'].back_references.size.should == 0
+			end
+			
+			
+			it "Create & Delete cycle Reference" do
+				@r.transaction{				
+					e1 = SimpleEntity.new 'e1'
+					e2 = SimpleEntity.new 'e2'
+					e1.reference = e2
+					e2.reference = e1
+				}.commit
+				@r['e1'].back_references.size.should == 1
+				@r['e2'].back_references.size.should == 1
+				
+				@r.transaction{
+					@r['e1'].reference = nil
+					@r['e2'].reference = nil
+				}.commit
+				@r['e1'].back_references.size.should == 0
+				@r['e2'].back_references.size.should == 0
+			end
+			
+			it "Reference to themself" do
+				@r.transaction{				
+					e = SimpleEntity.new 'e'
+					e.reference = e
+				}.commit
+				@r['e'].back_references.size.should == 1
+				
+				@r.transaction{
+					@r['e'].reference = nil
+				}.commit
+				@r['e'].back_references.size.should == 0
+			end
+			
+			it "Should not update BackReferences until_Commit" do
+				@r.transaction{
+					SimpleEntity.new 'e1'
+					SimpleEntity.new 'e2'
+				}.commit
+				
+				tr = @r.transaction{														
+					@r['e1'].reference = @r['e2']					
+					@r['e2'].back_references.size.should == 1
+				}				
+				@r['e2'].back_references.size.should == 0
+				
+				tr.commit									
+				@r['e2'].back_references.size.should == 1
+			end
+			
+			it "Deleting Entities should cause deleting all references to thouse Entities" do
+				@r.transaction{				
+					e1 = SimpleEntity.new 'e1', 'e1'
+					e2 = SimpleEntity.new 'e2', 'e2'
+					e2.reference = e2
+					e1.reference = e2
+					e1.references << e2
+				}.commit
+				@r['e1'].reference.should_not be_nil
+				@r['e2'].back_references.size.should == 3
+				
+				@r.transaction{
+					@r['e2'].delete
+					@r['e2'].reference.should be_nil	
+				}.commit								
+				@r['e1'].reference.should be_nil
+				@r['e1'].references.size.should == 0
+				@r['e1'].back_references.size.should == 0												
+			end
+			
+			class CascadeDeleteEntity
+				inherit Entity
+				metadata do
+					reference :reference
+					child :child
+				end
+			end
+			
+			it "Cascade BackReferences delete" do
+				@r.transaction{				
+					p = CascadeDeleteEntity.new 'parent'
+					c = SimpleEntity.new 'child'
+					p.child = c
+					
+					referrer = SimpleEntity.new 'referrer'
+					referrer.reference = c
+					referrer.references << c
+					referrer.references << p
+				}.commit
+				@r['referrer'].reference.should_not be_nil
+				@r['referrer'].references.size.should == 2
+				
+				@r.transaction{
+					@r['parent'].delete
+				}.commit
+				@r['referrer'].reference.should be_nil
+				@r['referrer'].references.size.should == 0
+			end
+			
+			before :each do
+				ObjectModel::CONFIG[:directory] = "#{File.dirname __FILE__}/data"
+				
+				Repository.delete :test
+				@r = Repository.new :test
+			end
+			
+			after :each do
+				@r.close
+				Repository.delete :test
+			end
+		end
+	end
+end

data/spec/basic_spec.rb

@@ -0,0 +1,162 @@
+require 'ObjectModel/require'
+require 'spec'
+
+module ObjectModel
+	module BasicSpec
+		describe "BasicSpec" do												
+			
+			it "Base Types, Initialization and Save & Load" do
+				@r.transaction{
+					BaseTypes.new 'bt'
+				}.commit
+				e = @r['bt']
+				[e.string, e.number, e.boolean, e.object, e.data, e.date].should == 
+				["", 0, false, nil, nil, nil]
+			end												
+			
+			it "Should Asquise Parent's methods" do
+				@r.transaction{
+					UpParent.new 'parent'
+					UpChild.new 'child'
+				}.commit
+				@r['child'].up(:up_child, "Some param").should == :up_child
+				#					lambda{
+				@r['child'].up(:up_parent, "Some param").should == nil
+				#					}.should raise_error(NoMethodError)
+				
+				@r.transaction{@r['parent'].child = @r['child']}.commit
+				@r['parent/child'].up(:up_parent, "Some param").should == :up_parent										
+			end								
+			
+			it "DMeta inheritance" do
+				Descendant.meta.attributes.keys.sort.should == [:base_class_method, :descendant_method]
+			end								
+			
+			it "each" do
+				@r.transaction{
+					p = EachTest.new 'p', 'p_id'
+					c1 = EachTest.new 'c1', 'c1_id'
+					c2 = EachTest.new 'c2', 'c2_id'
+					
+					p.child = c1
+					p.children << c2
+					
+					p.reference = c1
+					p.references << c2
+					p.references << c2
+					
+					c3 = EachTest.new 'c3', 'c3_id'
+					c2.child = c3
+					c2.reference = c3
+				}.commit
+				
+				list = []
+				@r['p'].each(:attribute){|value| list << value}
+				list.size.should == 2
+				list.to_set.should == ["a1", "a2"].to_set
+				
+				list = []
+				@r['p'].each(:child){|child| list << child.name}
+				list.size.should == 2
+				list.to_set.should == ["c1", "c2"].to_set
+				
+				list = []
+				@r['p'].each(:reference){|value| list << value.name
+				}
+				list.size.should == 3
+				list.to_set.should == ["c1", "c2", "c2"].to_set					
+			end		
+			
+			class SimpleEntity
+				inherit Entity
+				
+				metadata do
+					attribute :label, :string
+					attribute :value, :object
+				end
+			end
+			
+			it "Write & Read" do		
+				@r.should_not include('e')
+				tr = @r.transaction{SimpleEntity.new('e').label = "name"}
+				@r.should_not include('e')
+				tr.commit		
+				@r.should include('e')
+				@r['e'].label.should == "name"
+				@r['e'].name.should == 'e'
+			end
+			
+			it "Should return used transaction in commit" do			
+				tr = @r.transaction{SimpleEntity.new}.commit
+				tr.copies.size.should == 1
+			end												
+			
+			it "Long transaction" do
+				e = nil
+				tr = @r.transaction{e = SimpleEntity.new 'e'}
+				@r.should_not include('e')
+				@r.transaction(tr){e.label = "name"}
+				tr.commit
+				@r['e'].label.should == "name"
+			end
+			
+			it "Set name by hand" do
+				@r.transaction{
+					SimpleEntity.new('e', 'entity_id').set :label => 'name'
+				}.commit											
+				@r.should include('e')
+				@r.by_id('entity_id').label.should == 'name'
+			end										
+			
+			it "Rollback" do
+				@r.transaction{SimpleEntity.new 'e'}
+				@r.should_not include('e')
+			end
+			
+			it "Should correct save ValueObject" do
+				@r.transaction{SimpleEntity.new('e').set :value => ["value"]}.commit										
+				@r['e'].value.should == ["value"]
+			end
+			
+			it "Should freeze ValueObject" do
+				@r.transaction{SimpleEntity.new('e').set :value => ["value"]}.commit										
+				lambda{@r['e'].value << 1}.should raise_error(/frozen/)
+			end
+			
+			it "Each Entity in Repository" do
+				@r.transaction{
+					SimpleEntity.new 'e'
+					SimpleEntity.new 'e2'
+				}.commit	
+				
+				list = []					
+				@r.each{|e| list << e.name}
+				list.size.should == 2
+				list.to_set.should == ["e", "e2"].to_set
+			end				
+			
+			it "Not allowed to change objects outside transaction" do
+				@r.transaction{SimpleEntity.new 'e'}.commit	
+				lambda{SimpleEntity.new}.should raise_error(NoTransactionError)
+				lambda{@r['e'].value = :value}.should raise_error(NoTransactionError)
+			end								
+			
+			it "Should not allow to start two the same simultaneously" do
+				lambda {
+					Repository.new 'test'
+				}.should raise_error(/the same/)
+			end								
+			
+			before :each do
+				ObjectModel::CONFIG[:directory] = "#{File.dirname __FILE__}/data"					
+				Repository.delete :test
+				@r = Repository.new :test
+			end
+			
+			after :each do
+				@r.close
+				Repository.delete :test
+			end
+		end
+	end
+end