0
- Parameters =
{struct, parse_arg(A, SC)},
0
+ Parameters =
[{method, handle_request}, {request, {struct, parse_arg(A, SC)}}],
0
io:format("Param restructure:~n~p~n", [Parameters]),
0
case node_api:safely_send_call_to_pool(handle_request,
0
parse_arg(Request, ServerOptions) ->
0
Headers = Request#arg.headers,
0
-
{convert_method(Request),
0
+
[convert_method(Request),
0
convert_version(Request),
0
convert_querypath(Request),
0
{querydata, prep(Request#arg.querydata)},
0
{servername, prep(ServerOptions#sconf.servername)},
0
{headers, {struct, convert_headers(Request#arg.headers)}},
0
- {cookies, {array, list
_to_tuple(lists:map(fun(X) -> prep(X) end, Headers#headers.cookie))}},
0
+ {cookies, {array, list
s:map(fun(X) -> prep(X) end, Headers#headers.cookie)}},
0
{pathinfo, prep(ServerOptions#sconf.docroot)},
0
- {postdata, Request#arg.clidata}
}.
0
+ {postdata, Request#arg.clidata}
].
0
convert_method(Request) ->
0
convert_version(Request) ->
0
{http_request,_Method,{_Type,_Path},Version} = R,
0
- {http_version,
Version}.
0
+ {http_version,
{array, tuple_to_list(Version)}}.
0
{http_request,Method,{_Type,Path},_} = R,
0
lists:map(fun({http_header, _Len, Name, _, Value}) -> {prep(Name), prep(Value)} end,
0
-
list_to_tuple([{Name, Res} || {Name, Res} <- NormalHeaders, Res /= undefined] ++ SpecialHeaders).
0
+
[{Name, Res} || {Name, Res} <- NormalHeaders, Res /= undefined] ++ SpecialHeaders.
0
-convert_response(
EhtmlTuple) ->
0
+convert_response(
{response, EhtmlTuple}) ->
0
{Status, AllHeaders, Html} = EhtmlTuple,
0
{allheaders, HeaderList} = AllHeaders,
0
ProcessedHeaderList = lists:map(fun({header, Name, Value}) -> {header, [binary_to_list(Name) ++ ":", binary_to_list(Value)]} end,
Comments
No one has commented yet.