mongo_doc 0.3.0

data/spec/embedded_save_spec.rb

@@ -0,0 +1,109 @@
+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) do
+    doc = LeafDoc.new
+    doc._id = 'id'
+    doc
+  end
+
+  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.0.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.0.leaf._id' => leaf_id)
+        leaf.update_attributes!(:data => data, :__strict__ => true)
+      end
+    end
+  end
+end

data/spec/finders_spec.rb

@@ -0,0 +1,73 @@
+require File.expand_path(File.join(File.dirname(__FILE__), "spec_helper.rb"))
+
+describe MongoDoc::Finders do
+  class FindersTest
+    include MongoDoc::Document
+
+    key :data
+  end
+
+  let(:criteria) { stub('criteria').as_null_object }
+
+  context ".find" do
+    before do
+      FindersTest.stub(:criteria).and_return(criteria)
+    end
+
+    it "delegates to id for the criteria" do
+      args = [1, 2, 3]
+      criteria.should_receive(:id).with(*args)
+      FindersTest.find(*args)
+    end
+  end
+
+  context ".find_all" do
+    it "delegates to an empty criteria" do
+      FindersTest.should_receive(:criteria)
+      FindersTest.find_all
+    end
+
+    it "returns the empty criteria" do
+      FindersTest.stub(:criteria).and_return(criteria)
+      FindersTest.find_all.should == criteria
+    end
+  end
+
+  context ".find_one" do
+    context "with an id" do
+      it "delegates to translate" do
+        id = 'an id'
+        Mongoid::Criteria.should_receive(:translate).with(FindersTest, id)
+        FindersTest.find_one(id)
+      end
+    end
+
+    context "with conditions" do
+      let(:conditions) { {:where => 'this.a > 3'} }
+
+      it "calls translate with the conditions" do
+        Mongoid::Criteria.should_receive(:translate).with(FindersTest, conditions).and_return(criteria)
+        FindersTest.find_one(conditions)
+      end
+
+      it "call one on the result" do
+        Mongoid::Criteria.stub(:translate).and_return(criteria)
+        criteria.should_receive(:one)
+        FindersTest.find_one(conditions)
+      end
+    end
+  end
+
+  context "all other finders" do
+    before do
+      FindersTest.stub(:criteria).and_return(criteria)
+    end
+
+    %w(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/matchers_spec.rb

@@ -0,0 +1,342 @@
+require "spec_helper"
+
+describe MongoDoc::Matchers do
+
+  class Address
+    include MongoDoc::Matchers
+
+    attr_accessor :number
+    attr_accessor :services
+    attr_accessor :street
+
+    def initialize(attrs = {})
+      attrs.each {|key, value| send("#{key}=", value)}
+    end
+  end
+
+  describe "#matches?" do
+
+    context "when performing simple matching" do
+
+      before do
+        @document = Address.new(:street => "Clarkenwell Road")
+      end
+
+      context "when the attributes match" do
+
+        before do
+          @selector = { :street => "Clarkenwell Road" }
+        end
+
+        it "returns true" do
+          @document.matches?(@selector).should be_true
+        end
+
+      end
+
+      context "when the attributes dont match" do
+
+        before do
+          @selector = { :street => "Broadway Ave" }
+        end
+
+        it "returns false" do
+          @document.matches?(@selector).should be_false
+        end
+
+      end
+
+    end
+
+    context "when performing complex matching" do
+
+      before do
+        @document = Address.new(:services => ["first", "second"], :number => 100)
+      end
+
+      context "with an $all selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :services => { "$all" => [ "first", "second" ] } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :services => { "$all" => [ "first" ] } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with an $exists selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :services => { "$exists" => true } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :services => { "$exists" => false } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $gt selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$gt" => 50 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$gt" => 200 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $gte selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$gte" => 100 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$gte" => 200 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with an $in selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$in" => [ 100, 200 ] } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$in" => [ 200, 300 ] } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $lt selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$lt" => 200 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$lt" => 50 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $lte selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$lte" => 200 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$lte" => 50 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with an $ne selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$ne" => 200 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$ne" => 100 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $nin selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :number => { "$nin" => [ 1, 2, 3 ] } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :number => { "$nin" => [ 100 ] } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+      context "with a $size selector" do
+
+        context "when the attributes match" do
+
+          before do
+            @selector = { :services => { "$size" => 2 } }
+          end
+
+          it "returns true" do
+            @document.matches?(@selector).should be_true
+          end
+
+        end
+
+        context "when the attributes do not match" do
+
+          before do
+            @selector = { :services => { "$size" => 5 } }
+          end
+
+          it "returns false" do
+            @document.matches?(@selector).should be_false
+          end
+
+        end
+
+      end
+
+    end
+
+  end
+
+end
+

data/spec/mongodb.yml

@@ -0,0 +1,6 @@
+name: database_name
+host: localhost
+port: 27017
+options:
+  auto_reconnect: true
+

data/spec/mongodb_pairs.yml

@@ -0,0 +1,8 @@
+name: database_name
+host_pairs:
+  first:
+    ['localhost', 27017]
+port: 27017
+options:
+  auto_reconnect: true
+

data/spec/new_record_spec.rb

@@ -0,0 +1,128 @@
+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
+
+  let(:id) { 'id' }
+  let(:collection) { stub('collection', :save => id) }
+  let(:child) { Child.new }
+
+  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 "saving" do
+      before do
+        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 "saving" do
+      before do
+        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/query_spec.rb

@@ -0,0 +1,12 @@
+require File.expand_path(File.dirname(__FILE__) + '/spec_helper')
+
+describe "Query support for MongoDoc" do
+  describe "#set_modifier" do
+    it "modifies all simple key/values of the hash to a set modifier" do
+      key = 'key'
+      value = 'value'
+      hash = {key => value}
+      MongoDoc::Query.set_modifier(hash).should == {'$set' => hash}
+    end
+  end
+end