mongomodel 0.1

data/spec/mongomodel/concerns/activemodel_spec.rb

@@ -0,0 +1,61 @@
+require 'spec_helper'
+
+# Specs ported from ActiveModel::Lint::Tests
+module MongoModel
+  specs_for(Document, EmbeddedDocument) do
+    define_class(:TestModel, described_class)
+    
+    subject { TestModel.new.to_model }
+    
+    # valid?
+    # ------
+    #
+    # Returns a boolean that specifies whether the object is in a valid or invalid
+    # state.
+    it { should respond_to_boolean(:valid?) }
+
+    # new_record?
+    # -----------
+    #
+    # Returns a boolean that specifies whether the object has been persisted yet.
+    # This is used when calculating the URL for an object. If the object is
+    # not persisted, a form for that object, for instance, will be POSTed to the
+    # collection. If it is persisted, a form for the object will put PUTed to the
+    # URL for the object.
+    it { should respond_to_boolean(:new_record?) }
+    it { should respond_to_boolean(:destroyed?) }
+    
+    # errors
+    # ------
+    #
+    # Returns an object that has :[] and :full_messages defined on it. See below
+    # for more details.
+    describe "errors" do
+      it { should respond_to(:errors) }
+      
+      # Returns an Array of Strings that are the errors for the attribute in
+      # question. If localization is used, the Strings should be localized
+      # for the current locale. If no error is present, this method should
+      # return an empty Array.
+      describe "#[]" do
+        it "should return an Array" do
+          subject.errors[:hello].should be_an(Array)
+        end
+      end
+      
+      # Returns an Array of all error messages for the object. Each message
+      # should contain information about the field, if applicable.
+      describe "#full_messages" do
+        it "should return an Array" do
+          subject.errors.full_messages.should be_an(Array)
+        end
+      end
+    end
+    
+    describe "#model_name" do
+      it "should return an ActiveModel::Name object" do
+        TestModel.model_name.should == ActiveModel::Name.new('TestModel')
+      end
+    end
+  end
+end

data/spec/mongomodel/concerns/associations/belongs_to_spec.rb

@@ -0,0 +1,153 @@
+require 'spec_helper'
+
+module MongoModel
+  shared_examples_for "assigning correct class to belongs_to association" do
+    define_class(:User, Document)
+    define_class(:SpecialUser, :User)
+
+    let(:user) { User.create! }
+    let(:special_user) { SpecialUser.create! }
+    
+    subject { Article.new }
+    
+    context "when uninitialized" do
+      it "should be nil" do
+        subject.user.should be_nil
+      end
+      
+      it "should be settable" do
+        subject.user = user
+        subject.user.should == user
+      end
+      
+      describe "setting a subclass type" do
+        it "should set successfully" do
+          subject.user = special_user
+          subject.user.should == special_user
+        end
+      end
+    end
+    
+    context "when loading from database" do
+      subject { Article.new(:user => user) }
+      
+      if specing?(EmbeddedDocument)
+        define_class(:ArticleParent, Document) do
+          property :article, Article
+        end
+        
+        let(:parent) { ArticleParent.create!(:article => subject) }
+        let(:reloaded) { ArticleParent.find(parent.id).article }
+      else
+        before(:each) { subject.save! }
+        let(:reloaded) { Article.find(subject.id) }
+      end
+      
+      it "should access the user through the association" do
+        reloaded.user.should == user
+      end
+      
+      it "should allow the user to be reloaded" do
+        reloaded.user.inspect
+        reloaded.user.loaded?.should be_true
+        
+        reloaded.user(true)
+        reloaded.user.loaded?.should be_false
+      end
+      
+      describe "setting a subclass type" do
+        subject { Article.new(:user => special_user) }
+        
+        it "should load successfully" do
+          reloaded.user.should == special_user
+        end
+      end
+    end
+  end
+  
+  specs_for(Document, EmbeddedDocument) do
+    describe "belongs_to association" do
+      define_class(:Article, described_class) do
+        belongs_to :user
+      end
+      
+      it_should_behave_like "assigning correct class to belongs_to association"
+      
+      describe "setting a different class type" do
+        define_class(:NonUser, Document)
+        
+        let(:non_user) { NonUser.create! }
+        
+        it "should raise a AssociationTypeMismatch exception" do
+          lambda { subject.user = non_user }.should raise_error(AssociationTypeMismatch, "expected instance of User but got NonUser")
+        end
+      end
+      
+      describe "#build_user" do
+        subject { Article.new }
+        
+        let(:user) { subject.build_user(:id => '123') }
+        
+        it "should return a new unsaved user with the given attributes" do
+          user.should be_an_instance_of(User)
+          user.should be_a_new_record
+          user.id.should == '123'
+        end
+      end
+      
+      describe "#create_user" do
+        subject { Article.new }
+        
+        it "should return a new saved user with the given attributes" do
+          user = subject.create_user(:id => '123')
+          user.should be_an_instance_of(User)
+          user.should_not be_a_new_record
+          user.id.should == '123'
+        end
+      end
+    end
+    
+    describe "polymorphic belongs_to association" do
+      define_class(:Article, described_class) do
+        belongs_to :user, :polymorphic => true
+      end
+      
+      define_class(:NonUser, Document)
+      
+      let(:non_user) { NonUser.create! }
+      
+      it_should_behave_like "assigning correct class to belongs_to association"
+      
+      describe "setting a different class type" do
+        it "should set successfully" do
+          subject.user = non_user
+          subject.user.should == non_user
+        end
+      end
+      
+      context "when loading from database" do
+        subject { Article.new(:user => user) }
+        
+        if specing?(EmbeddedDocument)
+          define_class(:ArticleParent, Document) do
+            property :article, Article
+          end
+          
+          let(:parent) { ArticleParent.create!(:article => subject) }
+          let(:reloaded) { ArticleParent.find(parent.id).article }
+        else
+          before(:each) { subject.save! }
+          let(:reloaded) { Article.find(subject.id) }
+        end
+        
+        describe "setting a different class type" do
+          subject { Article.new(:user => non_user) }
+          
+          it "should load successfully" do
+            reloaded.user.should == non_user
+          end
+        end
+      end
+    end
+  end
+end

data/spec/mongomodel/concerns/associations/has_many_by_foreign_key_spec.rb

@@ -0,0 +1,165 @@
+require 'spec_helper'
+
+module MongoModel
+  specs_for(Document) do
+    describe "has_many association" do
+      define_class(:Book, Document) do
+        has_many :chapters
+      end
+      
+      it "should default to :by => :foreign_key" do
+        Book.associations[:chapters].should be_a(Associations::HasManyByForeignKey)
+      end
+    end
+    
+    describe "has_many :by => :foreign_key association" do
+      define_class(:Chapter, Document) do
+        belongs_to :book
+      end
+      define_class(:IllustratedChapter, :Chapter)
+      define_class(:Book, Document) do
+        has_many :chapters, :by => :foreign_key
+      end
+      define_class(:NonChapter, Document)
+      
+      let(:chapter1) { Chapter.create!(:id => '1') }
+      let(:chapter2) { IllustratedChapter.create!(:id => '2') }
+      let(:chapter3) { Chapter.create!(:id => '3') }
+      let(:nonchapter) { NonChapter.create! }
+      
+      context "when uninitialized" do
+        subject { Book.new }
+        
+        it "should be empty" do
+          subject.chapters.should be_empty
+        end
+      end
+      
+      shared_examples_for "accessing and manipulating a has_many :by => :foreign_key association" do
+        it "should access chapters" do
+          subject.chapters.should include(chapter1, chapter2)
+        end
+        
+        it "should access chapter ids through association" do
+          subject.chapters.ids.should include(chapter1.id, chapter2.id)
+        end
+        
+        it "should add chapters with <<" do
+          subject.chapters << chapter3
+          subject.chapters.should include(chapter1, chapter2, chapter3)
+          chapter3.book.should == subject
+        end
+        
+        it "should add/change chapters with []=" do
+          subject.chapters[2] = chapter3
+          subject.chapters.should include(chapter1, chapter2, chapter3)
+          chapter3.book.should == subject
+        end
+        
+        it "should add chapters with concat" do
+          subject.chapters.concat([chapter3])
+          subject.chapters.should include(chapter1, chapter2, chapter3)
+          chapter3.book.should == subject
+        end
+        
+        it "should insert chapters" do
+          subject.chapters.insert(1, chapter3)
+          subject.chapters.should include(chapter1, chapter2, chapter3)
+          chapter3.book.should == subject
+        end
+        
+        # it "should replace chapters" do
+        #   subject.chapters.replace([chapter2, chapter3])
+        #   subject.chapters.should == [chapter2, chapter3]
+        #   subject.chapter_ids.should == [chapter2.id, chapter3.id]
+        # end
+        
+        it "should add chapters with push" do
+          subject.chapters.push(chapter3)
+          subject.chapters.should include(chapter1, chapter2, chapter3)
+          chapter3.book.should == subject
+        end
+        
+        it "should add chapters with unshift" do
+          subject.chapters.unshift(chapter3)
+          subject.chapters.should include(chapter3, chapter1, chapter2)
+          chapter3.book.should == subject
+        end
+        
+        # it "should clear chapters" do
+        #   subject.chapters.clear
+        #   subject.chapters.should be_empty
+        #   subject.chapter_ids.should be_empty
+        # end
+        # 
+        # it "should remove chapters with delete" do
+        #   subject.chapters.delete(chapter1)
+        #   subject.chapters.should == [chapter2]
+        #   subject.chapter_ids.should == [chapter2.id]
+        # end
+        # 
+        # it "should remove chapters with delete_at" do
+        #   subject.chapters.delete_at(0)
+        #   subject.chapters.should == [chapter2]
+        #   subject.chapter_ids.should == [chapter2.id]
+        # end
+        # 
+        # it "should remove chapters with delete_if" do
+        #   subject.chapters.delete_if { |c| c.id == chapter1.id }
+        #   subject.chapters.should == [chapter2]
+        #   subject.chapter_ids.should == [chapter2.id]
+        # end
+        
+        it "should build a chapter" do
+          chapter4 = subject.chapters.build(:id => '4')
+          subject.chapters.should include(chapter1, chapter2, chapter4)
+          
+          chapter4.should be_a_new_record
+          chapter4.id.should == '4'
+          chapter4.book.should == subject
+          chapter4.book_id.should == subject.id
+        end
+        
+        it "should create a chapter" do
+          chapter4 = subject.chapters.create(:id => '4')
+          subject.chapters.should == [chapter1, chapter2, chapter4]
+          
+          chapter4.should_not be_a_new_record
+          chapter4.id.should == '4'
+          chapter4.book.should == subject
+          chapter4.book_id.should == subject.id
+        end
+        
+        it "should find chapters" do
+          # Create bogus chapters
+          Chapter.create!(:id => '999')
+          Chapter.create!(:id => '998')
+          
+          result = subject.chapters.find(:all, :order => :id.desc)
+          result.should == [chapter2, chapter1]
+        end
+      end
+      
+      context "with chapters set" do
+        subject { Book.new(:chapters => [chapter1, chapter2]) }
+        it_should_behave_like "accessing and manipulating a has_many :by => :foreign_key association"
+      end
+      
+      context "when loaded from database" do
+        let(:book) { Book.create!(:chapters => [chapter1, chapter2]) }
+        subject { Book.find(book.id) }
+        it_should_behave_like "accessing and manipulating a has_many :by => :foreign_key association"
+      end
+    end
+  end
+  
+  specs_for(EmbeddedDocument) do
+    describe "defining a has_many :by => :foreign_key association" do
+      define_class(:Book, EmbeddedDocument)
+      
+      it "should raise an exception" do
+        lambda { Book.has_many :chapters, :by => :foreign_key }.should raise_error
+      end
+    end
+  end
+end

data/spec/mongomodel/concerns/associations/has_many_by_ids_spec.rb

@@ -0,0 +1,192 @@
+require 'spec_helper'
+
+module MongoModel
+  specs_for(EmbeddedDocument) do
+    describe "has_many association" do
+      define_class(:Book, EmbeddedDocument) do
+        has_many :chapters
+      end
+      
+      it "should default to :by => :ids" do
+        Book.associations[:chapters].should be_a(Associations::HasManyByIds)
+      end
+    end
+  end
+  
+  specs_for(Document, EmbeddedDocument) do
+    describe "has_many :by => :ids association" do
+      define_class(:Chapter, Document)
+      define_class(:IllustratedChapter, :Chapter)
+      define_class(:Book, described_class) do
+        has_many :chapters, :by => :ids
+      end
+      define_class(:NonChapter, Document)
+      
+      let(:chapter1) { Chapter.create!(:id => '1') }
+      let(:chapter2) { IllustratedChapter.create!(:id => '2') }
+      let(:chapter3) { Chapter.create!(:id => '3') }
+      let(:nonchapter) { NonChapter.create! }
+      
+      context "when uninitialized" do
+        subject { Book.new }
+        
+        it "should be empty" do
+          subject.chapters.should be_empty
+        end
+        
+        it "should have an empty ids array" do
+          subject.chapter_ids.should be_empty
+        end
+      end
+      
+      shared_examples_for "accessing and manipulating a has_many :by => :ids association" do
+        it "should access chapters" do
+          subject.chapters.should == [chapter1, chapter2]
+        end
+        
+        it "should access chapter ids through association" do
+          subject.chapters.ids.should == [chapter1.id, chapter2.id]
+        end
+        
+        it "should have chapter ids" do
+          subject.chapter_ids.should == [chapter1.id, chapter2.id]
+        end
+        
+        it "should add chapters with <<" do
+          subject.chapters << chapter3
+          subject.chapters.should == [chapter1, chapter2, chapter3]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter3.id]
+        end
+        
+        it "should add/change chapters with []=" do
+          subject.chapters[2] = chapter3
+          subject.chapters.should == [chapter1, chapter2, chapter3]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter3.id]
+        end
+        
+        it "should add chapters with concat" do
+          subject.chapters.concat([chapter3])
+          subject.chapters.should == [chapter1, chapter2, chapter3]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter3.id]
+        end
+        
+        it "should insert chapters" do
+          subject.chapters.insert(1, chapter3)
+          subject.chapters.should == [chapter1, chapter3, chapter2]
+          subject.chapter_ids.should == [chapter1.id, chapter3.id, chapter2.id]
+        end
+        
+        it "should replace chapters" do
+          subject.chapters.replace([chapter2, chapter3])
+          subject.chapters.should == [chapter2, chapter3]
+          subject.chapter_ids.should == [chapter2.id, chapter3.id]
+        end
+        
+        it "should add chapters with push" do
+          subject.chapters.push(chapter3)
+          subject.chapters.should == [chapter1, chapter2, chapter3]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter3.id]
+        end
+        
+        it "should add chapters with unshift" do
+          subject.chapters.unshift(chapter3)
+          subject.chapters.should == [chapter3, chapter1, chapter2]
+          subject.chapter_ids.should == [chapter3.id, chapter1.id, chapter2.id]
+        end
+        
+        it "should clear chapters" do
+          subject.chapters.clear
+          subject.chapters.should be_empty
+          subject.chapter_ids.should be_empty
+        end
+        
+        it "should remove chapters with delete" do
+          subject.chapters.delete(chapter1)
+          subject.chapters.should == [chapter2]
+          subject.chapter_ids.should == [chapter2.id]
+        end
+        
+        it "should remove chapters with delete_at" do
+          subject.chapters.delete_at(0)
+          subject.chapters.should == [chapter2]
+          subject.chapter_ids.should == [chapter2.id]
+        end
+        
+        it "should remove chapters with delete_if" do
+          subject.chapters.delete_if { |c| c.id == chapter1.id }
+          subject.chapters.should == [chapter2]
+          subject.chapter_ids.should == [chapter2.id]
+        end
+        
+        it "should build a chapter" do
+          chapter4 = subject.chapters.build(:id => '4')
+          subject.chapters.should == [chapter1, chapter2, chapter4]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter4.id]
+          
+          chapter4.should be_a_new_record
+          chapter4.id.should == '4'
+        end
+        
+        it "should create a chapter" do
+          chapter4 = subject.chapters.create(:id => '4')
+          subject.chapters.should == [chapter1, chapter2, chapter4]
+          subject.chapter_ids.should == [chapter1.id, chapter2.id, chapter4.id]
+          
+          chapter4.should_not be_a_new_record
+          chapter4.id.should == '4'
+        end
+        
+        it "should find chapters" do
+          # Create bogus chapters
+          Chapter.create!(:id => '999')
+          Chapter.create!(:id => '998')
+          
+          result = subject.chapters.find(:all, :order => :id.desc)
+          result.should == [chapter2, chapter1]
+        end
+        
+        describe "adding a non-chapter" do
+          def self.should_raise(message, &block)
+            it "should raise an AsssociationTypeMismatch error when #{message}" do
+              lambda { instance_eval(&block) }.should raise_error(AssociationTypeMismatch, "expected instance of Chapter but got NonChapter")
+            end
+          end
+          
+          should_raise("assigning an array containing non-chapters") { subject.chapters = [nonchapter] }
+          should_raise("adding a non-chapter using <<") { subject.chapters << nonchapter }
+          should_raise("adding non-chapters with concat") { subject.chapters.concat([nonchapter]) }
+          should_raise("inserting chapters") { subject.chapters.insert(1, nonchapter) }
+          should_raise("replacing chapters") { subject.chapters.replace([nonchapter]) }
+          should_raise("addding chapters with push") { subject.chapters.push(nonchapter) }
+          should_raise("addding chapters with unshift") { subject.chapters.unshift(nonchapter) }
+        end
+      end
+      
+      context "with chapters set" do
+        subject { Book.new(:chapters => [chapter1, chapter2]) }
+        it_should_behave_like "accessing and manipulating a has_many :by => :ids association"
+      end
+      
+      context "with chapter ids set" do
+        subject { Book.new(:chapter_ids => [chapter1.id, chapter2.id]) }
+        it_should_behave_like "accessing and manipulating a has_many :by => :ids association"
+      end
+      
+      context "when loaded from database" do
+        if specing?(Document)
+          let(:book) { Book.create!(:chapter_ids => [chapter1.id, chapter2.id]) }
+          subject { Book.find(book.id) }
+        else
+          define_class(:Bookshelf, Document) do
+            property :book, Book
+          end
+          let(:book) { Book.new(:chapter_ids => [chapter1.id, chapter2.id]) }
+          let(:shelf) { Bookshelf.create!(:book => book) }
+          subject { Bookshelf.find(shelf.id).book }
+        end
+        
+        it_should_behave_like "accessing and manipulating a has_many :by => :ids association"
+      end
+    end
+  end
+end