datamapper 0.2.5 → 0.3.0

data/spec/callbacks_spec.rb

@@ -76,4 +76,111 @@ describe DataMapper::Callbacks do
     post.instance_variable_get("@three").should eql('blue_cow')
   end
   
+  it "should execute materialization callbacks" do
+    
+    $before_materialize = 0
+    $after_materialize = 0
+    
+    Zoo.before_materialize do
+      $before_materialize += 1
+    end
+    
+    Zoo.after_materialize do
+      $after_materialize += 1
+    end
+    
+    class Zoo
+      
+      # This syntax doesn't work in DM.
+      # Which I don't think is necessarily a bad thing...
+      # Just FYI -Sam
+      def before_materialize
+        $before_materialize += 1
+      end
+      
+      def call_before_materialize
+        $before_materialize += 1
+      end
+      
+      # Example of invalid syntax
+      def after_materialize
+        $after_materialize += 1
+      end
+      
+      def call_after_materialize
+        $after_materialize += 1
+      end
+      
+    end
+    
+    Zoo.before_materialize :call_before_materialize
+    Zoo.after_materialize :call_after_materialize
+    
+    Zoo.before_materialize "$before_materialize += 1"
+    Zoo.after_materialize "$after_materialize += 1"
+    
+    Zoo.first
+    
+    $before_materialize.should == 3
+    $after_materialize.should == 3
+    
+    Zoo[1]
+    
+    $before_materialize.should == 6
+    $after_materialize.should == 6
+    
+  end
+  
+  it "should execute creation callbacks" do
+    
+    $before_create = 0
+    $after_create = 0
+    
+    Zoo.before_create do
+      $before_create += 1
+    end
+    
+    Zoo.after_create do
+      $after_create += 1
+    end
+    
+    class Zoo
+      
+      # Example of invalid syntax
+      def before_create
+        $before_create += 1
+      end
+      
+      def call_before_create
+        $before_create += 1
+      end
+      
+      # Example of invalid syntax
+      def after_create
+        $after_create += 1
+      end
+      
+      def call_after_create
+        $after_create += 1
+      end
+      
+    end
+    
+    Zoo.before_create :call_before_create
+    Zoo.after_create :call_after_create
+    
+    Zoo.before_create "$before_create += 1"
+    Zoo.after_create "$after_create += 1"
+    
+    Zoo.create(:name => 'bob')
+    
+    $before_create.should == 3
+    $after_create.should == 3  
+    
+    Zoo.new(:name => 'bob2').save
+    
+    $before_create.should == 6
+    $after_create.should == 6
+  end
+  
 end

data/spec/column_spec.rb

@@ -46,13 +46,13 @@ describe DataMapper::Adapters::Sql::Mappings::Column do
     lambda { database.query("SELECT name FROM zoos") }.should_not raise_error
     lambda { database.query("SELECT moo FROM zoos") }.should raise_error
     
-    name_column.rename!(:moo).should eql(true)
+    name_column = name_column.rename!(:moo)
     name_column.name.should eql(:moo)
     
     lambda { database.query("SELECT name FROM zoos") }.should raise_error
     lambda { database.query("SELECT moo FROM zoos") }.should_not raise_error
     
-    name_column.rename!(:name)
+    name_column = name_column.rename!(:name)
     name_column.name.should eql(:name)
     
     lambda { database.query("SELECT name FROM zoos") }.should_not raise_error
@@ -88,6 +88,7 @@ describe DataMapper::Adapters::Sql::Mappings::Column do
     
     Zoo.send(:undef_method, :moo)
     Zoo.send(:undef_method, :moo=)
+    Zoo.properties.delete_if { |x| x.name == :moo }
     
     lambda { database.query("SELECT moo FROM zoos") }.should raise_error
   end
@@ -100,6 +101,8 @@ describe DataMapper::Adapters::Sql::Mappings::Column do
   it "should be able to create a column with unique index" do
     column = table.add_column("name", :string, :index => :unique)
     column.unique?.should be_true
+    column.index?.should be_nil
+    table.to_create_index_sql.should == []
     table.to_create_sql.should match(/UNIQUE/)
   end
   

data/spec/count_command_spec.rb

@@ -1,13 +1,45 @@
 require File.dirname(__FILE__) + "/spec_helper"
 
-describe DataMapper::Adapters::AbstractAdapter do
+describe DataMapper::Adapters::AbstractAdapter, "count()" do
     
   before(:all) do
     fixtures(:zoos)
+    fixtures(:projects)
   end
 
   it "should return a count of the selected table" do
     Zoo.count.should be_a_kind_of(Integer)
     Zoo.count.should == Zoo.all.size
   end
+  
+  it "should accept finder style options" do
+    # Hash-style (with SymbolOperators)
+    Zoo.count(:name => 'Dallas').should == Zoo.all(:name => 'Dallas').length
+    Zoo.count(:name.not => nil).should == Zoo.all(:name.not => nil).length
+    Zoo.count(:name.not => nil, :notes => nil).should == Zoo.all(:name.not => nil, :notes => nil).length
+    Zoo.count(:name.like => '%.%').should == Zoo.all(:name.like => '%.%').length
+    
+    # :conditions
+    Zoo.count(:conditions => ["name = ?", 'Dallas']).should == Zoo.all(:conditions => ["name = ?", 'Dallas']).length
+    
+    # mix and match
+    Zoo.count(:notes => nil, :conditions => ["name = ?", 'Dallas']).should == Zoo.all(:notes => nil, :conditions => ["name = ?", 'Dallas']).length
+  end
+  
+  it "should respect paranoia" do
+    p = Project[3]
+    p.destroy!
+    
+    Project.count.should == Project.all.length
+    # clean up
+    p.deleted_at = nil
+    p.save
+  end
+  
+  #This won't work at the moment, hopefully before 0.3.0
+  it "should do distinct counting" do
+    #Zoo.count(:distinct => :name).should == Zoo.all.length # there all distinct in the fixtures
+    #Zoo.count(:distinct => :name, :notes.not => nil).should == Zoo.all(:notes.not => nil).length
+    #Zoo.count(:distinct => :name, :conditions => ["notes is not null"]).should == Zoo.all(:notes.not => nil).length
+  end
 end

data/spec/database_spec.rb

@@ -0,0 +1,18 @@
+require File.dirname(__FILE__) + "/spec_helper"
+
+describe('Multiple Databases') do
+  
+  it "should scope model creation and lookup" do
+    database(:secondary) do
+      Zoo.create :name => 'secondary'
+    end
+    
+    Zoo.first(:name => 'secondary').should be_nil
+    
+    database(:secondary) do
+      Zoo.first(:name => 'secondary').should_not be_nil
+      Zoo.first(:name => 'secondary').destroy!
+    end
+  end
+  
+end

data/spec/dependency_spec.rb

@@ -1,6 +1,8 @@
 require File.dirname(__FILE__) + "/spec_helper"
 
-describe DataMapper::Persistence do
+# Can't describe DataMapper::Persistence because
+# rspec will include it for some crazy reason!
+describe "DataMapper::Persistence" do
   
   it "should be able to add a dependency for a class not yet defined" do
     
@@ -12,7 +14,7 @@ describe DataMapper::Persistence do
       $happy_cow_defined = true
     end
     
-    class HappyCow 
+    class HappyCow #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
       
       property :name, :string, :key => true

data/spec/embedded_value_spec.rb

@@ -19,7 +19,7 @@ describe DataMapper::EmbeddedValue do
   end
   
   it 'should not require prefix' do
-    class PointyHeadedBoss
+    class PointyHeadedBoss #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -38,7 +38,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should add convenience methods to the non-embedded base' do
-    class Employee
+    class Employee #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -55,7 +55,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should support lazy loading of embedded properties' do
-    class Human
+    class Human #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -72,7 +72,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should default to public method visibility for all' do
-    class SoftwareEngineer
+    class SoftwareEngineer #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -89,7 +89,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should respect protected property options for all' do
-    class SanitationEngineer
+    class SanitationEngineer #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -107,7 +107,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should respect private property options for all' do
-    class ElectricalEngineer
+    class ElectricalEngineer #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -125,7 +125,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should set both reader and writer visibiliy for all when accessor option is passed' do
-    class TrainEngineer
+    class TrainEngineer #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'
@@ -142,7 +142,7 @@ describe DataMapper::EmbeddedValue do
   end
 
   it 'should allow individual properties to override method visibility options passed on the block' do
-    class ChemicalEngineer
+    class ChemicalEngineer #< DataMapper::Base # please do not remove this
       include DataMapper::Persistence
 
       set_table_name 'people'

data/spec/fixtures/people.yaml

@@ -31,7 +31,7 @@
   address_street: 123 Happy Ln.
   address_city: Dallas
   address_state: TX
-  address_zip_code: 75000
+  address_zip_code: "75000"
   type: SalesPerson
   commission: 40
   career_name: Peon

data/spec/fixtures/projects.yaml

@@ -1,4 +1,13 @@
 --- 
 - id: 1
   title: Test
-  description: 
+  description: test
+- id: 2
+  title: The Empire State Building
+  description: "The Empire State Building is a 102-story Art Deco skyscraper in New York City, New York"
+- id: 3
+  title: World Trade Center
+  description: "The World Trade Center in New York City, United States"
+- id: 4
+  title: The Statue Of Liberty
+  description: "Liberty Enlightening the World (French: La liberte eclairant le monde), known more commonly as the Statue of Liberty"

data/spec/fixtures/tasks.yaml

@@ -0,0 +1,6 @@
+- name: task_relax
+  notes: I am the relaxed task an should be related to task_vacation
+- name: task_drink_heartily
+  notes: I am the drink heartily task and should be related to task_relax
+- name: task_vacation
+  notes: I am the vacation task and should be related to task_relax

data/spec/fixtures/tasks_tasks.yaml

@@ -0,0 +1,2 @@
+- task_id: 1
+  related_task_id: 2

data/spec/fixtures/tomatoes.yaml

@@ -0,0 +1 @@
+--- []

data/spec/is_a_tree_spec.rb

@@ -0,0 +1,149 @@
+require File.dirname(__FILE__) + "/spec_helper"
+
+class DataMapper::MockBase
+	include DataMapper::Is::Tree
+end
+
+class DefaultTree < DataMapper::MockBase
+end
+
+describe "DataMapper::Is::Tree receiving various is_a_tree configurations" do
+	setup do
+		DefaultTree.stub!(:has_many)
+		DefaultTree.stub!(:belongs_to)
+	end
+
+	it "should setup a belongs_to relationship with the parent with the default configurations" do
+		DefaultTree.should_receive(:belongs_to).with(:parent, :foreign_key => "parent_id", :counter_cache => nil,
+																								 :class_name => "DefaultTree")
+		DefaultTree.send(:is_a_tree)
+	end
+
+	it "should setup a has_many relationship with the children with default configurations" do
+		DefaultTree.should_receive(:has_many).with(:children, :foreign_key => "parent_id", :order => nil,
+																							 :class_name => "DefaultTree")
+		DefaultTree.send(:is_a_tree)
+	end
+
+	it "should setup a belongs_to relationship with the correct foreign key" do
+		DefaultTree.should_receive(:belongs_to).with(:parent, :foreign_key => "something_id", :counter_cache => nil,
+																								 :class_name => "DefaultTree")
+		DefaultTree.send(:is_a_tree, :foreign_key => "something_id")
+	end
+
+	it "should setup a has_many relationship with the children with the correct foreign key" do
+		DefaultTree.should_receive(:has_many).with(:children, :foreign_key => "something_id", :order => nil,
+																							 :class_name => "DefaultTree")
+		DefaultTree.send(:is_a_tree, :foreign_key => "something_id")
+	end
+
+	it "should setup a has_many relationship with the children with the correct order" do
+		DefaultTree.should_receive(:has_many).with(:children, :foreign_key => "parent_id", :order => 'position',
+																							 :class_name => "DefaultTree")
+		DefaultTree.send(:is_a_tree, :order => 'position')
+	end
+end
+
+describe "Default DataMapper::Is::Tree class methods" do
+	setup do
+		DefaultTree.stub!(:has_many)
+		DefaultTree.stub!(:belongs_to)
+		DefaultTree.send(:can_has_tree)
+		DefaultTree.stub!(:all).and_return([])
+		DefaultTree.stub!(:first).and_return(nil)
+	end
+
+	it "should return an empty array for .roots" do
+		DefaultTree.roots.should == []
+	end
+
+	it "should find with the correct options on .roots" do
+		DefaultTree.should_receive(:all).with(:parent_id => nil, :order => nil)
+		DefaultTree.roots
+	end
+
+	it "should return nil for .first_root" do
+		DefaultTree.root.should be_nil
+	end
+
+	it "should find with the correct options on .first_root" do
+		DefaultTree.should_receive(:first).with(:parent_id => nil, :order => nil)
+		DefaultTree.first_root
+	end
+end
+
+describe "Configured DataMapper::Is::Tree class methods" do
+	setup do
+		DefaultTree.stub!(:has_many)
+		DefaultTree.stub!(:belongs_to)
+		DefaultTree.send(:can_has_tree, :foreign_key => 'mew_id', :order => 'mew')
+		DefaultTree.stub!(:all).and_return([])
+		DefaultTree.stub!(:first).and_return(nil)
+	end
+
+	it "should return an empty array for .roots" do
+		DefaultTree.roots.should == []
+	end
+
+	it "should find with the correct options on .roots" do
+		DefaultTree.should_receive(:all).with(:mew_id => nil, :order => 'mew')
+		DefaultTree.roots
+	end
+
+	it "should return nil for .first_root" do
+		DefaultTree.root.should be_nil
+	end
+
+	it "should find with the correct options on .first_root" do
+		DefaultTree.should_receive(:first).with(:mew_id => nil, :order => 'mew')
+		DefaultTree.first_root
+	end
+end
+
+describe "Default DataMapper::Is::Tree instance methods" do
+	setup do
+		DefaultTree.stub!(:has_many)
+		DefaultTree.stub!(:belongs_to)
+		DefaultTree.send(:is_a_tree)
+		@root = DefaultTree.new
+		@child = DefaultTree.new
+		@grandchild1 = DefaultTree.new
+		@grandchild2 = DefaultTree.new
+
+		# Mocking the belongs_to & has_many relationships (part of the not-needing-a-db-to-test plan)
+		@root.stub!(:parent).and_return nil
+		@child.stub!(:parent).and_return @root
+		@grandchild1.stub!(:parent).and_return(@child)
+		@grandchild2.stub!(:parent).and_return(@child)
+		@child.stub!(:children).and_return([@grandchild1, @grandchild2])
+		@root.stub!(:children).and_return([@child])
+		@grandchild1.stub!(:children).and_return []
+		@grandchild2.stub!(:children).and_return []
+	end
+
+	it "should return an array of parents, furthest parent first, for #ancestors" do
+		@grandchild1.ancestors.should == [@root, @child]
+	end
+
+	it "should return an array of siblings for #siblings" do
+		@grandchild1.siblings.should == [@grandchild2]
+	end
+
+	it "should return all children of the node's parent for #generation" do
+		@grandchild1.generation.should == [@grandchild1, @grandchild2]
+	end
+
+	it "should return roots on #generation when there is no parent" do
+		DefaultTree.should_receive(:roots).and_return [@root]
+		@root.generation.should == [@root]
+	end
+
+	it "should return the top-most parent on #root" do
+		@grandchild1.root.should == @root
+	end
+
+	it "should return self on #root if self has no parent" do
+		@root.root.should == @root
+	end
+
+end