ardm-core 1.2.1

data/spec/semipublic/associations_spec.rb

@@ -0,0 +1,177 @@
+require 'spec_helper'
+
+describe DataMapper::Associations do
+  before :all do
+    class ::Car
+      include DataMapper::Resource
+
+      property :id, Serial
+    end
+
+    class ::Engine
+      include DataMapper::Resource
+
+      property :id, Serial
+    end
+
+    class ::Door
+      include DataMapper::Resource
+
+      property :id, Serial
+    end
+
+    class ::Window
+      include DataMapper::Resource
+
+      property :id, Serial
+    end
+  end
+
+  def n
+    1.0/0
+  end
+
+  describe '#has' do
+    describe '1' do
+      before :all do
+        @relationship = Car.has(1, :engine)
+      end
+
+      it 'should return a Relationship' do
+        @relationship.should be_a_kind_of(DataMapper::Associations::OneToOne::Relationship)
+      end
+
+      it 'should return a Relationship with the child model' do
+        @relationship.child_model.should == Engine
+      end
+
+      it 'should return a Relationship with a min of 1' do
+        @relationship.min.should == 1
+      end
+
+      it 'should return a Relationship with a max of 1' do
+        @relationship.max.should == 1
+      end
+    end
+
+    describe 'n..n' do
+      before :all do
+        @relationship = Car.has(1..4, :doors)
+      end
+
+      it 'should return a Relationship' do
+        @relationship.should be_a_kind_of(DataMapper::Associations::OneToMany::Relationship)
+      end
+
+      it 'should return a Relationship with the child model' do
+        @relationship.child_model.should == Door
+      end
+
+      it 'should return a Relationship with a min of 1' do
+        @relationship.min.should == 1
+      end
+
+      it 'should return a Relationship with a max of 4' do
+        @relationship.max.should == 4
+      end
+    end
+
+    describe 'n..n through' do
+      before :all do
+        Door.has(1, :window)
+        Car.has(1..4, :doors)
+
+        @relationship = Car.has(1..4, :windows, :through => :doors)
+      end
+
+      it 'should return a Relationship' do
+        @relationship.should be_a_kind_of(DataMapper::Associations::ManyToMany::Relationship)
+      end
+
+      it 'should return a Relationship with the child model' do
+        @relationship.child_model.should == Window
+      end
+
+      it 'should return a Relationship with a min of 1' do
+        @relationship.min.should == 1
+      end
+
+      it 'should return a Relationship with a max of 4' do
+        @relationship.max.should == 4
+      end
+    end
+
+    describe 'n' do
+      before :all do
+        @relationship = Car.has(n, :doors)
+      end
+
+      it 'should return a Relationship' do
+        @relationship.should be_a_kind_of(DataMapper::Associations::OneToMany::Relationship)
+      end
+
+      it 'should return a Relationship with the child model' do
+        @relationship.child_model.should == Door
+      end
+
+      it 'should return a Relationship with a min of 0' do
+        @relationship.min.should == 0
+      end
+
+      it 'should return a Relationship with a max of n' do
+        @relationship.max.should == n
+      end
+    end
+
+    describe 'n through' do
+      before :all do
+        Door.has(1, :windows)
+        Car.has(1..4, :doors)
+
+        @relationship = Car.has(n, :windows, :through => :doors)
+      end
+
+      it 'should return a Relationship' do
+        @relationship.should be_a_kind_of(DataMapper::Associations::ManyToMany::Relationship)
+      end
+
+      it 'should return a Relationship with the child model' do
+        @relationship.child_model.should == Window
+      end
+
+      it 'should return a Relationship with a min of 0' do
+        @relationship.min.should == 0
+      end
+
+      it 'should return a Relationship with a max of n' do
+        @relationship.max.should == n
+      end
+    end
+  end
+
+  describe '#belongs_to' do
+    before :all do
+      @relationship = Engine.belongs_to(:car)
+    end
+
+    it 'should return a Relationship' do
+      @relationship.should be_a_kind_of(DataMapper::Associations::ManyToOne::Relationship)
+    end
+
+    it 'should return a Relationship with the parent model' do
+      @relationship.parent_model.should == Car
+    end
+
+    it 'should return a Relationship with a min of 1' do
+      @relationship.min.should == 1
+    end
+
+    it 'should return a Relationship with a max of 1' do
+      @relationship.max.should == 1
+    end
+
+    it 'should return a Relationship that is required' do
+      @relationship.required?.should be(true)
+    end
+  end
+end

data/spec/semipublic/collection_spec.rb

@@ -0,0 +1,110 @@
+require 'spec_helper'
+
+# run the specs once with a loaded collection and once not
+[ false, true ].each do |loaded|
+  describe DataMapper::Collection do
+    extend DataMapper::Spec::CollectionHelpers::GroupMethods
+
+    self.loaded = loaded
+
+    before :all do
+      module ::Blog
+        class Article
+          include DataMapper::Resource
+
+          property :id,      Serial
+          property :title,   String
+          property :content, Text
+          property :subtitle, String
+        end
+      end
+
+      @article_model = Blog::Article
+    end
+
+    supported_by :all do
+      before :all do
+        @article_repository = @repository
+        @articles_query     = DataMapper::Query.new(@article_repository, @article_model, :title => 'Sample Article')
+
+        @article = @article_model.create(:title => 'Sample Article', :content => 'Sample')
+
+        @articles = @article_model.all(@articles_query)
+
+        @articles.entries if loaded
+      end
+
+      it { DataMapper::Collection.should respond_to(:new) }
+
+      describe '.new' do
+        describe 'with resources' do
+          before :all do
+            @return = @collection = DataMapper::Collection.new(@articles_query, [ @article ])
+          end
+
+          it 'should return a Collection' do
+            @return.should be_kind_of(DataMapper::Collection)
+          end
+
+          it 'should be loaded' do
+            @return.should be_loaded
+          end
+
+          it 'should contain the article' do
+            @collection.should == [ @article ]
+          end
+        end
+
+        describe 'with no resources' do
+          before :all do
+            @return = @collection = DataMapper::Collection.new(@articles_query)
+          end
+
+          it 'should return a Collection' do
+            @return.should be_kind_of(DataMapper::Collection)
+          end
+
+          it 'should not be loaded' do
+            @return.should_not be_loaded
+          end
+
+          it 'should contain the article' do
+            @collection.should == [ @article ]
+          end
+        end
+      end
+
+      it { @articles.should respond_to(:query) }
+
+      describe '#query' do
+        before :all do
+          @return = @articles.query
+        end
+
+        it 'should return a Query' do
+          @return.should be_kind_of(DataMapper::Query)
+        end
+
+        it 'should return expected Query' do
+          @return.should eql(@articles_query)
+        end
+      end
+
+      it { @articles.should respond_to(:repository) }
+
+      describe '#repository' do
+        before :all do
+          @return = @repository = @articles.repository
+        end
+
+        it 'should return a Repository' do
+          @return.should be_kind_of(DataMapper::Repository)
+        end
+
+        it 'should be expected Repository' do
+          @repository.should == @article_repository
+        end
+      end
+    end
+  end
+end

data/spec/semipublic/model_spec.rb

@@ -0,0 +1,96 @@
+require 'spec_helper'
+
+describe DataMapper::Model do
+
+  it { should respond_to(:append_inclusions) }
+
+  describe '.append_inclusions' do
+    module ::Inclusions
+      def new_method
+      end
+    end
+
+    describe 'before the model is defined' do
+      before :all do
+        DataMapper::Model.append_inclusions(Inclusions)
+
+        class ::User
+          include DataMapper::Resource
+          property :id, Serial
+        end
+      end
+
+      it 'should respond to :new_method' do
+        User.new.should respond_to(:new_method)
+      end
+
+      after :all do
+        DataMapper::Model.extra_inclusions.delete(Inclusions)
+      end
+    end
+
+    describe 'after the model is defined' do
+      before :all do
+        class ::User
+          include DataMapper::Resource
+          property :id, Serial
+        end
+        DataMapper::Model.append_inclusions(Inclusions)
+      end
+
+      it 'should respond to :new_method' do
+        User.new.should respond_to(:new_method)
+      end
+
+      after :all do
+        DataMapper::Model.extra_inclusions.delete(Inclusions)
+      end
+    end
+  end
+
+  it { should respond_to(:append_extensions) }
+
+  describe '.append_extensions' do
+    module ::Extensions
+      def new_method
+      end
+    end
+
+    describe 'before the model is defined' do
+      before :all do
+        DataMapper::Model.append_extensions(Extensions)
+
+        class ::User
+          include DataMapper::Resource
+          property :id, Serial
+        end
+      end
+
+      it 'should respond to :new_method' do
+        User.should respond_to(:new_method)
+      end
+
+      after :all do
+        DataMapper::Model.extra_extensions.delete(Extensions)
+      end
+    end
+
+    describe 'after the model is defined' do
+      before :all do
+        class ::User
+          include DataMapper::Resource
+          property :id, Serial
+        end
+        DataMapper::Model.append_extensions(Extensions)
+      end
+
+      it 'should respond to :new_method' do
+        User.should respond_to(:new_method)
+      end
+
+      after :all do
+        DataMapper::Model.extra_extensions.delete(Extensions)
+      end
+    end
+  end
+end

data/spec/semipublic/property/binary_spec.rb

@@ -0,0 +1,13 @@
+require 'spec_helper'
+
+describe DataMapper::Property::Binary do
+  before :all do
+    @name          = :title
+    @type          = described_class
+    @value         = 'value'
+    @other_value   = 'return value'
+    @invalid_value = 1
+  end
+
+  it_should_behave_like 'A semipublic Property'
+end

data/spec/semipublic/property/boolean_spec.rb

@@ -0,0 +1,47 @@
+require 'spec_helper'
+
+describe DataMapper::Property::Boolean do
+  before :all do
+    @name          = :active
+    @type          = described_class
+    @value         = true
+    @other_value   = false
+    @invalid_value = 1
+  end
+
+  it_should_behave_like 'A semipublic Property'
+
+  describe '#valid?' do
+    [ true, false ].each do |value|
+      it "returns true when value is #{value.inspect}" do
+        @property.valid?(value).should be(true)
+      end
+    end
+
+    [ 'true', 'TRUE', '1', 1, 't', 'T', 'false', 'FALSE', '0', 0, 'f', 'F' ].each do |value|
+      it "returns false for #{value.inspect}" do
+        @property.valid?(value).should be(false)
+      end
+    end
+  end
+
+  describe '#typecast_to_primitive' do
+    [ true, 'true', 'TRUE', '1', 1, 't', 'T' ].each do |value|
+      it "returns true when value is #{value.inspect}" do
+        @property.typecast(value).should be(true)
+      end
+    end
+
+    [ false, 'false', 'FALSE', '0', 0, 'f', 'F' ].each do |value|
+      it "returns false when value is #{value.inspect}" do
+        @property.typecast(value).should be(false)
+      end
+    end
+
+    [ 'string', 2, 1.0, BigDecimal('1.0'), DateTime.now, Time.now, Date.today, Class, Object.new, ].each do |value|
+      it "does not typecast value #{value.inspect}" do
+        @property.typecast(value).should equal(value)
+      end
+    end
+  end
+end