ffi-geos 2.4.0 → 2.5.0

data/test/geometry/union_tests.rb

@@ -0,0 +1,216 @@
+# frozen_string_literal: true
+
+require 'test_helper'
+
+class GeometryUnionTests < Minitest::Test
+  include TestHelper
+
+  def setup
+    super
+    writer.trim = true
+  end
+
+  def test_union
+    comparison_tester(
+      :union,
+      'POINT (0 0)',
+      'POINT(0 0)',
+      'POINT(0 0)'
+    )
+
+    comparison_tester(
+      :union,
+      if Geos::GEOS_NICE_VERSION >= '031200'
+        'MULTIPOINT ((0 0), (1 0))'
+      else
+        'MULTIPOINT (0 0, 1 0)'
+      end,
+      'POINT(0 0)',
+      'POINT(1 0)'
+    )
+
+    comparison_tester(
+      :union,
+      'LINESTRING (0 0, 10 0)',
+      'LINESTRING(0 0, 10 0)',
+      'POINT(5 0)'
+    )
+
+    comparison_tester(
+      :union,
+      'LINESTRING (0 0, 10 0)',
+      'POINT(5 0)',
+      'LINESTRING(0 0, 10 0)'
+    )
+
+    comparison_tester(
+      :union,
+      'GEOMETRYCOLLECTION (POINT (5 0), LINESTRING (0 1, 10 1))',
+      'POINT(5 0)',
+      'LINESTRING(0 1, 10 1)'
+    )
+
+    comparison_tester(
+      :union,
+      'MULTILINESTRING ((0 0, 5 0), (5 0, 10 0), (5 -10, 5 0), (5 0, 5 10))',
+      'LINESTRING(0 0, 10 0)',
+      'LINESTRING(5 -10, 5 10)'
+    )
+
+    comparison_tester(
+      :union,
+      'MULTILINESTRING ((0 0, 5 0), (5 0, 10 0), (10 0, 20 0))',
+      'LINESTRING(0 0, 10 0)',
+      'LINESTRING(5 0, 20 0)'
+    )
+
+    comparison_tester(
+      :union,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'GEOMETRYCOLLECTION (POLYGON ((0 10, 5 10, 10 10, 10 0, 5 0, 0 0, 0 10)), LINESTRING (5 -10, 5 0))'
+      else
+        'GEOMETRYCOLLECTION (LINESTRING (5 -10, 5 0), POLYGON ((0 0, 0 10, 5 10, 10 10, 10 0, 5 0, 0 0)))'
+      end,
+      'POLYGON((0 0, 10 0, 10 10, 0 10, 0 0))',
+      'LINESTRING(5 -10, 5 10)'
+    )
+
+    comparison_tester(
+      :union,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'GEOMETRYCOLLECTION (POLYGON ((0 10, 10 10, 10 0, 0 0, 0 10)), LINESTRING (10 0, 20 0))'
+      else
+        'GEOMETRYCOLLECTION (LINESTRING (10 0, 20 0), POLYGON ((0 0, 0 10, 10 10, 10 0, 0 0)))'
+      end,
+      'POLYGON((0 0, 10 0, 10 10, 0 10, 0 0))',
+      'LINESTRING(10 0, 20 0)'
+    )
+
+    comparison_tester(
+      :union,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'POLYGON ((0 10, 10 10, 10 5, 15 5, 15 -5, 5 -5, 5 0, 0 0, 0 10))'
+      else
+        'POLYGON ((0 0, 0 10, 10 10, 10 5, 15 5, 15 -5, 5 -5, 5 0, 0 0))'
+      end,
+      'POLYGON((0 0, 10 0, 10 10, 0 10, 0 0))',
+      'POLYGON((5 -5, 5 5, 15 5, 15 -5, 5 -5))'
+    )
+  end
+
+  def test_union_with_precision
+    skip unless ENV['FORCE_TESTS'] || Geos::FFIGeos.respond_to?(:GEOSUnionPrec_r)
+
+    geom_a = read('POINT (1.9 8.2)')
+    geom_b = read('POINT (4.1 9.8)')
+
+    result = geom_a.union(geom_b, precision: 2)
+
+    assert_equal(
+      if Geos::GEOS_NICE_VERSION >= '031200'
+        'MULTIPOINT ((2 8), (4 10))'
+      else
+        'MULTIPOINT (2 8, 4 10)'
+      end,
+      write(result)
+    )
+  end
+
+  def test_union_cascaded
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:union_cascaded)
+
+    simple_tester(
+      :union_cascaded,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'POLYGON ((0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0, 0 0), (12 12, 11 12, 11 11, 12 11, 12 12))'
+      else
+        'POLYGON ((1 0, 0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0), (11 11, 12 11, 12 12, 11 12, 11 11))'
+      end,
+      'MULTIPOLYGON(
+        ((0 0, 1 0, 1 1, 0 1, 0 0)),
+        ((10 10, 10 14, 14 14, 14 10, 10 10),
+        (11 11, 11 12, 12 12, 12 11, 11 11)),
+        ((0 0, 11 0, 11 11, 0 11, 0 0))
+      )'
+    )
+  end
+
+  def test_coverage_union
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:coverage_union)
+
+    simple_tester(
+      :union_cascaded,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'POLYGON ((0 1, 1 1, 2 1, 2 0, 1 0, 0 0, 0 1))'
+      else
+        'POLYGON ((0 0, 0 1, 1 1, 2 1, 2 0, 1 0, 0 0))'
+      end,
+      'MULTIPOLYGON(
+        ((0 0, 0 1, 1 1, 1 0, 0 0)),
+        ((1 0, 1 1, 2 1, 2 0, 1 0))
+      )'
+    )
+  end
+
+  def test_unary_union
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:unary_union)
+
+    simple_tester(
+      :unary_union,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'POLYGON ((0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0, 0 0), (12 12, 11 12, 11 11, 12 11, 12 12))'
+      else
+        'POLYGON ((1 0, 0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0), (11 11, 12 11, 12 12, 11 12, 11 11))'
+      end,
+      'MULTIPOLYGON(
+        ((0 0, 1 0, 1 1, 0 1, 0 0)),
+        ((10 10, 10 14, 14 14, 14 10, 10 10),
+        (11 11, 11 12, 12 12, 12 11, 11 11)),
+        ((0 0, 11 0, 11 11, 0 11, 0 0))
+      )'
+    )
+  end
+
+  def test_unary_union_with_precision
+    skip unless ENV['FORCE_TESTS'] || Geos::FFIGeos.respond_to?(:GEOSUnaryUnionPrec_r)
+
+    simple_tester(
+      :unary_union,
+      'POLYGON ((0 0, 0 12, 9 12, 9 15, 15 15, 15 9, 12 9, 12 0, 0 0))',
+      'MULTIPOLYGON(
+        ((0 0, 1 0, 1 1, 0 1, 0 0)),
+        ((10 10, 10 14, 14 14, 14 10, 10 10),
+        (11 11, 11 12, 12 12, 12 11, 11 11)),
+        ((0 0, 11 0, 11 11, 0 11, 0 0))
+      )',
+      3
+    )
+  end
+
+  def test_disjoint_subset_union
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:disjoint_subset_union)
+
+    simple_tester(
+      :disjoint_subset_union,
+      'MULTIPOLYGON (((0 0, 0 1, 1 1, 2 1, 2 0, 1 0, 0 0)), ((3 3, 4 3, 4 4, 3 3)))',
+      'MULTIPOLYGON (((0 0, 1 0, 1 1, 0 1, 0 0)), ((1 0, 2 0, 2 1, 1 1, 1 0)), ((3 3, 4 3, 4 4, 3 3)))'
+    )
+  end
+
+  def test_union_without_arguments
+    simple_tester(
+      :union,
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'POLYGON ((0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0, 0 0), (12 12, 11 12, 11 11, 12 11, 12 12))'
+      else
+        'POLYGON ((1 0, 0 0, 0 1, 0 11, 10 11, 10 14, 14 14, 14 10, 11 10, 11 0, 1 0), (11 11, 12 11, 12 12, 11 12, 11 11))'
+      end,
+      'MULTIPOLYGON(
+        ((0 0, 1 0, 1 1, 0 1, 0 0)),
+        ((10 10, 10 14, 14 14, 14 10, 10 10),
+        (11 11, 11 12, 12 12, 12 11, 11 11)),
+        ((0 0, 11 0, 11 11, 0 11, 0 0))
+      )'
+    )
+  end
+end

data/test/geometry/valid_tests.rb

@@ -0,0 +1,56 @@
+# frozen_string_literal: true
+
+require 'test_helper'
+
+class GeometryValidTests < Minitest::Test
+  include TestHelper
+
+  def setup
+    super
+    writer.trim = true
+  end
+
+  def test_valid
+    assert_geom_valid(read('POINT(0 0)'))
+    refute_geom_valid(read('POINT(0 NaN)'))
+    refute_geom_valid(read('POINT(0 nan)'))
+  end
+
+  def test_valid_reason
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:valid_reason)
+
+    assert_equal('Valid Geometry', read('POINT(0 0)').valid_reason)
+    assert_equal('Invalid Coordinate[0 nan]', read('POINT(0 NaN)').valid_reason)
+    assert_equal('Invalid Coordinate[0 nan]', read('POINT(0 nan)').valid_reason)
+    assert_equal('Self-intersection[2.5 5]', read('POLYGON((0 0, 0 5, 5 5, 5 10, 0 0))').valid_reason)
+  end
+
+  def test_valid_detail
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:valid_detail)
+
+    tester = lambda { |detail, location, geom, flags|
+      ret = read(geom).valid_detail(flags)
+
+      assert_equal(detail, ret[:detail])
+      assert_equal(location, write(ret[:location]))
+    }
+
+    assert_nil(read('POINT(0 0)').valid_detail)
+
+    if Geos::GEOS_NICE_VERSION >= '031000'
+      tester['Invalid Coordinate', 'POINT (0 NaN)', 'POINT(0 NaN)', 0]
+    else
+      tester['Invalid Coordinate', 'POINT (0 nan)', 'POINT(0 NaN)', 0]
+    end
+
+    tester['Self-intersection', 'POINT (2.5 5)', 'POLYGON((0 0, 0 5, 5 5, 5 10, 0 0))', 0]
+
+    tester['Ring Self-intersection', 'POINT (0 0)', 'POLYGON((0 0, -10 10, 10 10, 0 0, 4 5, -4 5, 0 0))', 0]
+
+    assert_nil(
+      read('POLYGON((0 0, -10 10, 10 10, 0 0, 4 5, -4 5, 0 0))').valid_detail(
+        :allow_selftouching_ring_forming_hole
+      )
+    )
+  end
+end

data/test/geometry/voronoi_diagram_tests.rb

@@ -0,0 +1,62 @@
+# frozen_string_literal: true
+
+require 'test_helper'
+
+class GeometryVoronoiDiagramTests < Minitest::Test
+  include TestHelper
+
+  def setup
+    super
+    writer.trim = true
+  end
+
+  def test_voronoi_diagram
+    skip unless ENV['FORCE_TESTS'] || Geos::Geometry.method_defined?(:voronoi_diagram)
+
+    tester = lambda { |expected, geom, *args|
+      geom = read(geom)
+      voronoi_diagram = geom.voronoi_diagram(*args)
+
+      assert_equal(expected, write(voronoi_diagram))
+    }
+
+    writer.trim = true
+
+    geom = 'MULTIPOINT(0 0, 100 0, 100 100, 0 100)'
+
+    tester[
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'GEOMETRYCOLLECTION (POLYGON ((200 200, 200 50, 50 50, 50 200, 200 200)), POLYGON ((-100 200, 50 200, 50 50, -100 50, -100 200)), POLYGON ((-100 -100, -100 50, 50 50, 50 -100, -100 -100)), POLYGON ((200 -100, 50 -100, 50 50, 200 50, 200 -100)))'
+      else
+        'GEOMETRYCOLLECTION (POLYGON ((50 200, 200 200, 200 50, 50 50, 50 200)), POLYGON ((-100 50, -100 200, 50 200, 50 50, -100 50)), POLYGON ((50 -100, -100 -100, -100 50, 50 50, 50 -100)), POLYGON ((200 50, 200 -100, 50 -100, 50 50, 200 50)))'
+      end,
+      geom
+    ]
+
+    tester['MULTILINESTRING ((50 50, 50 200), (200 50, 50 50), (50 50, -100 50), (50 50, 50 -100))', geom, tolerance: 0, only_edges: true]
+
+    tester['MULTILINESTRING ((50 50, 50 1100), (1100 50, 50 50), (50 50, -1000 50), (50 50, 50 -1000))', geom,
+      only_edges: true,
+      envelope: read(geom).buffer(1000)
+    ]
+
+    # Allows a tolerance for the first argument
+    writer.rounding_precision = if Geos::GEOS_NICE_VERSION >= '031000'
+      0
+    else
+      3
+    end
+
+    writer.trim = true
+
+    tester[
+      if Geos::GEOS_NICE_VERSION > '030900'
+        'GEOMETRYCOLLECTION (POLYGON ((290 140, 185 140, 185 215, 188 235, 290 252, 290 140)), POLYGON ((80 340, 101 340, 188 235, 185 215, 80 215, 80 340)), POLYGON ((80 140, 80 215, 185 215, 185 140, 80 140)), POLYGON ((290 340, 290 252, 188 235, 101 340, 290 340)))'
+      else
+        'GEOMETRYCOLLECTION (POLYGON ((290 252, 290 140, 185 140, 185 215, 188 235, 290 252)), POLYGON ((80 215, 80 340, 101 340, 188 235, 185 215, 80 215)), POLYGON ((185 140, 80 140, 80 215, 185 215, 185 140)), POLYGON ((101 340, 290 340, 290 252, 188 235, 101 340)))'
+      end,
+      'MULTIPOINT ((150 210), (210 270), (150 220), (220 210), (215 269))',
+      10
+    ]
+  end
+end

data/test/geometry_collection_tests.rb

@@ -14,6 +14,7 @@ class GeometryCollectionTests < Minitest::Test
     skip unless ENV['FORCE_TESTS'] || Geos::GeometryCollection.method_defined?(:[])
 
     geom = read('GEOMETRYCOLLECTION(POINT(0 0))')
+
     assert_kind_of(Enumerable, geom.each)
     assert_kind_of(Enumerable, geom.to_enum)
     assert_equal(geom, geom.each(&EMPTY_BLOCK))
@@ -39,7 +40,7 @@ class GeometryCollectionTests < Minitest::Test
     ], geom[0, 2].collect { |g| write(g) })
 
     assert_nil(geom[0, -1])
-    assert_equal([], geom[-1, 0])
+    assert_empty(geom[-1, 0])
     assert_equal([
       'POINT (10 20)',
       'POLYGON ((0 0, 0 5, 5 5, 5 0, 0 0))'
@@ -62,25 +63,30 @@ class GeometryCollectionTests < Minitest::Test
 
   def test_default_srid
     geom = read('GEOMETRYCOLLECTION (POINT(0 0))')
+
     assert_equal(0, geom.srid)
   end
 
   def test_setting_srid_manually
     geom = read('GEOMETRYCOLLECTION (POINT(0 0))')
     geom.srid = 4326
+
     assert_equal(4326, geom.srid)
   end
 
   def test_dimensions
     geom = read('GEOMETRYCOLLECTION (POINT(0 0))')
+
     assert_equal(0, geom.dimensions)
 
     geom = read('GEOMETRYCOLLECTION (LINESTRING(1 2, 3 4))')
+
     assert_equal(1, geom.dimensions)
   end
 
   def test_num_geometries
     geom = read('GEOMETRYCOLLECTION (POINT(1 2), LINESTRING(1 2, 3 4))')
+
     assert_equal(2, geom.num_geometries)
   end
 
@@ -130,6 +136,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0),
       POINT(3 12)
     )')
+
     assert_equal(0, geom.z_max)
 
     geom = read('GEOMETRYCOLLECTION Z (
@@ -137,6 +144,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING Z (0 0 0, 5 0 3, 8 9 4, -10 5 3, 0 0 0),
       POINT Z (3 12 6)
     )')
+
     assert_equal(6, geom.z_max)
 
     # GEOS lets you mix dimensionality, while PostGIS doesn't.
@@ -145,6 +153,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0),
       POINT(3 12 10)
     )')
+
     assert_equal(10, geom.z_max)
   end
 
@@ -154,6 +163,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0),
       POINT(3 12)
     )')
+
     assert_equal(0, geom.z_min)
 
     geom = read('GEOMETRYCOLLECTION Z (
@@ -161,6 +171,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING Z (0 0 0, 5 0 3, 8 9 4, -10 5 3, 0 0 0),
       POINT Z (3 12 6)
     )')
+
     assert_equal(0, geom.z_min)
 
     # GEOS lets you mix dimensionality, while PostGIS doesn't.
@@ -169,6 +180,7 @@ class GeometryCollectionTests < Minitest::Test
       LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0),
       POINT(3 12 -10)
     )')
+
     assert_equal(-10, geom.z_min)
   end
 
@@ -182,7 +194,7 @@ class GeometryCollectionTests < Minitest::Test
   end
 
   def test_snap_to_grid_empty
-    assert(read('GEOMETRYCOLLECTION EMPTY').snap_to_grid!.empty?, 'Expected an empty GeometryCollection')
+    assert_empty(read('GEOMETRYCOLLECTION EMPTY').snap_to_grid!, 'Expected an empty GeometryCollection')
   end
 
   def test_snap_to_grid_with_srid

data/test/interrupt_tests.rb

@@ -26,7 +26,7 @@ class InterruptTests < Minitest::Test
   end
 
   def assert_interrupt_called(times = 0)
-    assert(@interrupt_calls > times, "Expected @interrupt_calls to be > #{times}")
+    assert_operator(@interrupt_calls, :>, times, "Expected @interrupt_calls to be > #{times}")
   end
 
   def test_interrupt_with_method

data/test/line_string_tests.rb

@@ -12,25 +12,30 @@ class LineStringTests < Minitest::Test
 
   def test_default_srid
     geom = read('LINESTRING (0 0, 10 10)')
+
     assert_equal(0, geom.srid)
   end
 
   def test_setting_srid_manually
     geom = read('LINESTRING (0 0, 10 10)')
     geom.srid = 4326
+
     assert_equal(4326, geom.srid)
   end
 
   def test_dimensions
     geom = read('LINESTRING (0 0, 10 10)')
+
     assert_equal(1, geom.dimensions)
 
     geom = read('LINESTRING (0 0 0, 10 10 10)')
+
     assert_equal(1, geom.dimensions)
   end
 
   def test_num_geometries
     geom = read('LINESTRING (0 0, 10 10)')
+
     assert_equal(1, geom.num_geometries)
   end
 
@@ -48,7 +53,7 @@ class LineStringTests < Minitest::Test
     ], geom[0, 2].collect { |g| write(g) })
 
     assert_nil(geom[0, -1])
-    assert_equal([], geom[-1, 0])
+    assert_empty(geom[-1, 0])
     assert_equal([
       'POINT (1 1)',
       'POINT (2 2)'
@@ -95,7 +100,15 @@ class LineStringTests < Minitest::Test
     # outside curve
     simple_tester(
       :offset_curve,
-      if Geos::GEOS_NICE_VERSION >= '031100'
+      if Geos::GEOS_NICE_VERSION >= '031201'
+        'LINESTRING (0 -2, 10 -2, 10.390180644032256 -1.9615705608064609, 10.76536686473018 -1.8477590650225735, ' \
+          '11.111140466039204 -1.6629392246050905, 11.414213562373096 -1.414213562373095, 11.66293922460509 -1.1111404660392044, ' \
+          '11.847759065022574 -0.7653668647301796, 11.96157056080646 -0.3901806440322565, 12 0, 12 10)'
+      elsif Geos::GEOS_NICE_VERSION >= '031200'
+        'LINESTRING (0 -2, 10 -2, 10.390180644032256 -1.9615705608064609, 10.76536686473018 -1.8477590650225735, ' \
+          '11.111140466039204 -1.6629392246050902, 11.414213562373096 -1.414213562373095, 11.66293922460509 -1.1111404660392044, ' \
+          '11.847759065022574 -0.7653668647301796, 11.96157056080646 -0.3901806440322565, 12 0, 12 10)'
+      elsif Geos::GEOS_NICE_VERSION >= '031100'
         'LINESTRING (0 -2, 10 -2, 12 0, 12 10)'
       else
         'LINESTRING (12 10, 12 0, 10 -2, 0 -2)'
@@ -199,37 +212,45 @@ class LineStringTests < Minitest::Test
 
   def test_x_max
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(8, geom.x_max)
   end
 
   def test_x_min
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(-10, geom.x_min)
   end
 
   def test_y_max
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(9, geom.y_max)
   end
 
   def test_y_min
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(0, geom.y_min)
   end
 
   def test_z_max
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(0, geom.z_max)
 
     geom = read('LINESTRING Z (0 0 0, 5 0 3, 8 9 4, -10 5 3, 0 0 0)')
+
     assert_equal(4, geom.z_max)
   end
 
   def test_z_min
     geom = read('LINESTRING (0 0, 5 0, 8 9, -10 5, 0 0)')
+
     assert_equal(0, geom.z_min)
 
     geom = read('LINESTRING Z (0 0 0, 5 0 3, 8 9 4, -10 5 3, 0 0 0)')
+
     assert_equal(0, geom.z_min)
   end
 
@@ -241,7 +262,7 @@ class LineStringTests < Minitest::Test
   end
 
   def test_snap_to_grid_empty
-    assert(read('LINESTRING EMPTY').snap_to_grid!.empty?, 'Expected an empty LineString')
+    assert_empty(read('LINESTRING EMPTY').snap_to_grid!, 'Expected an empty LineString')
   end
 
   def test_snap_to_grid_with_srid

data/test/misc_tests.rb

@@ -111,7 +111,7 @@ class MiscTests < Minitest::Test
 
     yield results
 
-    refute(geom.valid?, 'Expected geom to be invalid')
+    refute_predicate(geom, :valid?, 'Expected geom to be invalid')
     assert_match(/^NOTICE: .+$/, results)
   ensure
     Geos.current_handle.reset_notice_handler

data/test/point/has_m_tests.rb

@@ -0,0 +1,43 @@
+# frozen_string_literal: true
+
+require 'test_helper'
+
+describe 'Geometry#has_z? and #has_m?' do
+  include TestHelper
+
+  def setup
+    super
+    writer.trim = true
+  end
+
+  def tester(geom, z: false, m: false)
+    geom = read(geom)
+
+    assert_equal(z, geom.has_z?) if Geos::Geometry.method_defined?(:has_z?)
+    assert_equal(m, geom.has_m?) if Geos::Geometry.method_defined?(:has_m?)
+  end
+
+  it 'handles 2D POLYGON' do
+    tester('POLYGON ((1 -2, 9 -2, 9 5, 1 5, 1 -2))', z: false, m: false)
+  end
+
+  it 'handles M POINT' do
+    tester('POINT M (1 2 3)', z: false, m: true)
+  end
+
+  it 'handles an empty POINT' do
+    tester('POINT EMPTY', z: false, m: false)
+  end
+
+  it 'handles an empty Z POINT' do
+    tester('POINT Z EMPTY', z: true, m: false)
+  end
+
+  it 'handles an M POINT' do
+    tester('POINT M EMPTY', z: false, m: true)
+  end
+
+  it 'handles an ZM POINT' do
+    tester('POINT ZM EMPTY', z: true, m: true)
+  end
+end

data/test/point/x_y_z_m_tests.rb

@@ -0,0 +1,51 @@
+# frozen_string_literal: true
+
+require 'test_helper'
+
+describe 'X, Y, Z, M' do
+  include TestHelper
+
+  def setup
+    super
+    writer.trim = true
+  end
+
+  it 'can get X, Y, Z, M from a 2D POINT' do
+    geom = read('POINT (1 2)')
+
+    assert_equal(1, geom.x)
+    assert_equal(2, geom.y)
+    assert_predicate(geom.z, :nan?)
+    assert_predicate(geom.m, :nan?) if geom.respond_to?(:m)
+  end
+
+  it 'can get Z, M from a 3D POINT' do
+    geom = read('POINT Z (1 2 3)')
+
+    assert_equal(3, geom.z)
+    assert_predicate(geom.m, :nan?) if geom.respond_to?(:m)
+  end
+
+  it 'can get Z, M from an M POINT' do
+    geom = read('POINT M (1 2 4)')
+
+    assert_predicate(geom.z, :nan?)
+    assert_equal(4, geom.m) if geom.respond_to?(:m)
+  end
+
+  it 'can get Z, M from a ZM POINT' do
+    geom = read('POINT ZM (1 2 3 4)')
+
+    assert_equal(3, geom.z)
+    assert_equal(4, geom.m) if geom.respond_to?(:m)
+  end
+
+  it 'handles an empty POINT' do
+    geom = read('POINT EMPTY')
+
+    assert_raises(Geos::GEOSException, 'UnsupportedOperationException') { geom.x }
+    assert_raises(Geos::GEOSException, 'UnsupportedOperationException') { geom.y }
+    assert_raises(Geos::GEOSException, 'UnsupportedOperationException') { geom.z }
+    assert_raises(Geos::GEOSException, 'UnsupportedOperationException') { geom.m } if geom.respond_to?(:m)
+  end
+end