raven_integration_imap

defmodule Integrations.Imap.Display do
  @moduledoc """
  Dashboard panel for `Integrations.Imap` (same package).

  Nested under the monitor's own namespace deliberately — the package's
  top-level module name never changes, and this module's name is
  guaranteed distinct from any separately-published standalone display
  package. `Display.BundledDefault` auto-hooks this whenever
  `Integrations.Imap` starts, the same as if they were still one module.
  """

  use CodeNameRaven.Display, category: :infrastructure, size_hint: :medium

  @default_port 993

  @impl true
  def display_name, do: "IMAP"

  @impl true
  def compatible_monitors, do: [Integrations.Imap]

  @impl true
  def render(assigns) do
    samples  = CodeNameRaven.Runtime.recent_samples(assigns.config.id, limit: 120)
    local_id = CodeNameRaven.Runtime.instance_id()
    result   = assigns[:result]

    assigns = Map.merge(assigns, %{
      samples:  samples,
      local_id: local_id,
      result:   result
    })

    ~H"""
    <div class="space-y-3">
      <%!-- Header --%>
      <div class="flex items-start justify-between gap-2">
        <div class="min-w-0">
          <h2 class="text-sm font-semibold text-base-content truncate">
            <%= @config.name || imap_title(@config.params) %>
          </h2>
          <p class="text-xs font-mono text-base-content/40 truncate">
            <%= @result && @result[:banner] %>
          </p>
        </div>
        <div class="flex flex-col items-end gap-1 shrink-0">
          <CodeNameRaven.MonitorComponents.status_chip status={@status} />
        </div>
      </div>

      <%!-- Stats --%>
      <div :if={@result} class="flex gap-2 flex-wrap">
        <.stat label="Latency" value={"#{@result.latency_ms} ms"} />
        <.stat :if={@result[:auth_ok] == true}    label="Auth"    value="OK" />
        <.stat :if={@result[:auth_ok] == false}   label="Auth"    value="Failed" />
        <.stat :if={@result[:message_count]}      label="Messages" value={"#{@result.message_count}"} />
        <.stat :if={@result[:mailbox]}            label="Mailbox"  value={@result.mailbox} />
      </div>

      <%!-- Capability badges --%>
      <div :if={@result && @result[:capabilities] not in [nil, []]}
           class="flex flex-wrap gap-1">
        <span :for={cap <- notable_capabilities(@result[:capabilities] || [])}
              class="text-xs font-mono bg-base-200 rounded px-1.5 py-0.5 text-base-content/60">
          <%= cap %>
        </span>
      </div>

      <%!-- Latency chart --%>
      <div>
        <p class="text-xs text-base-content/40 mb-1">Greeting Latency</p>
        <CodeNameRaven.MonitorComponents.line_chart
          id={"chart-#{@config.id}-latency"}
          samples={@samples}
          local_id={@local_id} />
      </div>

      <CodeNameRaven.MonitorComponents.error_message message={@last_error} />
      <p class="text-xs text-base-content/30">
        Checked <%= CodeNameRaven.Timezone.format_datetime(@last_checked_at, __MODULE__) %>
      </p>
    </div>
    """
  end

  # ---------------------------------------------------------------------------
  # Private component
  # ---------------------------------------------------------------------------

  defp stat(assigns) do
    ~H"""
    <div class="bg-base-200 rounded px-3 py-2 text-center min-w-[70px]">
      <p class="text-xs text-base-content/50"><%= @label %></p>
      <p class="text-sm font-semibold text-base-content"><%= @value %></p>
    </div>
    """
  end

  # ---------------------------------------------------------------------------
  # Render helpers
  # ---------------------------------------------------------------------------

  # Filter capabilities to those worth displaying
  defp notable_capabilities(caps) do
    notable = ~w[
      IMAP4rev1 IMAP4rev2 IDLE MOVE UNSELECT QRESYNC CONDSTORE UIDPLUS
      NAMESPACE LITERAL+ SASL-IR STARTTLS
      AUTH=PLAIN AUTH=LOGIN AUTH=GSSAPI AUTH=NTLM AUTH=OAUTHBEARER AUTH=XOAUTH2
    ]
    Enum.filter(caps, &(&1 in notable))
  end

  defp imap_title(params) do
    host = params[:host] || params["host"] || "?"
    port = parse_int(params[:port] || params["port"], @default_port)
    "#{host}:#{port}"
  end

  defp parse_int(nil, default), do: default
  defp parse_int(v, _) when is_integer(v), do: v
  defp parse_int(v, default) when is_binary(v) do
    case Integer.parse(v) do
      {n, _} -> n
      :error -> default
    end
  end
  defp parse_int(_, default), do: default
end