blacklight-maps 0.0.1 → 0.1.0

data/spec/helpers/blacklight_maps_helper_spec.rb

@@ -1,28 +1,62 @@
+# -*- encoding : utf-8 -*-
 require 'spec_helper'
 
 describe BlacklightMapsHelper do
-  include ERB::Util
-  include BlacklightMapsHelper
 
   let(:blacklight_config) { Blacklight::Configuration.new }
- 
-  describe "show_map_div" do
-    before :each do
-      helper.stub(blacklight_config: blacklight_config)
+
+  def create_response
+    raw_response = eval(mock_query_response)
+    Blacklight::SolrResponse.new(raw_response, raw_response['params'])
+  end
+
+  let(:r) { create_response }
+
+  before :each do
+    CatalogController.blacklight_config = Blacklight::Configuration.new
+    CatalogController.configure_blacklight do |config|
+      config.view.maps.type = 'placename_coord'
+
+      # These fields also need to be added for some reason for the tests to pass
+      # Link in list is not being generated correctly if not passed
+      config.index.title_field = 'title_display'
     end
+    helper.stub(blacklight_config: blacklight_config)
+    helper.instance_variable_set(:@response, r)
+    @request = ActionDispatch::TestRequest.new
+    @catalog = CatalogController.new
+    @catalog.request = @request
+    helper.instance_variable_set(:@_controller, @catalog)
+  end
+
+  describe "#blacklight_map_tag" do
 
-    it "should have #map div" do
-      expect(helper.show_map_div).to have_selector("div#blacklight-map")
+    context "with default values" do
+      subject { helper.blacklight_map_tag('blacklight-map') }
+      it { should have_selector "div#blacklight-map" }
+      it { should have_selector "div[data-maxzoom='8'][data-tileurl='http://{s}.tile.openstreetmap.org/{z}/{x}/{y}.png'][data-mapattribution='Map data &copy; <a href=\"http://openstreetmap.org\">OpenStreetMap</a> contributors, <a href=\"http://creativecommons.org/licenses/by-sa/2.0/\">CC-BY-SA</a>']" }
     end
 
-    it "should contain data-attributes" do
-      expect(helper.show_map_div).to have_selector("div[data-maxzoom='8']")
+    context "with custom values" do
+     subject { helper.blacklight_map_tag('blacklight-map', data: {maxzoom: 6, tileurl: 'http://example.com/', mapattribution: 'hello world' }) }
+     it { should have_selector "div[data-maxzoom='6'][data-tileurl='http://example.com/'][data-mapattribution='hello world']" }
     end
 
+    context "when a block is provided" do
+      subject { helper.blacklight_map_tag('foo') { content_tag(:span, 'bar') } }
+      it { should have_selector('div > span', text: 'bar') }
+    end
+
+  end
+
+  describe "serialize_geojson" do
+    it "should return geojson of documents" do
+      expect(helper.serialize_geojson).to include('{"type":"FeatureCollection","features":[{"type":"Feature","geometry":{"type":"Point"')
+    end
   end
 
-  # TODO Test geoJSON serialization
- 
-  
+  def mock_query_response
+    %({"responseHeader"=>{"status"=>0, "QTime"=>14, "params"=>{"q"=>"tibet", "spellcheck.q"=>"tibet", "qt"=>"search", "wt"=>"ruby", "rows"=>"10"}}, "response"=>{"numFound"=>2, "start"=>0, "maxScore"=>0.016135123, "docs"=>[{"published_display"=>["Dharamsala, H.P."], "author_display"=>"Thub-bstan-yar-ʼphel, Rnam-grwa", "lc_callnum_display"=>["DS785 .T475 2005"], "pub_date"=>["2005"], "format"=>"Book", "material_type_display"=>["a-e, iv, ii, 407 p."], "title_display"=>"Bod gaṅs can gyi rgyal rabs mdor bsdus dris lan brgya pa rab gsal śel gyi me loṅ źes bya ba bźugs so", "id"=>"2008308202", "subject_geo_facet"=>["Tibet (China)"], "language_facet"=>["Tibetan"], "placename_coords"=>["Tibet (China)-|-29.646923-|-91.117212"], "place_bbox"=>"78.3955448 26.8548157 99.116241 36.4833345", "score"=>0.016135123}, {"published_display"=>["Dharamsala, Distt. Kangra, H.P."], "pub_date"=>["2007"], "format"=>"Book", "title_display"=>"Ses yon", "material_type_display"=>["xii, 419 p."], "id"=>"2008308478", "subject_geo_facet"=>["China", "Tibet", "India"], "subject_topic_facet"=>["Education and state", "Tibetans", "Tibetan language", "Teaching"], "language_facet"=>["Tibetan"], "placename_coords"=>["China-|-35.86166-|-104.195397", "Tibet-|-29.646923-|-91.117212", "India-|-20.593684-|-78.96288"], "place_bbox"=>"68.162386 6.7535159 97.395555 35.5044752", "score"=>0.0026767207}]}, "facet_counts"=>{"facet_queries"=>{}, "facet_fields"=>{"format"=>["Book", 2], "lc_1letter_facet"=>["D - World History", 1], "lc_alpha_facet"=>["DS", 1], "lc_b4cutter_facet"=>["DS785", 1], "language_facet"=>["Tibetan", 2], "pub_date"=>["2005", 1, "2007", 1], "subject_era_facet"=>[], "subject_geo_facet"=>["China", 1, "India", 1, "Tibet", 1, "Tibet (China)", 1], "subject_topic_facet"=>["Education and state", 1, "Teaching", 1, "Tibetan language", 1, "Tibetans", 1]}, "facet_dates"=>{}, "facet_ranges"=>{}}, "spellcheck"=>{"suggestions"=>["tibet", {"numFound"=>1, "startOffset"=>0, "endOffset"=>5, "origFreq"=>2, "suggestion"=>[{"word"=>"tibetan", "freq"=>6}]}, "correctlySpelled", true]}})
+  end
 
-end
+end

data/spec/lib/blacklight/maps/export_spec.rb

@@ -0,0 +1,69 @@
+require 'spec_helper'
+
+describe "BlacklightMaps::GeojsonExport" do
+
+  before do
+    CatalogController.blacklight_config = Blacklight::Configuration.new
+    CatalogController.configure_blacklight do |config|
+      config.view.maps.type = 'placename_coord'
+
+      # These fields also need to be added for some reason for the tests to pass
+      # Link in list is not being generated correctly if not passed
+      config.index.title_field = 'title_display'
+    end
+    @controller = CatalogController.new
+    @request = ActionDispatch::TestRequest.new
+    @controller.request = @request
+    @response = ActionDispatch::TestResponse.new
+    @response.stub(:docs) {[{ "published_display"=>["Dharamsala, Distt. Kangra, H.P."], "pub_date"=>["2007"], "format"=>"Book", "title_display"=>"Ses yon", "material_type_display"=>["xii, 419 p."], "id"=>"2008308478", "subject_geo_facet"=>["China", "Tibet", "India"], "subject_topic_facet"=>["Education and state", "Tibetans", "Tibetan language", "Teaching"], "language_facet"=>["Tibetan"], "placename_coords"=>["China-|-35.86166-|-104.195397", "Tibet-|-29.646923-|-91.117212", "India-|-20.593684-|-78.96288"], "place_bbox"=>["68.162386 6.7535159 97.395555 35.5044752"], "score"=>0.0026767207 }]}
+  end
+
+  subject {BlacklightMaps::GeojsonExport.new(@controller, @response.docs)}
+
+  it "should instantiate GeojsonExport" do
+    expect(subject.class).to eq(::BlacklightMaps::GeojsonExport)
+  end
+
+  it "should return maps config" do
+    expect(subject.send(:blacklight_maps_config).class).to eq(::Blacklight::Configuration::ViewConfig)
+  end
+
+  it "should return type" do
+    expect(subject.send(:type)).to eq('placename_coord')
+  end
+
+  it "should return placename field" do
+    expect(subject.send(:placename_coord_field)).to eq('placename_coords')
+  end
+
+  it "should return placename delimiter" do
+    expect(subject.send(:placename_coord_delimiter)).to eq('-|-')
+  end
+
+  it "should return bbox field" do
+    expect(subject.send(:bbox_field)).to eq('place_bbox')
+  end
+
+  it "should return point feature with no properties" do
+    expect(subject.send(:build_point_feature, 100, -50)).to eq({:type=>"Feature", :geometry=>{:type=>"Point", :coordinates=>[100.0, -50.0]}, :properties=>{}})
+  end
+
+  it "should return point feature with properties" do
+    expect(subject.send(:build_point_feature, 100, -50, { name: 'Jane Smith' })[:properties]).to have_key(:name)
+  end
+
+  it "should build bbox correct features" do
+    expect(subject.send(:build_bbox_features).length).to eq(1)
+    expect(subject.send(:build_bbox_features)[0][:geometry][:type]).to eq('Point')
+  end
+
+  it "should render correct sidebar div" do
+    expect(subject.send(:render_leaflet_sidebar_partial, @response.docs[0])).to include('href="/catalog/2008308478">')
+  end
+
+  it "should render feature collection as json" do
+    expect(subject.to_geojson).to include('{"type":"FeatureCollection","features":[{"type":"Feature","geometry":{"type":"Point"')
+  end
+
+
+end

data/spec/lib/blacklight/maps/geometry_spec.rb

@@ -0,0 +1,19 @@
+require 'spec_helper'
+
+describe "BlacklightMaps::Geometry::BoundingBox" do
+
+  let(:bbox) { BlacklightMaps::Geometry::BoundingBox.from_lon_lat_string('-100 -50 100 50') }
+  let(:bbox_california) { BlacklightMaps::Geometry::BoundingBox.from_lon_lat_string('-124.4096196 32.5342321 -114.131211 42.0095169') }
+
+  it "should instantiate Geometry::BoundingBox" do
+    expect(bbox.class).to eq(::BlacklightMaps::Geometry::BoundingBox)
+  end
+
+  it "should return center of simple bounding box" do
+    expect(bbox.find_center).to eq([0.0, 0.0])
+  end
+
+  it "should return center of California bounding box" do
+    expect(bbox_california.find_center).to eq([-119.2704153, 37.271874499999996])
+  end
+end

data/spec/spec_helper.rb

@@ -35,4 +35,4 @@ require 'capybara/rspec'
 
 RSpec.configure do |config|
 
-end
+end

metadata

@@ -1,7 +1,7 @@
 --- !ruby/object:Gem::Specification
 name: blacklight-maps
 version: !ruby/object:Gem::Version
-  version: 0.0.1
+  version: 0.1.0
 platform: ruby
 authors:
 - Chris Beer
@@ -9,7 +9,7 @@ authors:
 autorequire: 
 bindir: bin
 cert_chain: []
-date: 2014-03-12 00:00:00.000000000 Z
+date: 2014-03-26 00:00:00.000000000 Z
 dependencies:
 - !ruby/object:Gem::Dependency
   name: rails
@@ -222,6 +222,8 @@ files:
 - docs/map-view.png
 - lib/blacklight/maps.rb
 - lib/blacklight/maps/engine.rb
+- lib/blacklight/maps/export.rb
+- lib/blacklight/maps/geometry.rb
 - lib/blacklight/maps/version.rb
 - lib/generators/blacklight_maps/install_generator.rb
 - lib/generators/blacklight_maps/templates/blacklight_maps.css.scss
@@ -231,6 +233,8 @@ files:
 - spec/features/maps_spec.rb
 - spec/fixtures/sample_solr_documents.yml
 - spec/helpers/blacklight_maps_helper_spec.rb
+- spec/lib/blacklight/maps/export_spec.rb
+- spec/lib/blacklight/maps/geometry_spec.rb
 - spec/spec_helper.rb
 - spec/test_app_templates/Gemfile.extra
 - spec/test_app_templates/lib/generators/test_app_generator.rb
@@ -262,6 +266,8 @@ test_files:
 - spec/features/maps_spec.rb
 - spec/fixtures/sample_solr_documents.yml
 - spec/helpers/blacklight_maps_helper_spec.rb
+- spec/lib/blacklight/maps/export_spec.rb
+- spec/lib/blacklight/maps/geometry_spec.rb
 - spec/spec_helper.rb
 - spec/test_app_templates/Gemfile.extra
 - spec/test_app_templates/lib/generators/test_app_generator.rb