require "cases/helper" require "support/connection_helper" require "support/schema_dumping_helper" class PostgresqlPointTest < ActiveRecord::PostgreSQLTestCase include ConnectionHelper include SchemaDumpingHelper class PostgresqlPoint < ActiveRecord::Base attribute :x, :point attribute :y, :point attribute :z, :point attribute :array_of_points, :point, array: true attribute :legacy_x, :legacy_point attribute :legacy_y, :legacy_point attribute :legacy_z, :legacy_point end def setup @connection = ActiveRecord::Base.connection @connection.create_table("postgresql_points") do |t| t.point :x t.point :y, default: [12.2, 13.3] t.point :z, default: "(14.4,15.5)" t.point :array_of_points, array: true t.point :legacy_x t.point :legacy_y, default: [12.2, 13.3] t.point :legacy_z, default: "(14.4,15.5)" end end teardown do @connection.drop_table "postgresql_points", if_exists: true end def test_column column = PostgresqlPoint.columns_hash["x"] assert_equal :point, column.type assert_equal "point", column.sql_type assert_not column.array? type = PostgresqlPoint.type_for_attribute("x") assert_not type.binary? end def test_default assert_equal ActiveRecord::Point.new(12.2, 13.3), PostgresqlPoint.column_defaults["y"] assert_equal ActiveRecord::Point.new(12.2, 13.3), PostgresqlPoint.new.y assert_equal ActiveRecord::Point.new(14.4, 15.5), PostgresqlPoint.column_defaults["z"] assert_equal ActiveRecord::Point.new(14.4, 15.5), PostgresqlPoint.new.z end def test_schema_dumping output = dump_table_schema("postgresql_points") assert_match %r{t\.point\s+"x"$}, output assert_match %r{t\.point\s+"y",\s+default: \[12\.2, 13\.3\]$}, output assert_match %r{t\.point\s+"z",\s+default: \[14\.4, 15\.5\]$}, output end def test_roundtrip PostgresqlPoint.create! x: [10, 25.2] record = PostgresqlPoint.first assert_equal ActiveRecord::Point.new(10, 25.2), record.x record.x = ActiveRecord::Point.new(1.1, 2.2) record.save! assert record.reload assert_equal ActiveRecord::Point.new(1.1, 2.2), record.x end def test_mutation p = PostgresqlPoint.create! x: ActiveRecord::Point.new(10, 20) p.x.y = 25 p.save! p.reload assert_equal ActiveRecord::Point.new(10.0, 25.0), p.x assert_not p.changed? end def test_array_assignment p = PostgresqlPoint.new(x: [1, 2]) assert_equal ActiveRecord::Point.new(1, 2), p.x end def test_string_assignment p = PostgresqlPoint.new(x: "(1, 2)") assert_equal ActiveRecord::Point.new(1, 2), p.x end def test_empty_string_assignment p = PostgresqlPoint.new(x: "") assert_nil p.x end def test_array_of_points_round_trip expected_value = [ ActiveRecord::Point.new(1, 2), ActiveRecord::Point.new(2, 3), ActiveRecord::Point.new(3, 4), ] p = PostgresqlPoint.new(array_of_points: expected_value) assert_equal expected_value, p.array_of_points p.save! p.reload assert_equal expected_value, p.array_of_points end def test_legacy_column column = PostgresqlPoint.columns_hash["legacy_x"] assert_equal :point, column.type assert_equal "point", column.sql_type assert_not column.array? type = PostgresqlPoint.type_for_attribute("legacy_x") assert_not type.binary? end def test_legacy_default assert_equal [12.2, 13.3], PostgresqlPoint.column_defaults["legacy_y"] assert_equal [12.2, 13.3], PostgresqlPoint.new.legacy_y assert_equal [14.4, 15.5], PostgresqlPoint.column_defaults["legacy_z"] assert_equal [14.4, 15.5], PostgresqlPoint.new.legacy_z end def test_legacy_schema_dumping output = dump_table_schema("postgresql_points") assert_match %r{t\.point\s+"legacy_x"$}, output assert_match %r{t\.point\s+"legacy_y",\s+default: \[12\.2, 13\.3\]$}, output assert_match %r{t\.point\s+"legacy_z",\s+default: \[14\.4, 15\.5\]$}, output end def test_legacy_roundtrip PostgresqlPoint.create! legacy_x: [10, 25.2] record = PostgresqlPoint.first assert_equal [10, 25.2], record.legacy_x record.legacy_x = [1.1, 2.2] record.save! assert record.reload assert_equal [1.1, 2.2], record.legacy_x end def test_legacy_mutation p = PostgresqlPoint.create! legacy_x: [10, 20] p.legacy_x[1] = 25 p.save! p.reload assert_equal [10.0, 25.0], p.legacy_x assert_not p.changed? end end class PostgresqlGeometricTest < ActiveRecord::PostgreSQLTestCase include SchemaDumpingHelper class PostgresqlGeometric < ActiveRecord::Base; end setup do @connection = ActiveRecord::Base.connection @connection.create_table("postgresql_geometrics") do |t| t.lseg :a_line_segment t.box :a_box t.path :a_path t.polygon :a_polygon t.circle :a_circle end end teardown do @connection.drop_table "postgresql_geometrics", if_exists: true end def test_geometric_types g = PostgresqlGeometric.new( a_line_segment: "(2.0, 3), (5.5, 7.0)", a_box: "2.0, 3, 5.5, 7.0", a_path: "[(2.0, 3), (5.5, 7.0), (8.5, 11.0)]", a_polygon: "((2.0, 3), (5.5, 7.0), (8.5, 11.0))", a_circle: "<(5.3, 10.4), 2>" ) g.save! h = PostgresqlGeometric.find(g.id) assert_equal "[(2,3),(5.5,7)]", h.a_line_segment assert_equal "(5.5,7),(2,3)", h.a_box # reordered to store upper right corner then bottom left corner assert_equal "[(2,3),(5.5,7),(8.5,11)]", h.a_path assert_equal "((2,3),(5.5,7),(8.5,11))", h.a_polygon assert_equal "<(5.3,10.4),2>", h.a_circle end def test_alternative_format g = PostgresqlGeometric.new( a_line_segment: "((2.0, 3), (5.5, 7.0))", a_box: "(2.0, 3), (5.5, 7.0)", a_path: "((2.0, 3), (5.5, 7.0), (8.5, 11.0))", a_polygon: "2.0, 3, 5.5, 7.0, 8.5, 11.0", a_circle: "((5.3, 10.4), 2)" ) g.save! h = PostgresqlGeometric.find(g.id) assert_equal "[(2,3),(5.5,7)]", h.a_line_segment assert_equal "(5.5,7),(2,3)", h.a_box # reordered to store upper right corner then bottom left corner assert_equal "((2,3),(5.5,7),(8.5,11))", h.a_path assert_equal "((2,3),(5.5,7),(8.5,11))", h.a_polygon assert_equal "<(5.3,10.4),2>", h.a_circle end def test_geometric_function PostgresqlGeometric.create! a_path: "[(2.0, 3), (5.5, 7.0), (8.5, 11.0)]" # [ ] is an open path PostgresqlGeometric.create! a_path: "((2.0, 3), (5.5, 7.0), (8.5, 11.0))" # ( ) is a closed path objs = PostgresqlGeometric.find_by_sql "SELECT isopen(a_path) FROM postgresql_geometrics ORDER BY id ASC" assert_equal [true, false], objs.map(&:isopen) objs = PostgresqlGeometric.find_by_sql "SELECT isclosed(a_path) FROM postgresql_geometrics ORDER BY id ASC" assert_equal [false, true], objs.map(&:isclosed) end def test_schema_dumping output = dump_table_schema("postgresql_geometrics") assert_match %r{t\.lseg\s+"a_line_segment"$}, output assert_match %r{t\.box\s+"a_box"$}, output assert_match %r{t\.path\s+"a_path"$}, output assert_match %r{t\.polygon\s+"a_polygon"$}, output assert_match %r{t\.circle\s+"a_circle"$}, output end end class PostgreSQLGeometricLineTest < ActiveRecord::PostgreSQLTestCase include SchemaDumpingHelper class PostgresqlLine < ActiveRecord::Base; end setup do unless ActiveRecord::Base.connection.send(:postgresql_version) >= 90400 skip("line type is not fully implemented") end @connection = ActiveRecord::Base.connection @connection.create_table("postgresql_lines") do |t| t.line :a_line end end teardown do if defined?(@connection) @connection.drop_table "postgresql_lines", if_exists: true end end def test_geometric_line_type g = PostgresqlLine.new( a_line: "{2.0, 3, 5.5}" ) g.save! h = PostgresqlLine.find(g.id) assert_equal "{2,3,5.5}", h.a_line end def test_alternative_format_line_type g = PostgresqlLine.new( a_line: "(2.0, 3), (4.0, 6.0)" ) g.save! h = PostgresqlLine.find(g.id) assert_equal "{1.5,-1,0}", h.a_line end def test_schema_dumping_for_line_type output = dump_table_schema("postgresql_lines") assert_match %r{t\.line\s+"a_line"$}, output end end class PostgreSQLGeometricTypesTest < ActiveRecord::PostgreSQLTestCase attr_reader :connection, :table_name def setup super @connection = ActiveRecord::Base.connection @table_name = :testings end def test_creating_column_with_point_type connection.create_table(table_name) do |t| t.point :foo_point end assert_column_exists(:foo_point) assert_type_correct(:foo_point, :point) end def test_creating_column_with_line_type connection.create_table(table_name) do |t| t.line :foo_line end assert_column_exists(:foo_line) assert_type_correct(:foo_line, :line) end def test_creating_column_with_lseg_type connection.create_table(table_name) do |t| t.lseg :foo_lseg end assert_column_exists(:foo_lseg) assert_type_correct(:foo_lseg, :lseg) end def test_creating_column_with_box_type connection.create_table(table_name) do |t| t.box :foo_box end assert_column_exists(:foo_box) assert_type_correct(:foo_box, :box) end def test_creating_column_with_path_type connection.create_table(table_name) do |t| t.path :foo_path end assert_column_exists(:foo_path) assert_type_correct(:foo_path, :path) end def test_creating_column_with_polygon_type connection.create_table(table_name) do |t| t.polygon :foo_polygon end assert_column_exists(:foo_polygon) assert_type_correct(:foo_polygon, :polygon) end def test_creating_column_with_circle_type connection.create_table(table_name) do |t| t.circle :foo_circle end assert_column_exists(:foo_circle) assert_type_correct(:foo_circle, :circle) end private def assert_column_exists(column_name) assert connection.column_exists?(table_name, column_name) end def assert_type_correct(column_name, type) column = connection.columns(table_name).find { |c| c.name == column_name.to_s } assert_equal type, column.type end end