danielharan-mongo_mapper 0.6.5

data/test/functional/test_dirty.rb

@@ -0,0 +1,159 @@
+require 'test_helper'
+require 'models'
+
+class DirtyTest < Test::Unit::TestCase
+  def setup
+    @document = Class.new do
+      include MongoMapper::Document
+      set_collection_name 'test'
+      key :phrase, String
+    end
+    @document.collection.remove
+    
+    Status.collection.remove
+    Project.collection.remove
+  end
+  
+  context "marking changes" do
+    should "not happen if there are none" do
+      doc = @document.new
+      doc.phrase_changed?.should be_false
+      doc.phrase_change.should be_nil
+    end
+    
+    should "happen when change happens" do
+      doc = @document.new
+      doc.phrase = 'Golly Gee Willikers Batman'
+      doc.phrase_changed?.should be_true
+      doc.phrase_was.should be_nil
+      doc.phrase_change.should == [nil, 'Golly Gee Willikers Batman']
+    end
+    
+    should "happen when initializing" do
+      doc = @document.new(:phrase => 'Foo')
+      doc.changed?.should be_true
+    end
+    
+    should "clear changes on save" do
+      doc = @document.new
+      doc.phrase = 'Golly Gee Willikers Batman'
+      doc.phrase_changed?.should be_true
+      doc.save
+      doc.phrase_changed?.should_not be_true
+      doc.phrase_change.should be_nil
+    end
+    
+    should "clear changes on save!" do
+      doc = @document.new
+      doc.phrase = 'Golly Gee Willikers Batman'
+      doc.phrase_changed?.should be_true
+      doc.save!
+      doc.phrase_changed?.should_not be_true
+      doc.phrase_change.should be_nil
+    end
+    
+    should "not happen when loading from database" do
+      doc = @document.create(:phrase => 'Foo')
+      
+      doc = doc.reload
+      doc.changed?.should be_false
+    end
+    
+    should "happen if changed after loading from database" do
+      doc = @document.create(:phrase => 'Foo')
+      
+      doc = doc.reload
+      doc.changed?.should be_false
+      doc.phrase = 'Bar'
+      doc.changed?.should be_true
+    end
+  end
+  
+  context "blank new value and type integer" do
+    should "not mark changes" do
+      @document.key :age, Integer
+
+      [nil, ''].each do |value|
+        doc = @document.new
+        doc.age = value
+        doc.age_changed?.should be_false
+        doc.age_change.should be_nil
+      end
+    end
+  end
+  
+  context "blank new value and type float" do
+    should "not mark changes" do
+      @document.key :amount, Float
+
+      [nil, ''].each do |value|
+        doc = @document.new
+        doc.amount = value
+        doc.amount_changed?.should be_false
+        doc.amount_change.should be_nil
+      end
+    end
+  end  
+  
+  context "changed?" do
+    should "be true if key changed" do
+      doc = @document.new
+      doc.phrase = 'A penny saved is a penny earned.'
+      doc.changed?.should be_true
+    end
+    
+    should "be false if no keys changed" do
+      @document.new.changed?.should be_false
+    end
+  end
+  
+  context "changes" do
+    should "be empty hash if no changes" do
+      @document.new.changes.should == {}
+    end
+    
+    should "be hash of keys with values of changes if there are changes" do
+      doc = @document.new
+      doc.phrase = 'A penny saved is a penny earned.'
+      doc.changes.should == {'phrase' => [nil, 'A penny saved is a penny earned.']}
+    end
+  end
+  
+  context "changed" do
+    should "be empty array if no changes" do
+      @document.new.changed.should == []
+    end
+    
+    should "be array of keys that have changed if there are changes" do
+      doc = @document.new
+      doc.phrase = 'A penny saved is a penny earned.'
+      doc.changed.should == ['phrase']
+    end
+  end
+  
+  context "will_change!" do
+    should "mark changes" do
+      doc = @document.create(:phrase => 'Foo')
+      
+      doc.phrase << 'bar'
+      doc.phrase_changed?.should be_false
+      
+      doc.phrase_will_change!
+      doc.phrase_changed?.should be_true
+      doc.phrase_change.should == ['Foobar', 'Foobar']
+      
+      doc.phrase << '!'
+      doc.phrase_changed?.should be_true
+      doc.phrase_change.should == ['Foobar', 'Foobar!']
+    end
+  end
+  
+  context "changing a foreign key through association" do
+    should "mark changes" do
+      status = Status.create(:name => 'Foo')
+      status.project = Project.create(:name => 'Bar')
+      status.changed?.should be_true
+      status.changed.should == %w(project_id)
+    end
+  end
+end

data/test/functional/test_document.rb

@@ -0,0 +1,1180 @@
+require 'test_helper'
+require 'models'
+
+class DocumentTest < Test::Unit::TestCase
+  def setup
+    @document = Class.new do
+      include MongoMapper::Document
+      set_collection_name 'users'
+
+      key :first_name, String
+      key :last_name, String
+      key :age, Integer
+      key :date, Date
+    end
+    @document.collection.remove
+  end
+
+  context "Saving a document with a custom id" do
+    should "clear custom id flag when saved" do
+      @document.key :_id, String
+      doc = @document.new(:id => '1234')
+      doc.using_custom_id?.should be_true
+      doc.save.should be_true
+      doc.using_custom_id?.should be_false
+    end
+  end
+
+  context "Saving a document with a blank binary value" do
+    setup do
+      @document.key :file, Binary
+    end
+
+    should "not fail" do
+      doc = @document.new(:file => nil)
+      doc.save
+    end
+  end
+
+  context "Loading a document from the database with keys that are not defined" do
+    setup do
+      @id = Mongo::ObjectID.new
+      @document.collection.insert({
+        :_id            => @id,
+        :first_name     => 'John',
+        :last_name      => 'Nunemaker',
+        :age            => 27,
+        :favorite_color => 'red',
+        :skills         => ['ruby', 'rails', 'javascript', 'xhtml', 'css']
+      })
+    end
+
+    should "assign all keys from database" do
+      doc = @document.find(@id)
+      doc.first_name.should == 'John'
+      doc.last_name.should == 'Nunemaker'
+      doc.age.should == 27
+      doc.favorite_color.should == 'red'
+      doc.skills.should == ['ruby', 'rails', 'javascript', 'xhtml', 'css']
+    end
+  end
+
+  context "Document Class Methods" do
+    context "Using key with type Array" do
+      setup do
+        @document.key :tags, Array
+      end
+
+      should "give correct default" do
+        doc = @document.new
+        doc.tags.should == []
+      end
+
+      should "work with assignment" do
+        doc = @document.new
+        doc.tags = %w(foo bar)
+        doc.tags.should == %w(foo bar)
+      end
+
+      should "work with assignment after saving" do
+        doc = @document.new
+        doc.tags = %w(foo bar)
+        doc.save
+        doc.tags.should == %w(foo bar)
+        doc.reload.tags.should == %w(foo bar)
+      end
+
+      should "work with assignment then <<" do
+        doc = @document.new
+        doc.tags = []
+        doc.tags << "foo"
+        doc.tags.should == ["foo"]
+      end
+
+      should "work with <<" do
+        doc = @document.new
+        doc.tags << "foo"
+        doc.tags.should == ["foo"]
+      end
+
+      should "work with << then save" do
+        doc = @document.new
+        doc.tags << "foo"
+        doc.tags << "bar"
+        doc.save
+        doc.tags.should == %w(foo bar)
+        doc.reload.tags.should == %w(foo bar)
+      end
+    end
+
+    context "Using key with type Hash" do
+      setup do
+        @document.key :foo, Hash
+      end
+
+      should "give correct default" do
+        doc = @document.new
+        doc.foo.should == {}
+      end
+
+      should "work with []=" do
+        doc = @document.new
+        doc.foo["quux"] = "bar"
+        doc.foo["quux"].should == "bar"
+        doc.foo.should == { "quux" => "bar" }
+      end
+
+      should "work with indifferent access" do
+        doc = @document.new
+        doc.foo = {:baz => 'bar'}
+        doc.foo[:baz].should == 'bar'
+        doc.foo['baz'].should == 'bar'
+      end
+
+      should "work with indifferent access after save" do
+        doc = @document.new
+        doc.foo = {:baz => 'bar'}
+        doc.save
+
+        doc = doc.reload
+        doc.foo[:baz].should == 'bar'
+        doc.foo['baz'].should == 'bar'
+      end
+    end
+
+    context "Using key with custom type with default" do
+      setup do
+        @document.key :window, WindowSize, :default => WindowSize.new(600, 480)
+      end
+
+      should "default to default" do
+        doc = @document.new
+        doc.window.should == WindowSize.new(600, 480)
+
+      end
+
+      should "save and load from mongo" do
+        doc = @document.new
+        doc.save
+
+        doc = doc.reload
+        doc.window.should == WindowSize.new(600, 480)
+      end
+    end
+
+    context "Creating a single document" do
+      setup do
+        @doc_instance = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+      end
+
+      should "create a document in correct collection" do
+        @document.count.should == 1
+      end
+
+      should "automatically set id" do
+        @doc_instance.id.should be_instance_of(Mongo::ObjectID)
+        @doc_instance._id.should be_instance_of(Mongo::ObjectID)
+      end
+
+      should "no longer be new?" do
+        @doc_instance.new?.should be_false
+      end
+
+      should "return instance of document" do
+        @doc_instance.should be_instance_of(@document)
+        @doc_instance.first_name.should == 'John'
+        @doc_instance.last_name.should == 'Nunemaker'
+        @doc_instance.age.should == 27
+      end
+    end
+
+    context "Creating a document with no attributes provided" do
+      setup do
+        @document = Class.new do
+          include MongoMapper::Document
+          set_collection_name 'test'
+        end
+        @document.collection.remove
+      end
+
+      should "create the document" do
+        lambda {
+          @document.create
+        }.should change { @document.count }.by(1)
+      end
+    end
+
+    context "Creating multiple documents" do
+      setup do
+        @doc_instances = @document.create([
+          {:first_name => 'John', :last_name => 'Nunemaker', :age => '27'},
+          {:first_name => 'Steve', :last_name => 'Smith', :age => '28'},
+        ])
+      end
+
+      should "create multiple documents" do
+        @document.count.should == 2
+      end
+
+      should "return an array of doc instances" do
+        @doc_instances.map do |doc_instance|
+          doc_instance.should be_instance_of(@document)
+        end
+      end
+    end
+
+    context "Updating a document" do
+      setup do
+        doc = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc_instance = @document.update(doc._id, {:age => 40})
+      end
+
+      should "update attributes provided" do
+        @doc_instance.age.should == 40
+      end
+
+      should "not update existing attributes that were not set to update" do
+        @doc_instance.first_name.should == 'John'
+        @doc_instance.last_name.should == 'Nunemaker'
+      end
+
+      should "not create new document" do
+        @document.count.should == 1
+      end
+    end
+
+    should "raise error when updating single doc if not provided id and attributes" do
+      doc = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+      lambda { @document.update }.should raise_error(ArgumentError)
+      lambda { @document.update(doc._id) }.should raise_error(ArgumentError)
+      lambda { @document.update(doc._id, [1]) }.should raise_error(ArgumentError)
+    end
+
+    context "Updating multiple documents" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+
+        @doc_instances = @document.update({
+          @doc1._id => {:age => 30},
+          @doc2._id => {:age => 30},
+        })
+      end
+
+      should "not create any new documents" do
+        @document.count.should == 2
+      end
+
+      should "should return an array of doc instances" do
+        @doc_instances.map do |doc_instance|
+          doc_instance.should be_instance_of(@document)
+        end
+      end
+
+      should "update the documents" do
+        @document.find(@doc1._id).age.should == 30
+        @document.find(@doc2._id).age.should == 30
+      end
+    end
+
+    should "raise error when updating multiple documents if not a hash" do
+      lambda { @document.update([1, 2]) }.should raise_error(ArgumentError)
+    end
+
+    context "Finding documents" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+      end
+
+      should "return nil if nothing provided for find" do
+        @document.find.should be_nil
+      end
+
+      should "raise document not found if nothing provided for find!" do
+        lambda { @document.find! }.should raise_error(MongoMapper::DocumentNotFound)
+      end
+
+      context "with a single id" do
+        should "work" do
+          @document.find(@doc1._id).should == @doc1
+        end
+
+        should "return nil if document not found with find" do
+          @document.find(123).should be_nil
+        end
+
+        should "raise error if document not found with find!" do
+          lambda {
+            @document.find!(123)
+          }.should raise_error(MongoMapper::DocumentNotFound)
+        end
+      end
+
+      context "with multiple id's" do
+        should "work as arguments" do
+          @document.find(@doc1._id, @doc2._id).should == [@doc1, @doc2]
+        end
+
+        should "work as array" do
+          @document.find([@doc1._id, @doc2._id]).should == [@doc1, @doc2]
+        end
+
+        should "return array if array only has one element" do
+          @document.find([@doc1._id]).should == [@doc1]
+        end
+      end
+
+      should "be able to find using condition auto-detection" do
+        @document.first(:first_name => 'John').should == @doc1
+        @document.all(:last_name => 'Nunemaker', :order => 'age desc').should == [@doc1, @doc3]
+      end
+
+      context "with :all" do
+        should "find all documents" do
+          @document.find(:all, :order => 'first_name').should == [@doc1, @doc3, @doc2]
+        end
+
+        should "be able to add conditions" do
+          @document.find(:all, :first_name => 'John').should == [@doc1]
+        end
+      end
+
+      context "with #all" do
+        should "find all documents based on criteria" do
+          @document.all(:order => 'first_name').should == [@doc1, @doc3, @doc2]
+          @document.all(:last_name => 'Nunemaker', :order => 'age desc').should == [@doc1, @doc3]
+        end
+      end
+
+      context "with :first" do
+        should "find first document" do
+          @document.find(:first, :order => 'first_name').should == @doc1
+        end
+      end
+
+      context "with #first" do
+        should "find first document based on criteria" do
+          @document.first(:order => 'first_name').should == @doc1
+          @document.first(:age => 28).should == @doc2
+        end
+      end
+
+      context "with :last" do
+        should "find last document" do
+          @document.find(:last, :order => 'age').should == @doc2
+        end
+      end
+
+      context "with #last" do
+        should "find last document based on criteria" do
+          @document.last(:order => 'age').should == @doc2
+          @document.last(:order => 'age', :age => 28).should == @doc2
+        end
+
+        should "raise error if no order provided" do
+          lambda { @document.last() }.should raise_error
+        end
+      end
+
+      context "with :find_by" do
+        should "find document based on argument" do
+          @document.find_by_first_name('John').should == @doc1
+          @document.find_by_last_name('Nunemaker', :order => 'age desc').should == @doc1
+          @document.find_by_age(27).should == @doc1
+        end
+
+        should "not raise error" do
+          @document.find_by_first_name('Mongo').should be_nil
+        end
+
+        should "define a method for each key" do
+          @document.methods(false).select { |e| e =~ /^find_by_/ }.size == @document.keys.size
+        end
+      end
+
+      context "with dynamic finders" do
+        should "find document based on all arguments" do
+          @document.find_by_first_name_and_last_name_and_age('John', 'Nunemaker', 27).should == @doc1
+        end
+
+        should "not find the document if an argument is wrong" do
+          @document.find_by_first_name_and_last_name_and_age('John', 'Nunemaker', 28).should be_nil
+        end
+
+        should "find all documents based on arguments" do
+          docs = @document.find_all_by_last_name('Nunemaker')
+          docs.should be_kind_of(Array)
+          docs.should include(@doc1)
+          docs.should include(@doc3)
+        end
+
+        should "initialize document with given arguments" do
+          doc = @document.find_or_initialize_by_first_name_and_last_name('David', 'Cuadrado')
+          doc.should be_new
+          doc.first_name.should == 'David'
+        end
+
+        should "not initialize document if document is found" do
+          doc = @document.find_or_initialize_by_first_name('John')
+          doc.should_not be_new
+        end
+
+        should "create document with given arguments" do
+          doc = @document.find_or_create_by_first_name_and_last_name('David', 'Cuadrado')
+          doc.should_not be_new
+          doc.first_name.should == 'David'
+        end
+
+        should "raise error if document is not found when using !" do
+          lambda {
+            @document.find_by_first_name_and_last_name!(1,2)
+          }.should raise_error(MongoMapper::DocumentNotFound)
+        end
+      end
+    end # finding documents
+
+    context "Finding document by id" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+      end
+
+      should "be able to find by id" do
+        @document.find_by_id(@doc1._id).should == @doc1
+        @document.find_by_id(@doc2._id).should == @doc2
+      end
+
+      should "return nil if document not found" do
+        @document.find_by_id(1234).should be(nil)
+      end
+    end
+
+    context "Deleting a document" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @document.delete(@doc1._id)
+      end
+
+      should "remove document from collection" do
+        @document.count.should == 1
+      end
+
+      should "not remove other documents" do
+        @document.find(@doc2._id).should_not be(nil)
+      end
+    end
+
+    context "Deleting multiple documents" do
+      should "work with multiple arguments" do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+        @document.delete(@doc1._id, @doc2._id)
+
+        @document.count.should == 1
+      end
+
+      should "work with array as argument" do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+        @document.delete([@doc1._id, @doc2._id])
+
+        @document.count.should == 1
+      end
+    end
+
+    context "Deleting all documents" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+      end
+
+      should "remove all documents when given no conditions" do
+        @document.delete_all
+        @document.count.should == 0
+      end
+
+      should "only remove matching documents when given conditions" do
+        @document.delete_all({:first_name => 'John'})
+        @document.count.should == 2
+      end
+
+      should "convert the conditions to mongo criteria" do
+        @document.delete_all(:age => [26, 27])
+        @document.count.should == 1
+      end
+    end
+
+    context "Destroying a document" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @document.destroy(@doc1._id)
+      end
+
+      should "remove document from collection" do
+        @document.count.should == 1
+      end
+
+      should "not remove other documents" do
+        @document.find(@doc2._id).should_not be(nil)
+      end
+    end
+
+    context "Destroying multiple documents" do
+      should "work with multiple arguments" do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+        @document.destroy(@doc1._id, @doc2._id)
+        
+        @document.count.should == 1
+      end
+
+      should "work with array as argument" do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+        @document.destroy([@doc1._id, @doc2._id])
+
+        @document.count.should == 1
+      end
+    end
+
+    context "Destroying all documents" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+      end
+
+      should "remove all documents when given no conditions" do
+        @document.destroy_all
+        @document.count.should == 0
+      end
+
+      should "only remove matching documents when given conditions" do
+        @document.destroy_all(:first_name => 'John')
+        @document.count.should == 2
+        @document.destroy_all(:age => 26)
+        @document.count.should == 1
+      end
+
+      should "convert the conditions to mongo criteria" do
+        @document.destroy_all(:age => [26, 27])
+        @document.count.should == 1
+      end
+    end
+
+    context ":dependent" do
+      setup do
+        # FIXME: make use of already defined models
+        class ::Property
+          include MongoMapper::Document
+        end
+        Property.collection.remove
+
+        class ::Thing
+          include MongoMapper::Document
+          key :name, String
+        end
+        Thing.collection.remove
+      end
+
+      teardown do
+        Object.send :remove_const, 'Property' if defined?(::Property)
+        Object.send :remove_const, 'Thing' if defined?(::Thing)
+      end
+
+      context "many" do
+        context "=> destroy" do
+          setup do
+            Property.key :thing_id, ObjectId
+            Property.belongs_to :thing, :dependent => :destroy
+            Thing.many :properties, :dependent => :destroy
+
+            @thing = Thing.create(:name => "Tree")
+            @property1 = Property.create
+            @property2 = Property.create
+            @property3 = Property.create
+            @thing.properties << @property1
+            @thing.properties << @property2
+            @thing.properties << @property3
+          end
+
+          should "should destroy the associated documents" do
+            @thing.properties.count.should == 3
+            @thing.destroy
+            @thing.properties.count.should == 0
+            Property.count.should == 0
+          end
+        end
+
+        context "=> delete_all" do
+          setup do
+            Property.key :thing_id, ObjectId
+            Property.belongs_to :thing
+            Thing.has_many :properties, :dependent => :delete_all
+
+            @thing = Thing.create(:name => "Tree")
+            @property1 = Property.create
+            @property2 = Property.create
+            @property3 = Property.create
+            @thing.properties << @property1
+            @thing.properties << @property2
+            @thing.properties << @property3
+          end
+
+          should "should delete associated documents" do
+            @thing.properties.count.should == 3
+            @thing.destroy
+            @thing.properties.count.should == 0
+            Property.count.should == 0
+          end
+        end
+
+        context "=> nullify" do
+          setup do
+            Property.key :thing_id, ObjectId
+            Property.belongs_to :thing
+            Thing.has_many :properties, :dependent => :nullify
+
+            @thing = Thing.create(:name => "Tree")
+            @property1 = Property.create
+            @property2 = Property.create
+            @property3 = Property.create
+            @thing.properties << @property1
+            @thing.properties << @property2
+            @thing.properties << @property3
+          end
+
+          should "should nullify relationship but not destroy associated documents" do
+            @thing.properties.count.should == 3
+            @thing.destroy
+            @thing.properties.count.should == 0
+            Property.count.should == 3
+          end
+        end
+      end
+
+      context "belongs_to" do
+        context "=> destroy" do
+          setup do
+            Property.key :thing_id, ObjectId
+            Property.belongs_to :thing, :dependent => :destroy
+            Thing.has_many :properties
+
+            @thing = Thing.create(:name => "Tree")
+            @property1 = Property.create
+            @property2 = Property.create
+            @property3 = Property.create
+            @thing.properties << @property1
+            @thing.properties << @property2
+            @thing.properties << @property3
+          end
+
+          should "not execute on a belongs_to association" do
+            Thing.count.should == 1
+            @property1.destroy
+            Thing.count.should == 1
+            @property1.should be_frozen
+          end
+        end
+      end
+    end
+
+    context "Counting documents in collection" do
+      setup do
+        @doc1 = @document.create({:first_name => 'John', :last_name => 'Nunemaker', :age => '27'})
+        @doc2 = @document.create({:first_name => 'Steve', :last_name => 'Smith', :age => '28'})
+        @doc3 = @document.create({:first_name => 'Steph', :last_name => 'Nunemaker', :age => '26'})
+      end
+
+      should "count all with no arguments" do
+        @document.count.should == 3
+      end
+
+      should "return 0 if there are no documents in the collection" do
+        @document.delete_all
+        @document.count.should == 0
+      end
+
+      should "return 0 if the collection does not exist" do
+        klass = Class.new do
+          include MongoMapper::Document
+          set_collection_name 'foobarbazwickdoesnotexist'
+        end
+        @document.collection.remove
+
+        klass.count.should == 0
+      end
+
+      should "return count for matching documents if conditions provided" do
+        @document.count(:age => 27).should == 1
+      end
+
+      should "convert the conditions to mongo criteria" do
+        @document.count(:age => [26, 27]).should == 2
+      end
+    end
+
+    context "Indexing" do
+      setup do
+        @document.collection.drop_indexes
+      end
+
+      should "allow creating index for a key" do
+        @document.ensure_index :first_name
+        MongoMapper.ensure_indexes!
+
+        @document.should have_index('first_name_1')
+      end
+
+      should "allow creating unique index for a key" do
+        @document.ensure_index :first_name, :unique => true
+        MongoMapper.ensure_indexes!
+
+        @document.should have_index('first_name_1')
+      end
+
+      should "allow creating index on multiple keys" do
+        @document.ensure_index [[:first_name, 1], [:last_name, -1]]
+        MongoMapper.ensure_indexes!
+
+        # order is different for different versions of ruby so instead of
+        # just checking have_index('first_name_1_last_name_-1') I'm checking
+        # the values of the indexes to make sure the index creation was successful
+        @document.collection.index_information.detect do |index|
+          keys = index[1]
+          keys.include?(['first_name', 1]) && keys.include?(['last_name', -1])
+        end.should_not be_nil
+      end
+
+      should "work with :index shortcut when defining key" do
+        @document.key :father, String, :index => true
+        MongoMapper.ensure_indexes!
+
+        @document.should have_index('father_1')
+      end
+    end
+  end # Document Class Methods
+
+  context "Saving a new document" do
+    setup do
+      @doc = @document.new(:first_name => 'John', :age => '27')
+      @doc.save
+    end
+
+    should "insert document into the collection" do
+      @document.count.should == 1
+    end
+
+    should "assign an id for the document" do
+      @doc.id.should be_instance_of(Mongo::ObjectID)
+    end
+
+    should "save attributes" do
+      @doc.first_name.should == 'John'
+      @doc.age.should == 27
+    end
+
+    should "update attributes in the database" do
+      doc = @doc.reload
+      doc.should == @doc
+      doc.first_name.should == 'John'
+      doc.age.should == 27
+    end
+
+    should "allow to add custom attributes to the document" do
+      @doc = @document.new(:first_name => 'David', :age => '26', :gender => 'male', :tags => [1, "2"])
+      @doc.save
+      doc = @doc.reload
+      doc.gender.should == 'male'
+      doc.tags.should == [1, "2"]
+    end
+
+    should "allow to use custom methods to assign properties" do
+      person = RealPerson.new(:realname => 'David')
+      person.save
+      person.reload.name.should == 'David'
+    end
+
+    context "with key of type date" do
+      should "save the date value as a Time object" do
+        doc = @document.new(:first_name => 'John', :age => '27', :date => "12/01/2009")
+        doc.save
+        doc.date.should == Date.new(2009, 12, 1)
+      end
+    end
+  end
+
+  context "Saving an existing document" do
+    setup do
+      @doc = @document.create(:first_name => 'John', :age => '27')
+      @doc.first_name = 'Johnny'
+      @doc.age = 30
+      @doc.save
+    end
+
+    should "not insert document into collection" do
+      @document.count.should == 1
+    end
+
+    should "update attributes" do
+      @doc.first_name.should == 'Johnny'
+      @doc.age.should == 30
+    end
+
+    should "update attributes in the database" do
+      doc = @doc.reload
+      doc.first_name.should == 'Johnny'
+      doc.age.should == 30
+    end
+
+    should "allow updating custom attributes" do
+      @doc = @document.new(:first_name => 'David', :age => '26', :gender => 'male')
+      @doc.gender = 'Male'
+      @doc.save
+      @doc.reload.gender.should == 'Male'
+    end
+  end
+
+  context "Calling update attributes on a new document" do
+    setup do
+      @doc = @document.new(:first_name => 'John', :age => '27')
+      @doc.update_attributes(:first_name => 'Johnny', :age => 30)
+    end
+
+    should "insert document into the collection" do
+      @document.count.should == 1
+    end
+
+    should "assign an id for the document" do
+      @doc.id.should be_instance_of(Mongo::ObjectID)
+    end
+
+    should "save attributes" do
+      @doc.first_name.should == 'Johnny'
+      @doc.age.should == 30
+    end
+
+    should "update attributes in the database" do
+      doc = @doc.reload
+      doc.should == @doc
+      doc.first_name.should == 'Johnny'
+      doc.age.should == 30
+    end
+
+    should "allow updating custom attributes" do
+      @doc.update_attributes(:gender => 'mALe')
+      @doc.reload.gender.should == 'mALe'
+    end
+  end
+
+  context "Updating an existing document using update attributes" do
+    setup do
+      @doc = @document.create(:first_name => 'John', :age => '27')
+      @doc.update_attributes(:first_name => 'Johnny', :age => 30)
+    end
+
+    should "not insert document into collection" do
+      @document.count.should == 1
+    end
+
+    should "update attributes" do
+      @doc.first_name.should == 'Johnny'
+      @doc.age.should == 30
+    end
+
+    should "update attributes in the database" do
+      doc = @doc.reload
+      doc.first_name.should == 'Johnny'
+      doc.age.should == 30
+    end
+  end
+
+  context "update_attributes" do
+    setup do
+      @document.key :foo, String, :required => true
+    end
+
+    should "return true if document valid" do
+      @document.new.update_attributes(:foo => 'bar').should be_true
+    end
+
+    should "return false if document not valid" do
+      @document.new.update_attributes({}).should be_false
+    end
+  end
+
+  context "Destroying a document that exists" do
+    setup do
+      @doc = @document.create(:first_name => 'John', :age => '27')
+      @doc.destroy
+    end
+
+    should "remove the document from the collection" do
+      @document.count.should == 0
+    end
+
+    should "raise error if assignment is attempted" do
+      lambda { @doc.first_name = 'Foo' }.should raise_error(TypeError)
+    end
+
+    should "do nothing if destroy is called again" do
+      @doc.destroy.should be_false
+    end
+  end
+
+  context "Destroying a document that is a new" do
+    setup do
+      setup do
+        @doc = @document.new(:first_name => 'John Nunemaker', :age => '27')
+        @doc.destroy
+      end
+
+      should "not affect collection count" do
+        @document.collection.count.should == 0
+      end
+
+      should "raise error if assignment is attempted" do
+        lambda { @doc.first_name = 'Foo' }.should raise_error(TypeError)
+      end
+    end
+  end
+
+  context "Single collection inheritance" do
+    setup do
+      class ::DocParent
+        include MongoMapper::Document
+        key :_type, String
+        key :name, String
+      end
+      DocParent.collection.remove
+
+      class ::DocDaughter < ::DocParent; end
+      class ::DocSon < ::DocParent; end
+      class ::DocGrandSon < ::DocSon; end
+
+      @parent = DocParent.new({:name => "Daddy Warbucks"})
+      @daughter = DocDaughter.new({:name => "Little Orphan Annie"})
+    end
+
+    teardown do
+      Object.send :remove_const, 'DocParent'   if defined?(::DocParent)
+      Object.send :remove_const, 'DocDaughter' if defined?(::DocDaughter)
+      Object.send :remove_const, 'DocSon'      if defined?(::DocSon)
+      Object.send :remove_const, 'DocGrandSon' if defined?(::DocGrandSon)
+    end
+
+    should "use the same collection in the subclass" do
+      DocDaughter.collection.name.should == DocParent.collection.name
+    end
+
+    should "assign the class name into the _type property" do
+      @parent._type.should == 'DocParent'
+      @daughter._type.should == 'DocDaughter'
+    end
+
+    should "load the document with the assigned type" do
+      @parent.save
+      @daughter.save
+
+      collection = DocParent.find(:all)
+      collection.size.should == 2
+      collection.first.should be_kind_of(DocParent)
+      collection.first.name.should == "Daddy Warbucks"
+      collection.last.should be_kind_of(DocDaughter)
+      collection.last.name.should == "Little Orphan Annie"
+    end
+
+    should "gracefully handle when the type can't be constantized" do
+      doc = DocParent.new(:name => 'Nunes')
+      doc._type = 'FoobarBaz'
+      doc.save
+
+      collection = DocParent.all
+      collection.last.should == doc
+      collection.last.should be_kind_of(DocParent)
+    end
+
+    should "find scoped to class" do
+      john = DocSon.create(:name => 'John')
+      steve = DocSon.create(:name => 'Steve')
+      steph = DocDaughter.create(:name => 'Steph')
+      carrie = DocDaughter.create(:name => 'Carrie')
+
+      DocGrandSon.all(:order => 'name').should  == []
+      DocSon.all(:order => 'name').should       == [john, steve]
+      DocDaughter.all(:order => 'name').should  == [carrie, steph]
+      DocParent.all(:order => 'name').should    == [carrie, john, steph, steve]
+    end
+    
+    should "work with nested hash conditions" do
+      john = DocSon.create(:name => 'John')
+      steve = DocSon.create(:name => 'Steve')
+      DocSon.all(:name => {'$ne' => 'Steve'}).should == [john]
+    end
+
+    should "raise error if not found scoped to class" do
+      john = DocSon.create(:name => 'John')
+      steph = DocDaughter.create(:name => 'Steph')
+
+      lambda {
+        DocSon.find!(steph._id)
+      }.should raise_error(MongoMapper::DocumentNotFound)
+    end
+
+    should "not raise error for find with parent" do
+      john = DocSon.create(:name => 'John')
+
+      DocParent.find!(john._id).should == john
+    end
+
+    should "count scoped to class" do
+      john = DocSon.create(:name => 'John')
+      steve = DocSon.create(:name => 'Steve')
+      steph = DocDaughter.create(:name => 'Steph')
+      carrie = DocDaughter.create(:name => 'Carrie')
+
+      DocGrandSon.count.should  == 0
+      DocSon.count.should       == 2
+      DocDaughter.count.should  == 2
+      DocParent.count.should    == 4
+    end
+
+    should "know if it is single_collection_inherited?" do
+      DocParent.single_collection_inherited?.should be_false
+
+      DocDaughter.single_collection_inherited?.should be_true
+      DocSon.single_collection_inherited?.should be_true
+    end
+
+    should "know if single_collection_inherited_superclass?" do
+      DocParent.single_collection_inherited_superclass?.should be_false
+
+      DocDaughter.single_collection_inherited_superclass?.should be_true
+      DocSon.single_collection_inherited_superclass?.should be_true
+      DocGrandSon.single_collection_inherited_superclass?.should be_true
+    end
+
+    should "not be able to destroy each other" do
+      john = DocSon.create(:name => 'John')
+      steph = DocDaughter.create(:name => 'Steph')
+
+      lambda {
+        DocSon.destroy(steph._id)
+      }.should raise_error(MongoMapper::DocumentNotFound)
+    end
+
+    should "not be able to delete each other" do
+      john = DocSon.create(:name => 'John')
+      steph = DocDaughter.create(:name => 'Steph')
+
+      lambda {
+        DocSon.delete(steph._id)
+      }.should_not change { DocParent.count }
+    end
+
+    should "be able to destroy using parent" do
+      john = DocSon.create(:name => 'John')
+      steph = DocDaughter.create(:name => 'Steph')
+
+      lambda {
+        DocParent.destroy_all
+      }.should change { DocParent.count }.by(-2)
+    end
+
+    should "be able to delete using parent" do
+      john = DocSon.create(:name => 'John')
+      steph = DocDaughter.create(:name => 'Steph')
+
+      lambda {
+        DocParent.delete_all
+      }.should change { DocParent.count }.by(-2)
+    end
+  end
+
+  context "timestamping" do
+    setup do
+      @document.timestamps!
+    end
+
+    should "set created_at and updated_at on create" do
+      doc = @document.new(:first_name => 'John', :age => 27)
+      doc.created_at.should be(nil)
+      doc.updated_at.should be(nil)
+      doc.save
+      doc.created_at.should_not be(nil)
+      doc.updated_at.should_not be(nil)
+    end
+
+    should "set updated_at on field update but leave created_at alone" do
+      doc = @document.create(:first_name => 'John', :age => 27)
+      old_created_at = doc.created_at
+      old_updated_at = doc.updated_at
+      doc.first_name = 'Johnny'
+
+      Timecop.freeze(Time.now + 5.seconds) do
+        doc.save
+      end
+
+      doc.created_at.should == old_created_at
+      doc.updated_at.should_not == old_updated_at
+    end
+
+    should "set updated_at on document update but leave created_at alone" do
+      doc = @document.create(:first_name => 'John', :age => 27)
+      old_created_at = doc.created_at
+      old_updated_at = doc.updated_at
+
+      Timecop.freeze(Time.now + 5.seconds) do
+        @document.update(doc._id, { :first_name => 'Johnny' })
+      end
+
+      doc = doc.reload
+      doc.created_at.should == old_created_at
+      doc.updated_at.should_not == old_updated_at
+    end
+  end
+
+  context "#exist?" do
+    setup do
+      @doc = @document.create(:first_name => "James", :age => 27)
+    end
+
+    should "be true when at least one document exists" do
+      @document.exists?.should == true
+    end
+
+    should "be false when no documents exist" do
+      @doc.destroy
+      @document.exists?.should == false
+    end
+
+    should "be true when at least one document exists that matches the conditions" do
+      @document.exists?(:first_name => "James").should == true
+    end
+
+    should "be false when no documents exist with the provided conditions" do
+      @document.exists?(:first_name => "Jean").should == false
+    end
+  end
+
+  context "reload" do
+    setup do
+      @doc_instance_1 = @document.create({:first_name => 'Ryan', :last_name => 'Koopmans', :age => '37'})
+      @doc_instance_2 = @document.update(@doc_instance_1._id, {:age => '39'})
+    end
+
+    should "load fresh information from the database" do
+      @doc_instance_1.age.should == 37
+      @doc_instance_1.reload.age.should == 39
+    end
+  end
+end