pepe-graticule 0.2.11

data/test/fixtures/responses/multimap/missing_params.xml

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="UTF-8" ?> 
+<Results xmlns="http://clients.multimap.com/API" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+xsi:schemaLocation="http://clients.multimap.com/API http://clients.multimap.com/Schema/geocode_1.2.xsd" 
+errorCode="MM_GEOCODE_REQUIRED_PARAMETERS_MISSING" locationCount="0" />

data/test/fixtures/responses/multimap/no_matches.xml

@@ -0,0 +1,4 @@
+<?xml version="1.0" encoding="UTF-8" ?> 
+<Results xmlns="http://clients.multimap.com/API" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+xsi:schemaLocation="http://clients.multimap.com/API http://clients.multimap.com/Schema/geocode_1.2.xsd" 
+errorCode="MM_GEOCODE_NO_MATCHES" locationCount="0" />

data/test/fixtures/responses/multimap/success.xml

@@ -0,0 +1,19 @@
+<?xml version="1.0" encoding="UTF-8" ?>
+<Results xmlns="http://clients.multimap.com/API" xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" 
+xsi:schemaLocation="http://clients.multimap.com/API http://clients.multimap.com/Schema/geocode_1.2.xsd" locationCount="1">
+ <Location geocodeQuality="1">
+  <Address>
+    <Street>Oxford Street</Street>
+   <Areas>
+    <Area>LONDON</Area> 
+   </Areas>
+    <PostalCode>W1</PostalCode>
+    <DisplayName>Oxford Street, LONDON, W1</DisplayName> 
+    <CountryCode>GB</CountryCode> 
+  </Address>
+  <Point>
+    <Lat>51.51452</Lat>
+    <Lon>-0.14839</Lon>
+  </Point>
+ </Location>
+</Results>

data/test/fixtures/responses/postcode_anywhere/badkey.xml

@@ -0,0 +1,9 @@
+<PostcodeAnywhere Server="WS12" Version="3.0" Date="12/03/2007 15:43:33" Duration="0.016s">
+  <Schema Items="2">
+    <Field Name="error_number"/>
+    <Field Name="message"/>
+  </Schema>
+  <Data Items="1">
+    <Item error_number="6" message="License key was not recognised"/>
+  </Data>
+</PostcodeAnywhere>

data/test/fixtures/responses/postcode_anywhere/canada.xml

@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PostcodeAnywhere Server="WS12" Version="3.0" Date="17/03/2007 19:01:05" Duration="1.109s">
+  <Schema Items="8">
+    <Field Name="line1"/>
+    <Field Name="line2"/>
+    <Field Name="city"/>
+    <Field Name="state"/>
+    <Field Name="postal_code"/>
+    <Field Name="country"/>
+    <Field Name="longitude"/>
+    <Field Name="latitude"/>
+  </Schema>
+  <Data Items="1">
+    <Item line1="204 Campbell Ave" city="Revelstoke" state="BC" postal_code="V0E" country="Canada" longitude="-118.196970002204" latitude="50.9997350418267"/>
+  </Data>
+</PostcodeAnywhere>

data/test/fixtures/responses/postcode_anywhere/empty.xml

@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PostcodeAnywhere Version="3.0" Server="WS03" Date="17/03/2007 19:26:33" Duration="0.016s">
+  <Schema Items="10">
+    <Field Name="id"/>
+    <Field Name="seq"/>
+    <Field Name="location"/>
+    <Field Name="grid_east_m"/>
+    <Field Name="grid_north_m"/>
+    <Field Name="longitude"/>
+    <Field Name="latitude"/>
+    <Field Name="os_reference"/>
+    <Field Name="wgs84_longitude"/>
+    <Field Name="wgs84_latitude"/>
+  </Schema>
+  <Data Items="0"/>
+</PostcodeAnywhere>

data/test/fixtures/responses/postcode_anywhere/success.xml

@@ -0,0 +1,16 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PostcodeAnywhere Server="WS11" Version="3.0" Date="17/03/2007 18:12:11" Duration="1.703s">
+  <Schema Items="8">
+    <Field Name="line1"/>
+    <Field Name="line2"/>
+    <Field Name="city"/>
+    <Field Name="state"/>
+    <Field Name="postal_code"/>
+    <Field Name="country"/>
+    <Field Name="longitude"/>
+    <Field Name="latitude"/>
+  </Schema>
+  <Data Items="1">
+    <Item line1="204 Campbell Ave" city="Revelstoke" state="BC" postal_code="V0E" country="Canada" longitude="-118.196970002204" latitude="50.9997350418267"/>
+  </Data>
+</PostcodeAnywhere>

data/test/fixtures/responses/postcode_anywhere/uk.xml

@@ -0,0 +1,18 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<PostcodeAnywhere Server="WS12" Version="3.0" Date="17/03/2007 19:01:39" Duration="2.422s">
+  <Schema Items="10">
+    <Field Name="id"/>
+    <Field Name="seq"/>
+    <Field Name="location"/>
+    <Field Name="grid_east_m"/>
+    <Field Name="grid_north_m"/>
+    <Field Name="longitude"/>
+    <Field Name="latitude"/>
+    <Field Name="os_reference"/>
+    <Field Name="wgs84_longitude"/>
+    <Field Name="wgs84_latitude"/>
+  </Schema>
+  <Data Items="1">
+    <Item id="17783983.00" seq="0" location="80 Wood Lane London NW9" grid_east_m="521000" grid_north_m="187500" longitude="-0.253788666693255" latitude="51.5728910186362" os_reference="TQ 21000 87500" wgs84_longitude="-0.255365891581496" wgs84_latitude="51.5733397173092"/>
+  </Data>
+</PostcodeAnywhere>

data/test/fixtures/responses/yahoo/success.xml

@@ -0,0 +1,3 @@
+<?xml version="1.0"?>
+<ResultSet xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns="urn:yahoo:maps" xsi:schemaLocation="urn:yahoo:maps http://api.local.yahoo.com/MapsService/V1/GeocodeResponse.xsd"><Result precision="address" warning="The exact location could not be found, here is the closest match: 701 First Ave, Sunnyvale, CA 94089"><Latitude>37.416384</Latitude><Longitude>-122.024853</Longitude><Address>701 FIRST AVE</Address><City>SUNNYVALE</City><State>CA</State><Zip>94089-1019</Zip><Country>US</Country></Result></ResultSet>
+<!-- ws06.search.re2.yahoo.com uncompressed/chunked Wed Apr 25 15:13:01 PDT 2007 -->

data/test/fixtures/responses/yahoo/unknown_address.xml

@@ -0,0 +1,6 @@
+<?xml version="1.0" encoding="UTF-8"?>
+<Error xmlns="urn:yahoo:api">
+		The following errors were detected:
+		<Message>unable to parse location</Message>
+</Error>
+<!-- ws05.search.re2.yahoo.com uncompressed/chunked Wed Apr 25 15:13:01 PDT 2007 -->

data/test/mocks/uri.rb

@@ -0,0 +1,52 @@
+require 'uri/http'
+require 'open-uri'
+
+##
+# This stub overrides OpenURI's open method to allow programs that use OpenURI
+# to be easily tested.
+#
+# == Usage
+#
+#   require 'rc_rest/uri_stub'
+#   
+#   class TestMyClass < Test::Unit::TestCase
+#     
+#     def setup
+#       URI::HTTP.responses = []
+#       URI::HTTP.uris = []
+#       
+#       @obj = MyClass.new
+#     end
+#     
+#     def test_my_method
+#       URI::HTTP.responses << 'some text open would ordinarily return'
+#       
+#       result = @obj.my_method
+#       
+#       assert_equal :something_meaninfgul, result
+#       
+#       assert_equal true, URI::HTTP.responses.empty?
+#       assert_equal 1, URI::HTTP.uris.length
+#       assert_equal 'http://example.com/path', URI::HTTP.uris.first
+#     end
+#     
+#  end
+
+class URI::HTTP # :nodoc:
+
+  class << self
+    attr_accessor :responses, :uris
+  end
+
+  alias original_open open
+
+  def open(*args)
+    self.class.uris << self.to_s
+    io = StringIO.new(self.class.responses.shift)
+    OpenURI::Meta.init(io)
+    yield io if block_given?
+    io
+  end
+
+end
+

data/test/test_helper.rb

@@ -0,0 +1,31 @@
+$:.unshift(File.dirname(__FILE__) + '/../lib')
+$:.unshift(File.dirname(__FILE__) + '/mocks')
+
+require 'rubygems'
+require 'yaml'
+require 'test/unit'
+require 'graticule'
+require 'mocha'
+
+TEST_RESPONSE_PATH = File.dirname(__FILE__) + '/fixtures/responses'
+
+module Test
+  module Unit
+    module Assertions
+      
+      private
+        def response(geocoder, response, extension = 'xml')
+          clean_backtrace do
+            File.read(File.dirname(__FILE__) + "/fixtures/responses/#{geocoder}/#{response}.#{extension}")
+          end
+        end
+      
+        def clean_backtrace(&block)
+          yield
+        rescue AssertionFailedError => e
+          path = File.expand_path(__FILE__)
+          raise AssertionFailedError, e.message, e.backtrace.reject { |line| File.expand_path(line) =~ /#{path}/ }
+        end
+    end
+  end
+end

data/test/unit/graticule/distance_test.rb

@@ -0,0 +1,58 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../test_helper')
+
+module Graticule
+  module Distance
+    class DistanceFormulaTest < Test::Unit::TestCase
+      EARTH_RADIUS_IN_MILES = 3963.1676
+      EARTH_RADIUS_IN_KILOMETERS = 6378.135
+
+      FORMULAS = [Haversine, Spherical, Vincenty]
+
+      def test_earth_radius
+        assert_equal EARTH_RADIUS_IN_MILES, EARTH_RADIUS[:miles]
+        assert_equal EARTH_RADIUS_IN_KILOMETERS, EARTH_RADIUS[:kilometers]
+      end
+
+      def test_distance
+        washington_dc = Location.new(:latitude => 38.898748, :longitude => -77.037684)
+        chicago = Location.new(:latitude => 41.85, :longitude => -87.65)
+        
+        FORMULAS.each do |formula|
+          assert_in_delta formula.distance(washington_dc, chicago), formula.distance(chicago, washington_dc), 0.00001
+          assert_in_delta 594.820, formula.distance(washington_dc, chicago), 1.0
+          assert_in_delta 594.820, formula.distance(washington_dc, chicago, :miles), 1.0
+          assert_in_delta 957.275, formula.distance(washington_dc, chicago, :kilometers), 1.0
+        end
+      end
+      
+      def test_distance_between_antipodal_points
+        # The Vincenty formula will be indeterminant with antipodal points.
+        # See http://mathworld.wolfram.com/AntipodalPoints.html
+        washington_dc = Location.new(:latitude => 38.898748, :longitude => -77.037684)
+        chicago = Location.new(:latitude => 41.85, :longitude => -87.65)
+        
+        # First, test the deltas.
+        FORMULAS.each do |formula|
+          assert_in_delta 12450.6582171051, 
+            formula.distance(chicago, chicago.antipodal_location), 1.0
+          assert_in_delta 12450.6582171051, 
+            formula.distance(washington_dc, washington_dc.antipodal_location), 1.0
+          assert_in_delta 12450.6582171051, 
+            formula.distance(chicago, chicago.antipodal_location, :miles), 1.0
+          assert_in_delta 12450.6582171051, 
+            formula.distance(washington_dc, washington_dc.antipodal_location, :miles), 1.0
+          assert_in_delta 20037.50205960391, 
+            formula.distance(chicago, chicago.antipodal_location, :kilometers), 1.0
+          assert_in_delta 20037.5020596039, 
+            formula.distance(washington_dc, washington_dc.antipodal_location, :kilometers), 1.0
+        end
+        
+        # Next, test Vincenty.  Vincenty will use haversine instead of returning NaN on antipodal points
+        assert_equal Haversine.distance(washington_dc, washington_dc.antipodal_location), 
+          Vincenty.distance(washington_dc, washington_dc.antipodal_location)
+        assert_equal Haversine.distance(chicago, chicago.antipodal_location),
+          Vincenty.distance(chicago, chicago.antipodal_location)
+      end
+    end
+  end
+end

data/test/unit/graticule/geocoder/geocoder_us_test.rb

@@ -0,0 +1,43 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../../test_helper')
+
+module Graticule
+  module Geocoder
+    class GeocoderUsTest < Test::Unit::TestCase
+
+      def setup
+        URI::HTTP.responses = []
+        URI::HTTP.uris = []
+
+        @geocoder = GeocoderUs.new
+        @location = Location.new(
+          :street => "1600 Pennsylvania Ave NW, Washington DC 20502",
+          :longitude => -77.037684,
+          :latitude => 38.898748
+        )
+      end
+
+      def test_success
+        prepare_response(:success)
+        assert_equal @location, @geocoder.locate('1600 Pennsylvania Ave, Washington DC')
+      end
+    
+      def test_url
+        prepare_response(:success)
+        @geocoder.locate('1600 Pennsylvania Ave, Washington DC')
+        assert_equal 'http://rpc.geocoder.us/service/rest/geocode?address=1600%20Pennsylvania%20Ave,%20Washington%20DC',
+                     URI::HTTP.uris.first
+      end
+
+      def test_locate_bad_address
+        prepare_response(:unknown)
+        assert_raises(AddressError) { @geocoder.locate('yuck') }
+      end
+
+    protected
+      def prepare_response(id)
+        URI::HTTP.responses << response('geocoder_us', id)
+      end
+
+    end
+  end
+end

data/test/unit/graticule/geocoder/geocoders.rb

@@ -0,0 +1,56 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../../test_helper')
+
+
+module Graticule
+  
+  # Generic tests for all geocoders (theoretically)
+  module GeocodersTestCase
+    
+    def test_success
+      return unless prepare_response(:success)
+      
+      location = Location.new(
+        :street => "1600 Amphitheatre Pkwy",
+        :city => "Mountain View",
+        :state => "CA",
+        :zip => "94043",
+        :country => "US",
+        :longitude => -122.083739,
+        :latitude => 37.423021,
+        :precision => :address
+      )
+      assert_equal location, @geocoder.locate('1600 Amphitheatre Parkway, Mountain View, CA')
+    end
+    
+    def test_bad_key
+      return unless prepare_response(:badkey)
+      assert_raises(CredentialsError) { @geocoder.locate('x') }
+    end
+    
+    def test_locate_missing_address
+      return unless prepare_response(:missing_address)
+      assert_raises(AddressError) { @geocoder.locate 'x' }
+    end
+    
+    def test_locate_server_error
+      return unless prepare_response(:server_error)
+      assert_raises(Error) { @geocoder.locate 'x' }
+    end
+
+    def test_locate_too_many_queries
+      return unless prepare_response(:limit)
+      assert_raises(CredentialsError) { @geocoder.locate 'x' }
+    end
+
+    def test_locate_unavailable_address
+      return unless prepare_response(:unavailable)
+      assert_raises(AddressError) { @geocoder.locate 'x' }
+    end
+
+    def test_locate_unknown_address
+      return unless prepare_response(:unknown_address)
+      assert_raises(AddressError) { @geocoder.locate 'x' }
+    end
+
+  end
+end

data/test/unit/graticule/geocoder/google_test.rb

@@ -0,0 +1,112 @@
+require File.expand_path(File.dirname(__FILE__) + '/../../../test_helper')
+
+module Graticule
+  module Geocoder
+    class GoogleTest < Test::Unit::TestCase
+      def setup
+        URI::HTTP.responses = []
+        URI::HTTP.uris = []
+        @geocoder = Google.new(:key => 'APP_ID')
+      end
+    
+      def test_success
+        return unless prepare_response(:success)
+      
+        location = Location.new(
+          :street => "1600 Amphitheatre Pkwy",
+          :locality => "Mountain View",
+          :region => "CA",
+          :postal_code => "94043",
+          :country => "US",
+          :longitude => -122.083739,
+          :latitude => 37.423021,
+          :precision => :address
+        )
+        assert_equal location, @geocoder.locate('1600 Amphitheatre Parkway, Mountain View, CA')
+      end
+      
+
+      # The #locate parameters are broad, so the XML response contains 
+      # multiple results at street-level precision. We expect to get the 
+      # first result back, and it should not contain a postal code.
+      def test_success_multiple_results
+        return unless prepare_response(:success_multiple_results)
+
+        location = Location.new(
+          :street => "Queen St W",
+          :locality => "Toronto",
+          :region => "ON",
+          :postal_code => nil,
+          :country => "CA",
+          :longitude => -79.4125590,
+          :latitude => 43.6455030,
+          :precision => :street
+        )
+        assert_equal location, @geocoder.locate('Queen St West, Toronto, ON CA')
+      end
+
+
+        # <?xml version='1.0' encoding='UTF-8'?><kml xmlns='http://earth.google.com/kml/2.0'><Response><name>15-17 </name><Status><code>200</code><request>geocode</request></Status><Placemark id='p1'><Point><coordinates>-17.000000,15.000000,0</coordinates></Point></Placemark></Response></kml>
+        def test_only_coordinates
+          return unless prepare_response(:only_coordinates)
+
+          location = Location.new(:longitude => -17.000000, :latitude => 15.000000)
+          assert_equal location, @geocoder.locate('15-17 & 16 Railroad Square, Nashua, NH, 03064')
+        end
+        
+
+
+      def test_partial
+        return unless prepare_response(:partial)
+        
+        location = Location.new(
+          :locality => "San Francisco",
+          :region => "CA",
+          :country => "US",
+          :longitude => -122.418333,
+          :latitude => 37.775000,
+          :precision => :city
+        )
+        
+        assert_equal location, @geocoder.locate('sf ca')
+      end
+    
+      def test_bad_key
+        return unless prepare_response(:badkey)
+        assert_raises(CredentialsError) { @geocoder.locate('x') }
+      end
+    
+      def test_locate_missing_address
+        return unless prepare_response(:missing_address)
+        assert_raises(AddressError) { @geocoder.locate 'x' }
+      end
+    
+      def test_locate_server_error
+        return unless prepare_response(:server_error)
+        assert_raises(Error) { @geocoder.locate 'x' }
+      end
+
+      def test_locate_too_many_queries
+        return unless prepare_response(:limit)
+        assert_raises(CredentialsError) { @geocoder.locate 'x' }
+      end
+
+      def test_locate_unavailable_address
+        return unless prepare_response(:unavailable)
+        assert_raises(AddressError) { @geocoder.locate 'x' }
+      end
+
+      def test_locate_unknown_address
+        return unless prepare_response(:unknown_address)
+        assert_raises(AddressError) { @geocoder.locate 'x' }
+      end
+
+    protected
+
+      def prepare_response(id = :success)
+        URI::HTTP.responses << response('google', id)
+      end
+  
+    end
+  end
+end