gotime-postgis_adapter 0.8.2

data/lib/postgis_adapter/functions/bbox.rb

@@ -0,0 +1,130 @@
+###
+##
+#
+# BBox
+#
+#
+module PostgisAdapter
+module Functions
+
+  #
+  # These operators utilize indexes. They compare geometries by bounding boxes.
+  #
+  # You can use the literal forms or call directly using the 'bbox' method. eg.:
+  #
+  #   @point.bbox(">>", @area)
+  #   @point.bbox("|&>", @area)
+  #
+  #
+  # Cheatsheet:
+  #
+  #   A &< B    =>    A overlaps or is to the left of B
+  #   A &> B    =>    A overlaps or is to the right of B
+  #   A << B    =>    A is strictly to the left of B
+  #   A >> B    =>    A is strictly to the right of B
+  #   A &<| B   =>    A overlaps B or is below B
+  #   A |&> B   =>    A overlaps or is above B
+  #   A <<| B   =>    A strictly below B
+  #   A |>> B   =>    A strictly above B
+  #   A = B     =>    A bbox same as B bbox
+  #   A @ B     =>    A completely contained by B
+  #   A ~ B     =>    A completely contains B
+  #   A && B    =>    A and B bboxes interact
+  #   A ~= B    =>    A and B geometries are binary equal?
+  #
+  def bbox(operator, other)
+    postgis_calculate(:bbox, [self, other], operator)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def completely_contained_by? other
+    bbox("@", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def completely_contains? other
+    bbox("~", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def overlaps_or_above? other
+    bbox("|&>", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def overlaps_or_below? other
+    bbox("&<|", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def overlaps_or_left_of? other
+    bbox("&<", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def overlaps_or_right_of? other
+    bbox("&>", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def strictly_above? other
+    bbox("|>>", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def strictly_below? other
+    bbox("<<|", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def strictly_left_of? other
+    bbox("<<", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def strictly_right_of? other
+    bbox(">>", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def interacts_with? other
+    bbox("&&", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def binary_equal? other
+    bbox("~=", other)
+  end
+
+  #
+  #  bbox literal method.
+  #
+  def same_as? other
+    bbox("=", other)
+  end
+end
+end

data/lib/postgis_adapter/functions/class.rb

@@ -0,0 +1,67 @@
+module PostgisAdapter
+module Functions
+
+    #
+    # Class Methods
+    #
+    module ClassMethods
+
+      #
+      # Returns the closest record
+      def closest_to(p, opts = {})
+        srid = opts.delete(:srid) || 4326
+        opts.merge!(:order => "ST_Distance(geom, GeomFromText('POINT(#{p.x} #{p.y})', #{srid}))")
+        find(:first, opts)
+      end
+
+      #
+      # Order by distance
+      def close_to(p, opts = {})
+        srid = opts.delete(:srid) || 4326
+        opts.merge!(:order => "ST_Distance(geom, GeomFromText('POINT(#{p.x} #{p.y})', #{srid}))")
+        find(:all, opts)
+      end
+
+      def by_length opts = {}
+        sort = opts.delete(:sort) || 'asc'
+        opts.merge!(:order => "ST_length(geom) #{sort}")
+        find(:all, opts)
+      end
+
+      def longest
+        find(:first, :order => "ST_length(geom) DESC")
+      end
+
+      def contains(p, srid=4326)
+        find(:all, :conditions => ["ST_Contains(geom, GeomFromText('POINT(#{p.x} #{p.y})', #{srid}))"])
+      end
+
+      def contain(p, srid=4326)
+        find(:first, :conditions => ["ST_Contains(geom, GeomFromText('POINT(#{p.x} #{p.y})', #{srid}))"])
+      end
+
+      def by_area sort='asc'
+        find(:all, :order => "ST_Area(geom) #{sort}" )
+      end
+
+      def by_perimeter sort='asc'
+        find(:all, :order => "ST_Perimeter(geom) #{sort}" )
+      end
+
+      def all_dwithin(other, margin=1)
+        # find(:all, :conditions => "ST_DWithin(geom, ST_GeomFromEWKB(E'#{other.as_ewkt}'), #{margin})")
+        find(:all, :conditions => "ST_DWithin(geom, ST_GeomFromEWKT(E'#{other.as_hex_ewkb}'), #{margin})")
+      end
+
+      def all_within(other)
+        find(:all, :conditions => "ST_Within(geom, ST_GeomFromEWKT(E'#{other.as_hex_ewkb}'))")
+      end
+
+      def by_boundaries sort='asc'
+        find(:all, :order => "ST_Boundary(geom) #{sort}" )
+      end
+
+    end
+
+end
+end