prop/test/microwaveprop_web/live/contact_map_live_test.exs
Graham McIntire a3fff198c9
feat(contact-map): date-range filter alongside callsign filter
Adds start/end date inputs (UTC) to the sidebar (mobile + desktop) with
Apply dates and Clear buttons. The hook keeps a sliced YYYY-MM-DD on
each line entry so the range check is a string compare during filter
re-application; combines with the callsign filter so e.g. AA5C between
2025-01-01 and 2026-01-01 is one query.
2026-05-03 10:36:34 -05:00

141 lines
4.3 KiB
Elixir

defmodule MicrowavepropWeb.ContactMapLiveTest do
use MicrowavepropWeb.ConnCase, async: true
import Phoenix.LiveViewTest
alias Microwaveprop.Radio.Contact
alias Microwaveprop.Repo
defp create_contact(attrs) do
default = %{
station1: "W5XD",
station2: "K5TR",
qso_timestamp: ~U[2026-03-28 18:00:00Z],
mode: "CW",
band: Decimal.new("1296"),
grid1: "EM12",
grid2: "EM00",
pos1: %{"lat" => 32.9, "lon" => -97.0},
pos2: %{"lat" => 30.3, "lon" => -97.7},
distance_km: Decimal.new("295")
}
{:ok, contact} =
%Contact{}
|> Contact.changeset(Map.merge(default, attrs))
|> Repo.insert()
contact
end
describe "GET /contacts/map" do
test "renders the shell with the Contact Map heading + JS hook container", %{conn: conn} do
{:ok, _lv, html} = live(conn, ~p"/contacts/map")
assert html =~ "Contact Map"
assert html =~ ~s(id="contacts-map")
assert html =~ ~s(phx-hook="ContactsMap")
# Client fetches the JSON blob from the controller endpoint.
assert html =~ ~s(data-fetch-url="/api/contacts/map")
end
test "shows the contact count and the populated band list", %{conn: conn} do
_c1 = create_contact(%{band: Decimal.new("1296")})
_c2 = create_contact(%{band: Decimal.new("10000"), station1: "W5OTHR"})
{:ok, _lv, html} = live(conn, ~p"/contacts/map")
assert html =~ "2 contacts"
# band_label/1 converts bands ≥ 1000 MHz into GHz — integer values
# stay whole ("10 GHz"), non-integer ratios round to 1 decimal ("1.3 GHz").
assert html =~ "1.3 GHz"
assert html =~ "10 GHz"
end
test "empty DB renders '0 contacts' and no band checkboxes", %{conn: conn} do
{:ok, _lv, html} = live(conn, ~p"/contacts/map")
assert html =~ "0 contacts"
end
end
describe "filter_callsign event" do
test "stores the trimmed filter and pushes apply_filter to the hook", %{conn: conn} do
{:ok, lv, _html} = live(conn, ~p"/contacts/map")
html =
lv
# There's a mobile and a desktop filter form — submit via the
# desktop one (input.input-sm lives only inside the desktop form).
|> form(~s|form[phx-submit="filter_callsign"]:has(input.input-sm)|,
callsign: " W5ISP "
)
|> render_submit()
# Server stored the trimmed value in assigns, which round-trips
# back through the `value=` attribute.
assert html =~ ~s(value="W5ISP")
end
test "blank input round-trips as an empty value", %{conn: conn} do
{:ok, lv, _html} = live(conn, ~p"/contacts/map")
html =
lv
|> form(~s|form[phx-submit="filter_callsign"]:has(input.input-sm)|,
callsign: " "
)
|> render_submit()
refute html =~ ~s(value=" ")
assert html =~ ~s(value="")
end
test "renders a Filter button next to the callsign input", %{conn: conn} do
{:ok, lv, _html} = live(conn, ~p"/contacts/map")
assert has_element?(
lv,
~s|form[phx-submit="filter_callsign"] button[type="submit"]|,
"Filter"
)
end
end
describe "filter_dates event" do
test "stores trimmed start/end dates and round-trips them in the inputs", %{conn: conn} do
{:ok, lv, _html} = live(conn, ~p"/contacts/map")
html =
lv
|> form(~s|form[phx-submit="filter_dates"]:has(input.input-sm)|,
start_date: "2025-01-01",
end_date: "2026-01-01"
)
|> render_submit()
assert html =~ ~s(name="start_date" value="2025-01-01")
assert html =~ ~s(name="end_date" value="2026-01-01")
# Clear button shows up only once a filter is set.
assert html =~ ~s(phx-click="clear_dates")
end
test "clear_dates wipes both inputs", %{conn: conn} do
{:ok, lv, _html} = live(conn, ~p"/contacts/map")
lv
|> form(~s|form[phx-submit="filter_dates"]:has(input.input-sm)|,
start_date: "2025-01-01",
end_date: "2026-01-01"
)
|> render_submit()
html =
render_click(
element(lv, ~s|form:has(input.input-sm) button[phx-click="clear_dates"]|)
)
refute html =~ ~s(value="2025-01-01")
refute html =~ ~s(value="2026-01-01")
end
end
end