aboutsummaryrefslogtreecommitdiffstats
path: root/test/http_handler_echo_body.erl
diff options
context:
space:
mode:
authorLoïc Hoguin <[email protected]>2013-04-24 20:28:44 +0200
committerLoïc Hoguin <[email protected]>2013-04-24 20:28:44 +0200
commitad91aaf81aa7fddba016262f1c8001d479a76be5 (patch)
tree160cc2d94af30d73172cefe32be7ea5d8a9b0a4f /test/http_handler_echo_body.erl
parent282e532ba9e1b0e0f1867e43dd60d1118a36c12f (diff)
downloadcowboy-ad91aaf81aa7fddba016262f1c8001d479a76be5.tar.gz
cowboy-ad91aaf81aa7fddba016262f1c8001d479a76be5.tar.bz2
cowboy-ad91aaf81aa7fddba016262f1c8001d479a76be5.zip
Reorganize the http test suite
Diffstat (limited to 'test/http_handler_echo_body.erl')
-rw-r--r--test/http_handler_echo_body.erl45
1 files changed, 0 insertions, 45 deletions
diff --git a/test/http_handler_echo_body.erl b/test/http_handler_echo_body.erl
deleted file mode 100644
index 4b9e765..0000000
--- a/test/http_handler_echo_body.erl
+++ /dev/null
@@ -1,45 +0,0 @@
-%% Feel free to use, reuse and abuse the code in this file.
-
--module(http_handler_echo_body).
--behaviour(cowboy_http_handler).
--export([init/3, handle/2, terminate/3]).
-
-init({_, http}, Req, _) ->
- {ok, Req, undefined}.
-
-handle(Req, State) ->
- true = cowboy_req:has_body(Req),
- {ok, Req3} = case cowboy_req:body(1000000, Req) of
- {error, chunked} -> handle_chunked(Req);
- {error, badlength} -> handle_badlength(Req);
- {ok, Body, Req2} -> handle_body(Req2, Body)
- end,
- {ok, Req3, State}.
-
-handle_chunked(Req) ->
- {ok, Data, Req2} = read_body(Req, <<>>, 1000000),
- {ok, Req3} = cowboy_req:reply(200, [], Data, Req2),
- {ok, Req3}.
-
-handle_badlength(Req) ->
- {ok, Req2} = cowboy_req:reply(413, [], <<"Request entity too large">>, Req),
- {ok, Req2}.
-
-handle_body(Req, Body) ->
- {Size, Req2} = cowboy_req:body_length(Req),
- Size = byte_size(Body),
- {ok, Req3} = cowboy_req:reply(200, [], Body, Req2),
- {ok, Req3}.
-
-terminate(_, _, _) ->
- ok.
-
-% Read chunked request content
-read_body(Req, Acc, BodyLengthRemaining) ->
- case cowboy_req:stream_body(Req) of
- {ok, Data, Req2} ->
- BodyLengthRem = BodyLengthRemaining - byte_size(Data),
- read_body(Req2, << Acc/binary, Data/binary >>, BodyLengthRem);
- {done, Req2} ->
- {ok, Acc, Req2}
- end.