mirror of
https://github.com/ninenines/cowboy.git
synced 2025-07-14 20:30:23 +00:00
c32db277c8
Now the server defines default headers that can be overwritten by the handler simply by passing them to the reply/4 function. Default headers include, for now, Connection and Content-Length headers. Note that it isn't enough to change the Connection header to close a keep-alive connection server-side.
19 lines
562 B
Erlang
19 lines
562 B
Erlang
%% 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/2]).
|
|
|
|
-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_http_req:reply(200, Headers, Body, Req),
|
|
{ok, Req2, State}.
|
|
|
|
terminate(_Req, _State) ->
|
|
ok.
|