webpage

-module(webpage_logger).
-author({ "David J Goehrig", "dave@dloh.org" }).
-copyright(<<"© 2016 David J Goehrig"/utf8>>).


-include("include/http.hrl").


-export([ get/1, post/1, put/1, delete/1, options/1, head/1, trace/1, connect/1 ]).

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Public API

%


resp(Req) -> 
	Path = list_to_binary(Req#request.path),
	Length = integer_to_binary(6 + byte_size(Path)),
	#response{ 

		status = 200, 

		headers = [

			{ <<"Content-Length">>, Length },

			{ <<"Mime-Type">>, <<"text/html">> } ],

		body = <<"hello ", Path/binary>> 

	}.
	

get(Req = #request{}) ->
	http:dump(Req),
	resp(Req);

get(Resp = #response{}) ->
	io:format("forwarding response ~p~n", [ Resp ]),
	Resp.

post(Req) ->
	http:dump(Req),
	resp(Req).

put(Req) ->
	http:dump(Req),
	resp(Req).

delete(Req) ->
	http:dump(Req),
	resp(Req).

options(Req) ->
	http:dump(Req),
	resp(Req).

head(Req) ->
	http:dump(Req),
	resp(Req).

trace(Req) ->
	http:dump(Req),
	resp(Req).

connect(Req) ->
	http:dump(Req),
	resp(Req).

%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

% Private API

%