hk_geo 0.1.0

data/History.txt

@@ -0,0 +1,3 @@
+= 0.1.0
+
+Initial commit

data/LICENSE

@@ -0,0 +1,22 @@
+Copyright (c) 2011 Francis Chong
+
+Permission is hereby granted, free of charge, to any person
+obtaining a copy of this software and associated documentation
+files (the "Software"), to deal in the Software without
+restriction, including without limitation the rights to use,
+copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the
+Software is furnished to do so, subject to the following
+conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES
+OF MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT
+HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY,
+WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING
+FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR
+OTHER DEALINGS IN THE SOFTWARE.

data/Manifest.txt

@@ -0,0 +1,7 @@
+Manifest.txt
+README.txt
+History.txt
+Rakefile
+LICENSE
+lib/hk_geo.rb
+lib/hk_geo/converter.rb

data/README.txt

@@ -0,0 +1,31 @@
+= HkGeo
+
+== Description
+
+A Geo location conversion API for HK.
+
+== Dependency
+
+* mechanize
+* hoe (build)
+
+== Usage
+
+By default, convert the HK80 location to WGS84/ITRF96
+
+ require 'hk_geo'
+ result = HkGeo::Converter.convert("835352.749", "815640.774")
+ >> ["22.457521648", "113.976469709"]
+ 
+You may specify other conversion
+
+ require 'hk_geo'
+ result = HkGeo::Converter.convert("835352.749", "815640.774", HkGeo::SYSTEM_HK80, HkGeo::SYSTEM_ITRF96, HkGeo::UNIT_DM)
+ >> ["22.2745130", "113.5858818"]
+ 
+Check the test for more info.
+
+== Credit
+
+This api rely on the online conversion tool from Survey and Mapping Office. http://www.geodetic.gov.hk/smo/tform/tra_tform.aspx
+

data/Rakefile

@@ -0,0 +1,11 @@
+require 'rubygems'
+require 'hoe'
+
+$: << 'lib'
+require './lib/hk_geo.rb'
+
+Hoe.plugin :gemcutter
+Hoe.spec 'hk_geo' do
+  developer('Francis Chong', 'francis@ignition.hk')
+end
+

data/lib/hk_geo/converter.rb

@@ -0,0 +1,41 @@
+require 'rubygems'
+require 'mechanize'
+
+module HkGeo
+  SYSTEM_HK80 = "HK1980"
+  SYSTEM_HKLATLONG = "HKLatLong"
+  SYSTEM_ITRF96 = "ITRF96"
+  SYSTEM_UTM84 = "UTM84"
+  SYSTEM_UTMGR = "UTMGR"
+
+  UNIT_DMS = "DMS"
+  UNIT_DEC = "DecDegree"
+  UNIT_DM = "DM"
+  UNITS = [UNIT_DMS, UNIT_DEC, UNIT_DM]
+
+  class Converter  
+    SERVICE_URL = "http://www.geodetic.gov.hk/smo/tform/tra_tform.aspx"
+  
+    def self.convert(north, east, from_coord_system=SYSTEM_HK80, to_coord_system=SYSTEM_ITRF96, unit_type=UNIT_DEC)
+      agent = Mechanize.new do |agent|
+        agent.user_agent_alias = 'Mac Safari'
+      end
+
+      page = agent.get(SERVICE_URL) 
+      form = page.form_with(:name => 'form1')
+      form.DropDownList1 = "in#{from_coord_system}"
+      form.DropDownList2 = "out#{to_coord_system}"
+      form.TextBox12 = north.to_s
+      form.TextBox13 = east.to_s
+      form.radiobuttons_with(:name => 'RadioButtonList1')[UNITS.index(unit_type)].check
+      result = form.submit(form.buttons.first)
+
+      doc = Nokogiri::HTML(result.body)
+      [doc.css("#Label16").text, doc.css("#Label17").text]
+    end
+
+    def self.systems
+      [SYSTEM_HK80, SYSTEM_HKLATLONG, SYSTEM_ITRF96, SYSTEM_UTM84, SYSTEM_UTMGR]
+    end
+  end
+end

data/lib/hk_geo.rb

@@ -0,0 +1,5 @@
+require 'hk_geo/converter'
+
+module HkGeo
+  VERSION = "0.1.0"
+end

data/test/test_hk_geo.rb

@@ -0,0 +1,18 @@
+require "rubygems"
+require "test/unit"
+require "hk_geo"
+
+class TestHkGeo < Test::Unit::TestCase
+  def test_fetch    
+    result = HkGeo::Converter.convert("835352.749", "815640.774")
+    assert_not_nil(result)
+    assert_equal("22.457521648", result[0])
+    assert_equal("113.976469709", result[1])
+    
+    result = HkGeo::Converter.convert("835352.749", "815640.774", HkGeo::SYSTEM_HK80, HkGeo::SYSTEM_ITRF96, HkGeo::UNIT_DM)
+    assert_not_nil(result)
+    assert_equal("22.2745130", result[0])
+    assert_equal("113.5858818", result[1])
+    
+  end
+end

metadata

@@ -0,0 +1,94 @@
+--- !ruby/object:Gem::Specification 
+name: hk_geo
+version: !ruby/object:Gem::Version 
+  hash: 27
+  prerelease: 
+  segments: 
+  - 0
+  - 1
+  - 0
+  version: 0.1.0
+platform: ruby
+authors: 
+- Francis Chong
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2011-06-24 00:00:00 +08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    none: false
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        hash: 35
+        segments: 
+        - 2
+        - 9
+        - 4
+        version: 2.9.4
+  type: :development
+  version_requirements: *id001
+description: A Geo location conversion API for HK.
+email: 
+- francis@ignition.hk
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- Manifest.txt
+- README.txt
+- History.txt
+files: 
+- Manifest.txt
+- README.txt
+- History.txt
+- Rakefile
+- LICENSE
+- lib/hk_geo.rb
+- lib/hk_geo/converter.rb
+- test/test_hk_geo.rb
+- .gemtest
+has_rdoc: true
+homepage: 
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README.txt
+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: hk_geo
+rubygems_version: 1.6.2
+signing_key: 
+specification_version: 3
+summary: A Geo location conversion API for HK.
+test_files: 
+- test/test_hk_geo.rb