defmodule SimpleOAuth.QQ.Client do
  use Tesla

  defguardp is_2xx(term) when is_integer(term) and term >= 200 and term <= 299

  def user_info(params) do
    client()
    |> get("/user/get_user_info" <> "?" <> URI.encode_query(params, :rfc3986))
    |> case do
      {:ok, %{status: status, body: body}} when is_2xx(status) ->
        case Jason.decode!(body) do
          %{"ret" => 0} = body -> {:ok, body}
          _body -> :error
        end

      _ ->
        :error
    end
  end

  def openid(params) do
    client()
    |> get("/oauth2.0/me" <> "?" <> URI.encode_query(params, :rfc3986))
    |> case do
      {:ok, %{status: status, body: body}} when is_2xx(status) ->
        openid =
          body
          |> String.slice(10..-5)
          |> Jason.decode!()
          |> Map.fetch!("openid")

        {:ok, openid}

      _ ->
        :error
    end
  end

  def token(params) do
    client()
    |> get("/oauth2.0/token" <> "?" <> URI.encode_query(params, :rfc3986))
    |> case do
      {:ok, %{status: status, body: body}} when is_2xx(status) ->
        token =
          body
          |> String.split("&")
          |> Enum.find(&String.starts_with?(&1, "access_token"))
          |> String.split("=")
          |> List.last()

        {:ok, token}

      _ ->
        :error
    end
  end

  defp client() do
    middleware = [
      {Tesla.Middleware.BaseUrl, "https://graph.qq.com"}
    ]

    Tesla.client(middleware)
  end
end