geo_works 0.1.0

data/spec/forms/geo_works/basic_geo_metadata_form_spec.rb

@@ -0,0 +1,31 @@
+require 'spec_helper'
+
+describe GeoWorks::BasicGeoMetadataForm do
+  before do
+    class TestModel < ActiveFedora::Base
+      property :coverage, predicate: ::RDF::Vocab::DC11.coverage, multiple: false
+
+      def member_of_collection_ids
+        nil
+      end
+    end
+
+    class TestForm < Hyrax::Forms::WorkForm
+      include GeoWorks::BasicGeoMetadataForm
+      self.model_class = TestModel
+    end
+  end
+
+  after do
+    Object.send(:remove_const, :TestForm)
+    Object.send(:remove_const, :TestModel)
+  end
+
+  let(:object) { TestModel.new(coverage: GeoWorks::Coverage.new(43.039, -69.856, 42.943, -71.032).to_s) }
+  let(:form) { TestForm.new(object, nil, nil) }
+
+  describe '.terms' do
+    subject { form.terms }
+    it { is_expected.to include(:coverage) }
+  end
+end

data/spec/forms/geo_works/external_metadata_file_form_spec.rb

@@ -0,0 +1,30 @@
+require 'spec_helper'
+
+describe GeoWorks::ExternalMetadataFileForm do
+  before do
+    class TestModel < ActiveFedora::Base
+      def member_of_collection_ids
+        nil
+      end
+    end
+
+    class TestForm < Hyrax::Forms::WorkForm
+      include GeoWorks::ExternalMetadataFileForm
+      self.model_class = TestModel
+    end
+  end
+
+  after do
+    Object.send(:remove_const, :TestForm)
+    Object.send(:remove_const, :TestModel)
+  end
+
+  let(:object) { TestModel.new }
+  let(:form) { TestForm.new(object, nil, nil) }
+
+  describe '.triggers' do
+    it 'has should_populate_metadata trigger attribute' do
+      expect(form.respond_to?(:should_populate_metadata)).to be_truthy
+    end
+  end
+end

data/spec/forms/geo_works/georeferenced_form_spec.rb

@@ -0,0 +1,33 @@
+require 'spec_helper'
+
+describe GeoWorks::GeoreferencedForm do
+  before do
+    class TestModel < ActiveFedora::Base
+      property :cartographic_projection,
+               predicate: ::RDF::URI.new('http://bibframe.org/vocab/cartographicProjection'),
+               multiple: false
+
+      def member_of_collection_ids
+        nil
+      end
+    end
+
+    class TestForm < Hyrax::Forms::WorkForm
+      include GeoWorks::GeoreferencedForm
+      self.model_class = TestModel
+    end
+  end
+
+  after do
+    Object.send(:remove_const, :TestForm)
+    Object.send(:remove_const, :TestModel)
+  end
+
+  let(:object) { TestModel.new(cartographic_projection: 'urn:ogc:def:crs:EPSG:6.3:26986') }
+  let(:form) { TestForm.new(object, nil, nil) }
+
+  describe '.terms' do
+    subject { form.terms }
+    it { is_expected.to include(:cartographic_projection) }
+  end
+end

data/spec/forms/hyrax/image_work_form_spec.rb

@@ -0,0 +1,11 @@
+require 'spec_helper'
+
+describe Hyrax::ImageWorkForm do
+  let(:coverage) { GeoWorks::Coverage.new(43.039, -69.856, 42.943, -71.032) }
+  let(:raw_attributes) { ActionController::Parameters.new(coverage: coverage.to_s) }
+
+  describe ".model_attributes" do
+    subject { described_class.model_attributes(raw_attributes).to_unsafe_h }
+    it { is_expected.to include('coverage' => coverage.to_s) }
+  end
+end

data/spec/forms/hyrax/raster_work_form_spec.rb

@@ -0,0 +1,17 @@
+require 'spec_helper'
+
+describe Hyrax::RasterWorkForm do
+  let(:coverage) { GeoWorks::Coverage.new(43.039, -69.856, 42.943, -71.032) }
+  let(:raw_attributes) { ActionController::Parameters.new(
+    coverage: coverage.to_s,
+    cartographic_projection: 'urn:ogc:def:crs:EPSG:6.3:26986')
+  }
+
+  describe '.model_attributes' do
+    subject { described_class.model_attributes(raw_attributes) }
+    it 'has the correct attributes' do
+      expect(subject['coverage']).to eq coverage.to_s
+      expect(subject['cartographic_projection']).to eq 'urn:ogc:def:crs:EPSG:6.3:26986'
+    end
+  end
+end

data/spec/forms/hyrax/vector_work_form_spec.rb

@@ -0,0 +1,17 @@
+require 'spec_helper'
+
+describe Hyrax::VectorWorkForm do
+  let(:coverage) { GeoWorks::Coverage.new(43.039, -69.856, 42.943, -71.032) }
+  let(:raw_attributes) { ActionController::Parameters.new(
+    coverage: coverage.to_s,
+    cartographic_projection: 'urn:ogc:def:crs:EPSG:6.3:26986')
+  }
+
+  describe '.model_attributes' do
+    subject { described_class.model_attributes(raw_attributes) }
+    it 'has the correct attributes' do
+      expect(subject['coverage']).to eq coverage.to_s
+      expect(subject['cartographic_projection']).to eq 'urn:ogc:def:crs:EPSG:6.3:26986'
+    end
+  end
+end

data/spec/helpers/bounding_box_helper_spec.rb

@@ -0,0 +1,39 @@
+require 'spec_helper'
+
+describe GeoWorks::BoundingBoxHelper do
+  let(:property) { :coverage }
+  let(:helper) { TestingHelper.new }
+  before do
+    class TestingHelper
+      include GeoWorks::BoundingBoxHelper
+
+      def curation_concern
+      end
+    end
+  end
+  after do
+    Object.send(:remove_const, :TestingHelper)
+  end
+
+  before do
+    vector_work = instance_double('vector_work', class: VectorWork)
+    allow(helper).to receive(:curation_concern).and_return(vector_work)
+  end
+
+  describe '#bbox' do
+    it 'builds bounding box selector' do
+      expect(helper.bbox(property)).to include("{inputId: vector_work_coverage})")
+    end
+  end
+
+  describe '#bbox_display_inputs' do
+    subject { helper.bbox_display_inputs }
+    it { is_expected.to include('North', 'East', 'South', 'West') }
+  end
+
+  describe '#base_input_id' do
+    it 'returns the id of the bounding box input element' do
+      expect(helper.bbox_input_id(property)).to eq('vector_work_coverage')
+    end
+  end
+end

data/spec/helpers/geo_works/file_set_actions_helper_spec.rb

@@ -0,0 +1,70 @@
+require 'spec_helper'
+
+describe GeoWorks::FileSetActionsHelper do
+  let(:helper) { TestingHelper.new }
+
+  before do
+    class TestingHelper
+      include GeoWorks::FileSetActionsHelper
+
+      def render(partial, locals = {})
+      end
+    end
+  end
+
+  after do
+    Object.send(:remove_const, :TestingHelper)
+  end
+
+  let(:presenter) { GeoWorks::GeoWorksShowPresenter.new(solr_document, nil) }
+  let(:solr_document) { SolrDocument.new(geo_mime_type_ssim: [geo_mime_type]) }
+
+  describe '#file_set_actions' do
+    let(:geo_mime_type) { 'image/tiff' }
+
+    before do
+      allow(helper).to receive(:file_set_actions_partial).with(presenter)
+        .and_return('geo_works/file_sets/actions/image_actions')
+    end
+
+    it "renders a partial" do
+      expect(helper).to receive(:render)
+        .with('geo_works/file_sets/actions/image_actions', file_set: presenter)
+      helper.file_set_actions(presenter)
+    end
+    it "takes options" do
+      expect(helper).to receive(:render)
+        .with('geo_works/file_sets/actions/image_actions', file_set: presenter, bbox: '123')
+      helper.file_set_actions(presenter, bbox: '123')
+    end
+  end
+
+  describe '#file_set_actions_partial' do
+    subject { helper.file_set_actions_partial(presenter) }
+
+    context "with an image file" do
+      let(:geo_mime_type) { 'image/tiff' }
+      it { is_expected.to eq 'geo_works/file_sets/actions/image_actions' }
+    end
+
+    context "with a vector file" do
+      let(:geo_mime_type) { 'application/vnd.geo+json' }
+      it { is_expected.to eq 'geo_works/file_sets/actions/vector_actions' }
+    end
+
+    context "with a raster file" do
+      let(:geo_mime_type) { 'text/plain; gdal-format=USGSDEM' }
+      it { is_expected.to eq 'geo_works/file_sets/actions/raster_actions' }
+    end
+
+    context "with a metadata file" do
+      let(:geo_mime_type) { 'application/xml; schema=fgdc' }
+      it { is_expected.to eq 'geo_works/file_sets/actions/metadata_actions' }
+    end
+
+    context "with anything else" do
+      let(:geo_mime_type) { 'application/binary' }
+      it { is_expected.to eq 'geo_works/file_sets/actions/default_actions' }
+    end
+  end
+end

data/spec/helpers/geo_works/populate_metadata_helper_spec.rb

@@ -0,0 +1,31 @@
+require 'spec_helper'
+
+describe GeoWorks::GeoWorksHelper do
+  let(:helper) { TestingHelper.new }
+  let(:show_presenter) { instance_double('ShowPresenter', class: GeoWorks::GeoWorksShowPresenter) }
+  let(:file_presenter) { instance_double('FilePresenter', class: Hyrax::FileSetPresenter) }
+  let(:file_presenters) { [file_presenter] }
+  before do
+    class TestingHelper
+      include GeoWorks::PopulateMetadataHelper
+
+      def curation_concern
+      end
+    end
+  end
+  after do
+    Object.send(:remove_const, :TestingHelper)
+  end
+
+  describe '#external_metadata_file_presenters' do
+    before do
+      allow(GeoWorks::GeoWorksShowPresenter).to receive(:new).and_return(show_presenter)
+    end
+
+    it 'returns an array of external_metadata_file_presenters' do
+      expect(show_presenter).to receive(:external_metadata_file_set_presenters).and_return(file_presenters)
+      expect(helper).to receive(:curation_concern)
+      expect(helper.external_metadata_file_presenters).to eq(file_presenters)
+    end
+  end
+end

data/spec/helpers/geo_works_helper_spec.rb

@@ -0,0 +1,30 @@
+require 'spec_helper'
+
+describe GeoWorks::GeoWorksHelper do
+  let(:helper) { TestingHelper.new }
+  let(:presenter) { instance_double('Presenter', class: GeoWorks::ImageWorkShowPresenter) }
+  before do
+    class TestingHelper
+      include GeoWorks::GeoWorksHelper
+    end
+  end
+  after do
+    Object.send(:remove_const, :TestingHelper)
+  end
+
+  describe '#child_geo_works_type' do
+    it 'returns a the child work type name' do
+      expect(helper.child_geo_works_type(presenter)).to eq 'Raster'
+    end
+  end
+
+  describe '#geo_work_type' do
+    before do
+      allow(presenter).to receive(:human_readable_type).and_return('ImageWork')
+    end
+
+    it 'returns a the work type name' do
+      expect(helper.geo_work_type(presenter)).to eq 'Image'
+    end
+  end
+end

data/spec/jobs/geoblacklight_job_spec.rb

@@ -0,0 +1,18 @@
+require 'spec_helper'
+require 'uri'
+
+describe GeoWorks::GeoblacklightJob do
+  let(:message) { { 'id' => 'ab', 'event' => 'CREATED' } }
+
+  describe '#perform' do
+    let(:processor) { instance_double('GeoWorks::GeoblacklightEventProcessor') }
+
+    context 'local image file' do
+      it 'delegates to DeliveryService' do
+        expect(GeoWorks::GeoblacklightEventProcessor).to receive(:new).with(message).and_return(processor)
+        expect(processor).to receive(:process)
+        subject.perform(message)
+      end
+    end
+  end
+end

data/spec/jobs/geoserver_delivery_job_spec.rb

@@ -0,0 +1,45 @@
+require 'spec_helper'
+require 'uri'
+
+describe GeoWorks::GeoserverDeliveryJob do
+  let(:id) { 'ab' }
+  let(:message) { { 'id' => id, 'event' => 'CREATED', "exchange" => :geoserver } }
+  let(:content_url) { 'file:/somewhere-to-display-copy' }
+  let(:file_format) { 'application/zip; ogr-format="ESRI Shapefile"' }
+  let(:file_set) { instance_double(FileSet, id: id, geo_mime_type: file_format) }
+
+  before do
+    allow(ActiveFedora::Base).to receive(:find).and_return(file_set)
+    allow(Hyrax.config).to receive(:derivatives_path).and_return(content_url)
+  end
+
+  describe '#perform' do
+    let(:service) { instance_double('GeoWorks::DeliveryService') }
+    context 'local vector file' do
+      it 'delegates to DeliveryService' do
+        file_path = "#{content_url}/#{id}-display_vector.zip"
+        expect(GeoWorks::DeliveryService).to receive(:new).with(file_set, URI(file_path).path).and_return(service)
+        expect(service).to receive(:publish)
+        subject.perform(message)
+      end
+    end
+
+    context 'local raster file' do
+      let(:file_format) { 'image/tiff; gdal-format=GTiff' }
+      it 'delegates to DeliveryService' do
+        file_path = "#{content_url}/#{id}-display_raster.tif"
+        expect(GeoWorks::DeliveryService).to receive(:new).with(file_set, URI(file_path).path).and_return(service)
+        expect(service).to receive(:publish)
+        subject.perform(message)
+      end
+    end
+
+    context 'local image file' do
+      let(:file_format) { 'image/jpeg' }
+      it 'delegates to DeliveryService' do
+        expect(GeoWorks::DeliveryService).not_to receive(:new)
+        subject.perform(message)
+      end
+    end
+  end
+end

data/spec/models/concerns/basic_geo_metadata_spec.rb

@@ -0,0 +1,21 @@
+require 'spec_helper'
+
+RSpec.describe GeoWorks::BasicGeoMetadata do
+  subject { VectorWork.new }
+
+  it 'inherits the specified properties' do
+    %w(title date_uploaded date_modified contributor creator date_created
+       description identifier language part_of publisher resource_type
+       rights source subject keyword).map(&:to_sym).each do |p|
+      expect(subject.respond_to?(p)).to be_truthy
+      expect(subject.respond_to?("#{p}=".to_sym)).to be_truthy
+    end
+  end
+
+  it 'defines the specified properties' do
+    %w(coverage provenance spatial temporal issued).map(&:to_sym).each do |p|
+      expect(subject.respond_to?(p)).to be_truthy
+      expect(subject.respond_to?("#{p}=".to_sym)).to be_truthy
+    end
+  end
+end

data/spec/models/concerns/geo_works/file_set/derivatives_spec.rb

@@ -0,0 +1,102 @@
+require 'spec_helper'
+
+shared_examples 'a set of raster derivatives' do
+  let(:generator) { instance_double(GeoWorks::EventsGenerator) }
+  before do
+    allow(GeoWorks::EventsGenerator).to receive(:new).and_return(generator)
+    allow(generator).to receive(:derivatives_created)
+  end
+  it 'makes a thumbnail' do
+    new_thumb = "#{Rails.root}/tmp/derivatives/#{file_set.id}/thumbnail.thumbnail"
+    expect(generator).to receive(:derivatives_created).with(file_set)
+    expect {
+      file_set.create_derivatives(file_name)
+    }.to change { Dir[new_thumb].empty? }
+      .from(true).to(false)
+  end
+
+  it 'makes a display raster' do
+    new_thumb = "#{Rails.root}/tmp/derivatives/#{file_set.id}/display_raster.display_raster"
+    expect {
+      file_set.create_derivatives(file_name)
+    }.to change { Dir[new_thumb].empty? }
+      .from(true).to(false)
+  end
+end
+
+shared_examples 'a set of vector derivatives' do
+  let(:generator) { instance_double(GeoWorks::EventsGenerator) }
+  before do
+    allow(GeoWorks::EventsGenerator).to receive(:new).and_return(generator)
+    allow(generator).to receive(:derivatives_created)
+  end
+  it 'makes a thumbnail' do
+    new_thumb = "#{Rails.root}/tmp/derivatives/#{file_set.id}/thumbnail.thumbnail"
+    expect(generator).to receive(:derivatives_created).with(file_set)
+    expect {
+      file_set.create_derivatives(file_name)
+    }.to change { Dir[new_thumb].empty? }
+      .from(true).to(false)
+  end
+
+  it 'makes a display vector' do
+    new_thumb = "#{Rails.root}/tmp/derivatives/#{file_set.id}/display_vector.display_vector"
+    expect {
+      file_set.create_derivatives(file_name)
+    }.to change { Dir[new_thumb].empty? }
+      .from(true).to(false)
+  end
+end
+
+describe Hyrax::FileSet do
+  let(:file_set) { FileSet.create { |gf| gf.apply_depositor_metadata('geonerd@example.com') } }
+
+  before do
+    allow(file_set).to receive(:geo_mime_type).and_return(geo_mime_type)
+
+    allow(Hyrax::DerivativePath).to receive(:derivative_path_for_reference) do |object, key|
+      "#{Rails.root}/tmp/derivatives/#{object.id}/#{key}.#{key}"
+    end
+  end
+
+  after do
+    dir = File.join(Hyrax.config.derivatives_path, file_set.id)
+    FileUtils.rm_r(dir) if File.directory?(dir)
+  end
+
+  describe 'geo derivatives' do
+    describe 'vector processing' do
+      context 'with a shapefile' do
+        let(:geo_mime_type) { 'application/zip; ogr-format="ESRI Shapefile"' }
+        let(:file_name) { File.join(fixture_path, 'files', 'tufts-cambridgegrid100-04.zip') }
+        it_behaves_like 'a set of vector derivatives'
+      end
+
+      context 'with a geojson file' do
+        let(:geo_mime_type) { 'application/vnd.geo+json' }
+        let(:file_name) { File.join(fixture_path, 'files', 'mercer.json') }
+        it_behaves_like 'a set of vector derivatives'
+      end
+    end
+
+    describe 'raster processing' do
+      context 'with a geo tiff file' do
+        let(:geo_mime_type) { 'image/tiff; gdal-format=GTiff' }
+        let(:file_name) { File.join(fixture_path, 'files', 'S_566_1914_clip.tif') }
+        it_behaves_like 'a set of raster derivatives'
+      end
+
+      context 'with a usgs ascii dem file' do
+        let(:geo_mime_type) { 'text/plain; gdal-format=USGSDEM' }
+        let(:file_name) { File.join(fixture_path, 'files', 'shandaken_clip.dem') }
+        it_behaves_like 'a set of raster derivatives'
+      end
+
+      context 'with an arc/info binary grid file' do
+        let(:geo_mime_type) { 'application/octet-stream; gdal-format=AIG' }
+        let(:file_name) { File.join(fixture_path, 'files', 'precipitation.zip') }
+        it_behaves_like 'a set of raster derivatives'
+      end
+    end
+  end
+end