sinatra_wms 0.0.1

data/.gitignore

@@ -0,0 +1,4 @@
+*.gem
+.bundle
+Gemfile.lock
+pkg/*

data/Gemfile

@@ -0,0 +1,4 @@
+source "http://rubygems.org"
+
+# Specify your gem's dependencies in sinatra_wms.gemspec
+gemspec

data/README.md

@@ -0,0 +1,89 @@
+SintraWMS
+=========
+
+What does SinatraWMS do?
+------------------------
+
+Suppose you have a huge amount of data containing geolocations which you want to show graphically.
+
+One way to achieve this would be to create a more or less huge image file with RMagick or something and just draw the data into this file.  
+This approach has two drawbacks: Either the image file you create will get really huge - or it won't get that large but doesn't provide the needed or wanted resolution. Also, you will just get a black image with white dots on it or something - not very nice. A real map as background would be nice.
+
+Another way would be to use a Google Map or something and use a JavaScript to add lots and lots of markers to the map.  
+You could zoom in and out an such - but you'd have to care about getting your data to JavaScript to add the markers. And it won't be that fast once you reach some kind of limit.
+
+The solution for this problem: WMS (Web Map Service).  
+This gem helps you to provide a WMS to be used with OpenLayers. OpenLayers will display the OpenStreetMap at a configurable Opacity and add your data on top of it. Whenever you scroll or zoom around the map, OpenLayers will request images of a part of the visible screen. Your code has to generate them on-the-fly and deliver them back.
+
+
+How do I use SinatraWMS?
+------------------------
+
+Let's build a sample app.  
+In my example, I will use SinatraWMS to display the locations of my geolocated tweets.
+
+**Gemfile:**
+```ruby
+source :rubygems
+
+gem "sinatra"
+gem "rmagick"
+gem "sinatra_wms"
+gem "activerecord" # I'm using ActiveRecord to retrieve my data from the Database. You can do this your own way.
+```
+
+**sinatra_wms_test:**
+```ruby
+# This is just stuff for my ActiveRecord-addiction. ;-)
+# You can use DataMapper, mysql, whatever.
+
+ActiveRecord::Base.establish_connection(
+    :adapter => 'mysql',
+    :host =>     'localhost',
+    :username => 'twirror',
+    :password => 'secret',
+    :database => 'twirror',
+    :encoding => 'UTF8')
+
+class Tweet < ActiveRecord::Base
+end
+
+before do
+	ActiveRecord::Base.connection.verify!
+end
+# End of my ActiveRecord-stuff.
+
+# This is the main entry point for this app.
+# This code just outputs generic HTML code to load OpenLayers, show the OSM
+# as transparent background and our WMS stuff on top of that.
+get '/' do
+	SinatraWMS::get_html_for_map_at url("/wms"), :opacity=>0.3, :title=>"My Tweets"
+end
+
+# This code gets run for every image requested by OpenLayers. It is given a
+# RMagick::Draw object on which you can immediately start painting as well as
+# a hash containing some information about this request.
+wms '/wms' do |canvas, options|
+	# Select matching Tweets from the DB.
+	# :bbox denotes the area visible in the current image. So we only select
+	# Tweets with coordinates within this box to draw.
+	# We also use a limit here, because Drawing lots and lots of points with
+	# RMagick is pretty slow. Since zooming in reduces the area each image has
+	# to span, more and more points are going to show up when we zoom in.
+	rel = Tweet.where(:sender_name=>'fabianonline').
+		where("geo_lat IS NOT NULL and geo_long IS NOT NULL").
+		where("geo_lat>=? and geo_lat<=?", options[:bbox][:wgs84][0][0], options[:bbox][:wgs84][1][0]).
+		where("geo_long>=? and geo_long<=?", options[:bbox][:wgs84][0][1], options[:bbox][:wgs84][1][1]).
+		limit(1000)
+		
+	rel.each do |tweet|
+		# Draw each point. This gem extends RMagick::Draw to provide some
+		# methods which directly take coordinates in WGS84 (that's the most)
+		# commonly used format for coordinates. You know, longitude between
+		# -180 (West) and 180 (East) degrees and latitude between -90 (South) 
+		# and 90 (North) degrees).
+		canvas.point_wgs84(tweet.geo_long, tweet.geo_lat)
+	end
+end
+
+```

data/Rakefile

@@ -0,0 +1 @@
+require 'bundler/gem_tasks'

data/lib/sinatra_wms/rmagick_extension.rb

@@ -0,0 +1,48 @@
+require 'RMagick'
+
+module Magick
+	class Draw
+		WMS_FUNCTIONS_SINGLE = %w(color matte point text bigpoint)
+		WMS_FUNCTIONS_DOUBLE = %w(circle ellipse line rectangle roundrectangle)
+		
+		def method_missing(sym, *args, &block)
+			result = sym.to_s.match /^([a-z0-9_]+)_(?:wgs84)$/
+			if result && respond_to?(result[1]) && @wms_settings
+				if WMS_FUNCTIONS_SINGLE.include?(result[1])
+					args[0], args[1] = latlon_to_pixels(args[0], args[1])
+				elsif WMS_FUNCTIONS_DOUBLE.include?(result[1])
+					args[0], args[1] = latlon_to_pixels(args[0], args[1])
+					args[2], args[3] = latlon_to_pixels(args[2], args[3])
+				end
+				send(result[1], *args, &block)
+			else
+				super(sym, *args, &block)
+			end
+		end
+		
+		def wms_settings=(hash)
+			hash[:min_sin_y] = Math::asinh(Math::tan(hash[:bbox][0][0] / 180.0 * Math::PI)) * 6378137.0
+			hash[:max_sin_y] = Math::asinh(Math::tan(hash[:bbox][1][0] / 180.0 * Math::PI)) * 6378137.0
+			hash[:diff_y] = hash[:max_sin_y] - hash[:min_sin_y]
+			hash[:factor_x] = hash[:width] / (hash[:bbox][1][1] - hash[:bbox][0][1])
+			@wms_settings = hash
+		end
+
+		def bigpoint(x, y)
+			rectangle(x-1, y-1, x+1, y+1)
+		end
+		
+		def respond_to?(sym)
+			result = sym.to_s.match /^([a-z0-9_]+)_(?:wgs84)$/
+			(result && super(result[1]) && @wms_settings) || super(sym)
+		end
+		
+		private
+		def latlon_to_pixels(x, y)
+			raise "wms_settings is missing values" unless [:bbox, :factor_x, :min_sin_y, :max_sin_y, :height].all?{|v| @wms_settings.has_key?(v)}
+			x = ((x - @wms_settings[:bbox][0][1]) * @wms_settings[:factor_x]).round
+			y = (1 - (((Math::asinh(Math::tan(y / 180.0 * Math::PI)) * 6378137.0) - @wms_settings[:min_sin_y]) / @wms_settings[:diff_y])) * @wms_settings[:height]
+			return [x, y]
+		end
+	end
+end

data/lib/sinatra_wms/sinatra_extension.rb

@@ -0,0 +1,42 @@
+require 'sinatra/base'
+module Sinatra
+	module WMS
+		def wms(url, &block)
+			get url do
+				headers "Content-Type" => "image/png"
+				# convert the given parameters to lowercase symbols
+				options = params.inject({}) {|hash, (key, value)| hash[key.to_s.downcase.to_sym] = value; hash }
+				
+				# interpret :width and :height as integer
+				[:width, :height].each {|what| options[what] = options[what].to_i}
+				
+				# convert bounding box coordinates
+				bbox = options[:bbox].split(',').collect{|v| v.to_f}
+				options[:bbox] = {:original => [[bbox[0], bbox[1]], [bbox[2], bbox[3]]]}
+				if options[:srs]=="EPSG:900913"
+					options[:bbox][:google] = options[:bbox][:original]
+					options[:bbox][:wgs84] = [*SinatraWMS::merc_to_latlon(bbox[0], bbox[1])], [*SinatraWMS::merc_to_latlon(bbox[2], bbox[3])]
+				else
+					raise "Unexpected Projection (srs): #{options[:srs]}"
+				end
+				options[:zoom] = (17-((Math.log((options[:bbox][:google][1][0]-options[:bbox][:google][0][0]).abs*3.281/500) / Math.log(2)).round))
+
+				image = Magick::Image.new(options[:width], options[:height]) { self.background_color = 'transparent' }
+				gc = Magick::Draw.new
+				gc.stroke("black")
+				
+				gc.wms_settings = {
+					:bbox => options[:bbox][:wgs84],
+					:width => options[:width],
+					:height => options[:height]}
+				
+				block.call(gc, options)
+				
+				gc.draw(image) rescue nil
+				image.to_blob {self.format="png"}
+			end
+		end
+	end
+	
+	register WMS
+end

data/lib/sinatra_wms/version.rb

@@ -0,0 +1,3 @@
+module SinatraWMS
+  VERSION = "0.0.1"
+end

data/lib/sinatra_wms.rb

@@ -0,0 +1,48 @@
+require "sinatra_wms/version"
+require "sinatra_wms/sinatra_extension"
+require "sinatra_wms/rmagick_extension"
+
+module SinatraWMS
+	def self.merc_to_latlon(x, y)
+		lon = (x / 6378137.0) / Math::PI * 180
+		lat = Math::atan(Math::sinh(y / 6378137.0)) / Math::PI * 180
+		return [lat, lon]
+	end
+
+	def self.deg_sin(x)
+		Math.sin(x * Math::PI / 180)
+	end
+	
+	def self.get_html_for_map_at(url, options={})
+		options[:title] ||= "Sinatra-WMS"
+		options[:opacity] ||= 1
+		options[:datasource_name] ||= "WMS-Data"
+
+		%Q{
+		<html>
+			<head>
+				<title>#{options[:title]}</title>
+				<script src="http://openlayers.org/api/OpenLayers.js"></script>
+				<script src="http://ajax.googleapis.com/ajax/libs/jquery/1.7.1/jquery.min.js"></script>
+			</head>
+			<body>
+				<div style="width:100%; height:100%" id="map"></div>
+				<script type="text/javascript" defer="defer">
+					var imagebounds = new OpenLayers.Bounds(-20037508.34, -20037508.34, 20037508.34, 20037508.34);
+
+					var map = new OpenLayers.Map('map');
+					map.addControl(new OpenLayers.Control.LayerSwitcher());
+
+					var osm_layer = new OpenLayers.Layer.OSM();
+					osm_layer.setOpacity(#{options[:opacity]});
+					map.addLayer(osm_layer);
+
+					var layer = new OpenLayers.Layer.WMS("#{options[:datasource_name]}", "#{url}", {transparent: true}, {maxExtent: imagebounds});
+
+					map.addLayer(layer);
+					map.zoomToExtent(imagebounds);
+				</script>
+			</body>
+		</html>}
+	end
+end

data/sinatra_wms.gemspec

@@ -0,0 +1,24 @@
+# -*- encoding: utf-8 -*-
+$:.push File.expand_path("../lib", __FILE__)
+require "sinatra_wms/version"
+
+Gem::Specification.new do |s|
+  s.name        = "sinatra_wms"
+  s.version     = SinatraWMS::VERSION
+  s.authors     = ["Fabian Schlenz (@fabianonline)"]
+  s.email       = ["mail@fabianonline.de"]
+  s.homepage    = "http://github.com/fabianonline/sinatra_wms"
+  s.summary     = "Extends Sinatra to allow the developer to easily build a WMS server"
+  s.description = %q(A WMS (Web Map Service) is a great way to show lots of geolocated data on a map. Instead of generating static images (which will either be huge or don't have enough resolution), a WMS allows you to dynamically zoom in and out of your dataset.
+This gem allows you to very easily represent your data via a WMS. On one hand it extends Sinatra to give it a method called "wms" to process WMS-requests; on the other hand it extends RMagick to allow the developer to use coordinates in the methods used for drawing.)
+
+  s.rubyforge_project = "sinatra_wms"
+
+  s.add_dependency('sinatra', '>=1.0.0')
+  s.add_dependency('rmagick')
+
+  s.files         = `git ls-files`.split("\n")
+  s.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
+  s.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
+  s.require_paths = ["lib"]
+end

metadata

@@ -0,0 +1,107 @@
+--- !ruby/object:Gem::Specification 
+name: sinatra_wms
+version: !ruby/object:Gem::Version 
+  hash: 29
+  prerelease: 
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Fabian Schlenz (@fabianonline)
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2012-04-23 00:00:00 +02:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: sinatra
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 23
+        segments: 
+        - 1
+        - 0
+        - 0
+        version: 1.0.0
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: rmagick
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 3
+        segments: 
+        - 0
+        version: "0"
+  type: :runtime
+  version_requirements: *id002
+description: |-
+  A WMS (Web Map Service) is a great way to show lots of geolocated data on a map. Instead of generating static images (which will either be huge or don't have enough resolution), a WMS allows you to dynamically zoom in and out of your dataset.
+  This gem allows you to very easily represent your data via a WMS. On one hand it extends Sinatra to give it a method called "wms" to process WMS-requests; on the other hand it extends RMagick to allow the developer to use coordinates in the methods used for drawing.
+email: 
+- mail@fabianonline.de
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- .gitignore
+- Gemfile
+- README.md
+- Rakefile
+- lib/sinatra_wms.rb
+- lib/sinatra_wms/rmagick_extension.rb
+- lib/sinatra_wms/sinatra_extension.rb
+- lib/sinatra_wms/version.rb
+- sinatra_wms.gemspec
+has_rdoc: true
+homepage: http://github.com/fabianonline/sinatra_wms
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  none: false
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      hash: 3
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: sinatra_wms
+rubygems_version: 1.4.2
+signing_key: 
+specification_version: 3
+summary: Extends Sinatra to allow the developer to easily build a WMS server
+test_files: []
+