-module(shimmer@http@endpoints).
-compile(no_auto_import).

-export([me/1, bot_gateway/1]).

-spec me(binary()) -> {ok, shimmer@types@user:user()} |
    {error, shimmer@internal@error:shimmer_error()}.
me(Token) ->
    Req = shimmer@http@request:new_with_auth(get, <<"/users/@me"/utf8>>, Token),
    case begin
        _pipe = gleam@hackney:send(Req),
        gleam@result:map_error(_pipe, fun(Field@0) -> {http_error, Field@0} end)
    end of
        {error, _try} -> {error, _try};
        {ok, Resp} ->
            _pipe@1 = Resp,
            _pipe@2 = gleam@http@response:get_header(
                _pipe@1,
                <<"content-type"/utf8>>
            ),
            gleeunit_ffi:should_equal(
                _pipe@2,
                {ok, <<"application/json"/utf8>>}
            ),
            shimmer@types@user:from_json_string(erlang:element(4, Resp))
    end.

-spec bot_gateway(binary()) -> {ok,
        shimmer@internal@types@responses@bot_gateway:bot_gateway_response()} |
    {error, shimmer@internal@error:shimmer_error()}.
bot_gateway(Token) ->
    Req = shimmer@http@request:new_with_auth(
        get,
        <<"/gateway/bot"/utf8>>,
        Token
    ),
    case begin
        _pipe = gleam@hackney:send(Req),
        gleam@result:map_error(_pipe, fun(Field@0) -> {http_error, Field@0} end)
    end of
        {error, _try} -> {error, _try};
        {ok, Resp} ->
            _pipe@1 = Resp,
            _pipe@2 = gleam@http@response:get_header(
                _pipe@1,
                <<"content-type"/utf8>>
            ),
            gleeunit_ffi:should_equal(
                _pipe@2,
                {ok, <<"application/json"/utf8>>}
            ),
            shimmer@internal@types@responses@bot_gateway:from_json_string(
                erlang:element(4, Resp)
            )
    end.