defmodule MicrowavepropWeb.WeatherTileControllerTest do
  use MicrowavepropWeb.ConnCase, async: false

  alias Microwaveprop.Propagation.ProfilesFile
  alias Microwaveprop.Weather.GridCache

  setup do
    GridCache.clear()

    on_exit(fn ->
      GridCache.clear()
      ProfilesFile.prune_older_than(~U[2099-12-31 23:59:59Z])
    end)

    :ok
  end

  test "serves an SVG weather tile for the requested viewport", %{conn: conn} do
    valid_time = ~U[2026-04-28 12:00:00Z]
    lat = 33.0
    lon = -97.0

    ProfilesFile.write!(valid_time, %{
      {lat, lon} => %{
        surface_temp_c: 22.0,
        surface_dewpoint_c: 12.0,
        surface_pressure_mb: 1010.0,
        hpbl_m: 800.0,
        pwat_mm: 25.0,
        profile: []
      }
    })

    conn =
      get(
        conn,
        ~p"/weather/tiles/0/0/0?layer=temperature&time=#{DateTime.to_iso8601(valid_time)}"
      )

    assert response(conn, 200) =~ "<svg"
    assert response(conn, 200) =~ "<rect"
    assert ["image/svg+xml; charset=utf-8"] = get_resp_header(conn, "content-type")
  end

  test "returns an empty svg for invalid params", %{conn: conn} do
    conn = get(conn, ~p"/weather/tiles/6/18/25?layer=bogus&time=not-a-time")

    body = response(conn, 200)
    assert body =~ "<svg"
    refute body =~ "<rect"
  end
end