require 'spec_helper'

describe Shoulda::Matchers::ActiveRecord::AssociationMatcher do
  context "belong_to" do
    before do
      @matcher = belong_to(:parent)
    end

    it "should accept a good association with the default foreign key" do
      define_model :parent
      define_model :child, :parent_id => :integer do
        belongs_to :parent
      end
      Child.new.should @matcher
    end

    it "should reject a nonexistent association" do
      define_model :child
      Child.new.should_not @matcher
    end

    it "should reject an association of the wrong type" do
      define_model :parent, :child_id => :integer
      child_class = define_model :child do
        has_one :parent
      end
      Child.new.should_not @matcher
    end

    it "should reject an association that has a nonexistent foreign key" do
      define_model :parent
      define_model :child do
        belongs_to :parent
      end
      Child.new.should_not @matcher
    end

    it "should accept an association with an existing custom foreign key" do
      define_model :parent
      define_model :child, :guardian_id => :integer do
        belongs_to :parent, :foreign_key => 'guardian_id'
      end
      Child.new.should @matcher
    end

    it "should accept a polymorphic association" do
      define_model :child, :parent_type => :string,
                           :parent_id   => :integer do
        belongs_to :parent, :polymorphic => true
      end
      Child.new.should @matcher
    end

    it "should accept an association with a valid :dependent option" do
      define_model :parent
      define_model :child, :parent_id => :integer do
        belongs_to :parent, :dependent => :destroy
      end
      Child.new.should @matcher.dependent(:destroy)
    end

    it "should reject an association with a bad :dependent option" do
      define_model :parent
      define_model :child, :parent_id => :integer do
        belongs_to :parent
      end
      Child.new.should_not @matcher.dependent(:destroy)
    end

    it "should accept an association with a valid :conditions option" do
      define_model :parent, :adopter => :boolean
      define_model :child, :parent_id => :integer do
        belongs_to :parent, :conditions => { :adopter => true }
      end
      Child.new.should @matcher.conditions(:adopter => true)
    end

    it "should reject an association with a bad :conditions option" do
      define_model :parent, :adopter => :boolean
      define_model :child, :parent_id => :integer do
        belongs_to :parent
      end
      Child.new.should_not @matcher.conditions(:adopter => true)
    end

    it "should accept an association with a valid :class_name option" do
      define_model :tree_parent, :adopter => :boolean
      define_model :child, :parent_id => :integer do
        belongs_to :parent, :class_name => 'TreeParent'
      end
      Child.new.should @matcher.class_name('TreeParent')
    end

    it "should reject an association with a bad :class_name option" do
      define_model :parent, :adopter => :boolean
      define_model :child, :parent_id => :integer do
        belongs_to :parent
      end
      Child.new.should_not @matcher.class_name('TreeChild')
    end

    context 'should accept an association with a false :validate option' do
      before do
        define_model :parent, :adopter => :boolean
        define_model :child, :parent_id => :integer do
          belongs_to :parent, :validate => false
        end
      end
      subject { Child.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

    context 'should accept an association with a true :validate option' do
      before do
        define_model :parent, :adopter => :boolean
        define_model :child, :parent_id => :integer do
          belongs_to :parent, :validate => true
        end
      end
      subject { Child.new }
      specify { subject.should_not @matcher.validate(false) }
      specify { subject.should @matcher.validate(true) }
      specify { subject.should @matcher.validate }
    end

    context 'should accept an association without a :validate option' do
      before do
        define_model :parent, :adopter => :boolean
        define_model :child, :parent_id => :integer do
          belongs_to :parent
        end
      end
      subject { Child.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

  end

  context "have_many" do
    before do
      @matcher = have_many(:children)
    end

    it "should accept a valid association without any options" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children
      end
      Parent.new.should @matcher
    end

    it "should accept a valid association with a :through option" do
      define_model :child
      define_model :conception, :child_id  => :integer,
                                :parent_id => :integer do
        belongs_to :child
      end
      define_model :parent do
        has_many :conceptions
        has_many :children, :through => :conceptions
      end
      Parent.new.should @matcher
    end

    it "should accept a valid association with an :as option" do
      define_model :child, :guardian_type => :string,
                           :guardian_id   => :integer
      define_model :parent do
        has_many :children, :as => :guardian
      end
      Parent.new.should @matcher
    end

    it "should reject an association that has a nonexistent foreign key" do
      define_model :child
      define_model :parent do
        has_many :children
      end
      Parent.new.should_not @matcher
    end

    it "should reject an association with a bad :as option" do
      define_model :child, :caretaker_type => :string,
                           :caretaker_id   => :integer
      define_model :parent do
        has_many :children, :as => :guardian
      end
      Parent.new.should_not @matcher
    end

    it "should reject an association that has a bad :through option" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children
      end
      @matcher.through(:conceptions).matches?(Parent.new).should be_false
      @matcher.failure_message.should =~ /does not have any relationship to conceptions/
    end

    it "should reject an association that has the wrong :through option" do
      define_model :child
      define_model :conception, :child_id  => :integer,
                                :parent_id => :integer do
        belongs_to :child
      end
      define_model :parent do
        has_many :conceptions
        has_many :relationships
        has_many :children, :through => :conceptions
      end
      @matcher.through(:relationships).matches?(Parent.new).should be_false
      @matcher.failure_message.should =~ /through relationships, but got it through conceptions/
    end

    it "should accept an association with a valid :dependent option" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children, :dependent => :destroy
      end
      Parent.new.should @matcher.dependent(:destroy)
    end

    it "should reject an association with a bad :dependent option" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children
      end
      Parent.new.should_not @matcher.dependent(:destroy)
    end

    it "should accept an association with a valid :order option" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children, :order => :id
      end
      Parent.new.should @matcher.order(:id)
    end

    it "should reject an association with a bad :order option" do
      define_model :child, :parent_id => :integer
      define_model :parent do
        has_many :children
      end
      Parent.new.should_not @matcher.order(:id)
    end

    it "should accept an association with a valid :conditions option" do
      define_model :child, :parent_id => :integer, :adopted => :boolean
      define_model :parent do
        has_many :children, :conditions => { :adopted => true }
      end
      Parent.new.should @matcher.conditions({ :adopted => true })
    end

    it "should reject an association with a bad :conditions option" do
      define_model :child, :parent_id => :integer, :adopted => :boolean
      define_model :parent do
        has_many :children
      end
      Parent.new.should_not @matcher.conditions({ :adopted => true })
    end

    it "should accept an association with a valid :class_name option" do
      define_model :node, :parent_id => :integer, :adopted => :boolean
      define_model :parent do
        has_many :children, :class_name => 'Node'
      end
      Parent.new.should @matcher.class_name('Node')
    end

    it "should reject an association with a bad :class_name option" do
      define_model :child, :parent_id => :integer, :adopted => :boolean
      define_model :parent do
        has_many :children
      end
      Parent.new.should_not @matcher.class_name('Node')
    end

    context 'should accept an association with a false :validate option' do
      before do
        define_model :child, :parent_id => :integer, :adopted => :boolean
        define_model :parent do
          has_many :children, :validate => false
        end
      end
      subject { Parent.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

    context 'should accept an association with a true :validate option' do
      before do
        define_model :child, :parent_id => :integer, :adopted => :boolean
        define_model :parent do
          has_many :children, :validate => true
        end
      end
      subject { Parent.new }
      specify { subject.should_not @matcher.validate(false) }
      specify { subject.should @matcher.validate(true) }
      specify { subject.should @matcher.validate }
    end

    context 'should accept an association without a :validate option' do
      before do
        define_model :child, :parent_id => :integer, :adopted => :boolean
        define_model :parent do
          has_many :children
        end
      end
      subject { Parent.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

    it "should accept an association with a nonstandard reverse foreign key, using :inverse_of" do
      define_model :child, :ancestor_id => :integer do
        belongs_to :ancestor, :inverse_of => :children, :class_name => :Parent
      end
      define_model :parent do
        has_many :children, :inverse_of => :ancestor
      end
      Parent.new.should @matcher
    end

    it "should reject an association with a nonstandard reverse foreign key, if :inverse_of is not correct" do
      define_model :child, :mother_id => :integer do
        belongs_to :mother, :inverse_of => :children, :class_name => :Parent
      end
      define_model :parent do
        has_many :children, :inverse_of => :ancestor
      end
      Parent.new.should_not @matcher
    end
  end

  context "have_one" do
    before do
      @matcher = have_one(:detail)
    end

    it "should accept a valid association without any options" do
      define_model :detail, :person_id => :integer
      define_model :person do
        has_one :detail
      end
      Person.new.should @matcher
    end

    it "should accept a valid association with an :as option" do
      define_model :detail, :detailable_id   => :integer,
                            :detailable_type => :string
      define_model :person do
        has_one :detail, :as => :detailable
      end
      Person.new.should @matcher
    end

    it "should reject an association that has a nonexistent foreign key" do
      define_model :detail
      define_model :person do
        has_one :detail
      end
      Person.new.should_not @matcher
    end

    it "should accept an association with an existing custom foreign key" do
      define_model :detail, :detailed_person_id => :integer
      define_model :person do
        has_one :detail, :foreign_key => :detailed_person_id
      end
      Person.new.should @matcher.with_foreign_key(:detailed_person_id)
    end

    it "should reject an association with a bad :as option" do
      define_model :detail, :detailable_id   => :integer,
                            :detailable_type => :string
      define_model :person do
        has_one :detail, :as => :describable
      end
      Person.new.should_not @matcher
    end

    it "should accept an association with a valid :dependent option" do
      define_model :detail, :person_id => :integer
      define_model :person do
        has_one :detail, :dependent => :destroy
      end
      Person.new.should @matcher.dependent(:destroy)
    end

    it "should reject an association with a bad :dependent option" do
      define_model :detail, :person_id => :integer
      define_model :person do
        has_one :detail
      end
      Person.new.should_not @matcher.dependent(:destroy)
    end

    it "should accept an association with a valid :order option" do
      define_model :detail, :person_id => :integer
      define_model :person do
        has_one :detail, :order => :id
      end
      Person.new.should @matcher.order(:id)
    end

    it "should reject an association with a bad :order option" do
      define_model :detail, :person_id => :integer
      define_model :person do
        has_one :detail
      end
      Person.new.should_not @matcher.order(:id)
    end

    it "should accept an association with a valid :conditions option" do
      define_model :detail, :person_id => :integer, :disabled => :boolean
      define_model :person do
        has_one :detail, :conditions => { :disabled => true}
      end
      Person.new.should @matcher.conditions(:disabled => true)
    end

    it "should reject an association with a bad :conditions option" do
      define_model :detail, :person_id => :integer, :disabled => :boolean
      define_model :person do
        has_one :detail
      end
      Person.new.should_not @matcher.conditions(:disabled => true)
    end

    it "should accept an association with a valid :class_name option" do
      define_model :person_detail, :person_id => :integer, :disabled => :boolean
      define_model :person do
        has_one :detail, :class_name => 'PersonDetail'
      end
      Person.new.should @matcher.class_name('PersonDetail')
    end

    it "should reject an association with a bad :class_name option" do
      define_model :detail, :person_id => :integer, :disabled => :boolean
      define_model :person do
        has_one :detail
      end
      Person.new.should_not @matcher.class_name('PersonDetail')
    end

    it "should accept an association with a through" do
      define_model :detail

      define_model :account do
        has_one :detail
      end

      define_model :person do
        has_one :account
        has_one :detail, :through => :account
      end

      Person.new.should @matcher.through(:account)
    end

    it "should reject an association with a through" do
      define_model :detail

      define_model :person do
        has_one :detail
      end

      Person.new.should_not @matcher.through(:account)
    end

    context 'should accept an association with a false :validate option' do
      before do
        define_model :detail, :person_id => :integer, :disabled => :boolean
        define_model :person do
          has_one :detail, :validate => false
        end
      end
      subject { Person.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

    context 'should accept an association with a true :validate option' do
      before do
        define_model :detail, :person_id => :integer, :disabled => :boolean
        define_model :person do
          has_one :detail, :validate => true
        end
      end
      subject { Person.new }
      specify { subject.should_not @matcher.validate(false) }
      specify { subject.should @matcher.validate(true) }
      specify { subject.should @matcher.validate }
    end

    context 'should accept an association without a :validate option' do
      before do
        define_model :detail, :person_id => :integer, :disabled => :boolean
        define_model :person do
          has_one :detail
        end
      end
      subject { Person.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

  end

  context "have_and_belong_to_many" do
    before do
      @matcher = have_and_belong_to_many(:relatives)
    end

    it "should accept a valid association" do
      define_model :relatives
      define_model :person do
        has_and_belongs_to_many :relatives
      end
      define_model :people_relative, :person_id   => :integer,
                                     :relative_id => :integer
      Person.new.should @matcher
    end

    it "should reject a nonexistent association" do
      define_model :relatives
      define_model :person
      define_model :people_relative, :person_id   => :integer,
                                     :relative_id => :integer
      Person.new.should_not @matcher
    end

    it "should reject an association with a nonexistent join table" do
      define_model :relatives
      define_model :person do
        has_and_belongs_to_many :relatives
      end
      Person.new.should_not @matcher
    end

    it "should reject an association of the wrong type" do
      define_model :relatives, :person_id => :integer
      define_model :person do
        has_many :relatives
      end
      Person.new.should_not @matcher
    end

    it "should accept an association with a valid :conditions option" do
      define_model :relatives, :adopted => :boolean
      define_model :person do
        has_and_belongs_to_many :relatives, :conditions => { :adopted => true }
      end
      define_model :people_relative, :person_id   => :integer,
                                     :relative_id => :integer
      Person.new.should @matcher.conditions(:adopted => true)
    end

    it "should reject an association with a bad :conditions option" do
      define_model :relatives, :adopted => :boolean
      define_model :person do
        has_and_belongs_to_many :relatives
      end
      define_model :people_relative, :person_id   => :integer,
                                     :relative_id => :integer
      Person.new.should_not @matcher.conditions(:adopted => true)
    end

    it "should accept an association with a valid :class_name option" do
      define_model :person_relatives, :adopted => :boolean
      define_model :person do
        has_and_belongs_to_many :relatives, :class_name => 'PersonRelatives'
      end
      define_model :people_person_relative, :person_id   => :integer,
                                     :person_relative_id => :integer
      Person.new.should @matcher.class_name('PersonRelatives')
    end

    it "should reject an association with a bad :class_name option" do
      define_model :relatives, :adopted => :boolean
      define_model :person do
        has_and_belongs_to_many :relatives
      end
      define_model :people_relative, :person_id   => :integer,
                                     :relative_id => :integer
      Person.new.should_not @matcher.class_name('PersonRelatives')
    end

    context 'should accept an association with a false :validate option' do
      before do
        define_model :relatives, :adopted => :boolean
        define_model :person do
          has_and_belongs_to_many :relatives, :validate => false
        end
        define_model :people_relative, :person_id => :integer, :relative_id => :integer
      end
      subject { Person.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

    context 'should accept an association with a true :validate option' do
      before do
        define_model :relatives, :adopted => :boolean
        define_model :person do
          has_and_belongs_to_many :relatives, :validate => true
        end
        define_model :people_relative, :person_id => :integer, :relative_id => :integer
      end
      subject { Person.new }
      specify { subject.should_not @matcher.validate(false) }
      specify { subject.should @matcher.validate(true) }
      specify { subject.should @matcher.validate }
    end

    context 'should accept an association without a :validate option' do
      before do
        define_model :relatives, :adopted => :boolean
        define_model :person do
          has_and_belongs_to_many :relatives
        end
        define_model :people_relative, :person_id => :integer, :relative_id => :integer
      end
      subject { Person.new }
      specify { subject.should @matcher.validate(false) }
      specify { subject.should_not @matcher.validate(true) }
      specify { subject.should_not @matcher.validate }
    end

  end
end