chhean-mongoid 2.0.1.beta1

data/lib/mongoid/associations/references_many_as_array.rb

@@ -0,0 +1,78 @@
+# encoding: utf-8
+module Mongoid #:nodoc:
+  module Associations #:nodoc:
+    # Represents an relational one-to-many association with an object in a
+    # separate collection or database, stored as an array of ids on the parent
+    # document.
+    class ReferencesManyAsArray < ReferencesMany
+
+      # Append a document to this association. This will also set the appended
+      # document's id on the inverse association as well.
+      #
+      # Example:
+      #
+      # <tt>person.preferences << Preference.new(:name => "VGA")</tt>
+      def <<(*objects)
+        @target = @target.entries
+        objects.flatten.each do |object|
+          # First set the documents id on the parent array of ids.
+          @parent.send(@foreign_key) << object.id
+          # Then we need to set the parent's id on the documents array of ids
+          # to get the inverse side of the association as well. Note, need a
+          # clean way to handle this with new documents - we want to set the
+          # actual objects as well, but dont want to get in an infinite loop
+          # while doing so.
+          object.send(reverse_key(object)) << @parent.id
+          @target << object
+        end
+      end
+
+      alias :concat :<<
+      alias :push :<<
+
+      # Builds a new Document and adds it to the association collection. The
+      # document created will be of the same class as the others in the
+      # association, and the attributes will be passed into the constructor.
+      #
+      # Returns the newly created object.
+      def build(attributes = nil)
+        load_target
+        document = @klass.instantiate(attributes || {})
+        push(document); document
+      end
+
+      protected
+      # Find the inverse key for the supplied document.
+      def reverse_key(document)
+        document.send(@options.inverse_of).options.foreign_key
+      end
+
+      # The default query used for retrieving the documents from the database.
+      def query
+        @query ||= lambda { @klass.any_in(:_id => @parent.send(@foreign_key)) }
+      end
+
+      class << self
+        # Perform an update of the relationship of the parent and child. This
+        # will assimilate the child +Document+ into the parent's object graph.
+        #
+        # Options:
+        #
+        # related: The related object
+        # parent: The parent +Document+ to update.
+        # options: The association +Options+
+        #
+        # Example:
+        #
+        # <tt>RelatesToManyAsArray.update(preferences, person, options)</tt>
+        def update(target, document, options)
+          target.each do |child|
+            name = child.associations[options.inverse_of.to_s].options.name
+            child.send(name) << document
+          end
+          instantiate(document, options, target)
+        end
+      end
+    end
+  end
+end

data/lib/mongoid/associations/references_one.rb

@@ -0,0 +1,116 @@
+# encoding: utf-8
+module Mongoid #:nodoc:
+  module Associations #:nodoc:
+    # Represents an relational one-to-one association with an object in a
+    # separate collection or database.
+    class ReferencesOne < Proxy
+
+      delegate :nil?, :to => :target
+
+      # Builds a new Document and sets it as the association.
+      #
+      # Returns the newly created object.
+      def build(attributes = {})
+        @target = @klass.instantiate(attributes)
+        
+        if @foreign_type
+          inverse = @target.associations.values.detect do |metadata|
+            metadata.options.name == @options.as.to_s
+          end
+        else
+          inverse = @target.associations.values.detect do |metadata|
+            metadata.options.klass == @parent.class
+          end
+        end
+        name = inverse.name
+        @target.send("#{name}=", @parent)
+        @target
+      end
+
+      # Builds a new Document and sets it as the association, then saves the
+      # newly created document.
+      #
+      # Returns the newly created object.
+      def create(attributes)
+        build(attributes).tap(&:save)
+      end
+
+      # Initializing a related association only requires looking up the objects
+      # by their ids.
+      #
+      # Options:
+      #
+      # document: The +Document+ that contains the relationship.
+      # options: The association +Options+.
+      def initialize(document, options, target = nil)
+        @parent, @klass, @options = document, options.klass, options
+        
+        @foreign_key = options.foreign_key
+        
+        pre_conditions = { @foreign_key => @parent.id }
+        
+        if options.as
+          @foreign_type = options.as.to_s+"_type"
+          
+          pre_conditions[@foreign_type] = document.class.to_s
+        end
+        
+        @target = target || @klass.first(:conditions => pre_conditions)
+        extends(options)
+      end
+
+      # Used for setting the association via a nested attributes setter on the
+      # parent +Document+. Called when using accepts_nested_attributes_for.
+      #
+      # Options:
+      #
+      # attributes: The attributes for the new association
+      #
+      # Returns:
+      #
+      # A new target document.
+      def nested_build(attributes, options = nil)
+        build(attributes) unless @target.blank? && options[:update_only]
+      end
+
+      class << self
+        # Preferred method for creating the new +RelatesToMany+ association.
+        #
+        # Options:
+        #
+        # document: The +Document+ that contains the relationship.
+        # options: The association +Options+.
+        def instantiate(document, options, target = nil)
+          new(document, options, target)
+        end
+
+        # Returns the macro used to create the association.
+        def macro
+          :references_one
+        end
+
+        # Perform an update of the relationship of the parent and child. This
+        # will assimilate the child +Document+ into the parent's object graph.
+        #
+        # Options:
+        #
+        # related: The related object to update.
+        # document: The parent +Document+.
+        # options: The association +Options+
+        #
+        # Example:
+        #
+        # <tt>HasOneToRelated.update(game, person, options)</tt>
+        def update(target, document, options)
+          if target
+            name = document.class.to_s.underscore
+            target.send("#{name}=", document)
+            return instantiate(document, options, target)
+          end
+          target
+        end
+      end
+
+    end
+  end
+end

data/lib/mongoid/attributes.rb

@@ -0,0 +1,226 @@
+# encoding: utf-8
+module Mongoid #:nodoc:
+  module Attributes
+    extend ActiveSupport::Concern
+    module InstanceMethods
+      # Get the id associated with this object. This will pull the _id value out
+      # of the attributes +Hash+.
+      def id
+        @attributes["_id"]
+      end
+
+      # Set the id of the +Document+ to a new one.
+      def id=(new_id)
+        @attributes["_id"] = new_id
+      end
+
+      alias :_id :id
+      alias :_id= :id=
+
+      # Used for allowing accessor methods for dynamic attributes.
+      def method_missing(name, *args)
+        attr = name.to_s
+        return super unless @attributes.has_key?(attr.reader)
+        if attr.writer?
+          # "args.size > 1" allows to simulate 1.8 behavior of "*args"
+          write_attribute(attr.reader, (args.size > 1) ? args : args.first)
+        else
+          read_attribute(attr.reader)
+        end
+      end
+
+      # Process the provided attributes casting them to their proper values if a
+      # field exists for them on the +Document+. This will be limited to only the
+      # attributes provided in the suppied +Hash+ so that no extra nil values get
+      # put into the document's attributes.
+      def process(attrs = nil)
+        (attrs || {}).each_pair do |key, value|
+          if set_allowed?(key)
+            write_attribute(key, value)
+          elsif write_allowed?(key)
+            send("#{key}=", value)
+          end
+        end
+        setup_modifications
+      end
+
+      # Read a value from the +Document+ attributes. If the value does not exist
+      # it will return nil.
+      #
+      # Options:
+      #
+      # name: The name of the attribute to get.
+      #
+      # Example:
+      #
+      # <tt>person.read_attribute(:title)</tt>
+      def read_attribute(name)
+        access = name.to_s
+        value = @attributes[access]
+        typed_value = fields.has_key?(access) ? fields[access].get(value) : value
+        accessed(access, typed_value)
+      end
+
+      # Remove a value from the +Document+ attributes. If the value does not exist
+      # it will fail gracefully.
+      #
+      # Options:
+      #
+      # name: The name of the attribute to remove.
+      #
+      # Example:
+      #
+      # <tt>person.remove_attribute(:title)</tt>
+      def remove_attribute(name)
+        access = name.to_s
+        modify(access, @attributes.delete(name.to_s), nil)
+      end
+
+      # Returns the object type. This corresponds to the name of the class that
+      # this +Document+ is, which is used in determining the class to
+      # instantiate in various cases.
+      def _type
+        @attributes["_type"]
+      end
+
+      # Set the type of the +Document+. This should be the name of the class.
+      def _type=(new_type)
+        @attributes["_type"] = new_type
+      end
+
+      # Write a single attribute to the +Document+ attribute +Hash+. This will
+      # also fire the before and after update callbacks, and perform any
+      # necessary typecasting.
+      #
+      # Options:
+      #
+      # name: The name of the attribute to update.
+      # value: The value to set for the attribute.
+      #
+      # Example:
+      #
+      # <tt>person.write_attribute(:title, "Mr.")</tt>
+      #
+      # This will also cause the observing +Document+ to notify it's parent if
+      # there is any.
+      def write_attribute(name, value)
+        access = name.to_s
+        typed_value = fields.has_key?(access) ? fields[access].set(value) : value
+        modify(access, @attributes[access], typed_value)
+        notify if !id.blank? && new_record?
+      end
+
+      # Writes the supplied attributes +Hash+ to the +Document+. This will only
+      # overwrite existing attributes if they are present in the new +Hash+, all
+      # others will be preserved.
+      #
+      # Options:
+      #
+      # attrs: The +Hash+ of new attributes to set on the +Document+
+      #
+      # Example:
+      #
+      # <tt>person.write_attributes(:title => "Mr.")</tt>
+      #
+      # This will also cause the observing +Document+ to notify it's parent if
+      # there is any.
+      def write_attributes(attrs = nil)
+        process(attrs || {})
+        identified = !id.blank?
+        if new_record? && !identified
+          identify; notify
+        end
+      end
+      alias :attributes= :write_attributes
+
+      protected
+      # apply default values to attributes - calling procs as required
+      def default_attributes
+        default_values = defaults
+        default_values.each_pair do |key, val|
+          default_values[key] = val.call if val.respond_to?(:call)
+        end
+        default_values || {}
+      end
+
+      # Return true if dynamic field setting is enabled.
+      def set_allowed?(key)
+        Mongoid.allow_dynamic_fields && !respond_to?("#{key}=") && is_accesible?(key)
+      end
+      
+      # Returns true if accessible
+      def is_accesible?(key)
+        return true unless self.class.attr_accessible_list.any? || self.class.attr_protected_list.any?
+        
+        return false if self.class.attr_protected_list.include?(key.to_sym)
+        
+        if self.class.attr_accessible_list.any?
+          return self.class.attr_accessible_list.include?(key.to_sym)
+        else
+          return true
+        end
+      end
+
+      # Used when supplying a :reject_if block as an option to
+      # accepts_nested_attributes_for
+      def reject(attributes, options)
+        rejector = options[:reject_if]
+        if rejector
+          attributes.delete_if do |key, value|
+            rejector.call(value)
+          end
+        end
+      end
+
+      # Used when supplying a :limit as an option to accepts_nested_attributes_for
+      def limit(attributes, name, options)
+        raise Mongoid::Errors::TooManyNestedAttributeRecords.new(name, options[:limit]) if options[:limit] && attributes.size > options[:limit]
+      end
+
+      # Return true if writing to the given field is allowed
+      def write_allowed?(key)
+        name = key.to_s
+        existing = fields[name]
+        return is_accesible?(key) unless existing
+        
+        if existing.set_accessible?
+          existing.accessible?
+        else
+          is_accesible?(key)
+        end
+      end
+    end
+
+    module ClassMethods
+      # Defines attribute setters for the associations specified by the names.
+      # This will work for a has one or has many association.
+      #
+      # Example:
+      #
+      #   class Person
+      #     include Mongoid::Document
+      #     embeds_one :name
+      #     embeds_many :addresses
+      #
+      #     accepts_nested_attributes_for :name, :addresses
+      #   end
+      def accepts_nested_attributes_for(*args)
+        associations = args.flatten
+        options = associations.last.is_a?(Hash) ? associations.pop : {}
+        associations.each do |name|
+          define_method("#{name}_attributes=") do |attrs|
+            reject(attrs, options)
+            limit(attrs, name, options)
+            association = send(name)
+            if association
+              # observe(association, true)
+              association.nested_build(attrs, options)
+            else
+              send("build_#{name}", attrs, options)
+            end
+          end
+        end
+      end
+    end
+  end
+end

data/lib/mongoid/callbacks.rb

@@ -0,0 +1,17 @@
+# encoding: utf-8
+module Mongoid #:nodoc:
+  module Callbacks
+    extend ActiveSupport::Concern
+    included do
+      extend ActiveModel::Callbacks
+
+      # Define all the callbacks that are accepted by the document.
+      define_model_callbacks \
+        :create,
+        :destroy,
+        :save,
+        :update,
+        :validate
+    end
+  end
+end

data/lib/mongoid/collection.rb

@@ -0,0 +1,120 @@
+# encoding: utf-8
+require "mongoid/collections/operations"
+require "mongoid/collections/cyclic_iterator"
+require "mongoid/collections/master"
+require "mongoid/collections/slaves"
+
+module Mongoid #:nodoc
+  # The Mongoid wrapper to the Mongo Ruby driver's collection object.
+  class Collection
+    attr_reader :counter, :name
+
+    # All write operations should delegate to the master connection. These
+    # operations mimic the methods on a Mongo:Collection.
+    #
+    # Example:
+    #
+    # <tt>collection.save({ :name => "Al" })</tt>
+    Collections::Operations::PROXIED.each do |name|
+      define_method(name) { |*args| master.send(name, *args) }
+    end
+
+    # Determines where to send the next read query. If the slaves are not
+    # defined then send to master. If the read counter is under the configured
+    # maximum then return the master. In any other case return the slaves.
+    #
+    # Example:
+    #
+    # <tt>collection.directed</tt>
+    #
+    # Return:
+    #
+    # Either a +Master+ or +Slaves+ collection.
+    def directed(options = {})
+      options.delete(:cache)
+      enslave = options.delete(:enslave) || @klass.enslaved?
+      enslave ? master_or_slaves : master
+    end
+
+    # Find documents from the database given a selector and options.
+    #
+    # Options:
+    #
+    # selector: A +Hash+ selector that is the query.
+    # options: The options to pass to the db.
+    #
+    # Example:
+    #
+    # <tt>collection.find({ :test => "value" })</tt>
+    def find(selector = {}, options = {})
+      cursor = Mongoid::Cursor.new(@klass, self, directed(options).find(selector, options))
+      if block_given?
+        yield cursor; cursor.close
+      else
+        cursor
+      end
+    end
+
+    # Find the first document from the database given a selector and options.
+    #
+    # Options:
+    #
+    # selector: A +Hash+ selector that is the query.
+    # options: The options to pass to the db.
+    #
+    # Example:
+    #
+    # <tt>collection.find_one({ :test => "value" })</tt>
+    def find_one(selector = {}, options = {})
+      directed(options).find_one(selector, options)
+    end
+
+    # Initialize a new Mongoid::Collection, setting up the master, slave, and
+    # name attributes. Masters will be used for writes, slaves for reads.
+    #
+    # Example:
+    #
+    # <tt>Mongoid::Collection.new(masters, slaves, "test")</tt>
+    def initialize(klass, name)
+      @klass, @name = klass, name
+    end
+
+    # Perform a map/reduce on the documents.
+    #
+    # Options:
+    #
+    # map: The map javascript funcdtion.
+    # reduce: The reduce javascript function.
+    def map_reduce(map, reduce, options = {})
+      directed(options).map_reduce(map, reduce, options)
+    end
+
+    alias :mapreduce :map_reduce
+
+    # Return the object responsible for writes to the database. This will
+    # always return a collection associated with the Master DB.
+    #
+    # Example:
+    #
+    # <tt>collection.writer</tt>
+    def master
+      @master ||= Collections::Master.new(Mongoid.master, @name)
+    end
+
+    # Return the object responsible for reading documents from the database.
+    # This is usually the slave databases, but in their absence the master will
+    # handle the task.
+    #
+    # Example:
+    #
+    # <tt>collection.reader</tt>
+    def slaves
+      @slaves ||= Collections::Slaves.new(Mongoid.slaves, @name)
+    end
+
+    protected
+    def master_or_slaves
+      slaves.empty? ? master : slaves
+    end
+  end
+end