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_SUITE_data/http_handler.erl | 19 +++++++++++++++++++ 1 file changed, 19 insertions(+) create mode 100644 test/http_SUITE_data/http_handler.erl (limited to 'test/http_SUITE_data/http_handler.erl') diff --git a/test/http_SUITE_data/http_handler.erl b/test/http_SUITE_data/http_handler.erl new file mode 100644 index 0000000..e1f1665 --- /dev/null +++ b/test/http_SUITE_data/http_handler.erl @@ -0,0 +1,19 @@ +%% Feel free to use, reuse and abuse the code in this file. + +-module(http_handler). +-behaviour(cowboy_http_handler). +-export([init/3, handle/2, terminate/3]). + +-record(state, {headers, body}). + +init({_Transport, http}, Req, Opts) -> + Headers = proplists:get_value(headers, Opts, []), + Body = proplists:get_value(body, Opts, "http_handler"), + {ok, Req, #state{headers=Headers, body=Body}}. + +handle(Req, State=#state{headers=Headers, body=Body}) -> + {ok, Req2} = cowboy_req:reply(200, Headers, Body, Req), + {ok, Req2, State}. + +terminate(_, _, _) -> + ok. -- cgit v1.2.3