require 'spec_helper'

describe ActiveData::Model::Associations::ReferencesMany do
  before do
    stub_model(:dummy)
    stub_class(:author, ActiveRecord::Base) do
      scope :name_starts_with_a, -> { where('name LIKE "a%"') }

      validates :name, presence: true
    end

    stub_model(:book) do
      include ActiveData::Model::Persistence
      include ActiveData::Model::Associations

      attribute :title, String
      references_many :authors
    end
  end

  let(:author) { Author.create!(name: 'Rick') }
  let(:other) { Author.create!(name: 'Ben') }

  let(:book) { Book.new }
  let(:association) { book.association(:authors) }

  let(:existing_book) { Book.instantiate title: 'Genesis', author_ids: [author.id] }
  let(:existing_association) { existing_book.association(:authors) }

  describe 'book#association' do
    specify { expect(association).to be_a described_class }
    specify { expect(association).to eq(book.association(:authors)) }
  end

  describe 'book#inspect' do
    specify { expect(existing_book.inspect).to eq('#<Book authors: #<ReferencesMany [#<Author id: 1, name: "Rick">]>, title: "Genesis", author_ids: [1]>') }
  end

  describe '#build' do
    specify { expect(association.build).to be_a Author }
    specify { expect(association.build).not_to be_persisted }

    specify do
      expect { association.build(name: 'Morty') }
        .to change { book.author_ids }
        .from([]).to([nil])
    end
    specify do
      expect { association.build(name: 'Morty') }
        .to change { association.reader }.from([])
        .to([an_instance_of(Author).and(have_attributes(name: 'Morty'))])
    end

    specify do
      expect { existing_association.build(name: 'Morty') }
        .to change { existing_book.author_ids }
        .from([author.id]).to([author.id, nil])
    end
    specify do
      expect { existing_association.build(name: 'Morty') }
        .to change { existing_association.reader }.from([author])
        .to([author, an_instance_of(Author).and(have_attributes(name: 'Morty'))])
    end

    context 'dirty' do
      before do
        Book.include ActiveData::Model::Dirty
      end

      specify do
        expect { existing_association.build(name: 'Morty') }
          .to change { existing_book.changes }
          .from({}).to('author_ids' => [[author.id], [author.id, nil]])
      end
    end
  end

  describe '#create' do
    specify { expect(association.create).to be_a Author }
    specify { expect(association.create).not_to be_persisted }

    specify { expect(association.create(name: 'Morty')).to be_a Author }
    specify { expect(association.create(name: 'Morty')).to be_persisted }

    specify do
      expect { association.create }
        .to change { book.author_ids }
        .from([]).to([nil])
    end
    specify do
      expect { association.create }
        .to change { association.target }
        .from([]).to([an_instance_of(Author).and(be_new_record)])
    end

    specify do
      expect { association.create(name: 'Morty') }
        .to change { book.author_ids }
        .from([]).to([be_a(Integer)])
    end
    specify do
      expect { association.create(name: 'Morty') }
        .to change { association.target }.from([])
        .to([an_instance_of(Author)
          .and(have_attributes(name: 'Morty'))
          .and(be_persisted)])
    end

    specify do
      expect { existing_association.create }
        .to change { existing_book.author_ids }
        .from([author.id]).to([author.id, nil])
    end
    specify do
      expect { existing_association.create }
        .to change { existing_association.reader }.from([author])
        .to([author, an_instance_of(Author).and(be_new_record)])
    end

    specify do
      expect { existing_association.create(name: 'Morty') }
        .to change { existing_book.author_ids }
        .from([author.id]).to([author.id, be_a(Integer)])
    end
    specify do
      expect { existing_association.create(name: 'Morty') }
        .to change { existing_association.reader }.from([author])
        .to([author, an_instance_of(Author)
          .and(have_attributes(name: 'Morty'))
          .and(be_persisted)])
    end

    context 'dirty' do
      before do
        Book.include ActiveData::Model::Dirty
      end

      specify do
        expect { existing_association.create(name: 'Morty') }
          .to change { existing_book.changes }
          .from({}).to('author_ids' => [[author.id], [author.id, be_a(Integer)]])
      end
    end
  end

  describe '#create!' do
    specify { expect { association.create! }.to raise_error ActiveRecord::RecordInvalid }

    specify { expect(association.create!(name: 'Morty')).to be_a Author }
    specify { expect(association.create!(name: 'Morty')).to be_persisted }

    specify do
      expect { muffle(ActiveRecord::RecordInvalid) { association.create! } }
        .to change { book.author_ids }
        .from([]).to([nil])
    end
    specify do
      expect { muffle(ActiveRecord::RecordInvalid) { association.create! } }
        .to change { association.target }
        .from([]).to([an_instance_of(Author).and(be_new_record)])
    end

    specify do
      expect { association.create!(name: 'Morty') }
        .to change { book.author_ids }
        .from([]).to([be_a(Integer)])
    end
    specify do
      expect { association.create!(name: 'Morty') }
        .to change { association.target }.from([])
        .to([an_instance_of(Author)
          .and(have_attributes(name: 'Morty'))
          .and(be_persisted)])
    end

    specify do
      expect { muffle(ActiveRecord::RecordInvalid) { existing_association.create! } }
        .to change { existing_book.author_ids }
        .from([author.id]).to([author.id, nil])
    end
    specify do
      expect { muffle(ActiveRecord::RecordInvalid) { existing_association.create! } }
        .to change { existing_association.reader }.from([author])
        .to([author, an_instance_of(Author).and(be_new_record)])
    end

    specify do
      expect { existing_association.create!(name: 'Morty') }
        .to change { existing_book.author_ids }
        .from([author.id]).to([author.id, be_a(Integer)])
    end
    specify do
      expect { existing_association.create!(name: 'Morty') }
        .to change { existing_association.reader }.from([author])
        .to([author, an_instance_of(Author)
          .and(have_attributes(name: 'Morty'))
          .and(be_persisted)])
    end
  end

  describe '#apply_changes' do
    specify do
      association.build
      expect(association.apply_changes).to eq(false)
    end
    specify do
      association.build
      expect { association.apply_changes }
        .not_to change { association.target.map(&:persisted?) }
        .from([false])
    end
    specify do
      association.build(name: 'Rick')
      expect(association.apply_changes).to eq(true)
    end
    specify do
      association.build(name: 'Rick')
      expect { association.apply_changes }
        .to change { association.target.map(&:persisted?) }
        .from([false]).to([true])
    end
    specify do
      association.build(name: 'Rick')
      expect { association.apply_changes }
        .to change { book.author_ids }
        .from([nil]).to([be_a(Integer)])
    end
    specify do
      existing_association.target.first.name = 'Morty'
      expect { existing_association.apply_changes }
        .not_to change { author.reload.name }
    end
    specify do
      existing_association.target.first.mark_for_destruction
      existing_association.build(name: 'Morty')
      expect { existing_association.apply_changes }
        .to change { existing_book.author_ids }
        .from([author.id, nil]).to([author.id, be_a(Integer)])
    end
    specify do
      existing_association.target.first.mark_for_destruction
      existing_association.build(name: 'Morty')
      expect { existing_association.apply_changes }
        .to change { existing_association.target.map(&:persisted?) }
        .from([true, false]).to([true, true])
    end
    specify do
      existing_association.target.first.destroy!
      existing_association.build(name: 'Morty')
      expect { existing_association.apply_changes }
        .to change { existing_book.author_ids }
        .from([author.id, nil]).to([author.id, be_a(Integer)])
    end
    specify do
      existing_association.target.first.destroy!
      existing_association.build(name: 'Morty')
      expect { existing_association.apply_changes }
        .to change { existing_association.target.map(&:persisted?) }
        .from([false, false]).to([false, true])
    end

    context ':autosave' do
      before do
        Book.references_many :authors, autosave: true
      end

      specify do
        association.build
        expect(association.apply_changes).to eq(false)
      end
      specify do
        association.build
        expect { association.apply_changes }
          .not_to change { association.target.map(&:persisted?) }
          .from([false])
      end
      specify do
        association.build(name: 'Rick')
        expect(association.apply_changes).to eq(true)
      end
      specify do
        association.build(name: 'Rick')
        expect { association.apply_changes }
          .to change { association.target.map(&:persisted?) }
          .from([false]).to([true])
      end
      specify do
        association.build(name: 'Rick')
        expect { association.apply_changes }
          .to change { book.author_ids }
          .from([nil]).to([be_a(Integer)])
      end
      specify do
        existing_association.target.first.name = 'Morty'
        expect { existing_association.apply_changes }
          .to change { author.reload.name }
          .from('Rick').to('Morty')
      end
      specify do
        existing_association.target.first.mark_for_destruction
        existing_association.build(name: 'Morty')
        expect { existing_association.apply_changes }
          .to change { existing_book.author_ids }
          .from([author.id, nil]).to([author.id, be_a(Integer)])
      end
      specify do
        existing_association.target.first.mark_for_destruction
        existing_association.build(name: 'Morty')
        expect { existing_association.apply_changes }
          .to change { existing_association.target.map(&:persisted?) }
          .from([true, false]).to([false, true])
      end
      specify do
        existing_association.target.first.destroy!
        existing_association.build(name: 'Morty')
        expect { existing_association.apply_changes }
          .to change { existing_book.author_ids }
          .from([author.id, nil]).to([author.id, be_a(Integer)])
      end
      specify do
        existing_association.target.first.destroy!
        existing_association.build(name: 'Morty')
        expect { existing_association.apply_changes }
          .to change { existing_association.target.map(&:persisted?) }
          .from([false, false]).to([false, true])
      end
    end
  end

  describe '#apply_changes!' do
    specify do
      association.build
      expect { association.apply_changes! }
        .to raise_error(ActiveData::AssociationChangesNotApplied)
    end
    specify do
      association.build
      expect { muffle(ActiveData::AssociationChangesNotApplied) { association.apply_changes! } }
        .not_to change { association.target.map(&:persisted?) }
        .from([false])
    end

    context ':autosave' do
      before do
        Book.references_many :authors, autosave: true
      end

      specify do
        association.build
        expect { association.apply_changes! }
          .to raise_error(ActiveData::AssociationChangesNotApplied)
      end
      specify do
        association.build
        expect { muffle(ActiveData::AssociationChangesNotApplied) { association.apply_changes! } }
          .not_to change { association.target.map(&:persisted?) }
          .from([false])
      end
    end
  end

  describe '#scope' do
    specify { expect(association.scope).to be_a ActiveRecord::Relation }
    specify { expect(association.scope).to respond_to(:where) }
    specify { expect(association.scope).to respond_to(:name_starts_with_a) }
  end

  describe '#target' do
    specify { expect(association.target).to eq([]) }
    specify { expect(existing_association.target).to eq(existing_book.authors) }
    specify { expect { association.concat author }.to change { association.target.count }.to(1) }
  end

  describe '#default' do
    before { Book.references_many :authors, default: ->(_book) { author.id } }
    let(:existing_book) { Book.instantiate title: 'Genesis' }

    specify { expect(association.target).to eq([author]) }
    specify { expect { association.replace([other]) }.to change { association.target }.to([other]) }
    specify { expect { association.replace([]) }.to change { association.target }.to eq([]) }

    specify { expect(existing_association.target).to eq([]) }
    specify { expect { existing_association.replace([other]) }.to change { existing_association.target }.to([other]) }
    specify { expect { existing_association.replace([]) }.not_to change { existing_association.target } }
  end

  describe '#loaded?' do
    specify { expect(association.loaded?).to eq(false) }
    specify { expect { association.target }.to change { association.loaded? }.to(true) }
    specify { expect { association.replace([]) }.to change { association.loaded? }.to(true) }
    specify { expect { existing_association.replace([]) }.to change { existing_association.loaded? }.to(true) }
  end

  describe '#reload' do
    specify { expect(association.reload).to eq([]) }

    specify { expect(existing_association.reload).to eq(existing_book.authors) }

    context do
      before { existing_association.reader.last.name = 'Conan' }
      specify do
        expect { existing_association.reload }
          .to change { existing_association.reader.map(&:name) }
          .from(['Conan']).to(['Rick'])
      end
    end
  end

  describe '#reader' do
    specify { expect(association.reader).to eq([]) }
    specify { expect(association.reader).to be_a ActiveData::Model::Associations::PersistenceAdapters::ActiveRecord::ReferencedProxy }

    specify { expect(existing_association.reader.first).to be_a Author }
    specify { expect(existing_association.reader.first).to be_persisted }

    context do
      before { association.concat author }
      specify { expect(association.reader.last).to be_a Author }
      specify { expect(association.reader.size).to eq(1) }
      specify { expect(association.reader(true)).to eq([author]) }
    end

    context do
      before { existing_association.concat other }
      specify { expect(existing_association.reader.size).to eq(2) }
      specify { expect(existing_association.reader.last.name).to eq('Ben') }
      specify { expect(existing_association.reader(true).size).to eq(2) }
      specify { expect(existing_association.reader(true).last.name).to eq('Ben') }
    end

    context 'proxy missing method delection' do
      specify { expect(existing_association.reader).to respond_to(:where) }
      specify { expect(existing_association.reader).to respond_to(:name_starts_with_a) }
    end
  end

  describe '#writer' do
    let(:new_author1) { Author.create!(name: 'John') }
    let(:new_author2) { Author.create!(name: 'Adam') }
    let(:new_author3) { Author.new(name: 'Jane') }

    specify do
      expect { association.writer([Dummy.new]) }
        .to raise_error ActiveData::AssociationTypeMismatch
    end

    specify { expect { association.writer(nil) }.to raise_error NoMethodError }
    specify { expect { association.writer(new_author1) }.to raise_error NoMethodError }
    specify { expect(association.writer([])).to eq([]) }

    specify { expect(association.writer([new_author1])).to eq([new_author1]) }
    specify do
      expect { association.writer([new_author1]) }
        .to change { association.reader.map(&:name) }.from([]).to(['John'])
    end
    specify do
      expect { association.writer([new_author1]) }
        .to change { book.read_attribute(:author_ids) }
        .from([]).to([new_author1.id])
    end

    specify do
      expect { existing_association.writer([new_author1, Dummy.new, new_author2]) }
        .to raise_error ActiveData::AssociationTypeMismatch
    end
    specify do
      expect { muffle(ActiveData::AssociationTypeMismatch) { existing_association.writer([new_author1, Dummy.new, new_author2]) } }
        .not_to change { existing_book.read_attribute(:author_ids) }
    end
    specify do
      expect { muffle(ActiveData::AssociationTypeMismatch) { existing_association.writer([new_author1, Dummy.new, new_author2]) } }
        .not_to change { existing_association.reader }
    end

    specify { expect { existing_association.writer(nil) }.to raise_error NoMethodError }
    specify do
      expect { muffle(NoMethodError) { existing_association.writer(nil) } }
        .not_to change { existing_book.read_attribute(:author_ids) }
    end
    specify do
      expect { muffle(NoMethodError) { existing_association.writer(nil) } }
        .not_to change { existing_association.reader }
    end

    specify { expect(existing_association.writer([])).to eq([]) }
    specify do
      expect { existing_association.writer([]) }
        .to change { existing_book.read_attribute(:author_ids) }.to([])
    end
    specify do
      expect { existing_association.writer([]) }
        .to change { existing_association.reader }.from([author]).to([])
    end

    specify { expect(existing_association.writer([new_author1, new_author2])).to eq([new_author1, new_author2]) }
    specify do
      expect { existing_association.writer([new_author1, new_author2]) }
        .to change { existing_association.reader.map(&:name) }
        .from(['Rick']).to(%w[John Adam])
    end
    specify do
      expect { existing_association.writer([new_author1, new_author2]) }
        .to change { existing_book.read_attribute(:author_ids) }
        .from([author.id]).to([new_author1.id, new_author2.id])
    end

    specify do
      expect { existing_association.writer([new_author3]) }
        .to change { existing_association.target }.from([author]).to([new_author3])
    end
    specify do
      expect { existing_association.writer([new_author3]) }
        .to change { existing_book.read_attribute(:author_ids) }
        .from([author.id]).to([nil])
    end
  end

  describe '#concat' do
    let(:new_author1) { Author.create!(name: 'John') }
    let(:new_author2) { Author.create!(name: 'Adam') }

    specify do
      expect { association.concat(Dummy.new) }
        .to raise_error ActiveData::AssociationTypeMismatch
    end

    specify { expect { association.concat(nil) }.to raise_error ActiveData::AssociationTypeMismatch }
    specify { expect(association.concat([])).to eq([]) }
    specify { expect(existing_association.concat([])).to eq(existing_book.authors) }
    specify { expect(existing_association.concat).to eq(existing_book.authors) }

    specify { expect(association.concat(new_author1)).to eq([new_author1]) }
    specify do
      expect { association.concat(new_author1) }
        .to change { association.reader.map(&:name) }.from([]).to(['John'])
    end
    specify do
      expect { association.concat(new_author1) }
        .to change { book.read_attribute(:author_ids) }.from([]).to([1])
    end

    specify do
      expect { existing_association.concat(new_author1, Dummy.new, new_author2) }
        .to raise_error ActiveData::AssociationTypeMismatch
    end
    specify do
      expect { muffle(ActiveData::AssociationTypeMismatch) { existing_association.concat(new_author1, Dummy.new, new_author2) } }
        .to change { existing_book.read_attribute(:author_ids) }
        .from([author.id]).to([author.id, new_author1.id])
    end
    specify do
      expect { muffle(ActiveData::AssociationTypeMismatch) { existing_association.concat(new_author1, Dummy.new, new_author2) } }
        .to change { existing_association.reader.map(&:name) }
        .from(['Rick']).to(%w[Rick John])
    end

    specify do
      expect(existing_association.concat(new_author1, new_author2))
        .to eq([author, new_author1, new_author2])
    end
    specify do
      expect { existing_association.concat([new_author1, new_author2]) }
        .to change { existing_association.reader.map(&:name) }
        .from(['Rick']).to(%w[Rick John Adam])
    end
    specify do
      expect { existing_association.concat([new_author1, new_author2]) }
        .to change { existing_book.read_attribute(:author_ids) }
        .from([author.id]).to([author.id, new_author1.id, new_author2.id])
    end
  end
end