require 'test_helper'

class ShipwireTest < ActiveSupport::TestCase
  include ActiveShipping::Test::Fixtures

  def setup
    @carrier = Shipwire.new(:login => 'l', :password => 'p')
    @items   = [{ :sku => 'AF0001', :quantity => 1 }, { :sku => 'AF0002', :quantity => 2 }]
  end

  def test_response_with_no_rates_is_unsuccessful
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/no_rates_response'))

    assert_raises(ResponseError) do
      @carrier.find_rates(
        location_fixtures[:ottawa],
        location_fixtures[:beverly_hills],
        package_fixtures.values_at(:book, :wii),
        :order_id => '#1000',
        :items => @items
      )
    end
  end

  def test_successfully_get_international_rates
    date = DateTime.parse("Mon 01 Aug 2011")
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/international_rates_response'))

    Timecop.freeze(date) do
      response = @carrier.find_rates(
                   location_fixtures[:ottawa],
                   location_fixtures[:london],
                   package_fixtures.values_at(:book, :wii),
                   :order_id => '#1000',
                   :items => @items
                 )

      assert response.success?

      assert_equal 1, response.rates.size

      assert international = response.rates.first
      assert_equal "INTL", international.service_code
      assert_equal "UPS", international.carrier
      assert_equal "UPS Standard", international.service_name
      assert_equal 2806, international.total_price
      assert_equal [date + 1.day, date + 7.days], international.delivery_range
    end
  end

  def test_successfully_get_domestic_rates
    date = DateTime.parse("Mon 01 Aug 2011")
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/rates_response'))

    Timecop.freeze(date) do
      response = @carrier.find_rates(
                   location_fixtures[:ottawa],
                   location_fixtures[:beverly_hills],
                   package_fixtures.values_at(:book, :wii),
                   :order_id => '#1000',
                   :items => @items
                 )

      assert response.success?

      assert_equal 3, response.rates.size

      assert ground  = response.rates.find { |r| r.service_code == "GD" }
      assert_equal "UPS", ground.carrier
      assert_equal "UPS Ground", ground.service_name
      assert_equal 773, ground.total_price
      assert_equal [date + 1.day, date + 7.days], ground.delivery_range

      assert two_day = response.rates.find { |r| r.service_code == "2D" }
      assert_equal "UPS", two_day.carrier
      assert_equal "UPS Second Day Air", two_day.service_name
      assert_equal 1364, two_day.total_price
      assert_equal [date + 2.days, date + 2.days], two_day.delivery_range

      assert one_day = response.rates.find { |r| r.service_code == "1D" }
      assert_equal "USPS", one_day.carrier
      assert_equal "USPS Express Mail", one_day.service_name
      assert_equal 2525, one_day.total_price
      assert_equal [date + 1.day, date + 1.day], one_day.delivery_range
    end
  end

  def test_gracefully_handle_new_carrier
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/new_carrier_rate_response'))

    response = @carrier.find_rates(
                 location_fixtures[:ottawa],
                 location_fixtures[:beverly_hills],
                 package_fixtures.values_at(:book, :wii),
                 :order_id => '#1000',
                 :items => @items
               )
    assert response.success?
    assert_equal 1, response.rates.size
    assert ground = response.rates.first
    assert_equal "FESCO", ground.carrier
  end

  def test_find_rates_requires_items_option
    assert_raises(ArgumentError) do
      @carrier.find_rates(
        location_fixtures[:ottawa],
        location_fixtures[:beverly_hills],
        package_fixtures.values_at(:book, :wii)
      )
    end
  end

  def test_validate_credentials_with_valid_credentials
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/no_rates_response'))
    assert @carrier.valid_credentials?
  end

  def test_validate_credentials_with_invalid_credentials
    response = stub(:code => '401', :body => 'Could not verify Username/EmailAddress and Password combination')

    @carrier.expects(:ssl_post).raises(ActiveUtils::ResponseError.new(response))
    assert !@carrier.valid_credentials?
  end

  def test_rate_request_includes_address_name_if_provided
    name = CGI.escape("<Full>Bob Bobsen</Full>")
    @carrier.expects(:ssl_post).with(anything, includes(name)).returns(xml_fixture('shipwire/rates_response'))

    response = @carrier.find_rates(
                 location_fixtures[:ottawa],
                 location_fixtures[:new_york_with_name],
                 package_fixtures.values_at(:book, :wii),
                 :order_id => '#1000',
                 :items => @items
               )

    assert response.success?
  end

  def test_rate_request_does_not_include_address_name_element_if_not_provided
    name = CGI.escape("<Name>")
    @carrier.expects(:ssl_post).with(anything, Not(regexp_matches(Regexp.new(name)))).returns(xml_fixture('shipwire/rates_response'))

    response = @carrier.find_rates(
                 location_fixtures[:ottawa],
                 location_fixtures[:new_york],
                 package_fixtures.values_at(:book, :wii),
                 :order_id => '#1000',
                 :items => @items
               )

    assert response.success?
  end

  def test_rate_request_without_delivery_estimate
    @carrier.expects(:ssl_post).returns(xml_fixture('shipwire/rates_response_no_estimate'))
    response = @carrier.find_rates(
                 location_fixtures[:ottawa],
                 location_fixtures[:new_york],
                 package_fixtures.values_at(:book, :wii),
                 :order_id => '#1000',
                 :items => @items
               )

    assert response.success?
    assert_equal [], response.rates[0].delivery_range
  end

  def test_rate_request_includes_company_if_provided
    company = CGI.escape("<Company>Tampa Company</Company>")
    @carrier.expects(:ssl_post).with(anything, includes(company)).returns(xml_fixture('shipwire/rates_response'))

    response = @carrier.find_rates(
                 location_fixtures[:ottawa],
                 location_fixtures[:real_home_as_commercial],
                 package_fixtures.values_at(:book, :wii),
                 :order_id => '#1000',
                 :items => @items
               )

    assert response.success?
  end

  def test_maximum_address_field_length
    assert_equal 255, @carrier.maximum_address_field_length
  end
end