From ad91aaf81aa7fddba016262f1c8001d479a76be5 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Lo=C3=AFc=20Hoguin?= Date: Wed, 24 Apr 2013 20:28:44 +0200 Subject: Reorganize the http test suite --- test/http_handler_stream_body.erl | 28 ---------------------------- 1 file changed, 28 deletions(-) delete mode 100644 test/http_handler_stream_body.erl (limited to 'test/http_handler_stream_body.erl') diff --git a/test/http_handler_stream_body.erl b/test/http_handler_stream_body.erl deleted file mode 100644 index 5e42fa7..0000000 --- a/test/http_handler_stream_body.erl +++ /dev/null @@ -1,28 +0,0 @@ -%% Feel free to use, reuse and abuse the code in this file. - --module(http_handler_stream_body). --behaviour(cowboy_http_handler). --export([init/3, handle/2, terminate/3]). - --record(state, {headers, body, reply}). - -init({_Transport, http}, Req, Opts) -> - Headers = proplists:get_value(headers, Opts, []), - Body = proplists:get_value(body, Opts, "http_handler_stream_body"), - Reply = proplists:get_value(reply, Opts), - {ok, Req, #state{headers=Headers, body=Body, reply=Reply}}. - -handle(Req, State=#state{headers=_Headers, body=Body, reply=Reply}) -> - SFun = fun(Socket, Transport) -> Transport:send(Socket, Body) end, - Req2 = case Reply of - set_resp -> - SLen = iolist_size(Body), - cowboy_req:set_resp_body_fun(SLen, SFun, Req); - set_resp_close -> - cowboy_req:set_resp_body_fun(SFun, Req) - end, - {ok, Req3} = cowboy_req:reply(200, Req2), - {ok, Req3, State}. - -terminate(_, _, _) -> - ok. -- cgit v1.2.3