From 3eb7693e4fd7e1172b55b30ab25c5656040d1fd2 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 28 Jun 2017 13:07:44 +0200 Subject: Remove outdated multipart tests They have equivalents in req_SUITE. --- test/http_SUITE_data/http_multipart_stream.erl | 27 -------------------------- 1 file changed, 27 deletions(-) delete mode 100644 test/http_SUITE_data/http_multipart_stream.erl (limited to 'test/http_SUITE_data/http_multipart_stream.erl') 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. -- cgit v1.2.3