Merge pull request #20 from paulrbr-fl/add-response-transformer-plugin

dhall(plugins): add binding for the 'response-transformer' plugin
fretlink · Aug 24, 2020 · 258e009 · 258e009
2 parents f131496 + 2187c77
commit 258e009
Show file tree

Hide file tree

Showing 3 changed files with 11 additions and 0 deletions.
diff --git a/dhall/server/service/plugin/Config.dhall b/dhall/server/service/plugin/Config.dhall
@@ -1,6 +1,7 @@
 < CorrelationId :
     { header_name : Text, echo_downstream : Bool, generator : Text }
 | RequestTransformer : { add : { headers : List Text } }
+| ResponseTransformer : { add : { headers : List Text } }
 | RequestTermination :
     { status_code : Natural, content_type : Text, body : Text }
 | IPRestriction : { whitelist : Text }

diff --git a/dhall/server/service/plugin/functions.dhall b/dhall/server/service/plugin/functions.dhall
@@ -1,5 +1,6 @@
 { mkRequestTermination = ./mkRequestTermination.dhall
 , mkRequestTransformer = ./mkRequestTransformer.dhall
+, mkResponseTransformer = ./mkResponseTransformer.dhall
 , mkIPRestriction = ./mkIPRestriction.dhall
 , correlationId = ./correlationId.dhall
 , mkPreFunction = ./mkPreFunction.dhall

diff --git a/dhall/server/service/plugin/mkResponseTransformer.dhall b/dhall/server/service/plugin/mkResponseTransformer.dhall
@@ -0,0 +1,9 @@
+let Plugin = ./Plugin.dhall
+
+let config = ./Config.dhall
+
+in  λ(header : Text) →
+        { name = "response-transformer"
+        , config = config.ResponseTransformer { add.headers = [ header ] }
+        }
+      : Plugin