defmodule BearCli.Config do
  @moduledoc """
  設定檔與憑證檔的路徑及讀取。

  設定優先序：CLI flag ＞ 環境變數（`BEAR_ISSUER`）＞ 設定檔 ＞ 內建預設。
  """

  @default_issuer "https://alterminal.com"

  @doc "內建預設 issuer。"
  def default_issuer, do: @default_issuer

  @doc """
  設定檔路徑：`~/.config/bear/config.json`（可用 `BEAR_CONFIG` 覆寫）。
  """
  def config_path do
    System.get_env("BEAR_CONFIG") || Path.join(config_home(), "config.json")
  end

  @doc """
  憑證檔路徑：`~/.local/state/bear/credentials.json`（可用 `BEAR_CREDENTIALS` 覆寫）。
  """
  def credentials_path do
    System.get_env("BEAR_CREDENTIALS") || Path.join(state_home(), "credentials.json")
  end

  defp config_home do
    base =
      System.get_env("XDG_CONFIG_HOME") ||
        Path.join(System.user_home!(), ".config")

    Path.join(base, "bear")
  end

  defp state_home do
    base =
      System.get_env("XDG_STATE_HOME") ||
        Path.join(System.user_home!(), ".local/state")

    Path.join(base, "bear")
  end

  @doc """
  讀取設定檔，回傳 `{:ok, map}` 或 `:error`（檔案不存在／JSON 損毀）。
  """
  def read_config(path \\ config_path()) do
    case File.read(path) do
      {:ok, content} -> Jason.decode(content)
      {:error, _} -> :error
    end
  end

  @doc """
  解析最終 issuer，依序取第一個非空白值：

  1. `cli_issuer`（`--issuer` flag）
  2. `BEAR_ISSUER` 環境變數
  3. 設定檔的 `issuer` 欄位（讀自 `config_path_override` 或預設路徑）
  4. 內建預設 `https://alterminal.com`
  """
  def resolve_issuer(cli_issuer, config_path_override \\ nil) do
    path = config_path_override || config_path()

    config =
      case read_config(path) do
        {:ok, map} when is_map(map) -> map
        _ -> %{}
      end

    Enum.find(
      [
        cli_issuer,
        System.get_env("BEAR_ISSUER"),
        config["issuer"],
        @default_issuer
      ],
      &(not blank?(&1))
    )
  end

  @doc """
  `BEAR_TOKEN` 環境變數（一次性／CI 用的 PAT）。

  提供後優先於本機憑證檔，但不寫入憑證檔。空值或純空白視為未提供。
  """
  def env_token do
    case System.get_env("BEAR_TOKEN") do
      nil -> nil
      token -> if blank?(String.trim(token)), do: nil, else: String.trim(token)
    end
  end

  defp blank?(nil), do: true
  defp blank?(""), do: true
  defp blank?(_), do: false
end