cloudmade 0.1.2

data/lib/cloudmade/service.rb

@@ -0,0 +1,54 @@
+#
+# Copyright 2009 CloudMade.
+#
+# Licensed under the GNU Lesser General Public License, Version 3.0;
+# You may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#      http://www.gnu.org/licenses/lgpl-3.0.txt
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+module CloudMade
+
+  # General class for all CloudMade's services
+  class Service
+    require 'net/http'
+    require 'cgi'
+    attr_accessor :subdomain
+    attr_accessor :connection
+
+    def url_template
+      return "http://#{@subdomain}.#{@connection.url}/#{@connection.api_key}"
+    end
+
+    # Template for service's domain
+    # By default it is <service_name>.cloudmade.com
+    # E.g. tile.cloudmade.com, geocoding.cloudmade.com
+    def url
+      "#{@subdomain}.#{@connection.base_url}"
+    end
+
+    class << self
+      def to_url_params(params)
+        params.map {|k,v| "#{CGI.escape(k.to_s)}=#{CGI.escape(v.to_s)}" }.join('&')
+      end
+    end
+
+    protected
+      def initialize(connection, subdomain)
+        @connection = connection
+        @subdomain = subdomain
+      end
+
+      def connect(request)
+        puts "Requesting: #{url} -- #{url_template}#{request}"
+        return @connection.connect(url, "#{url_template}#{request}")
+      end
+  end
+end

data/lib/cloudmade/tiles.rb

@@ -0,0 +1,105 @@
+#
+# Copyright 2009 CloudMade.
+#
+# Licensed under the GNU Lesser General Public License, Version 3.0;
+# You may not use this file except in compliance with the License.
+# You may obtain a copy of the License at
+#
+#      http://www.gnu.org/licenses/lgpl-3.0.txt
+#
+# Unless required by applicable law or agreed to in writing, software
+# distributed under the License is distributed on an "AS IS" BASIS,
+# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+# See the License for the specific language governing permissions and
+# limitations under the License.
+#
+
+include CloudMade
+
+module CloudMade
+
+  # Class that is responsible for tile services of Cloudmade
+  class TilesService < Service
+    attr_accessor :default_tile_size
+    attr_accessor :default_style_id
+
+    def initialize(client, subdomain, options = {})
+      super(client, subdomain)
+      @default_tile_size = (options.has_key? 'tile_size') ? options['tile_size'] : 256
+      @default_style_id = (options.has_key? 'style_id') ? options['style_id'] : 1
+    end
+
+    # Convert latitude, longitude pair to tile coordinates. Returns tile coordinates as a CloudMade::Point object
+    # * +lat+ Latitude
+    # * +lon+ Longitude
+    # * +zoom+ Zoom level
+    def latlon2tilenums(lat, lon, zoom)
+      factor = 2**(zoom - 1)
+      lat = radians(lat)
+      lon = radians(lon)
+      xtile = 1 + lon / Math::PI
+      ytile = 1 - Math.log(Math.tan(lat) + (1 / Math.cos(lat))) / Math::PI
+      return Point.new((xtile * factor).to_i, (ytile * factor).to_i)
+    end
+
+    # Convert tile coordinates pair to latitude, longitude. Returns latitude, longitude as a CloudMade::Point object
+    # * +xtile+ X coordinate of the tile
+    # * +ytile+ Y coordinate of the tile
+    # * +zoom+ Zoom level
+    def tilenums2latlon(xtile, ytile, zoom)
+      factor = 2.0 ** zoom
+      lon = (xtile * 360 / factor) - 180.0
+      lat = Math.atan(Math.sinh(Math::PI * (1 - 2 * ytile / factor)))
+      return Point.new(degrees(lat), lon)
+    end
+
+    # :nodoc:
+    def radians(degrees)
+      Math::PI * degrees / 180
+    end
+
+    def degrees(radians)
+      radians * 180 / Math::PI
+    end
+
+    def xtile(lon, zoom)
+      factor = 2**(zoom - 1)
+      xtile = 1 + lon / 180.0
+      return (xtile * factor).to_i
+    end
+
+    def ytile(lat, zoom)
+      factor = 2**(zoom - 1)
+      lat = radians(lat)
+      ytile = 1 - Math.log(Math.tan(lat) + (1 / Math.cos(lat))) / Math::PI
+      return (ytile * factor).to_i
+    end
+
+    # Get tile with given latitude, longitude and zoom.
+    # Returns Raw PNG data which could be saved to file
+    #
+    # * +lat+ Latitude of requested tile
+    # * +lon+ Longitude of requested tile
+    # * +zoom+ Zoom level, on which tile is being requested
+    # * +style_id+ CloudMade's style id, if not given, default style is used (usually 1)
+    # * +tile_size+ size of tile, if not given the default 256 is used
+    def get_tile(lat, lon, zoom, style_id = nil, tile_size = nil)
+      get_xy_tile(xtile(lon, zoom), ytile(lat, zoom), zoom, style_id, tile_size)
+    end
+
+    # Get tile with given x, y numbers and zoom
+    # Returns Raw PNG data which could be saved to file
+    #
+    # * +xtile+
+    # * +ytile+
+    # * +zoom+ Zoom level, on which tile is being requested
+    # * +style_id+ CloudMade's style id, if not given, default style is used (usually 1)
+    # * +tile_size+ size of tile, if not given the default 256 is used
+    def get_xy_tile(xtile, ytile, zoom, style_id = nil, tile_size = nil)
+      style_id = self.default_style_id if style_id == nil
+      tile_size = self.default_tile_size if tile_size == nil
+      connect "/#{style_id}/#{tile_size}/#{zoom}/#{xtile}/#{ytile}.png"
+    end
+  end
+
+end

data/lib/cloudmade/version.rb

@@ -0,0 +1,3 @@
+module Cloudmade
+  VERSION = "0.1.2"
+end

data/test/mock_connection.rb

@@ -0,0 +1,15 @@
+require 'cloudmade'
+
+include CloudMade
+
+class MockConnection < Connection
+  attr_accessor :return_data
+  attr_accessor :request
+  attr_accessor :server_url
+
+  def connect(server_url, request)
+    self.request = request
+    self.server_url = server_url
+    return return_data
+  end
+end

data/test/test_geocoding.rb

@@ -0,0 +1,71 @@
+$:.push File.expand_path("../../lib", __FILE__)
+$:.push File.expand_path("../..", __FILE__)
+
+require 'cloudmade'
+require 'test/unit'
+require 'test/mock_connection'
+
+include CloudMade
+
+class GeocodingServiceTest < Test::Unit::TestCase #:nodoc: all
+
+  RETURN_DATA_FIND = <<-eos
+      {"found": 2, "type": "FeatureCollection",
+        "features": [{"properties": {"name": "New Oxford Street"}, "centroid":
+          {"type": "POINT", "coordinates": [51.51695, -0.12652]}, "location":
+          {"city": "London", "postcode": "WC2"}, "geometry": {"type": "MULTILINESTRING",
+          "coordinates": [[[51.5166, -0.12894], [51.51679, -0.12751], [51.51691, -0.12687],
+          [51.51704, -0.12587], [51.51717, -0.1251]], [[51.51721, -0.12261], [51.51722, -0.12312]],
+          [[51.51639, -0.13042], [51.51653, -0.12954], [51.51654, -0.12948], [51.5166, -0.12894]],
+          [[51.51722, -0.12312], [51.51717, -0.12498], [51.51717, -0.1251]], [[51.51717, -0.12498],
+          [51.51722, -0.12503]]]}, "id": 490249, "bounds": [[51.51639, -0.13042], [51.51722, -0.12261]]},
+          {"properties": {"name": "Oxford Street"}, "centroid": {"type": "POINT", "coordinates":
+          [51.51499, -0.14448]}, "location": {"city": "London", "postcode": "SE1"},
+          "geometry": {"type": "MULTILINESTRING", "coordinates": [[[51.51341, -0.15853],
+          [51.51342, -0.15821], [51.51371, -0.15593], [51.5139, -0.15381], [51.51404, -0.15257], [51.51411, -0.15195],
+          [51.51418, -0.15132], [51.51424, -0.15072], [51.51424, -0.15068], [51.51427, -0.15029], [51.51434, -0.14986],
+          [51.51442, -0.14919], [51.51445, -0.149], [51.5145, -0.14851], [51.51457, -0.14798], [51.51459, -0.1478],
+          [51.51469, -0.14691], [51.51476, -0.14639], [51.51477, -0.14631], [51.51485, -0.1457], [51.51501, -0.1443],
+          [51.51521, -0.14269], [51.51528, -0.14213], [51.5153, -0.142]], [[51.5153, -0.142], [51.51537, -0.14137],
+          [51.51545, -0.14073]], [[51.51545, -0.14073], [51.5155, -0.14036], [51.51556, -0.13991], [51.5156, -0.13935],
+          [51.51568, -0.13863], [51.51577, -0.13771], [51.51581, -0.13732], [51.51585, -0.13678], [51.51594, -0.13586],
+          [51.51598, -0.13537], [51.51603, -0.13468], [51.51609, -0.13405], [51.51624, -0.13289], [51.51626, -0.13267],
+          [51.51634, -0.13166], [51.51639, -0.13042]]]}, "id": 500456, "bounds": [[51.51341, -0.15853], [51.51639, -0.13042]]}],
+          "bounds": [[51.51341, -0.15853], [51.51722, -0.12261]],
+          "crs": {"type": "EPSG", "properties": {"code": 4326, "coordinate_order": [0, 1]}}}
+    eos
+
+  RETURN_DATA_CLOSEST =<<-eos
+  {"found": 1, "type": "FeatureCollection", "features": [{"properties": {"power": "tower"},
+    "location": {"city": "Kingston upon Hull", "postcode": "DN37"}, "centroid": {"type": "POINT",
+    "coordinates": [53.52435, -0.143]}, "id": 75035, "bounds": [[53.52435, -0.143], [53.52435, -0.143]]}],
+    "bounds": [[53.52435, -0.143], [53.52435, -0.143]],
+    "crs": {"type": "EPSG", "properties": {"code": 4326, "coordinate_order": [0, 1]}}}
+  eos
+
+  def test_find
+    connection = MockConnection.new('FAKE-API-KEY', 'fake-cloudmade.com')
+    connection.return_data = RETURN_DATA_FIND
+    geocoding = GeocodingService.new(connection, 'geocoding')
+    geo_results = geocoding.find('/geocoding/find/Oxford%20street%2CLondon.js?bbox_only=True&skip=0&return_location=True&results=2&return_geometry=True')
+    assert geo_results.found == 2
+    assert_equal geo_results.bounds, BBox.from_coordinates([[51.51341,-0.15853],[51.51722,-0.12261]])
+    assert geo_results.results[0].properties["name"] == "New Oxford Street"
+    assert geo_results.results[1].properties["name"] == "Oxford Street"
+    assert_equal geo_results.results[1].geometry.class.to_s, 'CloudMade::MultiLine'
+    assert_equal geo_results.results[1].location.city, "London"
+  end
+
+  def test_closest
+    connection = MockConnection.new('FAKE-API-KEY', 'fake-cloudmade.com')
+    connection.return_data = RETURN_DATA_CLOSEST
+    geocoding = GeocodingService.new(connection, 'geocoding')
+    geo_result = geocoding.find_closest("poi", 53.51722, -0.12312,
+      :options => { :return_location => true, :return_geometry => false})
+    assert_equal geo_result.class.to_s, 'CloudMade::GeoResult'
+    #assert_equal connection.uri, """/geocoding/closest/poi/53.51722,-0.12312.js?return_location=True&return_geometry=False"""
+    assert_nil geo_result.geometry
+    assert_equal geo_result.location.city, 'Kingston upon Hull'
+    assert_equal geo_result.centroid, Point.new(53.52435, -0.143)
+  end
+end

data/test/test_geometry.rb

@@ -0,0 +1,100 @@
+$LOAD_PATH.unshift File.join('..', 'lib')
+require 'cloudmade'
+require 'test/unit'
+
+include CloudMade
+
+class PointTest < Test::Unit::TestCase #:nodoc: all
+  
+  def test_initialization
+    point = Point.new(1, 2)
+    assert_equal point.lat, 1
+    assert_equal point.lon, 2
+
+    point = Point.new([1, 3])
+    assert_equal point.lat, 1
+    assert_equal point.lon, 3
+  end
+
+  def test_equality
+    point1 = Point.new(1, 0)
+    point2 = Point.new(2/2, 1-1)
+    assert point1 == point2
+
+    point3 = Point.new(1.0, 0.1)
+    assert point1 != point3
+  end
+
+  def test_to_latlon
+    point = Point.new(1, 2)
+    assert_equal point.to_latlon, '1,2'
+  end
+end
+
+class LineTest < Test::Unit::TestCase #:nodoc: all
+
+  def test_initialization
+    line = Line.new([[1.1, 2.0], [0.1, 2.1]])
+    assert_equal line.points.length, 2
+    assert_equal line.points[0].lat, 1.1
+    assert_equal line.points[0].lon, 2.0
+    assert_equal line.points[1].lat, 0.1
+    assert_equal line.points[1].lon, 2.1
+
+    line = Line.new([[1.1, 2.0], [0.1, 2.1], [0.5, 3.1], [3.1, 4.1]])
+    assert_equal line.points.length, 4
+  end
+end
+
+class MultiLineTest < Test::Unit::TestCase #:nodoc: all
+  def test_initialization
+    coords = [[[0.2, 35.2], [4.3, 45.1], [5.7, 11.2]], [[1.1, 33.2], [5.3, 22.2]]]
+    ml = MultiLine.new(coords)
+    assert_equal ml.lines.size, 2
+    assert_equal ml.lines[0].points.length, 3
+    assert_equal ml.lines[1].points.length, 2
+    assert_equal ml.lines[1].points[0].lon, 33.2
+  end
+end
+
+class PolygonTest < Test::Unit::TestCase #:nodoc: all
+  def test_initialization
+    coords = [[[0.2, 35.2], [4.3, 45.1], [5.7, 11.2]], [[1.1, 33.2], [5.3, 22.2]]]
+    polygon = Polygon.new(coords)
+    assert polygon.border_line != nil
+    assert_equal polygon.border_line.points.size, 3
+    assert polygon.holes != nil
+    assert_equal polygon.holes.size, 1
+  end
+end
+
+class MultiPolygonTest < Test::Unit::TestCase #:nodoc: all
+  def test_initialization
+    coords = [[[[0.2, 35.2], [4.3, 45.1]]], [[[1.1, 33.2], [5.3, 22.2]]]]
+    mp = MultiPolygon.new(coords)
+    assert_equal mp.polygons.size, 2
+    assert_equal mp.polygons[0].holes.size, 0
+    assert_equal mp.polygons[1].holes.size, 0
+  end
+end
+
+class BBoxTest < Test::Unit::TestCase #:nodoc: all
+  def test_initialization
+    coordinates = [[0.2, 35.2], [4.3, 45.1]]
+    point1 = Point.new(coordinates[0])
+    point2 = Point.new(coordinates[1])
+    bbox = BBox.from_points([point1, point2])
+    assert_equal bbox.points.length, 2
+    assert_equal bbox.points[0], point1
+    assert_equal bbox.points[1], point2
+
+    bbox = BBox.from_coordinates(coordinates)
+    assert_equal bbox.points.length, 2
+    assert_equal bbox.points[0], point1
+    assert_equal bbox.points[1], point2
+  end
+end
+
+# TODO: add code to parse that
+#class GeometryTest < Test::Unit::TestCase #:nodoc: all
+#end

data/test/test_routing.rb

@@ -0,0 +1,78 @@
+$LOAD_PATH.unshift File.join('..', 'lib')
+require 'cloudmade'
+require 'test/unit'
+require 'test/mock_connection'
+
+include CloudMade
+
+class RoutingServiceTest < Test::Unit::TestCase #:nodoc: all
+
+  RETURN_DATA_EMPTY = '{}'
+
+  RETURN_DATA_ROUTING =  <<-eos
+    {"status":0,"route_instructions":[["Head south on Generaal Belliardstraat",16,0,2,"16 m","S",176.2],
+    ["Turn right at Falconrui",149,1,18,"0.1 km","W",262.8,"TR",86.6],["Turn right at Falconplein",347,3,42,"0.3 km","N",345.9,"TR",83.0],
+    ["Turn right at Huikstraat",212,9,25,"0.2 km","SW",243.8,"TR",79.2],["Turn left at Sint-Paulusstraat",12,14,1,"12 m","SE",145.4,"TL",306.7],
+    ["Continue on Minderbroedersrui",303,15,18,"0.3 km","SE",152.4,"C",7.0],["Turn left at Kipdorp",337,22,40,"0.3 km","E",103.9,"TL",304.7],
+    ["Turn right at Sint-Jacobstraat",339,28,41,"0.3 km","S",196.2,"TR",94.1],["Turn right at Lange Nieuwstraat",297,33,71,"0.3 km","W",266.3,"TR",70.2],
+    ["Turn left at Sint-Katelijnevest",173,40,10,"0.2 km","S",182.4,"TL",259.4],["Slight left",21,46,1,"21 m","SE",156.0,"TSLL",331.3],
+    ["Continue on Meir",22,49,1,"22 m","SE",142.9,"C",351.3],["Slight right at Huidevettersstraat",266,51,16,"0.3 km","S",180.0,"TSLR",37.1],
+    ["Continue on Lange Gasthuisstraat",349,66,21,"0.3 km","S",167.6,"C",350.1],["Slight left at Sint-Jorispoort",192,71,12,"0.2 km","E",109.7,"TSLL",314.9],
+    ["Slight right at Mechelsesteenweg",96,74,6,"96 m","S",171.9,"TSLR",37.1],["Continue",59,76,3,"59 m","S",179.2,"C",6.8],
+    ["Continue on N1\/Mechelsesteenweg",754,79,39,"0.8 km","S",172.5,"C",353.8],
+    ["Turn right at Van Schoonbekestraat",367,91,44,"0.4 km","SW",247.0,"TR",88.6],["Turn left at Schulstraat",234,95,28,"0.2 km","SE",124.9,"TL",269.3],
+    ["Turn left at Harmoniestraat",3418,97,410,"3.4 km","NE",38.8,"TL",242.5],["Continue on Ellermanstraat",47,101,3,"47 m","W",267.9,"C",0.0]],
+    "route_summary":{"total_time":852,"transit_points":[["Sint-Jacobstraat",51.22006,4.40965],["Harmoniestraat",51.20047,4.40913]],
+    "total_distance":8010,"end_point":"Ellermanstraat","start_point":"Generaal Belliardstraat"},
+    "route_geometry":[[51.22545,4.40728],[51.2253,4.4073],[51.22515,4.40533],[51.22514,4.40518],[51.22565,4.40498],
+    [51.22651,4.40514],[51.22665,4.40511],[51.22652,4.40506],[51.2256,4.40479],[51.22511,4.40501],[51.22505,4.40481],
+    [51.22503,4.40477],[51.22456,4.40388],[51.22406,4.40325],[51.22371,4.40307],[51.22362,4.40317],[51.22356,4.40321],
+    [51.2226,4.40425],[51.22182,4.40501],[51.22179,4.40502],[51.22145,4.40507],[51.22141,4.40509],[51.22125,4.40519],
+    [51.221,4.40681],[51.22096,4.40709],[51.22088,4.40769],[51.22087,4.40779],[51.22073,4.40921],[51.22064,4.40992],
+    [51.21966,4.40947],[51.21966,4.40947],[51.22064,4.40992],[51.22006,4.40965],[51.21966,4.40947],[51.21965,4.40928],
+    [51.21974,4.40814],[51.21981,4.40735],[51.21982,4.40726],[51.21989,4.40628],[51.21997,4.40571],[51.22003,4.40526],
+    [51.21997,4.40526],[51.21923,4.40516],[51.21912,4.40509],[51.21893,4.40505],[51.2186,4.40503],[51.21849,4.40499],
+    [51.21847,4.40501],[51.21838,4.40509],[51.21833,4.40514],[51.21826,4.40525],[51.21817,4.40533],[51.21809,4.40534],
+    [51.2178,4.40533],[51.21752,4.40533],[51.21723,4.40537],[51.2169,4.40543],[51.2167,4.40543],[51.21655,4.4054],
+    [51.21644,4.40534],[51.21638,4.40529],[51.2163,4.40516],[51.21625,4.40497],[51.21617,4.40483],[51.21616,4.40481],
+    [51.2161,4.40478],[51.21596,4.40482],[51.21514,4.40511],[51.21402,4.40501],[51.21381,4.405],[51.21304,4.40499],
+    [51.21286,4.40512],[51.21244,4.40699],[51.21227,4.40744],[51.21213,4.4075],[51.21142,4.40766],[51.21127,4.40768],
+    [51.21112,4.40768],[51.21097,4.4077],[51.21074,4.40771],[51.20968,4.40793],[51.20914,4.40825],[51.20869,4.40857],
+    [51.2084,4.40887],[51.20829,4.40894],[51.20695,4.40973],[51.20672,4.4098],[51.20644,4.40989],[51.20618,4.40991],
+    [51.2059,4.40989],[51.20565,4.40998],[51.20432,4.41081],[51.2039,4.40924],[51.20382,4.40898],[51.20376,4.40884],
+    [51.20218,4.40704],[51.20162,4.40833],[51.20097,4.40976],[51.20053,4.40921],[51.20097,4.40976],[51.22982,4.42068],
+    [51.22981,4.42001],[51.22981,4.42001]],"version":"0.3"}
+  eos
+
+  def test_empty_routing
+    transit_points = [Point.new([51.22, 4.41]), Point.new([51.2, 4.41])]
+    connection = MockConnection.new('FAKE-API-KEY', 'fake-cloudmade.com')
+    connection.return_data = RETURN_DATA_EMPTY
+    routing = RoutingService.new(connection, 'routing')
+    begin
+        route = routing.route(Point.new([51.22545, 4.40730]), Point.new([51.23, 4.42]),
+                          transit_points, 'car', 'shortest')
+        assert false
+    rescue RouteNotFound
+      assert true
+    end
+  end
+
+  def test_routing
+    transit_points = [Point.new([51.22, 4.41]), Point.new([51.2, 4.41])]
+    connection = MockConnection.new('FAKE-API-KEY', 'fake-cloudmade.com')
+    connection.return_data = RETURN_DATA_ROUTING
+    routing = RoutingService.new(connection, 'routing')
+    begin
+      route = routing.route(Point.new([51.22545, 4.40730]), Point.new([51.23, 4.42]),
+                        transit_points, 'car', 'shortest')
+      assert_equal route.version, '0.3'
+      assert_equal route.summary.total_time, 852
+      assert_equal route.summary.total_distance, 8010
+      assert_equal route.summary.end_point, 'Ellermanstraat'
+      assert_equal route.summary.start_point, 'Generaal Belliardstraat'
+    rescue RouteNotFound
+      assert false
+    end
+  end
+end

data/test/test_tiles.rb

@@ -0,0 +1,33 @@
+$LOAD_PATH.unshift File.join('..', 'lib')
+require 'cloudmade'
+require 'test/unit'
+require 'test/mock_connection'
+
+include CloudMade
+
+class TilesServiceTest < Test::Unit::TestCase #:nodoc: all
+
+  def setup
+    @connection = MockConnection.new('FAKE-API-KEY', 'fake-cloudmade.com')
+    @tiles = TilesService.new(@connection, 'tile')
+  end
+
+  def test_latlon2tilenums
+    p = @tiles.latlon2tilenums(11.1, 34.5, 15)
+    assert p.lat == 19524
+    assert p.lon == 15367
+  end
+
+  def test_tilenums2latlon
+    p = @tiles.tilenums2latlon(19524, 15367, 15)
+    assert p.lat.to_i == 11
+    assert p.lon.to_i == 34
+  end
+
+  def test_get_tile
+    @connection.return_data = "PNG file content"
+    png = @tiles.get_tile(11.1, 34.5, 15)
+    assert_equal @connection.request, 'http://tile.fake-cloudmade.com/FAKE-API-KEY/1/256/15/19524/15367.png'
+    assert png == @connection.return_data
+  end
+end