# frozen_string_literal: true

require_relative "../../helper"
require "provider/adapters/bam"

class Provider < Sequel::Model(:providers)
  module Adapters
    describe BAM do
      let(:adapter) { BAM.new }

      describe "with API key" do
        before do
          ENV["BAM_API_KEY"] ||= "test"
          VCR.insert_cassette("bam", match_requests_on: [:method, :host, :path])
        end

        after { VCR.eject_cassette }

        it "fetches rates with date range" do
          dataset = adapter.fetch(after: Date.new(2026, 3, 25), upto: Date.new(2026, 3, 27))

          _(dataset).wont_be_empty
        end

        it "fetches multiple currencies per date" do
          dataset = adapter.fetch(after: Date.new(2026, 3, 25), upto: Date.new(2026, 3, 27))
          dates = dataset.map { |r| r[:date] }.uniq
          sample = dataset.select { |r| r[:date] == dates.first }

          _(sample.size).must_be(:>, 1)
        end
      end

      it "parses records with correct base and quote" do
        json = <<~JSON
          [{"date": "2026-03-25T12:30:00", "libDevise": "USD", "moyen": 9.3794, "uniteDevise": 1}]
        JSON
        records = adapter.parse(json)

        _(records.length).must_equal(1)
        _(records.first[:base]).must_equal("USD")
        _(records.first[:quote]).must_equal("MAD")
        _(records.first[:rate]).must_be_close_to(9.3794, 0.0001)
        _(records.first[:date]).must_equal(Date.new(2026, 3, 25))
      end

      it "normalizes rate by uniteDevise" do
        json = <<~JSON
          [{"date": "2026-03-25T12:30:00", "libDevise": "JPY", "moyen": 6.2500, "uniteDevise": 100}]
        JSON
        records = adapter.parse(json)

        _(records.first[:rate]).must_be_close_to(0.0625, 0.0001)
      end

      it "skips zero rates" do
        json = <<~JSON
          [{"date": "2026-03-25T12:30:00", "libDevise": "USD", "moyen": 0.0, "uniteDevise": 1}]
        JSON
        records = adapter.parse(json)

        _(records).must_be_empty
      end

      it "skips invalid currency codes" do
        json = <<~JSON
          [{"date": "2026-03-25T12:30:00", "libDevise": "XY", "moyen": 9.3794, "uniteDevise": 1}]
        JSON
        records = adapter.parse(json)

        _(records).must_be_empty
      end

      it "falls back to buy/sell average when moyen is absent" do
        json = <<~JSON
          [{"date": "1999-01-04T14:00:00", "libDevise": "USD", "achat": 9.2125, "vente": 9.2679, "uniteDevise": 1}]
        JSON
        records = adapter.parse(json)

        _(records.length).must_equal(1)
        _(records.first[:rate]).must_be_close_to(9.2402, 0.0001)
      end

      it "handles empty response" do
        records = adapter.parse("[]")

        _(records).must_be_empty
      end
    end
  end
end