pr_geohash 1.0.0

data/.autotest

@@ -0,0 +1,23 @@
+# -*- ruby -*-
+
+require 'autotest/restart'
+
+# Autotest.add_hook :initialize do |at|
+#   at.extra_files << "../some/external/dependency.rb"
+#
+#   at.libs << ":../some/external"
+#
+#   at.add_exception 'vendor'
+#
+#   at.add_mapping(/dependency.rb/) do |f, _|
+#     at.files_matching(/test_.*rb$/)
+#   end
+#
+#   %w(TestA TestB).each do |klass|
+#     at.extra_class_map[klass] = "test/test_misc.rb"
+#   end
+# end
+
+# Autotest.add_hook :run_command do |at|
+#   system "rake build"
+# end

data/History.txt

@@ -0,0 +1,4 @@
+=== 1.0.0 / 2009-11-03
+
+* Birthday!
+

data/Manifest.txt

@@ -0,0 +1,7 @@
+.autotest
+History.txt
+Manifest.txt
+README.rdoc
+Rakefile
+lib/pr_geohash.rb
+test/test_pr_geohash.rb

data/README.rdoc

@@ -0,0 +1,98 @@
+= pr_geohash
+
+* http://github.com/masuidrive/pr_geohash
+
+
+== DESCRIPTION:
+
+GeoHash encode/decode library for pure Ruby.
+
+It's implementation of http://en.wikipedia.org/wiki/Geohash
+
+
+== FEATURES
+
+* Encode/decode geohash
+* Calculate adjacent geohash
+* Tested with Ruby 1.8.7 and JRuby 1.3.1
+
+
+== SYNOPSIS:
+
+  require "rubyforge"
+  require "pr_geohash"
+  
+  #########
+  # Encode latitude and longitude into geohash
+  
+  GeoHash.encode(47.6062095, -122.3320708)
+  # => "c23nb62w20st"
+  
+  GeoHash.encode(47.6062095, -122.3320708, 6)
+  # => "c23nb6"
+  
+  
+  #########
+  # Decode from geohash
+  
+  GeoHash.decode("c23nb6")
+  # => [[47.603759765625, -122.332763671875], [47.6092529296875, -122.32177734375]]
+  
+  
+  #########
+  # Calculate adjacent geohash
+  
+  GeoHash.neighbors("xn774c")
+  # => ["xn774f", "xn7754", "xn7751", "xn7750", "xn774b", "xn7748", "xn7749", "xn774d"]
+  
+  =begin
+  +--------+--------+--------+
+  | xn774d | xn774f | xn7754 |
+  +--------+--------+--------+
+  | xn7749 | xn774c | xn7751 |
+  +--------+--------+--------+
+  | xn7748 | xn774b | xn7750 |
+  +--------+--------+--------+
+  =end
+
+
+== INSTALL:
+
+* sudo gem install pr_geohash
+
+
+== LICENSE:
+
+(The MIT License)
+
+Copyright (c) 2009 {Yuichiro MASUI}[http://masuidrive.jp]
+
+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.
+
+
+=== Based library is
+
+http://github.com/davetroy/geohash-js/blob/master/geohash.js
+
+Geohash library for Javascript
+
+Copyright (c) 2008 David Troy, Roundhouse Technologies LLC
+
+Distributed under the MIT License

data/Rakefile

@@ -0,0 +1,14 @@
+# -*- ruby -*-
+
+require 'rubygems'
+require 'hoe'
+
+Hoe.spec 'pr_geohash' do
+  developer('Yuichiro MASUI', 'masui@masuidrive.jp')
+  
+  self.extra_rdoc_files = Dir["*.rdoc"]
+  self.readme_file = 'README.rdoc'
+  self.rubyforge_name = 'seattlerb'
+end
+
+# vim: syntax=ruby

data/lib/pr_geohash.rb

@@ -0,0 +1,93 @@
+=begin
+geohash.rb
+Geohash library for pure ruby
+Distributed under the MIT License
+
+Based library is 
+// http://github.com/davetroy/geohash-js/blob/master/geohash.js
+// geohash.js
+// Geohash library for Javascript
+// (c) 2008 David Troy
+// Distributed under the MIT License
+=end
+
+module GeoHash
+  VERSION = "1.0.0"
+  
+  #########
+  # Decode from geohash
+  # 
+  # geohash:: geohash code
+  # return:: decoded bounding box [[north latitude, west longitude],[south latitude, east longitude]]
+  def decode(geohash)
+    latlng = [[-90.0, 90.0], [-180.0, 180.0]]
+    is_lng = 1
+    geohash.downcase.scan(/./) do |c|
+      BITS.each do |mask|
+        latlng[is_lng][(BASE32.index(c) & mask)==0 ? 1 : 0] = (latlng[is_lng][0] + latlng[is_lng][1]) / 2
+        is_lng ^= 1
+      end
+    end
+    latlng.transpose
+  end
+  module_function :decode
+  
+  #########
+  # Encode latitude and longitude into geohash
+  def encode(latitude, longitude, precision=12)
+    latlng = [latitude, longitude]
+    points = [[-90.0, 90.0], [-180.0, 180.0]]
+    is_lng = 1
+    (0...precision).map {
+      ch = 0
+      5.times do |bit|
+        mid = (points[is_lng][0] + points[is_lng][1]) / 2
+        points[is_lng][latlng[is_lng] > mid ? 0 : 1] = mid
+        ch |=  BITS[bit] if latlng[is_lng] > mid
+        is_lng ^= 1
+      end
+      BASE32[ch,1]
+    }.join
+  end
+  module_function :encode
+  
+  #########
+  # Calculate neighbors (8 adjacents) geohash
+  def neighbors(geohash)
+    [[:top, :right], [:right, :bottom], [:bottom, :left], [:left, :top]].map{ |dirs|
+      point = adjacent(geohash, dirs[0])
+      [point, adjacent(point, dirs[1])]
+    }.flatten
+  end
+  module_function :neighbors
+  
+  #########
+  # Calculate adjacents geohash
+  def adjacent(geohash, dir)
+    base, lastChr = geohash[0..-2], geohash[-1,1]
+    type = (geohash.length % 2)==1 ? :odd : :even
+    if BORDERS[dir][type].include?(lastChr)
+      base = adjacent(base, dir)
+    end
+    base + BASE32[NEIGHBORS[dir][type].index(lastChr),1]
+  end
+  module_function :adjacent
+  
+  
+  BITS = [0x10, 0x08, 0x04, 0x02, 0x01]
+  BASE32 = "0123456789bcdefghjkmnpqrstuvwxyz"
+  
+  NEIGHBORS = {
+    :right  => { :even => "bc01fg45238967deuvhjyznpkmstqrwx", :odd => "p0r21436x8zb9dcf5h7kjnmqesgutwvy" },
+    :left   => { :even => "238967debc01fg45kmstqrwxuvhjyznp", :odd => "14365h7k9dcfesgujnmqp0r2twvyx8zb" },
+    :top    => { :even => "p0r21436x8zb9dcf5h7kjnmqesgutwvy", :odd => "bc01fg45238967deuvhjyznpkmstqrwx" },
+    :bottom => { :even => "14365h7k9dcfesgujnmqp0r2twvyx8zb", :odd => "238967debc01fg45kmstqrwxuvhjyznp" }
+  }
+  
+  BORDERS = {
+    :right  => { :even => "bcfguvyz", :odd => "prxz" },
+    :left   => { :even => "0145hjnp", :odd => "028b" },
+    :top    => { :even => "prxz"    , :odd => "bcfguvyz" },
+    :bottom => { :even => "028b"    , :odd => "0145hjnp" }
+  }
+end # module GeoHash

data/test/test_pr_geohash.rb

@@ -0,0 +1,49 @@
+require 'pr_geohash'
+require 'test/unit'
+
+class PrGeoHashTests < Test::Unit::TestCase
+  def test_decode
+    {
+      'c216ne' => [[45.3680419921875, -121.70654296875], [45.37353515625, -121.695556640625]],
+      'C216Ne' => [[45.3680419921875, -121.70654296875], [45.37353515625, -121.695556640625]],
+      'dqcw4'  => [[39.0234375, -76.552734375], [39.0673828125, -76.5087890625]],
+      'DQCW4'  => [[39.0234375, -76.552734375], [39.0673828125, -76.5087890625]]
+    }.each do |hash, latlng|
+      assert_equal GeoHash.decode(hash), latlng
+    end
+  end
+  
+  def test_encode
+    {
+      [ 45.37,      -121.7      ] => 'c216ne',
+      [ 47.6062095, -122.3320708] => 'c23nb62w20sth',
+      [ 35.6894875,  139.6917064] => 'xn774c06kdtve',
+      [-33.8671390,  151.2071140] => 'r3gx2f9tt5sne',
+      [ 51.5001524,   -0.1262362] => 'gcpuvpk44kprq'
+    }.each do |latlng, hash|
+      assert_equal GeoHash.encode(latlng[0], latlng[1], hash.length), hash
+    end
+  end
+  
+  def test_neighbors
+    {
+      'dqcw5' => ["dqcw7", "dqctg", "dqcw4", "dqcwh", "dqcw6", "dqcwk", "dqctf", "dqctu"],
+      'xn774c' => ['xn774f','xn774b','xn7751','xn7749','xn774d','xn7754','xn7750','xn7748'],
+      'gcpuvpk' => ['gcpuvps','gcpuvph','gcpuvpm','gcpuvp7','gcpuvpe','gcpuvpt','gcpuvpj','gcpuvp5'],
+      'c23nb62w' => ['c23nb62x','c23nb62t','c23nb62y','c23nb62q','c23nb62r','c23nb62z','c23nb62v','c23nb62m']
+    }.each do |geohash, neighbors|
+      assert_equal GeoHash.neighbors(geohash).sort, neighbors.sort
+    end
+  end
+  
+  def test_adjacent
+    {
+      ["dqcjq", :top]    => 'dqcjw',
+      ["dqcjq", :bottom] => 'dqcjn',
+      ["dqcjq", :left]   => 'dqcjm',
+      ["dqcjq", :right]  => 'dqcjr'
+    }.each do |position, hash|
+      assert_equal GeoHash.adjacent(*position), hash
+    end
+  end
+end

metadata

@@ -0,0 +1,77 @@
+--- !ruby/object:Gem::Specification 
+name: pr_geohash
+version: !ruby/object:Gem::Version 
+  version: 1.0.0
+platform: ruby
+authors: 
+- Yuichiro MASUI
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-11-03 00:00:00 -08:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: hoe
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.3.3
+    version: 
+description: |-
+  GeoHash encode/decode library for pure Ruby.
+  
+  It's implementation of http://en.wikipedia.org/wiki/Geohash
+email: 
+- masui@masuidrive.jp
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Manifest.txt
+- README.rdoc
+files: 
+- .autotest
+- History.txt
+- Manifest.txt
+- README.rdoc
+- Rakefile
+- lib/pr_geohash.rb
+- test/test_pr_geohash.rb
+has_rdoc: true
+homepage: http://github.com/masuidrive/pr_geohash
+licenses: []
+
+post_install_message: 
+rdoc_options: 
+- --main
+- README.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: seattlerb
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 3
+summary: GeoHash encode/decode library for pure Ruby
+test_files: 
+- test/test_pr_geohash.rb