Graham McIntire
ddec874c38
Beacons: - Scaffolded with phx.gen.live then reworked so reads are public and mutations go through a live_session gated by the new :require_admin on_mount hook in UserAuth - Beacon schema stores frequency (MHz), callsign, grid, lat/lon, power (W), and height above ground (m); grid auto-derives from lat/lon when left blank via Maidenhead.from_latlon - Adds Maidenhead.from_latlon/3 so we can compute grids locally instead of hitting an external API Users admin page: - /users and /users/:id/edit (admin-only) for listing, editing (callsign/name/email/is_admin), and deleting other users - Adds Accounts.list_users, admin_update_user, delete_user, and a dedicated admin_changeset on the User schema - Nav gains a "Users" link for admins and a "Beacons" link for everyone
121 lines
3.6 KiB
Elixir
121 lines
3.6 KiB
Elixir
defmodule MicrowavepropWeb.BeaconLive.Form do
|
|
@moduledoc false
|
|
use MicrowavepropWeb, :live_view
|
|
|
|
alias Microwaveprop.Beacons
|
|
alias Microwaveprop.Beacons.Beacon
|
|
|
|
@impl true
|
|
def render(assigns) do
|
|
~H"""
|
|
<Layouts.app flash={@flash} current_scope={@current_scope}>
|
|
<.header>
|
|
{@page_title}
|
|
<:subtitle>Leave the grid blank to auto-fill it from lat/lon.</:subtitle>
|
|
</.header>
|
|
|
|
<.form for={@form} id="beacon-form" phx-change="validate" phx-submit="save">
|
|
<.input
|
|
field={@form[:frequency_mhz]}
|
|
type="number"
|
|
label="Frequency (MHz)"
|
|
step="any"
|
|
required
|
|
/>
|
|
<.input field={@form[:callsign]} type="text" label="Call" required />
|
|
<.input field={@form[:grid]} type="text" label="Grid (auto if blank)" />
|
|
<.input field={@form[:lat]} type="number" label="Latitude" step="any" required />
|
|
<.input field={@form[:lon]} type="number" label="Longitude" step="any" required />
|
|
<.input
|
|
field={@form[:power_watts]}
|
|
type="number"
|
|
label="Power (W)"
|
|
step="any"
|
|
required
|
|
/>
|
|
<.input
|
|
field={@form[:height_m]}
|
|
type="number"
|
|
label="Height above ground (m)"
|
|
step="any"
|
|
required
|
|
/>
|
|
<footer>
|
|
<.button phx-disable-with="Saving..." variant="primary">Save Beacon</.button>
|
|
<.button navigate={return_path(@return_to, @beacon)}>Cancel</.button>
|
|
</footer>
|
|
</.form>
|
|
</Layouts.app>
|
|
"""
|
|
end
|
|
|
|
@impl true
|
|
def mount(params, _session, socket) do
|
|
{:ok,
|
|
socket
|
|
|> assign(:return_to, return_to(params["return_to"]))
|
|
|> apply_action(socket.assigns.live_action, params)}
|
|
end
|
|
|
|
defp return_to("show"), do: "show"
|
|
defp return_to(_), do: "index"
|
|
|
|
defp apply_action(socket, :edit, %{"id" => id}) do
|
|
beacon = Beacons.get_beacon!(id)
|
|
|
|
socket
|
|
|> assign(:page_title, "Edit beacon")
|
|
|> assign(:beacon, beacon)
|
|
|> assign(:form, to_form(Beacons.change_beacon(beacon)))
|
|
end
|
|
|
|
defp apply_action(socket, :new, _params) do
|
|
beacon = %Beacon{}
|
|
|
|
socket
|
|
|> assign(:page_title, "New beacon")
|
|
|> assign(:beacon, beacon)
|
|
|> assign(:form, to_form(Beacons.change_beacon(beacon)))
|
|
end
|
|
|
|
@impl true
|
|
def handle_event("validate", %{"beacon" => beacon_params}, socket) do
|
|
changeset = Beacons.change_beacon(socket.assigns.beacon, beacon_params)
|
|
{:noreply, assign(socket, form: to_form(changeset, action: :validate))}
|
|
end
|
|
|
|
def handle_event("save", %{"beacon" => beacon_params}, socket) do
|
|
save_beacon(socket, socket.assigns.live_action, beacon_params)
|
|
end
|
|
|
|
defp save_beacon(socket, :edit, beacon_params) do
|
|
case Beacons.update_beacon(socket.assigns.beacon, beacon_params) do
|
|
{:ok, beacon} ->
|
|
{:noreply,
|
|
socket
|
|
|> put_flash(:info, "Beacon updated")
|
|
|> push_navigate(to: return_path(socket.assigns.return_to, beacon))}
|
|
|
|
{:error, %Ecto.Changeset{} = changeset} ->
|
|
{:noreply, assign(socket, form: to_form(changeset))}
|
|
end
|
|
end
|
|
|
|
defp save_beacon(socket, :new, beacon_params) do
|
|
user = socket.assigns.current_scope.user
|
|
|
|
case Beacons.create_beacon(user, beacon_params) do
|
|
{:ok, beacon} ->
|
|
{:noreply,
|
|
socket
|
|
|> put_flash(:info, "Beacon created")
|
|
|> push_navigate(to: return_path(socket.assigns.return_to, beacon))}
|
|
|
|
{:error, %Ecto.Changeset{} = changeset} ->
|
|
{:noreply, assign(socket, form: to_form(changeset))}
|
|
end
|
|
end
|
|
|
|
defp return_path("index", _beacon), do: ~p"/beacons"
|
|
defp return_path("show", beacon), do: ~p"/beacons/#{beacon}"
|
|
end
|