mitgliederverwaltung/lib/mv_web/live/join_request_live/index.ex

defmodule MvWeb.JoinRequestLive.Index do
  @moduledoc """
  LiveView for listing and reviewing join requests (approval UI, Step 2).

  ## Features
  - List join requests filtered by status (default: submitted)
  - Navigate to detail view for approve/reject actions
  - Accessible to normal_user and admin roles only

  ## Security
  - Page access controlled by CheckPagePermission plug and can_access_page? guard
  - Ash policy (HasPermission) enforces JoinRequest read :all for normal_user and admin
  """
  use MvWeb, :live_view

  require Logger

  import MvWeb.LiveHelpers, only: [current_actor: 1]
  import MvWeb.Authorization

  alias Mv.Membership
  alias MvWeb.Helpers.DateFormatter

  @impl true
  def mount(_params, _session, socket) do
    actor = current_actor(socket)

    cond do
      not join_form_enabled?() ->
        {:ok, redirect(socket, to: ~p"/members")}

      not can_access_page?(actor, "/join_requests") ->
        {:ok, redirect(socket, to: ~p"/members")}

      true ->
        {:ok, load_join_requests(socket, actor)}
    end
  end

  @impl true
  def render(assigns) do
    ~H"""
    <Layouts.app flash={@flash} current_user={@current_user}>
      <.header>
        {gettext("Join requests")}
      </.header>

      <div class="mt-6 space-y-8 max-w-4xl">
        <div>
          <h2 class="text-lg font-semibold mb-3">{gettext("Open requests")}</h2>
          <%= if Enum.empty?(@join_requests) do %>
            <div class="text-center py-12 border border-base-300 rounded-lg bg-base-100">
              <p class="text-base-content/60 italic">{gettext("No submitted join requests")}</p>
            </div>
          <% else %>
            <.table
              id="join-requests-table"
              rows={@join_requests}
              row_id={fn req -> "join-request-#{req.id}" end}
              row_click={fn req -> JS.navigate(~p"/join_requests/#{req.id}") end}
              row_tooltip={gettext("Click for details")}
            >
              <:col :let={req} label={gettext("Submitted at")}>
                <%= if req.submitted_at do %>
                  {DateFormatter.format_datetime(req.submitted_at)}
                <% else %>
                  <.empty_cell sr_text={gettext("Not submitted yet")} />
                <% end %>
              </:col>
              <:col :let={req} label={gettext("First name")}>
                <.maybe_value value={req.first_name} empty_sr_text={gettext("Not specified")}>
                  {req.first_name}
                </.maybe_value>
              </:col>
              <:col :let={req} label={gettext("Last name")}>
                <.maybe_value value={req.last_name} empty_sr_text={gettext("Not specified")}>
                  {req.last_name}
                </.maybe_value>
              </:col>
              <:col :let={req} label={gettext("Email")}>
                {req.email}
              </:col>
              <:col :let={req} label={gettext("Status")}>
                <.badge variant={status_badge_variant(req.status)}>
                  {format_status(req.status)}
                </.badge>
              </:col>
            </.table>
          <% end %>
        </div>

        <div>
          <h2 class="text-lg font-semibold mb-3">{gettext("History")}</h2>
          <%= if Enum.empty?(@join_requests_history) do %>
            <div class="text-center py-12 border border-base-300 rounded-lg bg-base-100">
              <p class="text-base-content/60 italic">
                {gettext("No approved or rejected requests yet")}
              </p>
            </div>
          <% else %>
            <.table
              id="join-requests-history-table"
              rows={@join_requests_history}
              row_id={fn req -> "join-request-history-#{req.id}" end}
              row_click={fn req -> JS.navigate(~p"/join_requests/#{req.id}") end}
              row_tooltip={gettext("Click for details")}
            >
              <:col :let={req} label={gettext("Email")}>
                {req.email}
              </:col>
              <:col :let={req} label={gettext("First name")}>
                <.maybe_value value={req.first_name} empty_sr_text={gettext("Not specified")}>
                  {req.first_name}
                </.maybe_value>
              </:col>
              <:col :let={req} label={gettext("Last name")}>
                <.maybe_value value={req.last_name} empty_sr_text={gettext("Not specified")}>
                  {req.last_name}
                </.maybe_value>
              </:col>
              <:col :let={req} label={gettext("Status")}>
                <.badge variant={status_badge_variant(req.status)}>
                  {format_status(req.status)}
                </.badge>
              </:col>
              <:col :let={req} label={gettext("Reviewed at")}>
                {review_date(req)}
              </:col>
              <:col :let={req} label={gettext("Review by")}>
                {reviewer_display(req)}
              </:col>
            </.table>
          <% end %>
        </div>
      </div>
    </Layouts.app>
    """
  end

  defp join_form_enabled? do
    case Membership.get_settings() do
      {:ok, %{join_form_enabled: true}} -> true
      _ -> false
    end
  end

  defp load_join_requests(socket, actor) do
    socket =
      case Membership.list_join_requests(actor: actor, status: :submitted) do
        {:ok, requests} ->
          assign(socket, :join_requests, requests)

        {:error, error} ->
          Logger.warning("Failed to load join requests: #{inspect(error)}")
          assign(socket, :join_requests, [])
      end

    socket =
      case Membership.list_join_requests_history(actor: actor) do
        {:ok, history} ->
          assign(socket, :join_requests_history, history)

        {:error, error} ->
          Logger.warning("Failed to load join requests history: #{inspect(error)}")
          assign(socket, :join_requests_history, [])
      end

    assign(socket, :page_title, gettext("Join requests"))
  end

  defp format_status(:pending_confirmation), do: gettext("Pending confirmation")
  defp format_status(:submitted), do: gettext("Submitted")
  defp format_status(:approved), do: gettext("Approved")
  defp format_status(:rejected), do: gettext("Rejected")
  defp format_status(other), do: to_string(other)

  defp status_badge_variant(:submitted), do: :info
  defp status_badge_variant(:approved), do: :success
  defp status_badge_variant(:rejected), do: :error
  defp status_badge_variant(_), do: :neutral

  defp review_date(req) do
    date =
      case req.status do
        :approved -> req.approved_at
        :rejected -> req.rejected_at
        _ -> nil
      end

    if date, do: DateFormatter.format_datetime(date), else: ""
  end

  defp reviewer_display(req) do
    case req.reviewed_by_user do
      nil -> ""
      %{email: email} when not is_nil(email) -> to_string(email) |> String.trim()
      _ -> ""
    end
  end
end