feat(#75) map scheme, host and port (#76)

nomasystems · Aug 15, 2024 · 66c5c03 · 66c5c03
1 parent 0dac504
commit 66c5c03
Show file tree

Hide file tree

Showing 2 changed files with 12 additions and 0 deletions.
diff --git a/src/erf.erl b/src/erf.erl
@@ -77,6 +77,9 @@
 -type path_parameter() :: {binary(), binary()}.
 -type query_parameter() :: {binary(), binary()}.
 -type request() :: #{
+    scheme := undefined | binary(),
+    host := undefined | binary(),
+    port := undefined | 1..65535,
     path := [binary()],
     path_parameters => [path_parameter()],
     method := method(),

diff --git a/src/erf_router.erl b/src/erf_router.erl
@@ -778,6 +778,9 @@ postprocess(_Request, {Status, RawHeaders, RawBody}) ->
     Request :: erf:request(),
     Reason :: term().
 preprocess(Req) ->
+    Scheme = elli_request:scheme(Req),
+    Host = elli_request:host(Req),
+    Port = elli_request:port(Req),
     Path = elli_request:path(Req),
     Method = preprocess_method(elli_request:method(Req)),
     QueryParameters = elli_request:get_args_decoded(Req),
@@ -797,6 +800,9 @@ preprocess(Req) ->
             case njson:decode(RawBody) of
                 {ok, Body} ->
                     {ok, #{
+                        scheme => Scheme,
+                        host => Host,
+                        port => Port,
                         path => Path,
                         method => Method,
                         query_parameters => QueryParameters,
@@ -809,6 +815,9 @@ preprocess(Req) ->
             end;
         _ContentType ->
             {ok, #{
+                scheme => Scheme,
+                host => Host,
+                port => Port,
                 path => Path,
                 method => Method,
                 query_parameters => QueryParameters,