test_hyrax 0.0.1.alpha

data/spec/services/hyrax/file_set_csv_service_spec.rb

@@ -0,0 +1,74 @@
+describe Hyrax::FileSetCSVService do
+  let(:mock_file) do
+    Hydra::PCDM::File.new
+  end
+  before do
+    allow(mock_file).to receive(:mime_type).and_return('application/pdf')
+    allow(file).to receive(:resource_type).and_return(['Book', 'Other'])
+    allow(file).to receive(:original_file).and_return(mock_file)
+  end
+
+  let(:file) do
+    FileSet.new(id: '123abc', title: ['My Title'], creator: ['Von, Creator'],
+                resource_type: ['Book', 'Other'], rights: ['Mine']) do |f|
+      f.apply_depositor_metadata('jilluser@example.com')
+    end
+  end
+  let(:solr_document) { SolrDocument.new(file.to_solr) }
+
+  context "when using the defaults" do
+    let(:csv_service) { described_class.new(solr_document) }
+
+    describe "csv" do
+      subject { csv_service.csv }
+
+      it { is_expected.to eq "123abc,My Title,jilluser@example.com,\"Von, Creator\",restricted,Book|Other,Mine,pdf\n" }
+      it "parses as valid csv" do
+        expect(CSV.parse(subject)).to eq([["123abc", "My Title", "jilluser@example.com", "Von, Creator", "restricted", "Book|Other", "Mine", "pdf"]])
+      end
+    end
+
+    describe "csv_header" do
+      subject { csv_service.csv_header }
+      it { is_expected.to eq "id,title,depositor,creator,visibility,resource_type,rights,file_format\n" }
+    end
+  end
+
+  context "when specifying terms" do
+    let(:csv_service) { described_class.new(file, [:id, :title, :resource_type]) }
+    describe "csv" do
+      subject { csv_service.csv }
+      it { is_expected.to eq "123abc,My Title,Book|Other\n" }
+    end
+    describe "csv_header" do
+      subject { csv_service.csv_header }
+      it { is_expected.to eq "id,title,resource_type\n" }
+    end
+  end
+
+  context "when specifying separator" do
+    let(:csv_service) { described_class.new(solr_document, nil, '&&') }
+    describe "csv" do
+      subject { csv_service.csv }
+
+      it { is_expected.to eq "123abc,My Title,jilluser@example.com,\"Von, Creator\",restricted,Book&&Other,Mine,pdf\n" }
+    end
+
+    describe "csv_header" do
+      subject { csv_service.csv_header }
+      it { is_expected.to eq "id,title,depositor,creator,visibility,resource_type,rights,file_format\n" }
+    end
+  end
+
+  context "when specifying terms and separator" do
+    let(:csv_service) { described_class.new(file, [:id, :title, :resource_type], '*$*') }
+    describe "csv" do
+      subject { csv_service.csv }
+      it { is_expected.to eq "123abc,My Title,Book*$*Other\n" }
+    end
+    describe "csv_header" do
+      subject { csv_service.csv_header }
+      it { is_expected.to eq "id,title,resource_type\n" }
+    end
+  end
+end

data/spec/services/hyrax/graph_exporter_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+
+RSpec.describe Hyrax::GraphExporter do
+  let(:work) { create(:work_with_one_file, visibility: 'open') }
+  let(:document) { double(id: work.id) }
+  let(:request) { double(host: 'localhost') }
+  let(:service) { described_class.new(document, request) }
+
+  describe "fetch" do
+    subject { service.fetch }
+    let(:ttl) { subject.dump(:ntriples) }
+    it "transforms suburis to hashcodes" do
+      expect(ttl).to match %r{<http://localhost/concern/generic_works/#{work.id}> <http://www.w3.org/1999/02/22-rdf-syntax-ns#type> <http://projecthydra.org/works/models#Work>}
+      expect(ttl).to match %r{<http://purl\.org/dc/terms/title> "Test title"}
+      expect(ttl).to match %r{<http://www\.w3\.org/ns/auth/acl#accessControl> <http://localhost/catalog/}
+
+      query = subject.query([RDF::URI("http://localhost/concern/generic_works/#{work.id}"),
+                             RDF::URI("http://www.iana.org/assignments/relation/first"),
+                             nil])
+      proxy = query.to_a.first.object
+
+      expect(proxy.to_s).to match %r{http://localhost/concern/generic_works/#{work.id}/list_source#g\d+}
+
+      # It includes the list nodes on the graph
+      expect(subject.query([proxy, nil, nil]).count).to eq 2
+    end
+
+    context "when a Ldp::NotFound is raised" do
+      let(:mock_service) { instance_double(Hydra::ContentNegotiation::CleanGraphRepository) }
+      before do
+        allow(service).to receive(:clean_graph_repository).and_return(mock_service)
+        allow(mock_service).to receive(:find).and_raise(Ldp::NotFound)
+      end
+      it "raises a error that the controller catches and handles" do
+        expect { subject }.to raise_error ActiveFedora::ObjectNotFoundError
+      end
+    end
+  end
+end

data/spec/services/hyrax/import_url_failure_service_spec.rb

@@ -0,0 +1,25 @@
+
+describe Hyrax::ImportUrlFailureService do
+  let!(:depositor) { create(:user) }
+  let(:inbox) { depositor.mailbox.inbox }
+  let(:file) do
+    FileSet.create do |file|
+      file.apply_depositor_metadata(depositor)
+    end
+  end
+
+  before do
+    allow(file.errors).to receive(:full_messages).and_return(['huge mistake'])
+  end
+
+  describe "#call" do
+    before do
+      described_class.new(file, depositor).call
+    end
+
+    it "sends failing mail" do
+      expect(inbox.count).to eq(1)
+      expect(inbox.first.last_message.subject).to eq('File Import Error')
+    end
+  end
+end

data/spec/services/hyrax/import_url_success_service_spec.rb

@@ -0,0 +1,20 @@
+describe Hyrax::ImportUrlSuccessService do
+  let!(:depositor) { create(:user) }
+  let(:inbox) { depositor.mailbox.inbox }
+  let(:label) { 'foobarbaz' }
+  let(:curation_concern) { create(:work_with_one_file, user: depositor, title: ['quuxquuux']) }
+  let(:file_set) { curation_concern.file_sets.first }
+
+  describe "#call" do
+    before do
+      allow(file_set).to receive(:label) { label }
+      described_class.new(file_set, depositor).call
+    end
+
+    it "sends success mail" do
+      expect(inbox.count).to eq(1)
+      expect(inbox.first.last_message.subject).to eq('File Import')
+      expect(inbox.first.last_message.body).to eq("The file (#{label}) was successfully imported and attached to quuxquuux.")
+    end
+  end
+end

data/spec/services/hyrax/lease_service_spec.rb

@@ -0,0 +1,53 @@
+require 'spec_helper'
+
+describe Hyrax::LeaseService do
+  subject { described_class }
+  before { GenericWork.destroy_all }
+
+  let(:future_date) { 2.days.from_now }
+  let(:past_date) { 2.days.ago }
+
+  let!(:work_with_expired_lease1) do
+    build(:generic_work, lease_expiration_date: past_date.to_s).tap do |work|
+      work.save(validate: false)
+    end
+  end
+
+  let!(:work_with_expired_lease2) do
+    build(:generic_work, lease_expiration_date: past_date.to_s).tap do |work|
+      work.save(validate: false)
+    end
+  end
+
+  let!(:work_with_lease_in_effect) { create(:generic_work, lease_expiration_date: future_date.to_s) }
+  let!(:work_without_lease) { create(:generic_work) }
+
+  describe '#assets_with_expired_leases' do
+    it 'returns an array of assets with expired lease' do
+      returned_pids = subject.assets_with_expired_leases.map(&:id)
+      expect(returned_pids).to include work_with_expired_lease1.id, work_with_expired_lease2.id
+      expect(returned_pids).not_to include work_with_lease_in_effect.id, work_without_lease.id
+    end
+  end
+
+  describe '#assets_under_lease' do
+    it 'returns an array of assets with active leases' do
+      returned_pids = subject.assets_under_lease.map(&:id)
+      expect(returned_pids).to include work_with_expired_lease1.id, work_with_expired_lease2.id, work_with_lease_in_effect.id
+      expect(returned_pids).not_to include work_without_lease.id
+    end
+  end
+
+  describe '#assets_with_deactivated_leases' do
+    before do
+      work_with_expired_lease1.deactivate_lease!
+      work_with_expired_lease1.save!
+      work_with_lease_in_effect.deactivate_lease!
+      work_with_lease_in_effect.save!
+    end
+    it 'returns an array of assets with deactivated leases' do
+      returned_pids = subject.assets_with_deactivated_leases.map(&:id)
+      expect(returned_pids).to eq [work_with_expired_lease1.id, work_with_lease_in_effect.id]
+    end
+  end
+end

data/spec/services/hyrax/license_service_spec.rb

@@ -0,0 +1,36 @@
+require 'spec_helper'
+
+describe Hyrax::LicenseService do
+  before do
+    # Configure QA to use fixtures
+    qa_fixtures = { local_path: File.expand_path('spec/fixtures/authorities') }
+    allow(Qa::Authorities::Local).to receive(:config).and_return(qa_fixtures)
+  end
+  let(:service) { described_class.new }
+
+  describe "#select_active_options" do
+    it "returns active terms" do
+      expect(service.select_active_options).to include(["First Active Term", "demo_id_01"], ["Second Active Term", "demo_id_02"])
+    end
+
+    it "does not return inactive terms" do
+      expect(service.select_active_options).not_to include(["Third is an Inactive Term", "demo_id_03"], ["Fourth is an Inactive Term", "demo_id_04"])
+    end
+  end
+
+  describe "#select_all_options" do
+    it "returns both active and inactive terms" do
+      expect(service.select_all_options).to include(["Fourth is an Inactive Term", "demo_id_04"], ["First Active Term", "demo_id_01"])
+    end
+  end
+
+  describe "#label" do
+    it "resolves for ids of active terms" do
+      expect(service.label('demo_id_01')).to eq("First Active Term")
+    end
+
+    it "resolves for ids of inactive terms" do
+      expect(service.label('demo_id_03')).to eq("Third is an Inactive Term")
+    end
+  end
+end

data/spec/services/hyrax/lock_manager_spec.rb

@@ -0,0 +1,14 @@
+require 'spec_helper'
+
+describe Hyrax::LockManager do
+  subject do
+    described_class.new(Hyrax.config.lock_time_to_live,
+                        Hyrax.config.lock_retry_count,
+                        Hyrax.config.lock_retry_delay)
+  end
+  describe "lock", unless: ENV['TRAVIS'] do
+    it "calls the block" do
+      expect { |probe| subject.lock('foobar', &probe) }.to yield_with_no_args
+    end
+  end
+end

data/spec/services/hyrax/parent_service_spec.rb

@@ -0,0 +1,13 @@
+require 'spec_helper'
+
+RSpec.describe Hyrax::ParentService do
+  subject { described_class }
+
+  describe ".parent_for" do
+    context "when there's no ID" do
+      it "is nil" do
+        expect(subject.parent_for(nil)).to eq nil
+      end
+    end
+  end
+end

data/spec/services/hyrax/persist_derivatives_spec.rb

@@ -0,0 +1,24 @@
+require 'spec_helper'
+
+describe Hyrax::PersistDerivatives do
+  before do
+    allow(Hyrax.config).to receive(:derivatives_path).and_return('tmp')
+  end
+
+  describe '.output_file' do
+    subject { described_class.output_file(directives, &block) }
+
+    let(:directives) { { url: "file:/tmp/12/34/56/7-thumbnail.jpeg" } }
+    let(:destination_name) { 'thumbnail' }
+
+    let(:block) { -> { true } }
+
+    it 'yields to the file' do
+      expect(FileUtils).to receive(:mkdir_p).with('/tmp/12/34/56')
+      expect(File).to receive(:open).with('/tmp/12/34/56/7-thumbnail.jpeg', 'wb') do |*_, &blk|
+        expect(blk).to be(block)
+      end
+      subject
+    end
+  end
+end

data/spec/services/hyrax/persist_directly_contained_output_file_service_spec.rb

@@ -0,0 +1,14 @@
+require 'spec_helper'
+
+describe Hyrax::PersistDirectlyContainedOutputFileService do
+  let(:object)            { FileSet.create! { |fs| fs.apply_depositor_metadata('justin') } }
+  let(:file_path)         { File.join(fixture_path, 'test.tif') }
+  let(:file)              { File.new(file_path) }
+  let(:destination_name)  { 'the_derivative_name' }
+  let(:stream) { StringIO.new("fake file content") }
+
+  it "persists the file to the specified destination on the given object" do
+    described_class.call(stream, format: 'txt', url: object.uri, container: 'extracted_text')
+    expect(object.reload.extracted_text.content).to eq("fake file content")
+  end
+end

data/spec/services/hyrax/qa_select_service_spec.rb

@@ -0,0 +1,77 @@
+require 'spec_helper'
+
+RSpec.describe Hyrax::QaSelectService, no_clean: true do
+  let(:authority) do
+    # Implementing an ActiveRecord interface as required for this spec
+    # rubocop:disable RSpec/InstanceVariable
+    Class.new do
+      def initialize(map)
+        @map = map
+      end
+
+      def all
+        @map
+      end
+
+      def find(id)
+        @map.detect { |item| item[:id] == id }
+      end
+    end
+    # rubocop:enable RSpec/InstanceVariable
+  end
+  let(:authority_map) do
+    [
+      HashWithIndifferentAccess.new(term: 'Active Label', label: 'Active Label', id: 'active-id', active: true),
+      HashWithIndifferentAccess.new(term: 'Inactive Label', label: 'Inactive Label', id: 'inactive-id', active: false),
+      HashWithIndifferentAccess.new(label: 'Active No Term', id: 'active-no-term-id', active: true)
+    ]
+  end
+  before do
+    allow(Qa::Authorities::Local).to receive(:subauthority_for).with(authority_name).and_return(authority.new(authority_map))
+  end
+  let(:authority_name) { 'respect_my' }
+  let(:qa_select_service) { described_class.new(authority_name) }
+
+  describe '#select_all_options' do
+    subject { qa_select_service.select_all_options }
+    it 'will be Array of Arrays<label, id>' do
+      expect(subject).to eq([['Active Label', 'active-id'], ['Inactive Label', 'inactive-id'], ['Active No Term', 'active-no-term-id']])
+    end
+  end
+
+  describe '#select_active_options' do
+    subject { qa_select_service.select_active_options }
+    it 'will be Array of Arrays<label, id>' do
+      expect(subject).to eq([['Active Label', 'active-id'], ['Active No Term', 'active-no-term-id']])
+    end
+  end
+
+  describe '#label' do
+    context 'for item with a "term" propery' do
+      subject { qa_select_service.label('active-id') }
+      it { is_expected.to be_a(String) }
+    end
+    context 'for item without a "term" property' do
+      it 'will raise KeyError' do
+        expect { qa_select_service.label('active-no-term-id') }.to raise_error(KeyError)
+      end
+    end
+  end
+
+  describe '#active?' do
+    context 'for item with an "active" property' do
+      subject { qa_select_service.active?('active-id') }
+      it { is_expected.to be_truthy }
+    end
+    context 'for item without an "active" property' do
+      let(:authority_map) do
+        [
+          HashWithIndifferentAccess.new(term: 'term', label: 'label', id: 'with-term-no-active-state-id')
+        ]
+      end
+      it 'will raise KeyError' do
+        expect { qa_select_service.active?('with-term-no-active-state-id') }.to raise_error(KeyError)
+      end
+    end
+  end
+end

data/spec/services/hyrax/query_service_spec.rb

@@ -0,0 +1,94 @@
+describe Hyrax::QueryService do
+  let(:service) { described_class.new }
+
+  describe "#count" do
+    let!(:work) { create(:generic_work) }
+    subject { service.count }
+    it { is_expected.to eq 1 }
+  end
+
+  describe "find_by_date_created" do
+    let!(:work) { create(:generic_work) }
+    subject { service.find_by_date_created(start_date, end_date) }
+
+    context "with no start date" do
+      let(:start_date) { nil }
+      let(:end_date) { nil }
+      it { is_expected.to eq [] }
+    end
+
+    context "with no end date" do
+      let(:start_date) { 1.day.ago }
+      let(:end_date) { nil }
+      it { is_expected.to eq [work] }
+    end
+
+    context "with an end date" do
+      let(:start_date) { 1.day.ago }
+      let(:end_date) { Time.zone.now }
+      it { is_expected.to eq [work] }
+    end
+  end
+
+  describe "where_registered" do
+    subject { service.where_registered }
+    let!(:work) { create(:generic_work, read_groups: read_groups) }
+
+    context "when file is private" do
+      let(:read_groups) { ["private"] }
+      it { is_expected.to eq [] }
+    end
+
+    context "when file is public" do
+      let(:read_groups) { ["public"] }
+      it { is_expected.to eq [] }
+    end
+
+    context "when file is registered" do
+      it { is_expected.to eq [work] }
+      let(:read_groups) { ["registered"] }
+    end
+  end
+
+  describe "where_public" do
+    subject { service.where_public }
+    let!(:work) { create(:generic_work, read_groups: read_groups) }
+
+    context "when file is private" do
+      let(:read_groups) { ["private"] }
+      it { is_expected.to eq [] }
+    end
+
+    context "when file is public" do
+      let(:read_groups) { ["public"] }
+      it { is_expected.to eq [work] }
+    end
+
+    context "when file is registered" do
+      it { is_expected.to eq [] }
+      let(:read_groups) { ["registered"] }
+    end
+  end
+
+  describe "#find_registered_in_date_range" do
+    subject { service.find_registered_in_date_range(start_date, end_date) }
+    let(:start_date) { 1.day.ago }
+    let(:end_date) { Time.zone.now }
+    it "is a relation" do
+      allow(service).to receive(:build_date_query).with(start_date, end_date).and_return('date query')
+      expect(subject).to be_kind_of ActiveFedora::Relation
+      expect(subject.values).to eq(where: ["(date query)", "_query_:\"{!field f=read_access_group_ssim}registered\""])
+    end
+  end
+
+  describe "#find_public_in_date_range" do
+    subject { service.find_public_in_date_range(start_date, end_date) }
+    let(:start_date) { 1.day.ago }
+    let(:end_date) { Time.zone.now }
+    it "is a relation" do
+      allow(service).to receive(:build_date_query).with(start_date, end_date).and_return('date query')
+      expect(subject).to be_kind_of ActiveFedora::Relation
+      expect(subject.values).to eq(where: ["(date query)", "_query_:\"{!field f=read_access_group_ssim}public\""])
+    end
+  end
+end