require 'spec_helper'

describe Hydra::Works::FileSet do
  let(:file_set) { described_class.new }

  describe 'Related objects' do
    let(:object1) { Hydra::PCDM::Object.new }

    before do
      file_set.related_objects = [object1]
    end

    it 'persists' do
      expect(file_set.related_objects).to eq [object1]
    end
  end

  describe "#type" do
    it "returns Object and FileSet" do
      expect(subject.type).to eq [Hydra::PCDM::Vocab::PCDMTerms.Object, Hydra::Works::Vocab::WorksTerms.FileSet]
    end
  end

  describe '#files' do
    let(:file1) { file_set.files.build }
    let(:file2) { file_set.files.build }

    before do
      file_set.save!
      file1.content = "I'm a file"
      file2.content = 'I am too'
      file_set.save!
    end

    subject { described_class.find(file_set.id).files }

    it { is_expected.to eq [file1, file2] }
  end

  describe '#in_works' do
    subject { file_set.in_works }
    let(:work) { Hydra::Works::Work.create }
    before do
      work.ordered_members << file_set
      work.save
    end

    it { is_expected.to eq [work] }
  end

  describe '#destroy' do
    let(:work) { Hydra::Works::Work.create }
    before do
      work.ordered_members << file_set
      work.save
    end

    it "Removes the proxy, the list_node and the FileSet" do
      expect { file_set.destroy }.to change { ActiveFedora::Aggregation::Proxy.count }.by(-1)
        .and change { work.reload.ordered_member_proxies.to_a.length }.by(-1)
    end
  end

  describe 'adding collections to file sets' do
    let(:collection) { Hydra::Works::Collection.new }
    let(:exception) { ActiveFedora::AssociationTypeMismatch }
    let(:error_regex) { /is a Collection and may not be a member of the association/ }
    context 'with ordered members' do
      it 'raises AssociationTypeMismatch with a helpful error message' do
        expect { file_set.ordered_members = [collection] }.to raise_error(exception, error_regex)
        expect { file_set.ordered_members += [collection] }.to raise_error(exception, error_regex)
        expect { file_set.ordered_members << collection }.to raise_error(exception, error_regex)
      end
    end
    context 'with unordered members' do
      it 'raises AssociationTypeMismatch with a helpful error message' do
        expect { file_set.members = [collection] }.to raise_error(exception, error_regex)
        expect { file_set.members += [collection] }.to raise_error(exception, error_regex)
        expect { file_set.members << collection }.to raise_error(exception, error_regex)
      end
    end
  end

  describe '#collection?' do
    it 'is not a collection' do
      expect(file_set.collection?).to be false
    end
  end
end