prop/test/microwaveprop_web/live/rover_live_test.exs

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

  import Phoenix.LiveViewTest

  describe "GET /rover" do
    test "renders the Rover Planner sidebar + map hook", %{conn: conn} do
      {:ok, _view, html} = live(conn, ~p"/rover")

      assert html =~ "Rover Planner"
      # Band selector + station form.
      assert html =~ ~s(id="rover-map")
      assert html =~ ~s(phx-hook="RoverMap")
      assert html =~ "Add station"
      # Default band is 10_000 MHz — check the corresponding option label.
      assert html =~ "10 GHz"
    end

    test "band selector shows every amateur microwave option", %{conn: conn} do
      {:ok, _view, html} = live(conn, ~p"/rover")

      # BandConfig.band_options/0 currently includes these microwave bands.
      for label <- ~w(50MHz 144MHz 432MHz 1296MHz 10GHz 24GHz) do
        nospace = label |> String.replace("MHz", " MHz") |> String.replace("GHz", " GHz")
        assert html =~ nospace, "expected band option #{nospace} in rover HTML"
      end
    end

    test "a maidenhead grid in the URL resolves a station synchronously", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover?stations=EM13")

      # Async resolution runs in a message; flush by calling render.
      html = render(view)
      assert html =~ "EM13"
    end

    test "selecting a band patches the URL and keeps the selection", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover")

      view
      |> element(~s(select[name="band"]))
      |> render_change(%{band: "1296"})

      # URL patch replaces the current URL with ?band=1296.
      assert_patched(view, ~p"/rover?band=1296")
      assert render(view) =~ ~s(<option value="1296" selected)
    end

    test "removing a station clears it from the badge list", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover?stations=EM13")
      render(view)
      assert render(view) =~ "EM13"

      view
      |> element(~s(button[phx-click="remove_station"]))
      |> render_click(%{index: "0"})

      refute render(view) =~ "EM13"
    end

    test "add_station event with a grid resolves via the direct maidenhead path", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover")

      # Submit the add-station form. add_station sends a message to
      # self() and toggles resolving: true; after the message is handled
      # the station appears.
      view
      |> form(~s(form[phx-submit="add_station"]), %{callsign: "EM00"})
      |> render_submit()

      # Drive the resolver message asynchronously.
      html = render(view)
      assert html =~ "EM00"
    end

    test "add_station with blank input is a no-op (no station added, no crash)", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover")

      html =
        view
        |> form(~s(form[phx-submit="add_station"]), %{callsign: "   "})
        |> render_submit()

      # The stations list stays empty.
      refute html =~ "Stationary Stations"
    end

    test "map_bounds event re-fetches propagation scores for the new viewport", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover")

      new_bounds = %{"south" => 30.0, "north" => 34.0, "west" => -100.0, "east" => -95.0}

      render_hook(view, "map_bounds", new_bounds)

      # The handler pushes an update_scores event to the JS hook.
      assert_push_event(view, "update_scores", %{scores: scores})
      assert is_list(scores)
    end

    test "propagation_updated pubsub message pushes an update_scores event", %{conn: conn} do
      {:ok, view, _html} = live(conn, ~p"/rover")

      # Simulate the propagation pipeline broadcast by sending the
      # message directly to the LiveView process.
      send(view.pid, {:propagation_updated, [DateTime.utc_now()]})

      assert_push_event(view, "update_scores", %{scores: scores})
      assert is_list(scores)
    end
  end
end