test/controllers/amf_controller_test.rb

   1 require "test_helper"
   2 require "stringio"
   3 include Potlatch
   4
   5 class AmfControllerTest < ActionController::TestCase
   6   api_fixtures
   7
   8   ##
   9   # test all routes which lead to this controller
  10   def test_routes
  11     assert_routing(
  12       { :path => "/api/0.6/amf/read", :method => :post },
  13       { :controller => "amf", :action => "amf_read" }
  14     )
  15     assert_routing(
  16       { :path => "/api/0.6/amf/write", :method => :post },
  17       { :controller => "amf", :action => "amf_write" }
  18     )
  19   end
  20
  21   def test_getpresets
  22     user_en_de = create(:normal_user, :languages => %w(en de))
  23     user_de = create(:normal_user, :languages => %w(de))
  24     [user_en_de, user_de].each do |user|
  25       amf_content "getpresets", "/1", ["#{user.email}:test", ""]
  26       post :amf_read
  27       assert_response :success
  28       amf_parse_response
  29       presets = amf_result("/1")
  30
  31       assert_equal 15, presets.length
  32       assert_equal POTLATCH_PRESETS[0], presets[0]
  33       assert_equal POTLATCH_PRESETS[1], presets[1]
  34       assert_equal POTLATCH_PRESETS[2], presets[2]
  35       assert_equal POTLATCH_PRESETS[3], presets[3]
  36       assert_equal POTLATCH_PRESETS[4], presets[4]
  37       assert_equal POTLATCH_PRESETS[5], presets[5]
  38       assert_equal POTLATCH_PRESETS[6], presets[6]
  39       assert_equal POTLATCH_PRESETS[7], presets[7]
  40       assert_equal POTLATCH_PRESETS[8], presets[8]
  41       assert_equal POTLATCH_PRESETS[9], presets[9]
  42       assert_equal POTLATCH_PRESETS[10], presets[10]
  43       assert_equal POTLATCH_PRESETS[12], presets[12]
  44       assert_equal user.languages.first, presets[13]["__potlatch_locale"]
  45     end
  46   end
  47
  48   def test_getway
  49     # check a visible way
  50     id = current_ways(:visible_way).id
  51     amf_content "getway", "/1", [id]
  52     post :amf_read
  53     assert_response :success
  54     amf_parse_response
  55     way = amf_result("/1")
  56     assert_equal 0, way[0]
  57     assert_equal "", way[1]
  58     assert_equal id, way[2]
  59     assert_equal 1, way[3].length
  60     assert_equal 3, way[3][0][2]
  61     assert_equal 1, way[5]
  62     assert_equal 2, way[6]
  63   end
  64
  65   def test_getway_invisible
  66     # check an invisible way
  67     id = current_ways(:invisible_way).id
  68     amf_content "getway", "/1", [id]
  69     post :amf_read
  70     assert_response :success
  71     amf_parse_response
  72     way = amf_result("/1")
  73     assert_equal -4, way[0], -4
  74     assert_equal "way", way[1]
  75     assert_equal id, way[2]
  76     assert(way[3].nil?) && way[4].nil? && way[5].nil? && way[6].nil?
  77   end
  78
  79   def test_getway_with_versions
  80     # check a way with multiple versions
  81     id = current_ways(:way_with_versions).id
  82     amf_content "getway", "/1", [id]
  83     post :amf_read
  84     assert_response :success
  85     amf_parse_response
  86     way = amf_result("/1")
  87     assert_equal 0, way[0]
  88     assert_equal "", way[1]
  89     assert_equal id, way[2]
  90     assert_equal 1, way[3].length
  91     assert_equal 15, way[3][0][2]
  92     assert_equal 4, way[5]
  93     assert_equal 2, way[6]
  94   end
  95
  96   def test_getway_with_duplicate_nodes
  97     # check a way with duplicate nodes
  98     id = current_ways(:way_with_duplicate_nodes).id
  99     amf_content "getway", "/1", [id]
 100     post :amf_read
 101     assert_response :success
 102     amf_parse_response
 103     way = amf_result("/1")
 104     assert_equal 0, way[0]
 105     assert_equal "", way[1]
 106     assert_equal id, way[2]
 107     assert_equal 2, way[3].length
 108     assert_equal 4, way[3][0][2]
 109     assert_equal 4, way[3][1][2]
 110     assert_equal 1, way[5]
 111     assert_equal 2, way[6]
 112   end
 113
 114   def test_getway_with_multiple_nodes
 115     # check a way with multiple nodes
 116     id = current_ways(:way_with_multiple_nodes).id
 117     amf_content "getway", "/1", [id]
 118     post :amf_read
 119     assert_response :success
 120     amf_parse_response
 121     way = amf_result("/1")
 122     assert_equal 0, way[0]
 123     assert_equal "", way[1]
 124     assert_equal id, way[2]
 125     assert_equal 3, way[3].length
 126     assert_equal 4, way[3][0][2]
 127     assert_equal 15, way[3][1][2]
 128     assert_equal 11, way[3][2][2]
 129     assert_equal 2, way[5]
 130     assert_equal 2, way[6]
 131   end
 132
 133   def test_getway_nonexistent
 134     # check chat a non-existent way is not returned
 135     amf_content "getway", "/1", [0]
 136     post :amf_read
 137     assert_response :success
 138     amf_parse_response
 139     way = amf_result("/1")
 140     assert_equal -4, way[0]
 141     assert_equal "way", way[1]
 142     assert_equal 0, way[2]
 143     assert(way[3].nil?) && way[4].nil? && way[5].nil? && way[6].nil?
 144   end
 145
 146   def test_whichways
 147     node = current_nodes(:used_node_1)
 148     minlon = node.lon - 0.1
 149     minlat = node.lat - 0.1
 150     maxlon = node.lon + 0.1
 151     maxlat = node.lat + 0.1
 152     amf_content "whichways", "/1", [minlon, minlat, maxlon, maxlat]
 153     post :amf_read
 154     assert_response :success
 155     amf_parse_response
 156
 157     # check contents of message
 158     map = amf_result "/1"
 159     assert_equal 0, map[0], "map error code should be 0"
 160     assert_equal "", map[1], "map error text should be empty"
 161
 162     # check the formatting of the message
 163     assert_equal 5, map.length, "map should have length 5"
 164     assert_equal Array, map[2].class, 'map "ways" element should be an array'
 165     assert_equal Array, map[3].class, 'map "nodes" element should be an array'
 166     assert_equal Array, map[4].class, 'map "relations" element should be an array'
 167     map[2].each do |w|
 168       assert_equal 2, w.length, "way should be (id, version) pair"
 169       assert w[0] == w[0].floor, "way ID should be an integer"
 170       assert w[1] == w[1].floor, "way version should be an integer"
 171     end
 172
 173     map[3].each do |n|
 174       assert_equal 5, w.length, "node should be (id, lat, lon, [tags], version) tuple"
 175       assert n[0] == n[0].floor, "node ID should be an integer"
 176       assert n[1] >= minlat - 0.01, "node lat should be greater than min"
 177       assert n[1] <= maxlat - 0.01, "node lat should be less than max"
 178       assert n[2] >= minlon - 0.01, "node lon should be greater than min"
 179       assert n[2] <= maxlon - 0.01, "node lon should be less than max"
 180       assert_equal Array, a[3].class, "node tags should be array"
 181       assert n[4] == n[4].floor, "node version should be an integer"
 182     end
 183
 184     map[4].each do |r|
 185       assert_equal 2, r.length, "relation should be (id, version) pair"
 186       assert r[0] == r[0].floor, "relation ID should be an integer"
 187       assert r[1] == r[1].floor, "relation version should be an integer"
 188     end
 189
 190     # TODO: looks like amf_controller changed since this test was written
 191     # so someone who knows what they're doing should check this!
 192     ways = map[2].collect { |x| x[0] }
 193     assert ways.include?(current_ways(:used_way).id),
 194            "map should include used way"
 195     assert !ways.include?(current_ways(:invisible_way).id),
 196            "map should not include deleted way"
 197   end
 198
 199   ##
 200   # checks that too-large a bounding box will not be served.
 201   def test_whichways_toobig
 202     bbox = [-0.1, -0.1, 1.1, 1.1]
 203     check_bboxes_are_bad [bbox] do |map, _bbox|
 204       assert_boundary_error map, " The server said: The maximum bbox size is 0.25, and your request was too large. Either request a smaller area, or use planet.osm"
 205     end
 206   end
 207
 208   ##
 209   # checks that an invalid bounding box will not be served. in this case
 210   # one with max < min latitudes.
 211   #
 212   # NOTE: the controller expands the bbox by 0.01 in each direction!
 213   def test_whichways_badlat
 214     bboxes = [[0, 0.1, 0.1, 0], [-0.1, 80, 0.1, 70], [0.24, 54.35, 0.25, 54.33]]
 215     check_bboxes_are_bad bboxes do |map, bbox|
 216       assert_boundary_error map, " The server said: The minimum latitude must be less than the maximum latitude, but it wasn't", bbox.inspect
 217     end
 218   end
 219
 220   ##
 221   # same as test_whichways_badlat, but for longitudes
 222   #
 223   # NOTE: the controller expands the bbox by 0.01 in each direction!
 224   def test_whichways_badlon
 225     bboxes = [[80, -0.1, 70, 0.1], [54.35, 0.24, 54.33, 0.25]]
 226     check_bboxes_are_bad bboxes do |map, bbox|
 227       assert_boundary_error map, " The server said: The minimum longitude must be less than the maximum longitude, but it wasn't", bbox.inspect
 228     end
 229   end
 230
 231   def test_whichways_deleted
 232     node = current_nodes(:used_node_1)
 233     minlon = node.lon - 0.1
 234     minlat = node.lat - 0.1
 235     maxlon = node.lon + 0.1
 236     maxlat = node.lat + 0.1
 237     amf_content "whichways_deleted", "/1", [minlon, minlat, maxlon, maxlat]
 238     post :amf_read
 239     assert_response :success
 240     amf_parse_response
 241
 242     # check contents of message
 243     map = amf_result "/1"
 244     assert_equal 0, map[0], "first map element should be 0"
 245     assert_equal "", map[1], "second map element should be an empty string"
 246     assert_equal Array, map[2].class, "third map element should be an array"
 247     # TODO: looks like amf_controller changed since this test was written
 248     # so someone who knows what they're doing should check this!
 249     assert !map[2].include?(current_ways(:used_way).id),
 250            "map should not include used way"
 251     assert map[2].include?(current_ways(:invisible_way).id),
 252            "map should include deleted way"
 253   end
 254
 255   def test_whichways_deleted_toobig
 256     bbox = [-0.1, -0.1, 1.1, 1.1]
 257     amf_content "whichways_deleted", "/1", bbox
 258     post :amf_read
 259     assert_response :success
 260     amf_parse_response
 261
 262     map = amf_result "/1"
 263     assert_deleted_boundary_error map, " The server said: The maximum bbox size is 0.25, and your request was too large. Either request a smaller area, or use planet.osm"
 264   end
 265
 266   def test_getrelation
 267     id = current_relations(:visible_relation).id
 268     amf_content "getrelation", "/1", [id]
 269     post :amf_read
 270     assert_response :success
 271     amf_parse_response
 272     rel = amf_result("/1")
 273     assert_equal rel[0], 0
 274     assert_equal rel[2], id
 275   end
 276
 277   def test_getrelation_invisible
 278     id = current_relations(:invisible_relation).id
 279     amf_content "getrelation", "/1", [id]
 280     post :amf_read
 281     assert_response :success
 282     amf_parse_response
 283     rel = amf_result("/1")
 284     assert_equal rel[0], -4
 285     assert_equal rel[1], "relation"
 286     assert_equal rel[2], id
 287     assert(rel[3].nil?) && rel[4].nil?
 288   end
 289
 290   def test_getrelation_nonexistent
 291     id = 0
 292     amf_content "getrelation", "/1", [id]
 293     post :amf_read
 294     assert_response :success
 295     amf_parse_response
 296     rel = amf_result("/1")
 297     assert_equal rel[0], -4
 298     assert_equal rel[1], "relation"
 299     assert_equal rel[2], id
 300     assert(rel[3].nil?) && rel[4].nil?
 301   end
 302
 303   def test_getway_old
 304     # try to get the last visible version (specified by <0) (should be current version)
 305     latest = current_ways(:way_with_versions)
 306     # NOTE: looks from the API changes that this now expects a timestamp
 307     # instead of a version number...
 308     # try to get version 1
 309     v1 = ways(:way_with_versions_v2)
 310     { latest.id => "",
 311       v1.way_id => v1.timestamp.strftime("%d %b %Y, %H:%M:%S") }.each do |id, t|
 312       amf_content "getway_old", "/1", [id, t]
 313       post :amf_read
 314       assert_response :success
 315       amf_parse_response
 316       returned_way = amf_result("/1")
 317       assert_equal 0, returned_way[0]
 318       assert_equal id, returned_way[2]
 319       # API returns the *latest* version, even for old ways...
 320       assert_equal latest.version, returned_way[5]
 321     end
 322   end
 323
 324   ##
 325   # test that the server doesn't fall over when rubbish is passed
 326   # into the method args.
 327   def test_getway_old_invalid
 328     way_id = current_ways(:way_with_versions).id
 329     { "foo"  => "bar",
 330       way_id => "not a date",
 331       way_id => "2009-03-25 00:00:00",                   # <- wrong format
 332       way_id => "0 Jan 2009 00:00:00",                   # <- invalid date
 333       -1     => "1 Jan 2009 00:00:00" }.each do |id, t|  # <- invalid
 334       amf_content "getway_old", "/1", [id, t]
 335       post :amf_read
 336       assert_response :success
 337       amf_parse_response
 338       returned_way = amf_result("/1")
 339       assert_equal -1, returned_way[0]
 340       assert returned_way[3].nil?
 341       assert returned_way[4].nil?
 342       assert returned_way[5].nil?
 343     end
 344   end
 345
 346   def test_getway_old_nonexistent
 347     # try to get the last version-10 (shoudn't exist)
 348     v1 = ways(:way_with_versions_v1)
 349     # try to get last visible version of non-existent way
 350     # try to get specific version of non-existent way
 351     [[0, ""],
 352      [0, "1 Jan 1970, 00:00:00"],
 353      [v1.way_id, (v1.timestamp - 10).strftime("%d %b %Y, %H:%M:%S")]].each do |id, t|
 354       amf_content "getway_old", "/1", [id, t]
 355       post :amf_read
 356       assert_response :success
 357       amf_parse_response
 358       returned_way = amf_result("/1")
 359       assert_equal -1, returned_way[0]
 360       assert returned_way[3].nil?
 361       assert returned_way[4].nil?
 362       assert returned_way[5].nil?
 363     end
 364   end
 365
 366   def test_getway_old_invisible
 367     v1 = ways(:invisible_way)
 368     # try to get deleted version
 369     [[v1.way_id, (v1.timestamp + 10).strftime("%d %b %Y, %H:%M:%S")]].each do |id, t|
 370       amf_content "getway_old", "/1", [id, t]
 371       post :amf_read
 372       assert_response :success
 373       amf_parse_response
 374       returned_way = amf_result("/1")
 375       assert_equal -1, returned_way[0]
 376       assert returned_way[3].nil?
 377       assert returned_way[4].nil?
 378       assert returned_way[5].nil?
 379     end
 380   end
 381
 382   def test_getway_history
 383     latest = current_ways(:way_with_versions)
 384     oldest = ways(:way_with_versions_v1)
 385
 386     amf_content "getway_history", "/1", [latest.id]
 387     post :amf_read
 388     assert_response :success
 389     amf_parse_response
 390     history = amf_result("/1")
 391
 392     # ['way',wayid,history]
 393     assert_equal "way", history[0]
 394     assert_equal latest.id, history[1]
 395     # We use dates rather than version numbers here, because you might
 396     # have moved a node within a way (i.e. way version not incremented).
 397     # The timestamp is +1 because we say "give me the revision of 15:33:02",
 398     # but that might actually include changes at 15:33:02.457.
 399     assert_equal (latest.timestamp + 1).strftime("%d %b %Y, %H:%M:%S"), history[2].first[0]
 400     assert_equal (oldest.timestamp + 1).strftime("%d %b %Y, %H:%M:%S"), history[2].last[0]
 401   end
 402
 403   def test_getway_history_nonexistent
 404     amf_content "getway_history", "/1", [0]
 405     post :amf_read
 406     assert_response :success
 407     amf_parse_response
 408     history = amf_result("/1")
 409
 410     # ['way',wayid,history]
 411     assert_equal history[0], "way"
 412     assert_equal history[1], 0
 413     assert history[2].empty?
 414   end
 415
 416   def test_getnode_history
 417     latest = current_nodes(:node_with_versions)
 418     amf_content "getnode_history", "/1", [latest.id]
 419     post :amf_read
 420     assert_response :success
 421     amf_parse_response
 422     history = amf_result("/1")
 423
 424     # ['node',nodeid,history]
 425     # note that (as per getway_history) we actually round up
 426     # to the next second
 427     assert_equal history[0], "node",
 428                  'first element should be "node"'
 429     assert_equal history[1], latest.id,
 430                  "second element should be the input node ID"
 431     assert_equal history[2].first[0],
 432                  (latest.timestamp + 1).strftime("%d %b %Y, %H:%M:%S"),
 433                  "first element in third element (array) should be the latest version"
 434     assert_equal history[2].last[0],
 435                  (nodes(:node_with_versions_v1).timestamp + 1).strftime("%d %b %Y, %H:%M:%S"),
 436                  "last element in third element (array) should be the initial version"
 437   end
 438
 439   def test_getnode_history_nonexistent
 440     amf_content "getnode_history", "/1", [0]
 441     post :amf_read
 442     assert_response :success
 443     amf_parse_response
 444     history = amf_result("/1")
 445
 446     # ['node',nodeid,history]
 447     assert_equal history[0], "node"
 448     assert_equal history[1], 0
 449     assert history[2].empty?
 450   end
 451
 452   def test_findgpx_bad_user
 453     amf_content "findgpx", "/1", [1, "test@example.com:wrong"]
 454     post :amf_read
 455     assert_response :success
 456     amf_parse_response
 457     result = amf_result("/1")
 458
 459     assert_equal 2, result.length
 460     assert_equal -1, result[0]
 461     assert_match /must be logged in/, result[1]
 462
 463     blocked_user = create(:normal_user)
 464     create(:user_block, :user => blocked_user)
 465     amf_content "findgpx", "/1", [1, "#{blocked_user.email}:test"]
 466     post :amf_read
 467     assert_response :success
 468     amf_parse_response
 469     result = amf_result("/1")
 470
 471     assert_equal 2, result.length
 472     assert_equal -1, result[0]
 473     assert_match /access to the API has been blocked/, result[1]
 474   end
 475
 476   def test_findgpx_by_id
 477     user = create(:normal_user)
 478     trace = create(:trace, :visibility => "private", :user => user)
 479
 480     amf_content "findgpx", "/1", [trace.id, "#{user.email}:test"]
 481     post :amf_read
 482     assert_response :success
 483     amf_parse_response
 484     result = amf_result("/1")
 485
 486     assert_equal 3, result.length
 487     assert_equal 0, result[0]
 488     assert_equal "", result[1]
 489     traces = result[2]
 490     assert_equal 1, traces.length
 491     assert_equal 3, traces[0].length
 492     assert_equal trace.id, traces[0][0]
 493     assert_equal trace.name, traces[0][1]
 494     assert_equal trace.description, traces[0][2]
 495   end
 496
 497   def test_findgpx_by_name
 498     amf_content "findgpx", "/1", ["Trace", "test@example.com:test"]
 499     post :amf_read
 500     assert_response :success
 501     amf_parse_response
 502     result = amf_result("/1")
 503
 504     # find by name fails as it uses mysql text search syntax...
 505     assert_equal 2, result.length
 506     assert_equal -2, result[0]
 507   end
 508
 509   def test_findrelations_by_id
 510     relation = current_relations(:relation_with_versions)
 511
 512     amf_content "findrelations", "/1", [relation.id]
 513     post :amf_read
 514     assert_response :success
 515     amf_parse_response
 516     result = amf_result("/1")
 517
 518     assert_equal 1, result.length
 519     assert_equal 4, result[0].length
 520     assert_equal relation.id, result[0][0]
 521     assert_equal relation.tags, result[0][1]
 522     assert_equal relation.members, result[0][2]
 523     assert_equal relation.version, result[0][3]
 524
 525     amf_content "findrelations", "/1", [999999]
 526     post :amf_read
 527     assert_response :success
 528     amf_parse_response
 529     result = amf_result("/1")
 530
 531     assert_equal 0, result.length
 532   end
 533
 534   def test_findrelations_by_tags
 535     visible_relation = current_relations(:visible_relation)
 536     create(:relation_tag, :relation => visible_relation, :k => "test", :v => "yes")
 537     used_relation = current_relations(:used_relation)
 538     create(:relation_tag, :relation => used_relation, :k => "test", :v => "yes")
 539     create(:relation_tag, :relation => used_relation, :k => "name", :v => "Test Relation")
 540
 541     amf_content "findrelations", "/1", ["yes"]
 542     post :amf_read
 543     assert_response :success
 544     amf_parse_response
 545     result = amf_result("/1").sort
 546
 547     assert_equal 2, result.length
 548     assert_equal 4, result[0].length
 549     assert_equal visible_relation.id, result[0][0]
 550     assert_equal visible_relation.tags, result[0][1]
 551     assert_equal visible_relation.members, result[0][2]
 552     assert_equal visible_relation.version, result[0][3]
 553     assert_equal 4, result[1].length
 554     assert_equal used_relation.id, result[1][0]
 555     assert_equal used_relation.tags, result[1][1]
 556     assert_equal used_relation.members, result[1][2]
 557     assert_equal used_relation.version, result[1][3]
 558
 559     amf_content "findrelations", "/1", ["no"]
 560     post :amf_read
 561     assert_response :success
 562     amf_parse_response
 563     result = amf_result("/1").sort
 564
 565     assert_equal 0, result.length
 566   end
 567
 568   def test_getpoi_without_timestamp
 569     node = current_nodes(:node_with_versions)
 570
 571     amf_content "getpoi", "/1", [node.id, ""]
 572     post :amf_read
 573     assert_response :success
 574     amf_parse_response
 575     result = amf_result("/1")
 576
 577     assert_equal 7, result.length
 578     assert_equal 0, result[0]
 579     assert_equal "", result[1]
 580     assert_equal node.id, result[2]
 581     assert_equal node.lon, result[3]
 582     assert_equal node.lat, result[4]
 583     assert_equal node.tags, result[5]
 584     assert_equal node.version, result[6]
 585
 586     amf_content "getpoi", "/1", [999999, ""]
 587     post :amf_read
 588     assert_response :success
 589     amf_parse_response
 590     result = amf_result("/1")
 591
 592     assert_equal 3, result.length
 593     assert_equal -4, result[0]
 594     assert_equal "node", result[1]
 595     assert_equal 999999, result[2]
 596   end
 597
 598   def test_getpoi_with_timestamp
 599     node = nodes(:node_with_versions_v2)
 600     current_node = current_nodes(:node_with_versions)
 601
 602     amf_content "getpoi", "/1", [node.node_id, node.timestamp.xmlschema]
 603     post :amf_read
 604     assert_response :success
 605     amf_parse_response
 606     result = amf_result("/1")
 607
 608     assert_equal 7, result.length
 609     assert_equal 0, result[0]
 610     assert_equal "", result[1]
 611     assert_equal node.node_id, result[2]
 612     assert_equal node.lon, result[3]
 613     assert_equal node.lat, result[4]
 614     assert_equal node.tags, result[5]
 615     assert_equal current_node.version, result[6]
 616
 617     amf_content "getpoi", "/1", [node.node_id, "2000-01-01T00:00:00Z"]
 618     post :amf_read
 619     assert_response :success
 620     amf_parse_response
 621     result = amf_result("/1")
 622
 623     assert_equal 3, result.length
 624     assert_equal -4, result[0]
 625     assert_equal "node", result[1]
 626     assert_equal node.node_id, result[2]
 627
 628     amf_content "getpoi", "/1", [999999, Time.now.xmlschema]
 629     post :amf_read
 630     assert_response :success
 631     amf_parse_response
 632     result = amf_result("/1")
 633
 634     assert_equal 3, result.length
 635     assert_equal -4, result[0]
 636     assert_equal "node", result[1]
 637     assert_equal 999999, result[2]
 638   end
 639
 640   # ************************************************************
 641   # AMF Write tests
 642
 643   # check that we can update a poi
 644   def test_putpoi_update_valid
 645     nd = current_nodes(:visible_node)
 646     cs_id = changesets(:public_user_first_change).id
 647     amf_content "putpoi", "/1", ["test@example.com:test", cs_id, nd.version, nd.id, nd.lon, nd.lat, nd.tags, nd.visible]
 648     post :amf_write
 649     assert_response :success
 650     amf_parse_response
 651     result = amf_result("/1")
 652
 653     assert_equal 5, result.size
 654     assert_equal 0, result[0]
 655     assert_equal "", result[1]
 656     assert_equal nd.id, result[2]
 657     assert_equal nd.id, result[3]
 658     assert_equal nd.version + 1, result[4]
 659
 660     # Now try to update again, with a different lat/lon, using the updated version number
 661     lat = nd.lat + 0.1
 662     lon = nd.lon - 0.1
 663     amf_content "putpoi", "/2", ["test@example.com:test", cs_id, nd.version + 1, nd.id, lon, lat, nd.tags, nd.visible]
 664     post :amf_write
 665     assert_response :success
 666     amf_parse_response
 667     result = amf_result("/2")
 668
 669     assert_equal 5, result.size
 670     assert_equal 0, result[0]
 671     assert_equal "", result[1]
 672     assert_equal nd.id, result[2]
 673     assert_equal nd.id, result[3]
 674     assert_equal nd.version + 2, result[4]
 675   end
 676
 677   # Check that we can create a no valid poi
 678   # Using similar method for the node controller test
 679   def test_putpoi_create_valid
 680     # This node has no tags
 681
 682     # create a node with random lat/lon
 683     lat = rand(100) - 50 + rand
 684     lon = rand(100) - 50 + rand
 685     # normal user has a changeset open
 686     changeset = changesets(:public_user_first_change)
 687
 688     amf_content "putpoi", "/1", ["test@example.com:test", changeset.id, nil, nil, lon, lat, {}, nil]
 689     post :amf_write
 690     assert_response :success
 691     amf_parse_response
 692     result = amf_result("/1")
 693
 694     # check the array returned by the amf
 695     assert_equal 5, result.size
 696     assert_equal 0, result[0], "expected to get the status ok from the amf"
 697     assert_equal 0, result[2], "The old id should be 0"
 698     assert result[3] > 0, "The new id should be greater than 0"
 699     assert_equal 1, result[4], "The new version should be 1"
 700
 701     # Finally check that the node that was saved has saved the data correctly
 702     # in both the current and history tables
 703     # First check the current table
 704     current_node = Node.find(result[3].to_i)
 705     assert_in_delta lat, current_node.lat, 0.00001, "The latitude was not retreieved correctly"
 706     assert_in_delta lon, current_node.lon, 0.00001, "The longitude was not retreived correctly"
 707     assert_equal 0, current_node.tags.size, "There seems to be a tag that has been added to the node"
 708     assert_equal result[4], current_node.version, "The version returned, is different to the one returned by the amf"
 709     # Now check the history table
 710     historic_nodes = Node.where(:id => result[3])
 711     assert_equal 1, historic_nodes.size, "There should only be one historic node created"
 712     first_historic_node = historic_nodes.first
 713     assert_in_delta lat, first_historic_node.lat, 0.00001, "The latitude was not retreived correctly"
 714     assert_in_delta lon, first_historic_node.lon, 0.00001, "The longitude was not retreuved correctly"
 715     assert_equal 0, first_historic_node.tags.size, "There seems to be a tag that have been attached to this node"
 716     assert_equal result[4], first_historic_node.version, "The version returned, is different to the one returned by the amf"
 717
 718     ####
 719     # This node has some tags
 720
 721     # create a node with random lat/lon
 722     lat = rand(100) - 50 + rand
 723     lon = rand(100) - 50 + rand
 724     # normal user has a changeset open
 725     changeset = changesets(:public_user_first_change)
 726
 727     amf_content "putpoi", "/2", ["test@example.com:test", changeset.id, nil, nil, lon, lat, { "key" => "value", "ping" => "pong" }, nil]
 728     post :amf_write
 729     assert_response :success
 730     amf_parse_response
 731     result = amf_result("/2")
 732
 733     # check the array returned by the amf
 734     assert_equal 5, result.size
 735     assert_equal 0, result[0], "Expected to get the status ok in the amf"
 736     assert_equal 0, result[2], "The old id should be 0"
 737     assert result[3] > 0, "The new id should be greater than 0"
 738     assert_equal 1, result[4], "The new version should be 1"
 739
 740     # Finally check that the node that was saved has saved the data correctly
 741     # in both the current and history tables
 742     # First check the current table
 743     current_node = Node.find(result[3].to_i)
 744     assert_in_delta lat, current_node.lat, 0.00001, "The latitude was not retreieved correctly"
 745     assert_in_delta lon, current_node.lon, 0.00001, "The longitude was not retreived correctly"
 746     assert_equal 2, current_node.tags.size, "There seems to be a tag that has been added to the node"
 747     assert_equal({ "key" => "value", "ping" => "pong" }, current_node.tags, "tags are different")
 748     assert_equal result[4], current_node.version, "The version returned, is different to the one returned by the amf"
 749     # Now check the history table
 750     historic_nodes = Node.where(:id => result[3])
 751     assert_equal 1, historic_nodes.size, "There should only be one historic node created"
 752     first_historic_node = historic_nodes.first
 753     assert_in_delta lat, first_historic_node.lat, 0.00001, "The latitude was not retreived correctly"
 754     assert_in_delta lon, first_historic_node.lon, 0.00001, "The longitude was not retreuved correctly"
 755     assert_equal 2, first_historic_node.tags.size, "There seems to be a tag that have been attached to this node"
 756     assert_equal({ "key" => "value", "ping" => "pong" }, first_historic_node.tags, "tags are different")
 757     assert_equal result[4], first_historic_node.version, "The version returned, is different to the one returned by the amf"
 758   end
 759
 760   # try creating a POI with rubbish in the tags
 761   def test_putpoi_create_with_control_chars
 762     # This node has no tags
 763
 764     # create a node with random lat/lon
 765     lat = rand(100) - 50 + rand
 766     lon = rand(100) - 50 + rand
 767     # normal user has a changeset open
 768     changeset = changesets(:public_user_first_change)
 769
 770     mostly_invalid = (0..31).to_a.map(&:chr).join
 771     tags = { "something" => "foo#{mostly_invalid}bar" }
 772
 773     amf_content "putpoi", "/1", ["test@example.com:test", changeset.id, nil, nil, lon, lat, tags, nil]
 774     post :amf_write
 775     assert_response :success
 776     amf_parse_response
 777     result = amf_result("/1")
 778
 779     # check the array returned by the amf
 780     assert_equal 5, result.size
 781     assert_equal 0, result[0], "Expected to get the status ok in the amf"
 782     assert_equal 0, result[2], "The old id should be 0"
 783     assert result[3] > 0, "The new id should be greater than 0"
 784     assert_equal 1, result[4], "The new version should be 1"
 785
 786     # Finally check that the node that was saved has saved the data correctly
 787     # in both the current and history tables
 788     # First check the current table
 789     current_node = Node.find(result[3].to_i)
 790     assert_equal 1, current_node.tags.size, "There seems to be a tag that has been added to the node"
 791     assert_equal({ "something" => "foo\t\n\rbar" }, current_node.tags, "tags were not fixed correctly")
 792     assert_equal result[4], current_node.version, "The version returned, is different to the one returned by the amf"
 793   end
 794
 795   # try creating a POI with rubbish in the tags
 796   def test_putpoi_create_with_invalid_utf8
 797     # This node has no tags
 798
 799     # create a node with random lat/lon
 800     lat = rand(100) - 50 + rand
 801     lon = rand(100) - 50 + rand
 802     # normal user has a changeset open
 803     changeset = changesets(:public_user_first_change)
 804
 805     invalid = "\xc0\xc0"
 806     tags = { "something" => "foo#{invalid}bar" }
 807
 808     amf_content "putpoi", "/1", ["test@example.com:test", changeset.id, nil, nil, lon, lat, tags, nil]
 809     post :amf_write
 810     assert_response :success
 811     amf_parse_response
 812     result = amf_result("/1")
 813
 814     assert_equal 2, result.size
 815     assert_equal -1, result[0], "Expected to get the status FAIL in the amf"
 816     assert_equal "One of the tags is invalid. Linux users may need to upgrade to Flash Player 10.1.", result[1]
 817   end
 818
 819   # try deleting a node
 820   def test_putpoi_delete_valid
 821     nd = current_nodes(:visible_node)
 822     cs_id = changesets(:public_user_first_change).id
 823     amf_content "putpoi", "/1", ["test@example.com:test", cs_id, nd.version, nd.id, nd.lon, nd.lat, nd.tags, false]
 824     post :amf_write
 825     assert_response :success
 826     amf_parse_response
 827     result = amf_result("/1")
 828
 829     assert_equal 5, result.size
 830     assert_equal 0, result[0]
 831     assert_equal "", result[1]
 832     assert_equal nd.id, result[2]
 833     assert_equal nd.id, result[3]
 834     assert_equal nd.version + 1, result[4]
 835
 836     current_node = Node.find(result[3].to_i)
 837     assert_equal false, current_node.visible
 838   end
 839
 840   # try deleting a node that is already deleted
 841   def test_putpoi_delete_already_deleted
 842     nd = current_nodes(:invisible_node)
 843     cs_id = changesets(:public_user_first_change).id
 844     amf_content "putpoi", "/1", ["test@example.com:test", cs_id, nd.version, nd.id, nd.lon, nd.lat, nd.tags, false]
 845     post :amf_write
 846     assert_response :success
 847     amf_parse_response
 848     result = amf_result("/1")
 849
 850     assert_equal 3, result.size
 851     assert_equal -4, result[0]
 852     assert_equal "node", result[1]
 853     assert_equal nd.id, result[2]
 854   end
 855
 856   # try deleting a node that has never existed
 857   def test_putpoi_delete_not_found
 858     cs_id = changesets(:public_user_first_change).id
 859     amf_content "putpoi", "/1", ["test@example.com:test", cs_id, 1, 999999, 0, 0, {}, false]
 860     post :amf_write
 861     assert_response :success
 862     amf_parse_response
 863     result = amf_result("/1")
 864
 865     assert_equal 3, result.size
 866     assert_equal -4, result[0]
 867     assert_equal "node", result[1]
 868     assert_equal 999999, result[2]
 869   end
 870
 871   # try setting an invalid location on a node
 872   def test_putpoi_invalid_latlon
 873     nd = current_nodes(:visible_node)
 874     cs_id = changesets(:public_user_first_change).id
 875     amf_content "putpoi", "/1", ["test@example.com:test", cs_id, nd.version, nd.id, 200, 100, nd.tags, true]
 876     post :amf_write
 877     assert_response :success
 878     amf_parse_response
 879     result = amf_result("/1")
 880
 881     assert_equal 2, result.size
 882     assert_equal -2, result[0]
 883     assert_match /Node is not in the world/, result[1]
 884   end
 885
 886   # check that we can create a way
 887   def test_putway_create_valid
 888     cs_id = changesets(:public_user_first_change).id
 889
 890     amf_content "putway", "/1", ["test@example.com:test", cs_id, 0, -1, [1, 4, 7], { "test" => "new" }, [], {}]
 891     post :amf_write
 892     assert_response :success
 893     amf_parse_response
 894     result = amf_result("/1")
 895     new_way_id = result[3].to_i
 896
 897     assert_equal 8, result.size
 898     assert_equal 0, result[0]
 899     assert_equal "", result[1]
 900     assert_equal -1, result[2]
 901     assert_not_equal -1, result[3]
 902     assert_equal({}, result[4])
 903     assert_equal 1, result[5]
 904     assert_equal({}, result[6])
 905     assert_equal({}, result[7])
 906
 907     new_way = Way.find(new_way_id)
 908     assert_equal 1, new_way.version
 909     assert_equal [1, 4, 7], new_way.nds
 910     assert_equal({ "test" => "new" }, new_way.tags)
 911
 912     amf_content "putway", "/1", ["test@example.com:test", cs_id, 0, -1, [4, 6, 15, 1], { "test" => "newer" }, [], {}]
 913     post :amf_write
 914     assert_response :success
 915     amf_parse_response
 916     result = amf_result("/1")
 917     new_way_id = result[3].to_i
 918
 919     assert_equal 8, result.size
 920     assert_equal 0, result[0]
 921     assert_equal "", result[1]
 922     assert_equal -1, result[2]
 923     assert_not_equal -1, result[3]
 924     assert_equal({}, result[4])
 925     assert_equal 1, result[5]
 926     assert_equal({}, result[6])
 927     assert_equal({}, result[7])
 928
 929     new_way = Way.find(new_way_id)
 930     assert_equal 1, new_way.version
 931     assert_equal [4, 6, 15, 1], new_way.nds
 932     assert_equal({ "test" => "newer" }, new_way.tags)
 933
 934     amf_content "putway", "/1", ["test@example.com:test", cs_id, 0, -1, [4, -1, 6, 15], { "test" => "newest" }, [[4.56, 12.34, -1, 0, { "test" => "new" }], [12.34, 4.56, 6, 1, { "test" => "ok" }]], { 1 => 1 }]
 935     post :amf_write
 936     assert_response :success
 937     amf_parse_response
 938     result = amf_result("/1")
 939     new_way_id = result[3].to_i
 940     new_node_id = result[4]["-1"].to_i
 941
 942     assert_equal 8, result.size
 943     assert_equal 0, result[0]
 944     assert_equal "", result[1]
 945     assert_equal -1, result[2]
 946     assert_not_equal -1, result[3]
 947     assert_equal({ "-1" => new_node_id }, result[4])
 948     assert_equal 1, result[5]
 949     assert_equal({ new_node_id.to_s => 1, "6" => 2 }, result[6])
 950     assert_equal({ "1" => 1 }, result[7])
 951
 952     new_way = Way.find(new_way_id)
 953     assert_equal 1, new_way.version
 954     assert_equal [4, new_node_id, 6, 15], new_way.nds
 955     assert_equal({ "test" => "newest" }, new_way.tags)
 956
 957     new_node = Node.find(new_node_id)
 958     assert_equal 1, new_node.version
 959     assert_equal true, new_node.visible
 960     assert_equal 4.56, new_node.lon
 961     assert_equal 12.34, new_node.lat
 962     assert_equal({ "test" => "new" }, new_node.tags)
 963
 964     changed_node = Node.find(6)
 965     assert_equal 2, changed_node.version
 966     assert_equal true, changed_node.visible
 967     assert_equal 12.34, changed_node.lon
 968     assert_equal 4.56, changed_node.lat
 969     assert_equal({ "test" => "ok" }, changed_node.tags)
 970
 971     # node is not deleted because our other ways are using it
 972     deleted_node = Node.find(1)
 973     assert_equal 1, deleted_node.version
 974     assert_equal true, deleted_node.visible
 975   end
 976
 977   # check that we can update a way
 978   def test_putway_update_valid
 979     way = current_ways(:way_with_multiple_nodes)
 980     cs_id = changesets(:public_user_first_change).id
 981
 982     assert_not_equal({ "test" => "ok" }, way.tags)
 983     amf_content "putway", "/1", ["test@example.com:test", cs_id, way.version, way.id, way.nds, { "test" => "ok" }, [], {}]
 984     post :amf_write
 985     assert_response :success
 986     amf_parse_response
 987     result = amf_result("/1")
 988
 989     assert_equal 8, result.size
 990     assert_equal 0, result[0]
 991     assert_equal "", result[1]
 992     assert_equal way.id, result[2]
 993     assert_equal way.id, result[3]
 994     assert_equal({}, result[4])
 995     assert_equal way.version + 1, result[5]
 996     assert_equal({}, result[6])
 997     assert_equal({}, result[7])
 998
 999     new_way = Way.find(way.id)
1000     assert_equal way.version + 1, new_way.version
1001     assert_equal way.nds, new_way.nds
1002     assert_equal({ "test" => "ok" }, new_way.tags)
1003
1004     assert_not_equal [4, 6, 15, 1], way.tags
1005     amf_content "putway", "/1", ["test@example.com:test", cs_id, way.version + 1, way.id, [4, 6, 15, 1], way.tags, [], {}]
1006     post :amf_write
1007     assert_response :success
1008     amf_parse_response
1009     result = amf_result("/1")
1010
1011     assert_equal 8, result.size
1012     assert_equal 0, result[0]
1013     assert_equal "", result[1]
1014     assert_equal way.id, result[2]
1015     assert_equal way.id, result[3]
1016     assert_equal({}, result[4])
1017     assert_equal way.version + 2, result[5]
1018     assert_equal({}, result[6])
1019     assert_equal({}, result[7])
1020
1021     new_way = Way.find(way.id)
1022     assert_equal way.version + 2, new_way.version
1023     assert_equal [4, 6, 15, 1], new_way.nds
1024     assert_equal way.tags, new_way.tags
1025
1026     amf_content "putway", "/1", ["test@example.com:test", cs_id, way.version + 2, way.id, [4, -1, 6, 15], way.tags, [[4.56, 12.34, -1, 0, { "test" => "new" }], [12.34, 4.56, 6, 1, { "test" => "ok" }]], { 1 => 1 }]
1027     post :amf_write
1028     assert_response :success
1029     amf_parse_response
1030     result = amf_result("/1")
1031     new_node_id = result[4]["-1"].to_i
1032
1033     assert_equal 8, result.size
1034     assert_equal 0, result[0]
1035     assert_equal "", result[1]
1036     assert_equal way.id, result[2]
1037     assert_equal way.id, result[3]
1038     assert_equal({ "-1" => new_node_id }, result[4])
1039     assert_equal way.version + 3, result[5]
1040     assert_equal({ new_node_id.to_s => 1, "6" => 2 }, result[6])
1041     assert_equal({ "1" => 1 }, result[7])
1042
1043     new_way = Way.find(way.id)
1044     assert_equal way.version + 3, new_way.version
1045     assert_equal [4, new_node_id, 6, 15], new_way.nds
1046     assert_equal way.tags, new_way.tags
1047
1048     new_node = Node.find(new_node_id)
1049     assert_equal 1, new_node.version
1050     assert_equal true, new_node.visible
1051     assert_equal 4.56, new_node.lon
1052     assert_equal 12.34, new_node.lat
1053     assert_equal({ "test" => "new" }, new_node.tags)
1054
1055     changed_node = Node.find(6)
1056     assert_equal 2, changed_node.version
1057     assert_equal true, changed_node.visible
1058     assert_equal 12.34, changed_node.lon
1059     assert_equal 4.56, changed_node.lat
1060     assert_equal({ "test" => "ok" }, changed_node.tags)
1061
1062     deleted_node = Node.find(1)
1063     assert_equal 2, deleted_node.version
1064     assert_equal false, deleted_node.visible
1065   end
1066
1067   # check that we can delete a way
1068   def test_deleteway_valid
1069     way = current_ways(:way_with_multiple_nodes)
1070     nodes = way.nodes.each_with_object({}) { |n, ns| ns[n.id] = n.version }
1071     cs_id = changesets(:public_user_first_change).id
1072
1073     amf_content "deleteway", "/1", ["test@example.com:test", cs_id, way.id, way.version, nodes]
1074     post :amf_write
1075     assert_response :success
1076     amf_parse_response
1077     result = amf_result("/1")
1078
1079     assert_equal 5, result.size
1080     assert_equal 0, result[0]
1081     assert_equal "", result[1]
1082     assert_equal way.id, result[2]
1083     assert_equal way.version + 1, result[3]
1084     assert_equal({ "11" => 2 }, result[4])
1085
1086     new_way = Way.find(way.id)
1087     assert_equal way.version + 1, new_way.version
1088     assert_equal false, new_way.visible
1089
1090     way.nds.each do |node_id|
1091       assert_equal result[4][node_id.to_s].nil?, Node.find(node_id).visible
1092     end
1093   end
1094
1095   # check that we can't delete a way that is in use
1096   def test_deleteway_inuse
1097     way = current_ways(:used_way)
1098     nodes = way.nodes.each_with_object({}) { |n, ns| ns[n.id] = n.version }
1099     cs_id = changesets(:public_user_first_change).id
1100
1101     amf_content "deleteway", "/1", ["test@example.com:test", cs_id, way.id, way.version, nodes]
1102     post :amf_write
1103     assert_response :success
1104     amf_parse_response
1105     result = amf_result("/1")
1106
1107     assert_equal 2, result.size
1108     assert_equal -1, result[0]
1109     assert_match /Way #{way.id} is still used/, result[1]
1110
1111     new_way = Way.find(way.id)
1112     assert_equal way.version, new_way.version
1113     assert_equal true, new_way.visible
1114
1115     way.nds.each do |node_id|
1116       assert_equal true, Node.find(node_id).visible
1117     end
1118   end
1119
1120   # check that we can create a relation
1121   def test_putrelation_create_valid
1122     cs_id = changesets(:public_user_first_change).id
1123
1124     amf_content "putrelation", "/1", ["test@example.com:test", cs_id, 0, -1, { "test" => "new" }, [["Node", 3, "node"], ["Way", 7, "way"], ["Relation", 1, "relation"]], true]
1125     post :amf_write
1126     assert_response :success
1127     amf_parse_response
1128     result = amf_result("/1")
1129     new_relation_id = result[3].to_i
1130
1131     assert_equal 5, result.size
1132     assert_equal 0, result[0]
1133     assert_equal "", result[1]
1134     assert_equal -1, result[2]
1135     assert_not_equal -1, result[3]
1136     assert_equal 1, result[4]
1137
1138     new_relation = Relation.find(new_relation_id)
1139     assert_equal 1, new_relation.version
1140     assert_equal [["Node", 3, "node"], ["Way", 7, "way"], ["Relation", 1, "relation"]], new_relation.members
1141     assert_equal({ "test" => "new" }, new_relation.tags)
1142     assert_equal true, new_relation.visible
1143   end
1144
1145   # check that we can update a relation
1146   def test_putrelation_update_valid
1147     relation = current_relations(:visible_relation)
1148     cs_id = changesets(:public_user_first_change).id
1149
1150     assert_not_equal({ "test" => "ok" }, relation.tags)
1151     amf_content "putrelation", "/1", ["test@example.com:test", cs_id, relation.version, relation.id, { "test" => "ok" }, relation.members, true]
1152     post :amf_write
1153     assert_response :success
1154     amf_parse_response
1155     result = amf_result("/1")
1156
1157     assert_equal 5, result.size
1158     assert_equal 0, result[0]
1159     assert_equal "", result[1]
1160     assert_equal relation.id, result[2]
1161     assert_equal relation.id, result[3]
1162     assert_equal relation.version + 1, result[4]
1163
1164     new_relation = Relation.find(relation.id)
1165     assert_equal relation.version + 1, new_relation.version
1166     assert_equal relation.members, new_relation.members
1167     assert_equal({ "test" => "ok" }, new_relation.tags)
1168     assert_equal true, new_relation.visible
1169   end
1170
1171   # check that we can delete a relation
1172   def test_putrelation_delete_valid
1173     relation = current_relations(:visible_relation)
1174     cs_id = changesets(:public_user_first_change).id
1175
1176     amf_content "putrelation", "/1", ["test@example.com:test", cs_id, relation.version, relation.id, relation.tags, relation.members, false]
1177     post :amf_write
1178     assert_response :success
1179     amf_parse_response
1180     result = amf_result("/1")
1181
1182     assert_equal 5, result.size
1183     assert_equal 0, result[0]
1184     assert_equal "", result[1]
1185     assert_equal relation.id, result[2]
1186     assert_equal relation.id, result[3]
1187     assert_equal relation.version + 1, result[4]
1188
1189     new_relation = Relation.find(relation.id)
1190     assert_equal relation.version + 1, new_relation.version
1191     assert_equal [], new_relation.members
1192     assert_equal({}, new_relation.tags)
1193     assert_equal false, new_relation.visible
1194   end
1195
1196   # check that we can't delete a relation that is in use
1197   def test_putrelation_delete_inuse
1198     relation = current_relations(:public_used_relation)
1199     cs_id = changesets(:public_user_first_change).id
1200
1201     amf_content "putrelation", "/1", ["test@example.com:test", cs_id, relation.version, relation.id, relation.tags, relation.members, false]
1202     post :amf_write
1203     assert_response :success
1204     amf_parse_response
1205     result = amf_result("/1")
1206
1207     assert_equal 2, result.size
1208     assert_equal -1, result[0]
1209     assert_match /relation #{relation.id} is used in/, result[1]
1210
1211     new_relation = Relation.find(relation.id)
1212     assert_equal relation.version, new_relation.version
1213     assert_equal relation.members, new_relation.members
1214     assert_equal relation.tags, new_relation.tags
1215     assert_equal true, new_relation.visible
1216   end
1217
1218   # check that we can open a changeset
1219   def test_startchangeset_valid
1220     amf_content "startchangeset", "/1", ["test@example.com:test", { "source" => "new" }, nil, "new", 1]
1221     post :amf_write
1222     assert_response :success
1223     amf_parse_response
1224     result = amf_result("/1")
1225     new_cs_id = result[2].to_i
1226
1227     assert_equal 3, result.size
1228     assert_equal 0, result[0]
1229     assert_equal "", result[1]
1230
1231     cs = Changeset.find(new_cs_id)
1232     assert_equal true, cs.is_open?
1233     assert_equal({ "comment" => "new", "source" => "new" }, cs.tags)
1234
1235     old_cs_id = new_cs_id
1236
1237     amf_content "startchangeset", "/1", ["test@example.com:test", { "source" => "newer" }, old_cs_id, "newer", 1]
1238     post :amf_write
1239     assert_response :success
1240     amf_parse_response
1241     result = amf_result("/1")
1242     new_cs_id = result[2].to_i
1243
1244     assert_not_equal old_cs_id, new_cs_id
1245
1246     assert_equal 3, result.size
1247     assert_equal 0, result[0]
1248     assert_equal "", result[1]
1249
1250     cs = Changeset.find(old_cs_id)
1251     assert_equal false, cs.is_open?
1252     assert_equal({ "comment" => "newer", "source" => "new" }, cs.tags)
1253
1254     cs = Changeset.find(new_cs_id)
1255     assert_equal true, cs.is_open?
1256     assert_equal({ "comment" => "newer", "source" => "newer" }, cs.tags)
1257
1258     old_cs_id = new_cs_id
1259
1260     amf_content "startchangeset", "/1", ["test@example.com:test", {}, old_cs_id, "", 0]
1261     post :amf_write
1262     assert_response :success
1263     amf_parse_response
1264     result = amf_result("/1")
1265
1266     assert_equal 3, result.size
1267     assert_equal 0, result[0]
1268     assert_equal "", result[1]
1269     assert_nil result[2]
1270
1271     cs = Changeset.find(old_cs_id)
1272     assert_equal false, cs.is_open?
1273     assert_equal({ "comment" => "newer", "source" => "newer" }, cs.tags)
1274   end
1275
1276   # check that we can't close somebody elses changeset
1277   def test_startchangeset_invalid_wrong_user
1278     amf_content "startchangeset", "/1", ["test@example.com:test", { "source" => "new" }, nil, "new", 1]
1279     post :amf_write
1280     assert_response :success
1281     amf_parse_response
1282     result = amf_result("/1")
1283     cs_id = result[2].to_i
1284
1285     assert_equal 3, result.size
1286     assert_equal 0, result[0]
1287     assert_equal "", result[1]
1288
1289     cs = Changeset.find(cs_id)
1290     assert_equal true, cs.is_open?
1291     assert_equal({ "comment" => "new", "source" => "new" }, cs.tags)
1292
1293     amf_content "startchangeset", "/1", ["test@openstreetmap.org:test", {}, cs_id, "delete", 0]
1294     post :amf_write
1295     assert_response :success
1296     amf_parse_response
1297     result = amf_result("/1")
1298
1299     assert_equal 2, result.size
1300     assert_equal -2, result[0]
1301     assert_equal "The user doesn't own that changeset", result[1]
1302
1303     cs = Changeset.find(cs_id)
1304     assert_equal true, cs.is_open?
1305     assert_equal({ "comment" => "new", "source" => "new" }, cs.tags)
1306   end
1307
1308   # check that invalid characters are stripped from changeset tags
1309   def test_startchangeset_invalid_xmlchar_comment
1310     invalid = "\035\022"
1311     comment = "foo#{invalid}bar"
1312
1313     amf_content "startchangeset", "/1", ["test@example.com:test", {}, nil, comment, 1]
1314     post :amf_write
1315     assert_response :success
1316     amf_parse_response
1317     result = amf_result("/1")
1318     new_cs_id = result[2].to_i
1319
1320     assert_equal 3, result.size
1321     assert_equal 0, result[0]
1322     assert_equal "", result[1]
1323
1324     cs = Changeset.find(new_cs_id)
1325     assert_equal true, cs.is_open?
1326     assert_equal({ "comment" => "foobar" }, cs.tags)
1327   end
1328
1329   private
1330
1331   # ************************************************************
1332   # AMF Helper functions
1333
1334   # Get the result record for the specified ID
1335   # It's an assertion FAIL if the record does not exist
1336   def amf_result(ref)
1337     assert @amf_result.key?("#{ref}/onResult")
1338     @amf_result["#{ref}/onResult"]
1339   end
1340
1341   # Encode the AMF message to invoke "target" with parameters as
1342   # the passed data. The ref is used to retrieve the results.
1343   def amf_content(target, ref, data)
1344     a, b = 1.divmod(256)
1345     c = StringIO.new
1346     c.write 0.chr + 0.chr   # version 0
1347     c.write 0.chr + 0.chr   # n headers
1348     c.write a.chr + b.chr   # n bodies
1349     c.write AMF.encodestring(target)
1350     c.write AMF.encodestring(ref)
1351     c.write [-1].pack("N")
1352     c.write AMF.encodevalue(data)
1353
1354     @request.env["RAW_POST_DATA"] = c.string
1355   end
1356
1357   # Parses the @response object as an AMF messsage.
1358   # The result is a hash of message_ref => data.
1359   # The attribute @amf_result is initialised to this hash.
1360   def amf_parse_response
1361     req = StringIO.new(@response.body)
1362
1363     req.read(2) # version
1364
1365     # parse through any headers
1366     headers = AMF.getint(req)        # Read number of headers
1367     headers.times do                 # Read each header
1368       AMF.getstring(req)             #  |
1369       req.getc                       #  | skip boolean
1370       AMF.getvalue(req)              #  |
1371     end
1372
1373     # parse through responses
1374     results = {}
1375     bodies = AMF.getint(req)         # Read number of bodies
1376     bodies.times do                  # Read each body
1377       message = AMF.getstring(req)   #  | get message name
1378       AMF.getstring(req)             #  | get index in response sequence
1379       AMF.getlong(req)               #  | get total size in bytes
1380       args = AMF.getvalue(req)       #  | get response (probably an array)
1381       results[message] = args
1382     end
1383     @amf_result = results
1384     results
1385   end
1386
1387   ##
1388   # given an array of bounding boxes (each an array of 4 floats), call the
1389   # AMF "whichways" controller for each and pass the result back to the
1390   # caller's block for assertion testing.
1391   def check_bboxes_are_bad(bboxes)
1392     bboxes.each do |bbox|
1393       amf_content "whichways", "/1", bbox
1394       post :amf_read
1395       assert_response :success
1396       amf_parse_response
1397
1398       # pass the response back to the caller's block to be tested
1399       # against what the caller expected.
1400       map = amf_result "/1"
1401       yield map, bbox
1402     end
1403   end
1404
1405   # this should be what AMF controller returns when the bbox of a
1406   # whichways request is invalid or too large.
1407   def assert_boundary_error(map, msg = nil, error_hint = nil)
1408     expected_map = [-2, "Sorry - I can't get the map for that area.#{msg}"]
1409     assert_equal expected_map, map, "AMF controller should have returned an error. (#{error_hint})"
1410   end
1411
1412   # this should be what AMF controller returns when the bbox of a
1413   # whichways_deleted request is invalid or too large.
1414   def assert_deleted_boundary_error(map, msg = nil, error_hint = nil)
1415     expected_map = [-2, "Sorry - I can't get the map for that area.#{msg}"]
1416     assert_equal expected_map, map, "AMF controller should have returned an error. (#{error_hint})"
1417   end
1418 end