module ActiveRecord
  # = Active Record Belongs To Has One Association
  module Associations
    class HasOneAssociation < AssociationProxy #:nodoc:
      def create(attributes = {})
        new_record(:create_association, attributes)
      end

      def create!(attributes = {})
        build(attributes).tap { |record| record.save! }
      end

      def build(attributes = {})
        new_record(:build_association, attributes)
      end

      def replace(record, save = true)
        record = record.target if AssociationProxy === record
        raise_on_type_mismatch(record) unless record.nil?
        load_target

        @reflection.klass.transaction do
          if @target && @target != record
            remove_target!(@reflection.options[:dependent])
          end

          if record
            set_inverse_instance(record)
            set_owner_attributes(record)

            if @owner.persisted? && save && !record.save
              nullify_owner_attributes(record)
              set_owner_attributes(@target)
              raise RecordNotSaved, "Failed to save the new associated #{@reflection.name}."
            end
          end
        end

        @target = record
        loaded
      end

      private
        def find_target
          scoped.first.tap { |record| set_inverse_instance(record) }
        end

        def association_scope
          super.order(@reflection.options[:order])
        end

        alias creation_attributes construct_owner_attributes

        # The reason that the save param for replace is false, if for create (not just build),
        # is because the setting of the foreign keys is actually handled by the scoping, and
        # so they are set straight away and do not need to be updated within replace.
        def new_record(method, attributes)
          record = scoped.scoping { @reflection.send(method, attributes) }
          replace(record, false)
          record
        end

        def remove_target!(method)
          if [:delete, :destroy].include?(method)
            @target.send(method)
          else
            nullify_owner_attributes(@target)

            if @target.persisted? && @owner.persisted? && !@target.save
              set_owner_attributes(@target)
              raise RecordNotSaved, "Failed to remove the existing associated #{@reflection.name}. " +
                                    "The record failed to save when after its foreign key was set to nil."
            end
          end
        end

        def nullify_owner_attributes(record)
          record[@reflection.foreign_key] = nil
        end
    end
  end
end