rgeo 0.1.10

data/lib/rgeo/geography/common/geometry_collection_methods.rb

@@ -0,0 +1,206 @@
+# -----------------------------------------------------------------------------
+# 
+# Common methods for GeometryCollection geography features
+# 
+# -----------------------------------------------------------------------------
+# Copyright 2010 Daniel Azuma
+# 
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+# * Redistributions of source code must retain the above copyright notice,
+#   this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice,
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the copyright holder, nor the names of any other
+#   contributors to this software, may be used to endorse or promote products
+#   derived from this software without specific prior written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+# -----------------------------------------------------------------------------
+;
+
+
+module RGeo
+  
+  module Geography
+    
+    module Common
+      
+      
+      module GeometryCollectionMethods
+        
+        
+        def _setup(elements_)
+          @elements = elements_.map{ |elem_| factory.convert(elem_) }
+          _validate_geometry
+        end
+        
+        
+        def num_geometries
+          @elements.size
+        end
+        
+        
+        def geometry_n(n_)
+          @elements[n_]
+        end
+        
+        
+        def each(&block_)
+          @elements.each(&block_)
+        end
+        
+        
+        def dimension
+          unless @dimension
+            @dimension = -1
+            @elements.each do |elem_|
+              dim_ = elem_.dimension
+              @dimension = dim_ if @dimension < dim_
+            end
+          end
+          @dimension
+        end
+        
+        
+        def geometry_type
+          Features::GeometryCollection
+        end
+        
+        
+        def is_empty?
+          @elements.size == 0
+        end
+        
+        
+        def cast(type_)
+          if type_ == self.geometry_type
+            self
+          else
+            case type_
+            when Features::MultiPoint
+              factory.multi_point(@elements) rescue nil
+            when Features::MultiLineString
+              factory.multi_line_string(@elements) rescue nil
+            when Features::MultiPolygon
+              factory.multi_polygon(@elements) rescue nil
+            when Features::GeometryCollection
+              factory.collection(@elements) rescue nil
+            else
+              @elements.size == 1 ? @elements[0].cast(type_) : nil
+            end
+          end
+        end
+        
+        
+      end
+      
+      
+      module MultiLineStringMethods
+        
+        
+        def _validate_geometry  # :nodoc:
+          super
+          if any?{ |elem_| !Features::LineString.check_type(elem_) }
+            raise Errors::InvalidGeometry, 'Collection element is not a LineString'
+          end
+        end
+        
+        
+        def geometry_type
+          Features::MultiLineString
+        end
+        
+        
+        def is_closed?
+          all?{ |elem_| elem_.is_closed? }
+        end
+        
+        
+        def cast(type_)
+          if type_ == Features::LineString && @elements.size == 1
+            @elements[0]
+          else
+            super
+          end
+        end
+        
+        
+      end
+      
+      
+      module MultiPointMethods
+        
+        
+        def _validate_geometry  # :nodoc:
+          super
+          if any?{ |elem_| !Features::Point.check_type(elem_) }
+            raise Errors::InvalidGeometry, "Collection element is not a Point"
+          end
+        end
+        
+        
+        def geometry_type
+          Features::MultiPoint
+        end
+        
+        
+        def cast(type_)
+          if type_.name == Features::Point && @elements.size == 1
+            @elements[0]
+          else
+            super
+          end
+        end
+        
+        
+      end
+      
+      
+      module MultiPolygonMethods
+        
+        
+        def _validate_geometry  # :nodoc:
+          super
+          if any?{ |elem_| !Features::Polygon.check_type(elem_) }
+            raise Errors::InvalidGeometry, 'Collection element is not a Polygon'
+          end
+        end
+        
+        
+        def geometry_type
+          Features::MultiPolygon
+        end
+        
+        
+        def cast(type_)
+          if type_ == Features::Polygon && @elements.size == 1
+            @elements[0]
+          else
+            super
+          end
+        end
+        
+        
+      end
+      
+      
+    end
+    
+  end
+  
+end

data/lib/rgeo/geography/common/geometry_methods.rb

@@ -0,0 +1,92 @@
+# -----------------------------------------------------------------------------
+# 
+# Basic methods used by all geography features
+# 
+# -----------------------------------------------------------------------------
+# Copyright 2010 Daniel Azuma
+# 
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+# * Redistributions of source code must retain the above copyright notice,
+#   this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice,
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the copyright holder, nor the names of any other
+#   contributors to this software, may be used to endorse or promote products
+#   derived from this software without specific prior written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+# -----------------------------------------------------------------------------
+;
+
+
+module RGeo
+  
+  module Geography
+    
+    module Common
+      
+      
+      module GeometryMethods
+        
+        
+        def inspect  # :nodoc:
+          "#<#{self.class}:0x#{object_id.to_s(16)} #{as_text.inspect}>"
+        end
+        
+        def to_s  # :nodoc:
+          as_text
+        end
+        
+        
+        def _validate_geometry  # :nodoc:
+        end
+        
+        
+        def _set_factory(factory_)  # :nodoc:
+          @factory = factory_
+        end
+        
+        
+        def factory
+          @factory
+        end
+        
+        
+        def cast(type_)
+          type_ == geometry_type ? self : nil
+        end
+        
+        
+        def as_text
+          Helper.unparse_wkt(self)
+        end
+        
+        
+        def as_binary
+          Helper.unparse_wkb(self)
+        end
+        
+        
+      end
+      
+      
+    end
+    
+  end
+  
+end

data/lib/rgeo/geography/common/helper.rb

@@ -0,0 +1,102 @@
+# -----------------------------------------------------------------------------
+# 
+# Geography helpers
+# 
+# -----------------------------------------------------------------------------
+# Copyright 2010 Daniel Azuma
+# 
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+# * Redistributions of source code must retain the above copyright notice,
+#   this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice,
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the copyright holder, nor the names of any other
+#   contributors to this software, may be used to endorse or promote products
+#   derived from this software without specific prior written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+# -----------------------------------------------------------------------------
+;
+
+
+module RGeo
+  
+  module Geography
+    
+    module Common
+      
+      
+      # This is an internal module used by Geography. You generally should
+      # not need to call these methods directly.
+      
+      module Helper
+        
+        
+        RADIANS_PER_DEGREE = ::Math::PI/180.0
+        DEGREES_PER_RADIAN = 180.0/::Math::PI
+        
+        
+        @basic_factory = false
+        
+        
+        def self.factory
+          if @basic_factory == false
+            if Geos.supported?
+              @basic_factory = Geos.factory(:srid => 0)
+            else
+              @basic_factory = nil
+            end
+          end
+          @basic_factory
+        end
+        
+        
+        def self.parse_wkt(str_, factory_)
+          helper_factory_ = self.factory
+          obj_ = helper_factory_ ? helper_factory_.parse_wkt(str_) : nil
+          obj_ ? factory_.convert(obj_) : nil
+        end
+        
+        
+        def self.parse_wkb(str_, factory_)
+          helper_factory_ = self.factory
+          obj_ = helper_factory_ ? helper_factory_.parse_wkb(str_) : nil
+          obj_ ? factory_.convert(obj_) : nil
+        end
+        
+        
+        def self.unparse_wkt(obj_)
+          helper_factory_ = self.factory
+          helper_factory_ ? helper_factory_.convert(obj_).as_text : nil
+        end
+        
+        
+        def self.unparse_wkb(obj_)
+          helper_factory_ = self.factory
+          helper_factory_ ? helper_factory_.convert(obj_).as_binary : nil
+        end
+        
+        
+      end
+      
+      
+    end
+    
+  end
+  
+end

data/lib/rgeo/geography/common/line_string_methods.rb

@@ -0,0 +1,187 @@
+# -----------------------------------------------------------------------------
+# 
+# Common methods for LineString geography features
+# 
+# -----------------------------------------------------------------------------
+# Copyright 2010 Daniel Azuma
+# 
+# All rights reserved.
+# 
+# Redistribution and use in source and binary forms, with or without
+# modification, are permitted provided that the following conditions are met:
+# 
+# * Redistributions of source code must retain the above copyright notice,
+#   this list of conditions and the following disclaimer.
+# * Redistributions in binary form must reproduce the above copyright notice,
+#   this list of conditions and the following disclaimer in the documentation
+#   and/or other materials provided with the distribution.
+# * Neither the name of the copyright holder, nor the names of any other
+#   contributors to this software, may be used to endorse or promote products
+#   derived from this software without specific prior written permission.
+# 
+# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
+# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
+# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
+# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
+# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
+# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
+# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
+# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
+# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
+# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
+# POSSIBILITY OF SUCH DAMAGE.
+# -----------------------------------------------------------------------------
+;
+
+
+module RGeo
+  
+  module Geography
+    
+    module Common
+      
+      
+      module LineStringMethods
+        
+        
+        def _setup(points_)
+          @points = points_.map{ |elem_| factory.convert(elem_) }
+          _validate_geometry
+        end
+        
+        
+        def _validate_geometry
+          if @points.size == 1
+            raise Errors::InvalidGeometry, 'LineString cannot have 1 point'
+          end
+        end
+        
+        
+        def cast(type_)
+          if type_ == self.geometry_type
+            self
+          else
+            case type_
+            when Features::Line
+              if @points.size == 0 || @points.size == 2
+                factory.line(@points.first, @points.last) rescue nil
+              else
+                nil
+              end
+            when Features::LinearRing
+              factory.linear_ring(@points) rescue nil
+            when Features::LineString
+              factory.line_string(@points) rescue nil
+            when Features::GeometryCollection
+              factory.collection([self]) rescue nil
+            when Features::MultiLineString
+              factory.multi_line_string([self]) rescue nil
+            when Features::Polygon
+              ring_ = factory.linear_ring(@points) rescue nil
+              ring_ ? factory.polygon(ring_, nil) : nil rescue nil
+            else
+              super
+            end
+          end
+        end
+        
+        
+        def num_points
+          @points.size
+        end
+        
+        
+        def point_n(n_)
+          @points[n_]
+        end
+        
+        
+        def points
+          @points.dup
+        end
+        
+        
+        def dimension
+          1
+        end
+        
+        
+        def geometry_type
+          Features::LineString
+        end
+        
+        
+        def is_empty?
+          @points.size == 0
+        end
+        
+        
+        def start_point
+          @points.first
+        end
+        
+        
+        def end_point
+          @points.last
+        end
+        
+        
+        def is_closed?
+          if @is_closed.nil?
+            @is_closed = @points.size > 2 && @points.first == @points.last
+          end
+          @is_closed
+        end
+        
+        
+        def is_ring?
+          is_closed? && is_simple?
+        end
+        
+        
+      end
+      
+      
+      module LineMethods
+        
+        
+        def _validate_geometry  # :nodoc:
+          super
+          if @points.size > 2
+            raise Errors::InvalidGeometry, 'Line must have 0 or 2 points'
+          end
+        end
+        
+        
+        def geometry_type
+          Features::Line
+        end
+        
+        
+      end
+      
+      
+      module LinearRingMethods
+        
+        
+        def _validate_geometry  # :nodoc:
+          super
+          if @points.size > 0 && !is_ring?
+            raise Errors::InvalidGeometry, 'LinearRing failed ring test'
+          end
+        end
+        
+        
+        def geometry_type
+          Features::LinearRing
+        end
+        
+        
+      end
+      
+      
+    end
+    
+  end
+  
+end