mongodoc 0.1.2 → 0.2.0

data/spec/embedded_save_spec.rb

@@ -0,0 +1,104 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Saving embedded documents" do
+  class NestedDocsRoot
+    include MongoDoc::Document
+
+    has_many :nested_children
+  end
+
+  class NestedChild
+    include MongoDoc::Document
+
+    has_one :leaf
+  end
+
+  class LeafDoc
+    include MongoDoc::Document
+
+    key :data
+  end
+
+  let(:leaf) { LeafDoc.new }
+  let(:data) { 'data' }
+
+  context "#save" do
+    let(:root) { NestedDocsRoot.new(:nested_children => [NestedChild.new(:leaf => leaf)]) }
+
+    it "calls the root document's save" do
+      root.should_receive(:save).with(true)
+      leaf.save
+    end
+
+    it "(with bang!) calls the root documents save!" do
+      root.should_receive(:save!)
+      leaf.save!
+    end
+  end
+
+  context "update_attributes naive" do
+    context "with no has_many, update_attributes" do
+      let(:root) { NestedChild.new(:leaf => leaf) }
+
+      it "calls the root document's _naive_update_attributes with a full attribute path and not safe" do
+        root.should_receive(:_naive_update_attributes).with({'leaf.data' => data}, false)
+        leaf.update_attributes(:data => data)
+      end
+
+      it "(with bang!) calls the root document's _naive_update_attributes with a full attribute path and safe" do
+        root.should_receive(:_naive_update_attributes).with({'leaf.data' => data}, true)
+        leaf.update_attributes!(:data => data)
+      end
+    end
+
+    context "with has_many, update_attributes" do
+      let(:root) { NestedDocsRoot.new(:nested_children => [NestedChild.new(:leaf => leaf)]) }
+
+      it "calls the root document's _naive_update_attributes with a full attribute path and not safe" do
+        root.should_receive(:_naive_update_attributes).with({'nested_children.0.leaf.data' => data}, false)
+        leaf.update_attributes(:data => data)
+      end
+
+      it "(with bang!) calls the root document's _naive_update_attributes with a full attribute path and safe" do
+        root.should_receive(:_naive_update_attributes).with({'nested_children.0.leaf.data' => data}, true)
+        leaf.update_attributes!(:data => data)
+      end
+    end
+  end
+
+  context "update_attributes strict" do
+    let(:leaf_id) { 'leaf_id' }
+
+    before do
+      leaf.stub(:_id).and_return(leaf_id)
+    end
+
+    context "with no has_many, update_attributes" do
+      let(:root) { NestedChild.new(:leaf => leaf) }
+
+      it "calls the root document's _strict_update_attributes with a full attribute path and not safe" do
+        root.should_receive(:_strict_update_attributes).with({'leaf.data' => data}, false, 'leaf._id' => leaf_id)
+        leaf.update_attributes(:data => data, :__strict__ => true)
+      end
+
+      it "(with bang!) calls the root document's _naive_update_attributes with a full attribute path and safe" do
+        root.should_receive(:_strict_update_attributes).with({'leaf.data' => data}, true, 'leaf._id' => leaf_id)
+        leaf.update_attributes!(:data => data, :__strict__ => true)
+      end
+    end
+
+    context "with has_many, update_attributes" do
+      let(:root) { NestedDocsRoot.new(:nested_children => [NestedChild.new(:leaf => leaf)]) }
+
+      it "calls the root document's _naive_update_attributes with a full attribute path and not safe" do
+        root.should_receive(:_strict_update_attributes).with({'nested_children.0.leaf.data' => data}, false, 'nested_children.leaf._id' => leaf_id)
+        leaf.update_attributes(:data => data, :__strict__ => true)
+      end
+
+      it "(with bang!) calls the root document's _naive_update_attributes with a full attribute path and safe" do
+        root.should_receive(:_strict_update_attributes).with({'nested_children.0.leaf.data' => data}, true, 'nested_children.leaf._id' => leaf_id)
+        leaf.update_attributes!(:data => data, :__strict__ => true)
+      end
+    end
+  end
+end

data/spec/finders_spec.rb

@@ -0,0 +1,81 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "spec_helper.rb"))
+
+describe MongoDoc::Finders do
+  class FindersTest
+    include MongoDoc::Document
+
+    key :data
+  end
+
+  context ".criteria" do
+    it "creates a new criteria for the document" do
+      FindersTest.criteria.should be_a_kind_of(MongoDoc::Criteria)
+    end
+
+    it "sets the criteria klass" do
+      FindersTest.criteria.klass.should == FindersTest
+    end
+  end
+
+  context ".find" do
+    before do
+      @criteria = stub('criteria').as_null_object
+      @conditions = {:where => 'this.a > 3'}
+      MongoDoc::Criteria.stub(:translate).and_return(@criteria)
+    end
+
+    it "creates a criteria" do
+      MongoDoc::Criteria.should_receive(:translate).with(FindersTest, @conditions).and_return(@criteria)
+      FindersTest.find(:first, @conditions)
+    end
+
+    [:all, :first, :last].each do |which|
+      it "calls #{which} on the criteria" do
+        @criteria.should_receive(which)
+        FindersTest.find(which, @conditions)
+      end
+    end
+  end
+
+  context ".find_one" do
+    context "with an id" do
+      it "calls translate with the id" do
+        id = 'an id'
+        MongoDoc::Criteria.should_receive(:translate).with(FindersTest, id)
+        FindersTest.find_one(id)
+      end
+    end
+
+    context "with conditions" do
+      before do
+        @criteria = stub('criteria').as_null_object
+        @conditions = {:where => 'this.a > 3'}
+      end
+
+      it "calls translate with the conditions" do
+        MongoDoc::Criteria.should_receive(:translate).with(FindersTest, @conditions).and_return(@criteria)
+        FindersTest.find_one(@conditions)
+      end
+
+      it "call :one on the result" do
+        MongoDoc::Criteria.stub(:translate).and_return(@criteria)
+        @criteria.should_receive(:one)
+        FindersTest.find_one(@conditions)
+      end
+    end
+  end
+
+  context "all other finders" do
+    before do
+      @criteria = stub('criteria').as_null_object
+      MongoDoc::Criteria.stub(:new).and_return(@criteria)
+    end
+
+    [:all, :count, :first, :last].each do |which|
+      it "calls #{which} on the new criteria" do
+        @criteria.should_receive(which)
+        FindersTest.send(which)
+      end
+    end
+  end
+end

data/spec/hash_matchers.rb

@@ -0,0 +1,27 @@
+class HasEntry
+  def initialize(expected)
+    @expected = expected
+  end
+
+  def matches?(target)
+    @target = target
+    @expected.all? do |key, value|
+      @target[key] == value
+    end
+  end
+
+  def failure_message_for_should
+    "expected #{@target.inspect} to have entries #{@expected.inspect}"
+  end
+
+  def failure_message_for_should_not
+    "expected #{@target.inspect} not to have entries #{@expected.inspect}"
+  end
+end
+
+module HashMatchers
+  def has_entry(expected)
+    HasEntry.new(expected)
+  end
+  alias :has_entries :has_entry
+end

data/spec/named_scope_spec.rb

@@ -0,0 +1,82 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "spec_helper.rb"))
+
+describe MongoDoc::NamedScope do
+
+  module Extension
+    def extension_module_method
+      "extension module method"
+    end
+  end
+
+  class NamedScopeTest
+    include MongoDoc::Document
+
+    key :active
+    key :count
+
+    named_scope :active, :where => {:active => true} do
+      def extension_method
+        "extension method"
+      end
+    end
+    named_scope :count_gt_one, :where => {:count => {'$gt' => 1}}, :extend => Extension
+    named_scope :at_least_count, lambda {|count| {:where => {:count => {'$gt' => count}}}}
+  end
+
+  context ".named_scope" do
+    it "adds the named scope to the hash of scopes" do
+      NamedScopeTest.scopes.should have_key(:active)
+    end
+
+    it "creates a class method for the named scope" do
+      NamedScopeTest.should respond_to(:active)
+    end
+  end
+
+  context "accessing a named scope" do
+    it "is a criteria proxy" do
+      MongoDoc::NamedScope::CriteriaProxy.should === NamedScopeTest.active
+    end
+
+    it "responds like a criteria" do
+      NamedScopeTest.active.should respond_to(:selector)
+    end
+
+    it "instantiates the criteria" do
+      criteria = MongoDoc::Criteria.new(NamedScopeTest)
+      MongoDoc::Criteria.should_receive(:new).and_return(criteria)
+      NamedScopeTest.active.selector
+    end
+
+    it "has set the conditions on the criteria" do
+      NamedScopeTest.active.selector.should has_entry(:active => true)
+    end
+
+    it "sets the association extension by block" do
+      NamedScopeTest.active.extension_method.should == "extension method"
+    end
+
+    it "sets the association extension by :extend" do
+      NamedScopeTest.count_gt_one.extension_module_method.should == "extension module method"
+    end
+
+    context "when using a lambda" do
+      it "accepts parameters to the criteria" do
+        NamedScopeTest.at_least_count(3).selector.should has_entry(:count => {'$gt' => 3})
+      end
+    end
+  end
+
+  context "chained scopes" do
+    it "instantiates the criteria" do
+      criteria = MongoDoc::Criteria.new(NamedScopeTest)
+      MongoDoc::Criteria.should_receive(:new).and_return(criteria)
+      NamedScopeTest.active.count_gt_one.selector
+    end
+
+    it "merges the criteria" do
+      NamedScopeTest.active.count_gt_one.selector.should has_entry(:count => {'$gt' => 1}, :active => true)
+    end
+  end
+end
+

data/spec/new_record_spec.rb

@@ -0,0 +1,216 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "MongoDoc::Document _id and #new_record?" do
+  class Child
+    include MongoDoc::Document
+  end
+
+  class Parent
+    include MongoDoc::Document
+
+    has_one :child
+    has_many :children
+
+    key :data
+
+    validates_presence_of :data
+  end
+
+  before do
+    @child = Child.new
+  end
+
+  context "as a has one@child" do
+    it "when added to the parent is a new record" do
+      Parent.new(:data => 'data', :child => @child)
+      @child.should be_new_record
+    end
+
+    context "creating" do
+      before do
+        @id = 'id'
+        @collection = stub('collection')
+        @collection.stub(:insert).and_return(@id)
+        Parent.stub(:collection).and_return(@collection)
+      end
+
+      context ".create" do
+        it "when created is not a new record" do
+          Parent.create(:data => 'data', :child => @child)
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          Parent.create(:child =>@child)
+          @child.should be_new_record
+        end
+      end
+
+      context ".create!" do
+        it "when created is not a new record" do
+          Parent.create!(:data => 'data', :child => @child)
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          Parent.create!(:child => @child) rescue nil
+          @child.should be_new_record
+        end
+
+        it "when db error is raised, remains a new record" do
+          @collection.stub(:insert).and_raise(Mongo::OperationFailure)
+          expect do
+            Parent.create!(:data => 'data', :child => @child)
+          end.should raise_error(Mongo::OperationFailure)
+          @child.should be_new_record
+        end
+      end
+    end
+
+    context "saving" do
+      before do
+        @id = 'id'
+        @collection = stub('collection')
+        @collection.stub(:save).and_return(@id)
+        Parent.stub(:collection).and_return(@collection)
+      end
+
+      context "#save" do
+        it "when saved is not a new record" do
+          parent = Parent.new(:data => 'data', :child => @child)
+          parent.save
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          parent = Parent.new(:child => @child)
+          parent.save
+          @child.should be_new_record
+        end
+      end
+
+      context "#save!" do
+        it "when saved is not a new record" do
+          parent = Parent.new(:data => 'data', :child => @child)
+          parent.save!
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          parent = Parent.new(:child => @child)
+          parent.save! rescue nil
+          @child.should be_new_record
+        end
+
+        it "when db error is raised, remains a new record" do
+          @collection.stub(:save).and_raise(Mongo::OperationFailure)
+          parent = Parent.new(:data => 'data', :child => @child)
+          expect do
+            parent.save!
+          end.should raise_error(Mongo::OperationFailure)
+          @child.should be_new_record
+        end
+      end
+    end
+  end
+
+  context "as a has many@child" do
+    it "when added to the parent is a new record" do
+      parent = Parent.new(:data => 'data')
+      parent.children << @child
+      @child.should be_new_record
+    end
+
+    context "creating" do
+      before do
+        @id = 'id'
+        @collection = stub('collection')
+        @collection.stub(:insert).and_return(@id)
+        Parent.stub(:collection).and_return(@collection)
+      end
+
+      context ".create" do
+        it "when created is not a new record" do
+          Parent.create(:data => 'data', :children => [@child])
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          Parent.create(:children => [@child])
+          @child.should be_new_record
+        end
+      end
+
+      context ".create!" do
+        it "when created is not a new record" do
+          Parent.create!(:data => 'data', :children => [@child])
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          Parent.create!(:children => [@child]) rescue nil
+          @child.should be_new_record
+        end
+
+        it "when db error is raised, remains a new record" do
+          @collection.stub(:insert).and_raise(Mongo::OperationFailure)
+          expect do
+            Parent.create!(:data => 'data', :children => [@child])
+          end.should raise_error(Mongo::OperationFailure)
+          @child.should be_new_record
+        end
+      end
+    end
+
+    context "saving" do
+      before do
+        @id = 'id'
+        @collection = stub('collection')
+        @collection.stub(:save).and_return(@id)
+        Parent.stub(:collection).and_return(@collection)
+      end
+
+      context "#save" do
+        it "when saved is not a new record" do
+          parent = Parent.new(:data => 'data')
+          parent.children << @child
+          parent.save
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          parent = Parent.new
+          parent.children << @child
+          parent.save
+          @child.should be_new_record
+        end
+      end
+
+      context "#save!" do
+        it "when saved is not a new record" do
+          parent = Parent.new(:data => 'data')
+          parent.children << @child
+          parent.save!
+          @child.should_not be_new_record
+        end
+
+        it "if parent is invalid, remains a new record" do
+          parent = Parent.new
+          parent.children << @child
+          parent.save! rescue nil
+          @child.should be_new_record
+        end
+
+        it "when db error is raised, remains a new record" do
+          @collection.stub(:save).and_raise(Mongo::OperationFailure)
+          parent = Parent.new(:data => 'data')
+          parent.children << @child
+          expect do
+            parent.save!
+          end.should raise_error(Mongo::OperationFailure)
+          @child.should be_new_record
+        end
+      end
+    end
+  end
+end

data/spec/parent_proxy_spec.rb

@@ -2,9 +2,11 @@ require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
 
 describe "MongoDoc::ParentProxy" do
   class Parent
-    def path_to_root(attrs)
-      attrs
-    end
+    include MongoDoc::Document
+  end
+
+  class Child
+    include MongoDoc::Document
   end
 
   before do
@@ -36,7 +38,7 @@ describe "MongoDoc::ParentProxy" do
     end.should raise_error
   end
 
-  it "inserts the association name the path_to_root" do
-    subject.path_to_root({:name1 => 'value1', :name2 => 'value2'}).should == {"#{@assoc_name}.name1" => 'value1', "#{@assoc_name}.name2" => "value2"}
+  it "inserts the association name the _path_to_root" do
+    subject._path_to_root(Child.new, :name1 => 'value1', :name2 => 'value2').should == {"#{@assoc_name}.name1" => 'value1', "#{@assoc_name}.name2" => "value2"}
   end
-end
+end

data/spec/proxy_spec.rb

@@ -0,0 +1,80 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe MongoDoc::Proxy do
+  class ProxyTest
+    include MongoDoc::Document
+
+    key :name
+  end
+
+  let(:root) { stub('root', :register_save_observer => nil) }
+  let(:proxy) { MongoDoc::Proxy.new(:assoc_name => 'has_many_name', :collection_class => ProxyTest, :root => root, :parent => root) }
+
+  context "#<<" do
+    let(:item) { ProxyTest.new }
+
+    it "appends the item to the collection" do
+      (proxy << item).should include(item)
+    end
+
+    context "when the item is a Hash" do
+      let(:hash) {{:name => 'hash'}}
+
+      it "calls build when the item is a hash" do
+        proxy.should_receive(:build).with(hash).and_return(item)
+        proxy << hash
+      end
+
+      it "registers a save observer" do
+        proxy.stub(:build).and_return(item)
+        root.should_receive(:register_save_observer)
+        proxy << hash
+      end
+
+      it "sets the root" do
+        proxy.stub(:build).and_return(item)
+        proxy << hash
+        item._root.should == root
+      end
+    end
+
+    context "when the item is not a MongoDoc::Document" do
+      it "does not register a save observer" do
+        root.should_not_receive(:register_save_observer)
+        proxy << 'not_doc'
+      end
+
+      it "does not set the root" do
+        item.should_not_receive(:_root=)
+        proxy << 'not_doc'
+      end
+    end
+
+    context "when the item is a MongoDoc::Document" do
+      it "registers a save observer" do
+        root.should_receive(:register_save_observer)
+        proxy << item
+      end
+
+      it "sets the root" do
+        proxy << item
+        item._root.should == root
+      end
+    end
+
+    context "when the item is an array" do
+      it "adds the array" do
+        array = ['something else']
+        proxy << array
+        proxy.should include(array)
+      end
+    end
+  end
+
+  context "#build" do
+    it "builds an object of the collection class from the hash attrs" do
+      name = 'built'
+      proxy.build({:name => name}).name.should == name
+    end
+  end
+end

data/spec/spec_helper.rb

@@ -4,8 +4,10 @@ require 'mongodoc'
 require 'spec'
 require 'spec/autorun'
 require 'bson_matchers'
+require 'hash_matchers'
 require 'document_ext'
 
 Spec::Runner.configure do |config|
   config.include(BsonMatchers)
+  config.include(HashMatchers)
 end