require File.dirname(__FILE__) + '/../test_helper'
require 'old_node_controller'

class OldNodeControllerTest < ActionController::TestCase
  api_fixtures

  #
  # TODO: test history
  #

  ##
  # test the version call by submitting several revisions of a new node
  # to the API and ensuring that later calls to version return the 
  # matching versions of the object.
  #
  ##
  # FIXME Move this test to being an integration test since it spans multiple controllers 
  def test_version
    ## First try this with a non-public user
    basic_authorization(users(:normal_user).email, "test")
    changeset_id = changesets(:normal_user_first_change).id
    
    # setup a simple XML node
    xml_doc = current_nodes(:visible_node).to_xml
    xml_node = xml_doc.find("//osm/node").first
    nodeid = current_nodes(:visible_node).id

    # keep a hash of the versions => string, as we'll need something
    # to test against later
    versions = Hash.new

    # save a version for later checking
    versions[xml_node['version']] = xml_doc.to_s

    # randomly move the node about
    20.times do 
      # move the node somewhere else
      xml_node['lat'] = precision(rand * 180 -  90).to_s
      xml_node['lon'] = precision(rand * 360 - 180).to_s
      with_controller(NodeController.new) do
        content xml_doc
        put :update, :id => nodeid
        assert_response :forbidden, "Should have rejected node update"
        xml_node['version'] = @response.body.to_s
      end
      # save a version for later checking
      versions[xml_node['version']] = xml_doc.to_s
    end

    # add a bunch of random tags
    30.times do 
      xml_tag = XML::Node.new("tag")
      xml_tag['k'] = random_string
      xml_tag['v'] = random_string
      xml_node << xml_tag
      with_controller(NodeController.new) do
        content xml_doc
        put :update, :id => nodeid
        assert_response :forbidden,
        "should have rejected node #{nodeid} (#{@response.body}) with forbidden"
        xml_node['version'] = @response.body.to_s
      end
      # save a version for later checking
      versions[xml_node['version']] = xml_doc.to_s
    end

    # probably should check that they didn't get written to the database

    
    ## Now do it with the public user
    basic_authorization(users(:public_user).email, "test")
    changeset_id = changesets(:public_user_first_change).id

    # setup a simple XML node
    xml_doc = current_nodes(:node_with_versions).to_xml
    xml_node = xml_doc.find("//osm/node").first
    nodeid = current_nodes(:node_with_versions).id

    # keep a hash of the versions => string, as we'll need something
    # to test against later
    versions = Hash.new

    # save a version for later checking
    versions[xml_node['version']] = xml_doc.to_s

    # randomly move the node about
    20.times do 
      # move the node somewhere else
      xml_node['lat'] = precision(rand * 180 -  90).to_s
      xml_node['lon'] = precision(rand * 360 - 180).to_s
      with_controller(NodeController.new) do
        content xml_doc
        put :update, :id => nodeid
        assert_response :success
        xml_node['version'] = @response.body.to_s
      end
      # save a version for later checking
      versions[xml_node['version']] = xml_doc.to_s
    end

    # add a bunch of random tags
    30.times do 
      xml_tag = XML::Node.new("tag")
      xml_tag['k'] = random_string
      xml_tag['v'] = random_string
      xml_node << xml_tag
      with_controller(NodeController.new) do
        content xml_doc
        put :update, :id => nodeid
        assert_response :success,
        "couldn't update node #{nodeid} (#{@response.body})"
        xml_node['version'] = @response.body.to_s
      end
      # save a version for later checking
      versions[xml_node['version']] = xml_doc.to_s
    end

    # check all the versions
    versions.keys.each do |key|
      get :version, :id => nodeid, :version => key.to_i

      assert_response :success,
         "couldn't get version #{key.to_i} of node #{nodeid}"

      check_node = Node.from_xml(versions[key])
      api_node = Node.from_xml(@response.body.to_s)

      assert_nodes_are_equal check_node, api_node
    end
  end
  
  def test_not_found_version
    check_not_found_id_version(70000,312344)
    check_not_found_id_version(-1, -13)
    check_not_found_id_version(nodes(:visible_node).id, 24354)
    check_not_found_id_version(24356,   nodes(:visible_node).version)
  end
  
  def check_not_found_id_version(id, version)
    get :version, :id => id, :version => version
    assert_response :not_found
  end
  
  ##
  # Test that getting the current version is identical to picking
  # that version with the version URI call.
  def test_current_version
    check_current_version(current_nodes(:visible_node))
    check_current_version(current_nodes(:used_node_1))
    check_current_version(current_nodes(:used_node_2))
    check_current_version(current_nodes(:node_used_by_relationship))
    check_current_version(current_nodes(:node_with_versions))
  end
  
  def check_current_version(node_id)
    # get the current version of the node
    current_node = with_controller(NodeController.new) do
      get :read, :id => node_id
      assert_response :success, "cant get current node #{node_id}" 
      Node.from_xml(@response.body)
    end
    assert_not_nil current_node, "getting node #{node_id} returned nil"

    # get the "old" version of the node from the old_node interface
    get :version, :id => node_id, :version => current_node.version
    assert_response :success, "cant get old node #{node_id}, v#{current_node.version}" 
    old_node = Node.from_xml(@response.body)

    # check the nodes are the same
    assert_nodes_are_equal current_node, old_node
  end

  ##
  # returns a 16 character long string with some nasty characters in it.
  # this ought to stress-test the tag handling as well as the versioning.
  def random_string
    letters = [['!','"','$','&',';','@'],
               ('a'..'z').to_a,
               ('A'..'Z').to_a,
               ('0'..'9').to_a].flatten
    (1..16).map { |i| letters[ rand(letters.length) ] }.join
  end

  ##
  # truncate a floating point number to the scale that it is stored in
  # the database. otherwise rounding errors can produce failing unit
  # tests when they shouldn't.
  def precision(f)
    return (f * GeoRecord::SCALE).round.to_f / GeoRecord::SCALE
  end
end
