aboutsummaryrefslogtreecommitdiff
path: root/aoc2023/build/packages/adglent/src/priv@aoc_client.erl
diff options
context:
space:
mode:
Diffstat (limited to 'aoc2023/build/packages/adglent/src/priv@aoc_client.erl')
-rw-r--r--aoc2023/build/packages/adglent/src/priv@aoc_client.erl61
1 files changed, 0 insertions, 61 deletions
diff --git a/aoc2023/build/packages/adglent/src/priv@aoc_client.erl b/aoc2023/build/packages/adglent/src/priv@aoc_client.erl
deleted file mode 100644
index 1acb9b5..0000000
--- a/aoc2023/build/packages/adglent/src/priv@aoc_client.erl
+++ /dev/null
@@ -1,61 +0,0 @@
--module(priv@aoc_client).
--compile([no_auto_import, nowarn_unused_vars, nowarn_unused_function]).
-
--export([get_input/3]).
-
--spec get_input(binary(), binary(), binary()) -> {ok, binary()} |
- {error, binary()}.
-get_input(Year, Day, Session) ->
- Url = <<<<<<<<"https://adventofcode.com/"/utf8, Year/binary>>/binary,
- "/day/"/utf8>>/binary,
- Day/binary>>/binary,
- "/input"/utf8>>,
- gleam@result:'try'(
- begin
- _pipe = gleam@http@request:to(Url),
- gleam@result:map_error(
- _pipe,
- fun(Error) ->
- <<<<<<"Could not create request for \""/utf8, Url/binary>>/binary,
- "\": "/utf8>>/binary,
- (gleam@string:inspect(Error))/binary>>
- end
- )
- end,
- fun(Request) ->
- gleam@result:'try'(
- begin
- _pipe@1 = Request,
- _pipe@2 = gleam@http@request:prepend_header(
- _pipe@1,
- <<"Accept"/utf8>>,
- <<"application/json"/utf8>>
- ),
- _pipe@3 = gleam@http@request:prepend_header(
- _pipe@2,
- <<"Cookie"/utf8>>,
- <<<<"session="/utf8, Session/binary>>/binary, ";"/utf8>>
- ),
- _pipe@4 = gleam@httpc:send(_pipe@3),
- gleam@result:map_error(
- _pipe@4,
- fun(Error@1) ->
- <<<<<<"Error when requesting \""/utf8, Url/binary>>/binary,
- "\": "/utf8>>/binary,
- (gleam@string:inspect(Error@1))/binary>>
- end
- )
- end,
- fun(Response) -> case erlang:element(2, Response) of
- Status when (Status >= 200) andalso (Status < 300) ->
- {ok, erlang:element(4, Response)};
-
- Status@1 ->
- {error,
- <<<<(gleam@int:to_string(Status@1))/binary,
- " - "/utf8>>/binary,
- (erlang:element(4, Response))/binary>>}
- end end
- )
- end
- ).