dm-mongo-adapter 0.2.0.pre1

data/spec/public/shared/model_embedments_spec.rb

@@ -0,0 +1,338 @@
+# The share specs contained herein are very slightly modified versions of
+# those found in dm-core/spec/public/model/relationship_spec.rb
+
+share_examples_for 'A singular embedment reader' do
+  it { @car.should respond_to(@name) }
+
+  describe 'reader' do
+    describe 'when there is no associated resource' do
+      it 'should return nil when there is no query' do
+        @car.__send__(@name).should be_nil
+      end
+
+      it 'should return nil when there is a query' do
+        @car.__send__(@name, :name => '__nothing__').should be_nil
+      end
+    end # when there is no associated resource
+
+    describe 'when there is an associated resource' do
+      before(:all) do
+        @expected = @model.new
+        @car.__send__("#{@name}=", @expected)
+      end
+
+      describe 'without a query' do
+        it 'should return an EmbeddedResource' do
+          returned = @car.__send__(@name)
+          returned.should be_kind_of(DataMapper::Mongo::EmbeddedResource)
+        end
+
+        it 'should return the correct EmbeddedResource' do
+          @car.__send__(@name).should == @expected
+        end
+      end
+
+      describe 'with a query' do
+        it 'should return a EmbeddedResource' do
+          returned = @car.__send__(@name, :name => @expected.name)
+          returned.should be_kind_of(DataMapper::Mongo::EmbeddedResource)
+        end
+
+        it 'should return the correct EmbeddedResource' do
+          @car.__send__(@name, :name => @expected.name).should == @expected
+        end
+      end
+    end # when there is an associated resource
+
+  end # reader
+end # A singular embedment reader
+
+share_examples_for 'A singular embedment writer' do
+  it { @car.should respond_to("#{@name}=") }
+
+  describe 'writer' do
+    describe 'when setting the wrong kind of target' do
+      it 'should raise an ArgumentError' do
+        calling = lambda { @car.__send__("#{@name}=", Object.new) }
+        calling.should raise_error(ArgumentError)
+      end
+    end
+
+    describe 'when setting an EmbeddedResource' do
+      before(:all) do
+        @expected = @model.new
+        @return = @car.__send__("#{@name}=", @expected)
+      end
+
+      it 'should return the expected EmbeddedResource' do
+        @return.should equal(@expected)
+      end
+
+      it 'should set the EmbeddedResource' do
+        @car.__send__(@name).should equal(@expected)
+      end
+
+      it 'should relate the associated EmbeddedResource' do
+        @expected.parent.should == @car
+      end
+
+      it 'should persist the Resource' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+    end # when setting an EmbeddedResource
+
+    describe 'when setting a Hash' do
+      before(:all) do
+        @expected = @model.new(:name => 'Name')
+        @return = @car.__send__("#{@name}=", { :name => 'Name' })
+      end
+
+      it 'should return the expected EmbeddedResource' do
+        @return.should == @expected
+      end
+
+      it 'should set the EmbeddedResource' do
+        @car.__send__(@name).should equal(@return)
+      end
+
+      it 'should relate the associated EmbeddedResource' do
+        @car.__send__(@name).parent.should == @car
+      end
+
+      it 'should persist the Resource' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+    end # when setting a Hash
+
+    describe 'when setting nil' do
+      before(:all) do
+        @car.__send__("#{@name}=", @model.new)
+        @return = @car.__send__("#{@name}=", nil)
+      end
+
+      it 'should return nil' do
+        @return.should be_nil
+      end
+
+      it 'should set nil' do
+        @car.__send__(@name).should be_nil
+      end
+
+      it 'should persist as nil' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should be_nil
+      end
+    end # when setting nil
+
+    describe 'when changing the EmbeddedResource' do
+      before(:all) do
+        @car.__send__("#{@name}=", @model.new)
+        @return = @car.__send__("#{@name}=", @expected = @model.new)
+      end
+
+      it 'should return the expected EmbeddedResource' do
+        @return.should equal(@expected)
+      end
+
+      it 'should set the EmbeddedResource' do
+        @car.__send__(@name).should equal(@return)
+      end
+
+      it 'should relate the associated EmbeddedResource' do
+        @car.__send__(@name).parent.should == @car
+      end
+
+      it 'should persist the Resource' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+    end # when changing the EmbeddedResource
+
+  end # writer
+end # A singular embedment writer
+
+share_examples_for 'A many embedment reader' do
+  it { @car.should respond_to(@name) }
+
+  describe 'reader' do
+    describe 'when there are no child resources and the source is saved' do
+      before(:all) do
+        @car.save.should be_true
+        @return = @car.__send__(@name)
+      end
+
+      it 'should return a Collection' do
+        @return.should be_kind_of(
+          DataMapper::Mongo::Embedments::OneToMany::Collection)
+      end
+
+      it 'should return an empty Collection' do
+        @return.should be_empty
+      end
+    end # when there is no child resource and the source is saved
+
+    describe 'when there are no child resources and the source is not saved' do
+      before(:all) do
+        @return = @car.__send__(@name)
+      end
+
+      it 'should return a Collection' do
+        @return.should be_kind_of(
+          DataMapper::Mongo::Embedments::OneToMany::Collection)
+      end
+
+      it 'should return an empty Collection' do
+        @return.should be_empty
+      end
+    end # when there is no child resource and the source is not save
+
+    describe 'when there is a child resource' do
+      before(:all) do
+        @expected = @model.new
+        @car.__send__("#{@name}=", [ @expected ])
+        @return = @car.__send__(@name)
+      end
+
+      it 'should return a Collection' do
+        @return.should be_kind_of(
+          DataMapper::Mongo::Embedments::OneToMany::Collection)
+      end
+
+      it 'should return the expected resources' do
+        @return.should == [ @expected ]
+      end
+    end # when there is a child resource
+
+  end # reader
+end # A many embedment reader
+
+share_examples_for 'A many embedment writer' do
+  it { @car.should respond_to("#{@name}=") }
+
+  describe 'writer' do
+    describe 'when setting an Array of the wrong kind of target' do
+      it 'should raise an ArgumentError' do
+        calling = lambda { @car.__send__("#{@name}=", [Object.new]) }
+        calling.should raise_error(ArgumentError)
+      end
+    end # when setting an Array of the wrong kind of target
+
+    describe 'when setting an Array of EmbeddedResources' do
+      before(:all) do
+        @expected = [ @model.new ]
+        @return = @car.__send__("#{@name}=", @expected)
+      end
+
+      it 'should return the expected Collection' do
+        @return.should == @expected
+      end
+
+      it 'should set the Collection' do
+        @car.__send__(@name).should == @expected
+        @car.__send__(@name).zip(@expected) do |value, expected|
+          value.should equal(expected)
+        end
+      end
+
+      it 'should relate the associated Collection' do
+        @expected.each { |resource| resource.parent.should == @car }
+      end
+
+      it 'should persist the Collection' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+
+      it 'should persist the associated EmbeddedResources' do
+        @car.save.should be_true
+        @expected.each { |resource| resource.should be_saved }
+      end
+    end # when setting an Array of EmbeddedResources
+
+    describe 'when setting an Array of Hashes' do
+      before(:all) do
+        @expected = [ @model.new(:name => 'Name') ]
+        @return = @car.__send__("#{@name}=", [{ :name => 'Name' }])
+      end
+
+      it 'should return the expected Collection' do
+        @return.should == @expected
+      end
+
+      it 'should set the Collection' do
+        @car.__send__(@name).should == @expected
+        @car.__send__(@name).zip(@expected) do |value, expected|
+          value.should == expected
+        end
+      end
+
+      it 'should relate the associated Collection' do
+        @return.each { |resource| resource.parent.should == @car }
+      end
+
+      it 'should persist the Collection' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+
+      it 'should persist the associated EmbeddedResources' do
+        @car.save.should be_true
+        @return.each { |resource| resource.should be_saved }
+      end
+    end # when setting an Array of Hashes
+
+    describe 'when setting an empty collection' do
+      before :all do
+        @car.__send__("#{@name}=", [ @model.new ])
+        @return = @car.__send__("#{@name}=", [])
+      end
+
+      it 'should return a Collection' do
+        @return.should be_kind_of(
+          DataMapper::Mongo::Embedments::OneToMany::Collection)
+      end
+
+      it 'should set a empty Collection' do
+        @car.__send__(@name).should be_empty
+      end
+
+      it 'should persist as an empty collection' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should be_empty
+      end
+    end # when setting an empty collection
+
+    describe 'when changing an associated collection' do
+      before(:all) do
+        @car.__send__("#{@name}=", [ @model.new ])
+        @expected = [ @model.new ]
+        @return = @car.__send__("#{@name}=", @expected)
+      end
+
+      it 'should return the expected Resource' do
+        @return.should == @expected
+      end
+
+      it 'should set the Resource' do
+        @car.__send__(@name).should == @expected
+      end
+
+      it 'should relate the associated Resource' do
+        @expected.each { |resource| resource.parent.should == @car }
+      end
+
+      it 'should persist the Resource' do
+        @car.save.should be_true
+        @car.model.get(*@car.key).__send__(@name).should == @expected
+      end
+
+      it 'should persist the associated Resource' do
+        @car.save.should be_true
+        @expected.each { |resource| resource.should be_saved }
+      end
+    end # when setting an associated collection
+
+  end #writer
+end # A many embedment writer

data/spec/public/shared/object_id_shared_spec.rb

@@ -0,0 +1,56 @@
+share_examples_for 'An ObjectID Type' do
+
+  describe '.load' do
+    it 'should return nil when given nil' do
+      @type_class.load(nil, nil).should be_nil
+    end
+
+    it 'should return the argument when given a string' do
+      loaded = @type_class.load('avalue', nil)
+      loaded.should == 'avalue'
+    end
+
+    it 'should return a string when given a Mongo::ObjectID' do
+      mongo_id = ::Mongo::ObjectID.new
+      loaded = @type_class.load(mongo_id, nil)
+      loaded.should be_kind_of(String)
+      loaded.should == mongo_id.to_s
+    end
+
+    it 'should raise an error when given anything else' do
+      [ 0, 1, Object.new, true, false, [], {} ].each do |value|
+        lambda {
+          @type_class.load(value, nil)
+        }.should raise_error(ArgumentError)
+      end
+    end
+  end
+
+  describe '.dump' do
+    it 'should return nil when given nil' do
+      @type_class.dump(nil, nil).should be_nil
+    end
+
+    it 'should return a Mongo::ObjectID when given a string' do
+      mongo_id = ::Mongo::ObjectID.new
+      dumped = @type_class.dump(mongo_id.to_s, nil)
+      dumped.should be_kind_of(::Mongo::ObjectID)
+      dumped.to_s.should == mongo_id.to_s
+    end
+
+    it 'should return the argument when given a Mongo::ObjectID' do
+      mongo_id = ::Mongo::ObjectID.new
+      dumped = @type_class.dump(mongo_id, nil)
+      dumped.should == mongo_id
+    end
+
+    it 'should raise an error when given anything else' do
+      [ 0, 1, Object.new, true, false, [], {} ].each do |value|
+        lambda {
+          @type_class.dump(value, nil)
+        }.should raise_error(ArgumentError)
+      end
+    end
+  end
+
+end

data/spec/public/types/df_ref_spec.rb

@@ -0,0 +1,6 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', '..', 'spec_helper'))
+
+describe DataMapper::Mongo::Types::DBRef do
+  before(:all) { @type_class = DataMapper::Mongo::Types::DBRef }
+  it_should_behave_like 'An ObjectID Type'
+end

data/spec/public/types/discriminator_spec.rb

@@ -0,0 +1,118 @@
+require File.expand_path(File.join(File.dirname(__FILE__), '..', '..', 'spec_helper'))
+
+describe DataMapper::Mongo::Types::Discriminator do
+  before :all do
+    class Article
+      include DataMapper::Mongo::Resource
+
+      property :id,    ObjectID
+      property :title, String, :required => true
+      property :type,  Discriminator
+    end
+
+    class Announcement < Article; end
+    class Release < Announcement; end
+
+    Article.all.destroy!
+
+    @article_model      = Article
+    @announcement_model = Announcement
+    @release_model      = Release
+  end
+
+  it 'should typecast to a Model' do
+    @article_model.properties[:type].typecast('Release').should equal(@release_model)
+  end
+
+  describe 'Model#new' do
+    describe 'when provided a String discriminator in the attributes' do
+      before :all do
+        @resource = @article_model.new(:type => 'Release')
+      end
+
+      it 'should return a Resource' do
+        @resource.should be_kind_of(DataMapper::Resource)
+      end
+
+      it 'should be an descendant instance' do
+        @resource.should be_instance_of(Release)
+      end
+    end
+
+    describe 'when provided a Class discriminator in the attributes' do
+      before :all do
+        @resource = @article_model.new(:type => Release)
+      end
+
+      it 'should return a Resource' do
+        @resource.should be_kind_of(DataMapper::Resource)
+      end
+
+      it 'should be an descendant instance' do
+        @resource.should be_instance_of(Release)
+      end
+    end
+
+    describe 'when not provided a discriminator in the attributes' do
+      before :all do
+        @resource = @article_model.new
+      end
+
+      it 'should return a Resource' do
+        @resource.should be_kind_of(DataMapper::Resource)
+      end
+
+      it 'should be a base model instance' do
+        @resource.should be_instance_of(@article_model)
+      end
+    end
+  end
+
+  describe 'Model#descendants' do
+    it 'should set the descendants for the grandparent model' do
+      @article_model.descendants.to_a.should == [ @article_model, @announcement_model, @release_model ]
+    end
+
+    it 'should set the descendants for the parent model' do
+      @announcement_model.descendants.to_a.should == [ @announcement_model, @release_model ]
+    end
+
+    it 'should set the descendants for the child model' do
+      @release_model.descendants.to_a.should == [ @release_model ]
+    end
+  end
+
+  describe 'Model#default_scope' do
+    it 'should set the default scope for the grandparent model' do
+      @article_model.default_scope[:type].should equal(@article_model.descendants)
+    end
+
+    it 'should set the default scope for the parent model' do
+      @announcement_model.default_scope[:type].should equal(@announcement_model.descendants)
+    end
+
+    it 'should set the default scope for the child model' do
+      @release_model.default_scope[:type].should equal(@release_model.descendants)
+    end
+  end
+
+  before :all do
+    @announcement = @announcement_model.create(:title => 'Announcement')
+  end
+
+  it 'should persist the type' do
+    @announcement.model.get(*@announcement.key).type.should equal(@announcement_model)
+  end
+
+  it 'should be retrieved as an instance of the correct class' do
+    @announcement.model.get(*@announcement.key).should be_instance_of(@announcement_model)
+  end
+
+  it 'should include descendants in finders' do
+    @article_model.first.should eql(@announcement)
+  end
+
+  it 'should not include ancestors' do
+    @release_model.first.should be_nil
+  end
+end