aboutsummaryrefslogtreecommitdiffstats
path: root/test/http_SUITE_data
diff options
context:
space:
mode:
Diffstat (limited to 'test/http_SUITE_data')
-rw-r--r--test/http_SUITE_data/http_multipart.erl18
-rw-r--r--test/http_SUITE_data/http_multipart_stream.erl27
2 files changed, 0 insertions, 45 deletions
diff --git a/test/http_SUITE_data/http_multipart.erl b/test/http_SUITE_data/http_multipart.erl
deleted file mode 100644
index 5a4c6be..0000000
--- a/test/http_SUITE_data/http_multipart.erl
+++ /dev/null
@@ -1,18 +0,0 @@
-%% Feel free to use, reuse and abuse the code in this file.
-
--module(http_multipart).
-
--export([init/2]).
-
-init(Req, Opts) ->
- {Result, Req2} = acc_multipart(Req, []),
- {ok, cowboy_req:reply(200, #{}, term_to_binary(Result), Req2), Opts}.
-
-acc_multipart(Req, Acc) ->
- case cowboy_req:read_part(Req) of
- {ok, Headers, Req2} ->
- {ok, Body, Req3} = cowboy_req:read_part_body(Req2),
- acc_multipart(Req3, [{Headers, Body}|Acc]);
- {done, Req2} ->
- {lists:reverse(Acc), Req2}
- end.
diff --git a/test/http_SUITE_data/http_multipart_stream.erl b/test/http_SUITE_data/http_multipart_stream.erl
deleted file mode 100644
index 88cf611..0000000
--- a/test/http_SUITE_data/http_multipart_stream.erl
+++ /dev/null
@@ -1,27 +0,0 @@
-%% Feel free to use, reuse and abuse the code in this file.
-
--module(http_multipart_stream).
-
--export([init/2]).
-
-init(Req, Opts) ->
- Req2 = multipart(Req),
- {ok, cowboy_req:reply(200, Req2), Opts}.
-
-multipart(Req) ->
- case cowboy_req:read_part(Req) of
- {ok, [{<<"content-length">>, BinLength}], Req2} ->
- Length = binary_to_integer(BinLength),
- {Length, Req3} = stream_body(Req2, 0),
- multipart(Req3);
- {done, Req2} ->
- Req2
- end.
-
-stream_body(Req, N) ->
- case cowboy_req:read_part_body(Req) of
- {ok, Data, Req2} ->
- {N + byte_size(Data), Req2};
- {more, Data, Req2} ->
- stream_body(Req2, N + byte_size(Data))
- end.