mitgliederverwaltung/test/mv_web/live/user_live/show_test.exs

defmodule MvWeb.UserLive.ShowTest do
  @moduledoc """
  Tests for the user show page.

  Tests cover:
  - Displaying user information
  - Authentication status display
  - Linked member display
  - Navigation
  - Error handling
  """
  use MvWeb.ConnCase, async: true
  import Phoenix.LiveViewTest
  require Ash.Query
  use Gettext, backend: MvWeb.Gettext

  alias Mv.Membership.Member

  setup do
    # Create test user
    user = create_test_user(%{email: "test@example.com", oidc_id: "test123"})
    %{user: user}
  end

  describe "mount and display" do
    test "mounts successfully with valid user ID", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ to_string(user.email)
    end

    test "displays user email", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ to_string(user.email)
      assert html =~ gettext("Email")
    end

    test "displays password authentication status when enabled", %{conn: conn} do
      user = create_test_user(%{email: "password-user@example.com", password: "test123"})
      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ gettext("Password Authentication")
      assert html =~ gettext("Enabled")
    end

    test "displays password authentication status when not enabled", %{conn: conn} do
      # User without password (only OIDC) - create user with OIDC only
      user =
        create_test_user(%{
          email: "oidc-only#{System.unique_integer([:positive])}@example.com",
          oidc_id: "oidc#{System.unique_integer([:positive])}",
          hashed_password: nil
        })

      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ gettext("Password Authentication")
      assert html =~ gettext("Not enabled")
    end

    test "displays linked member when present", %{conn: conn} do
      # Create member
      {:ok, member} =
        Member
        |> Ash.Changeset.for_create(:create_member, %{
          first_name: "Alice",
          last_name: "Smith",
          email: "alice@example.com"
        })
        |> Ash.create()

      # Create user and link to member
      user = create_test_user(%{email: "user@example.com"})

      {:ok, _updated_user} =
        user
        |> Ash.Changeset.for_update(:update, %{})
        |> Ash.Changeset.manage_relationship(:member, member, type: :append_and_remove)
        |> Ash.update()

      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ gettext("Linked Member")
      assert html =~ "Alice Smith"
      assert html =~ ~r/href="[^"]*\/members\/#{member.id}"/
    end

    test "displays 'No member linked' when no member is linked", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      assert html =~ gettext("Linked Member")
      assert html =~ gettext("No member linked")
    end
  end

  describe "navigation" do
    test "back button navigates to user list", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, view, _html} = live(conn, ~p"/users/#{user.id}")

      assert {:error, {:live_redirect, %{to: to}}} =
               view
               |> element(
                 "a[aria-label='#{gettext("Back to users list")}'], button[aria-label='#{gettext("Back to users list")}']"
               )
               |> render_click()

      assert to == "/users"
    end

    test "edit button navigates to edit form", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, view, _html} = live(conn, ~p"/users/#{user.id}")

      assert {:error, {:live_redirect, %{to: to}}} =
               view
               |> element(
                 "a[href='/users/#{user.id}/edit?return_to=show'], button[href='/users/#{user.id}/edit?return_to=show']"
               )
               |> render_click()

      assert to == "/users/#{user.id}/edit?return_to=show"
    end
  end

  describe "error handling" do
    test "raises exception for invalid user ID", %{conn: conn} do
      invalid_id = Ecto.UUID.generate()
      conn = conn_with_oidc_user(conn)

      # The mount function uses Ash.get! which will raise an exception
      # This is expected behavior - the LiveView doesn't handle this case
      assert_raise Ash.Error.Invalid, fn ->
        live(conn, ~p"/users/#{invalid_id}")
      end
    end
  end

  describe "page title" do
    test "sets correct page title", %{conn: conn, user: user} do
      conn = conn_with_oidc_user(conn)
      {:ok, _view, html} = live(conn, ~p"/users/#{user.id}")

      # Check that page title is set (might be in title tag or header)
      assert html =~ gettext("Show User") || html =~ to_string(user.email)
    end
  end
end