{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ApiGatewayV2.Types.Integration where
import Amazonka.ApiGatewayV2.Types.ConnectionType
import Amazonka.ApiGatewayV2.Types.ContentHandlingStrategy
import Amazonka.ApiGatewayV2.Types.IntegrationType
import Amazonka.ApiGatewayV2.Types.PassthroughBehavior
import Amazonka.ApiGatewayV2.Types.TlsConfig
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data Integration = Integration'
{
Integration -> Maybe Text
integrationResponseSelectionExpression :: Prelude.Maybe Prelude.Text,
Integration -> Maybe (HashMap Text Text)
requestTemplates :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
Integration -> Maybe Text
integrationSubtype :: Prelude.Maybe Prelude.Text,
Integration -> Maybe Text
credentialsArn :: Prelude.Maybe Prelude.Text,
Integration -> Maybe Text
integrationUri :: Prelude.Maybe Prelude.Text,
Integration -> Maybe Text
integrationId :: Prelude.Maybe Prelude.Text,
Integration -> Maybe (HashMap Text Text)
requestParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
Integration -> Maybe Text
connectionId :: Prelude.Maybe Prelude.Text,
Integration -> Maybe PassthroughBehavior
passthroughBehavior :: Prelude.Maybe PassthroughBehavior,
Integration -> Maybe Text
integrationMethod :: Prelude.Maybe Prelude.Text,
Integration -> Maybe TlsConfig
tlsConfig :: Prelude.Maybe TlsConfig,
Integration -> Maybe Text
payloadFormatVersion :: Prelude.Maybe Prelude.Text,
Integration -> Maybe Text
templateSelectionExpression :: Prelude.Maybe Prelude.Text,
Integration -> Maybe Natural
timeoutInMillis :: Prelude.Maybe Prelude.Natural,
Integration -> Maybe Bool
apiGatewayManaged :: Prelude.Maybe Prelude.Bool,
Integration -> Maybe ContentHandlingStrategy
contentHandlingStrategy :: Prelude.Maybe ContentHandlingStrategy,
Integration -> Maybe IntegrationType
integrationType :: Prelude.Maybe IntegrationType,
Integration -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
Integration -> Maybe ConnectionType
connectionType :: Prelude.Maybe ConnectionType,
Integration -> Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text))
}
deriving (Integration -> Integration -> Bool
(Integration -> Integration -> Bool)
-> (Integration -> Integration -> Bool) -> Eq Integration
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Integration -> Integration -> Bool
$c/= :: Integration -> Integration -> Bool
== :: Integration -> Integration -> Bool
$c== :: Integration -> Integration -> Bool
Prelude.Eq, ReadPrec [Integration]
ReadPrec Integration
Int -> ReadS Integration
ReadS [Integration]
(Int -> ReadS Integration)
-> ReadS [Integration]
-> ReadPrec Integration
-> ReadPrec [Integration]
-> Read Integration
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [Integration]
$creadListPrec :: ReadPrec [Integration]
readPrec :: ReadPrec Integration
$creadPrec :: ReadPrec Integration
readList :: ReadS [Integration]
$creadList :: ReadS [Integration]
readsPrec :: Int -> ReadS Integration
$creadsPrec :: Int -> ReadS Integration
Prelude.Read, Int -> Integration -> ShowS
[Integration] -> ShowS
Integration -> String
(Int -> Integration -> ShowS)
-> (Integration -> String)
-> ([Integration] -> ShowS)
-> Show Integration
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Integration] -> ShowS
$cshowList :: [Integration] -> ShowS
show :: Integration -> String
$cshow :: Integration -> String
showsPrec :: Int -> Integration -> ShowS
$cshowsPrec :: Int -> Integration -> ShowS
Prelude.Show, (forall x. Integration -> Rep Integration x)
-> (forall x. Rep Integration x -> Integration)
-> Generic Integration
forall x. Rep Integration x -> Integration
forall x. Integration -> Rep Integration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Integration x -> Integration
$cfrom :: forall x. Integration -> Rep Integration x
Prelude.Generic)
newIntegration ::
Integration
newIntegration :: Integration
newIntegration =
Integration' :: Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration
Integration'
{ $sel:integrationResponseSelectionExpression:Integration' :: Maybe Text
integrationResponseSelectionExpression =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:requestTemplates:Integration' :: Maybe (HashMap Text Text)
requestTemplates = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
$sel:integrationSubtype:Integration' :: Maybe Text
integrationSubtype = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:credentialsArn:Integration' :: Maybe Text
credentialsArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:integrationUri:Integration' :: Maybe Text
integrationUri = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:integrationId:Integration' :: Maybe Text
integrationId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:requestParameters:Integration' :: Maybe (HashMap Text Text)
requestParameters = Maybe (HashMap Text Text)
forall a. Maybe a
Prelude.Nothing,
$sel:connectionId:Integration' :: Maybe Text
connectionId = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:passthroughBehavior:Integration' :: Maybe PassthroughBehavior
passthroughBehavior = Maybe PassthroughBehavior
forall a. Maybe a
Prelude.Nothing,
$sel:integrationMethod:Integration' :: Maybe Text
integrationMethod = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:tlsConfig:Integration' :: Maybe TlsConfig
tlsConfig = Maybe TlsConfig
forall a. Maybe a
Prelude.Nothing,
$sel:payloadFormatVersion:Integration' :: Maybe Text
payloadFormatVersion = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:templateSelectionExpression:Integration' :: Maybe Text
templateSelectionExpression = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:timeoutInMillis:Integration' :: Maybe Natural
timeoutInMillis = Maybe Natural
forall a. Maybe a
Prelude.Nothing,
$sel:apiGatewayManaged:Integration' :: Maybe Bool
apiGatewayManaged = Maybe Bool
forall a. Maybe a
Prelude.Nothing,
$sel:contentHandlingStrategy:Integration' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = Maybe ContentHandlingStrategy
forall a. Maybe a
Prelude.Nothing,
$sel:integrationType:Integration' :: Maybe IntegrationType
integrationType = Maybe IntegrationType
forall a. Maybe a
Prelude.Nothing,
$sel:description:Integration' :: Maybe Text
description = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:connectionType:Integration' :: Maybe ConnectionType
connectionType = Maybe ConnectionType
forall a. Maybe a
Prelude.Nothing,
$sel:responseParameters:Integration' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = Maybe (HashMap Text (HashMap Text Text))
forall a. Maybe a
Prelude.Nothing
}
integration_integrationResponseSelectionExpression :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_integrationResponseSelectionExpression :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_integrationResponseSelectionExpression = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
integrationResponseSelectionExpression :: Maybe Text
$sel:integrationResponseSelectionExpression:Integration' :: Integration -> Maybe Text
integrationResponseSelectionExpression} -> Maybe Text
integrationResponseSelectionExpression) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:integrationResponseSelectionExpression:Integration' :: Maybe Text
integrationResponseSelectionExpression = Maybe Text
a} :: Integration)
integration_requestTemplates :: Lens.Lens' Integration (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
integration_requestTemplates :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration -> f Integration
integration_requestTemplates = (Integration -> Maybe (HashMap Text Text))
-> (Integration -> Maybe (HashMap Text Text) -> Integration)
-> Lens
Integration
Integration
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe (HashMap Text Text)
requestTemplates :: Maybe (HashMap Text Text)
$sel:requestTemplates:Integration' :: Integration -> Maybe (HashMap Text Text)
requestTemplates} -> Maybe (HashMap Text Text)
requestTemplates) (\s :: Integration
s@Integration' {} Maybe (HashMap Text Text)
a -> Integration
s {$sel:requestTemplates:Integration' :: Maybe (HashMap Text Text)
requestTemplates = Maybe (HashMap Text Text)
a} :: Integration) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration -> f Integration)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration
-> f Integration
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
integration_integrationSubtype :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_integrationSubtype :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_integrationSubtype = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
integrationSubtype :: Maybe Text
$sel:integrationSubtype:Integration' :: Integration -> Maybe Text
integrationSubtype} -> Maybe Text
integrationSubtype) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:integrationSubtype:Integration' :: Maybe Text
integrationSubtype = Maybe Text
a} :: Integration)
integration_credentialsArn :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_credentialsArn :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_credentialsArn = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
credentialsArn :: Maybe Text
$sel:credentialsArn:Integration' :: Integration -> Maybe Text
credentialsArn} -> Maybe Text
credentialsArn) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:credentialsArn:Integration' :: Maybe Text
credentialsArn = Maybe Text
a} :: Integration)
integration_integrationUri :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_integrationUri :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_integrationUri = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
integrationUri :: Maybe Text
$sel:integrationUri:Integration' :: Integration -> Maybe Text
integrationUri} -> Maybe Text
integrationUri) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:integrationUri:Integration' :: Maybe Text
integrationUri = Maybe Text
a} :: Integration)
integration_integrationId :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_integrationId :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_integrationId = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
integrationId :: Maybe Text
$sel:integrationId:Integration' :: Integration -> Maybe Text
integrationId} -> Maybe Text
integrationId) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:integrationId:Integration' :: Maybe Text
integrationId = Maybe Text
a} :: Integration)
integration_requestParameters :: Lens.Lens' Integration (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
integration_requestParameters :: (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration -> f Integration
integration_requestParameters = (Integration -> Maybe (HashMap Text Text))
-> (Integration -> Maybe (HashMap Text Text) -> Integration)
-> Lens
Integration
Integration
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
$sel:requestParameters:Integration' :: Integration -> Maybe (HashMap Text Text)
requestParameters} -> Maybe (HashMap Text Text)
requestParameters) (\s :: Integration
s@Integration' {} Maybe (HashMap Text Text)
a -> Integration
s {$sel:requestParameters:Integration' :: Maybe (HashMap Text Text)
requestParameters = Maybe (HashMap Text Text)
a} :: Integration) ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration -> f Integration)
-> ((Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> (Maybe (HashMap Text Text) -> f (Maybe (HashMap Text Text)))
-> Integration
-> f Integration
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
-> Iso
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
(Maybe (HashMap Text Text))
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
(HashMap Text Text)
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
integration_connectionId :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_connectionId :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_connectionId = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
connectionId :: Maybe Text
$sel:connectionId:Integration' :: Integration -> Maybe Text
connectionId} -> Maybe Text
connectionId) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:connectionId:Integration' :: Maybe Text
connectionId = Maybe Text
a} :: Integration)
integration_passthroughBehavior :: Lens.Lens' Integration (Prelude.Maybe PassthroughBehavior)
integration_passthroughBehavior :: (Maybe PassthroughBehavior -> f (Maybe PassthroughBehavior))
-> Integration -> f Integration
integration_passthroughBehavior = (Integration -> Maybe PassthroughBehavior)
-> (Integration -> Maybe PassthroughBehavior -> Integration)
-> Lens
Integration
Integration
(Maybe PassthroughBehavior)
(Maybe PassthroughBehavior)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe PassthroughBehavior
passthroughBehavior :: Maybe PassthroughBehavior
$sel:passthroughBehavior:Integration' :: Integration -> Maybe PassthroughBehavior
passthroughBehavior} -> Maybe PassthroughBehavior
passthroughBehavior) (\s :: Integration
s@Integration' {} Maybe PassthroughBehavior
a -> Integration
s {$sel:passthroughBehavior:Integration' :: Maybe PassthroughBehavior
passthroughBehavior = Maybe PassthroughBehavior
a} :: Integration)
integration_integrationMethod :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_integrationMethod :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_integrationMethod = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
integrationMethod :: Maybe Text
$sel:integrationMethod:Integration' :: Integration -> Maybe Text
integrationMethod} -> Maybe Text
integrationMethod) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:integrationMethod:Integration' :: Maybe Text
integrationMethod = Maybe Text
a} :: Integration)
integration_tlsConfig :: Lens.Lens' Integration (Prelude.Maybe TlsConfig)
integration_tlsConfig :: (Maybe TlsConfig -> f (Maybe TlsConfig))
-> Integration -> f Integration
integration_tlsConfig = (Integration -> Maybe TlsConfig)
-> (Integration -> Maybe TlsConfig -> Integration)
-> Lens Integration Integration (Maybe TlsConfig) (Maybe TlsConfig)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe TlsConfig
tlsConfig :: Maybe TlsConfig
$sel:tlsConfig:Integration' :: Integration -> Maybe TlsConfig
tlsConfig} -> Maybe TlsConfig
tlsConfig) (\s :: Integration
s@Integration' {} Maybe TlsConfig
a -> Integration
s {$sel:tlsConfig:Integration' :: Maybe TlsConfig
tlsConfig = Maybe TlsConfig
a} :: Integration)
integration_payloadFormatVersion :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_payloadFormatVersion :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_payloadFormatVersion = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
payloadFormatVersion :: Maybe Text
$sel:payloadFormatVersion:Integration' :: Integration -> Maybe Text
payloadFormatVersion} -> Maybe Text
payloadFormatVersion) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:payloadFormatVersion:Integration' :: Maybe Text
payloadFormatVersion = Maybe Text
a} :: Integration)
integration_templateSelectionExpression :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_templateSelectionExpression :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_templateSelectionExpression = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
templateSelectionExpression :: Maybe Text
$sel:templateSelectionExpression:Integration' :: Integration -> Maybe Text
templateSelectionExpression} -> Maybe Text
templateSelectionExpression) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:templateSelectionExpression:Integration' :: Maybe Text
templateSelectionExpression = Maybe Text
a} :: Integration)
integration_timeoutInMillis :: Lens.Lens' Integration (Prelude.Maybe Prelude.Natural)
integration_timeoutInMillis :: (Maybe Natural -> f (Maybe Natural))
-> Integration -> f Integration
integration_timeoutInMillis = (Integration -> Maybe Natural)
-> (Integration -> Maybe Natural -> Integration)
-> Lens Integration Integration (Maybe Natural) (Maybe Natural)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Natural
timeoutInMillis :: Maybe Natural
$sel:timeoutInMillis:Integration' :: Integration -> Maybe Natural
timeoutInMillis} -> Maybe Natural
timeoutInMillis) (\s :: Integration
s@Integration' {} Maybe Natural
a -> Integration
s {$sel:timeoutInMillis:Integration' :: Maybe Natural
timeoutInMillis = Maybe Natural
a} :: Integration)
integration_apiGatewayManaged :: Lens.Lens' Integration (Prelude.Maybe Prelude.Bool)
integration_apiGatewayManaged :: (Maybe Bool -> f (Maybe Bool)) -> Integration -> f Integration
integration_apiGatewayManaged = (Integration -> Maybe Bool)
-> (Integration -> Maybe Bool -> Integration)
-> Lens Integration Integration (Maybe Bool) (Maybe Bool)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Bool
apiGatewayManaged :: Maybe Bool
$sel:apiGatewayManaged:Integration' :: Integration -> Maybe Bool
apiGatewayManaged} -> Maybe Bool
apiGatewayManaged) (\s :: Integration
s@Integration' {} Maybe Bool
a -> Integration
s {$sel:apiGatewayManaged:Integration' :: Maybe Bool
apiGatewayManaged = Maybe Bool
a} :: Integration)
integration_contentHandlingStrategy :: Lens.Lens' Integration (Prelude.Maybe ContentHandlingStrategy)
integration_contentHandlingStrategy :: (Maybe ContentHandlingStrategy
-> f (Maybe ContentHandlingStrategy))
-> Integration -> f Integration
integration_contentHandlingStrategy = (Integration -> Maybe ContentHandlingStrategy)
-> (Integration -> Maybe ContentHandlingStrategy -> Integration)
-> Lens
Integration
Integration
(Maybe ContentHandlingStrategy)
(Maybe ContentHandlingStrategy)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe ContentHandlingStrategy
contentHandlingStrategy :: Maybe ContentHandlingStrategy
$sel:contentHandlingStrategy:Integration' :: Integration -> Maybe ContentHandlingStrategy
contentHandlingStrategy} -> Maybe ContentHandlingStrategy
contentHandlingStrategy) (\s :: Integration
s@Integration' {} Maybe ContentHandlingStrategy
a -> Integration
s {$sel:contentHandlingStrategy:Integration' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = Maybe ContentHandlingStrategy
a} :: Integration)
integration_integrationType :: Lens.Lens' Integration (Prelude.Maybe IntegrationType)
integration_integrationType :: (Maybe IntegrationType -> f (Maybe IntegrationType))
-> Integration -> f Integration
integration_integrationType = (Integration -> Maybe IntegrationType)
-> (Integration -> Maybe IntegrationType -> Integration)
-> Lens
Integration
Integration
(Maybe IntegrationType)
(Maybe IntegrationType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe IntegrationType
integrationType :: Maybe IntegrationType
$sel:integrationType:Integration' :: Integration -> Maybe IntegrationType
integrationType} -> Maybe IntegrationType
integrationType) (\s :: Integration
s@Integration' {} Maybe IntegrationType
a -> Integration
s {$sel:integrationType:Integration' :: Maybe IntegrationType
integrationType = Maybe IntegrationType
a} :: Integration)
integration_description :: Lens.Lens' Integration (Prelude.Maybe Prelude.Text)
integration_description :: (Maybe Text -> f (Maybe Text)) -> Integration -> f Integration
integration_description = (Integration -> Maybe Text)
-> (Integration -> Maybe Text -> Integration)
-> Lens Integration Integration (Maybe Text) (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe Text
description :: Maybe Text
$sel:description:Integration' :: Integration -> Maybe Text
description} -> Maybe Text
description) (\s :: Integration
s@Integration' {} Maybe Text
a -> Integration
s {$sel:description:Integration' :: Maybe Text
description = Maybe Text
a} :: Integration)
integration_connectionType :: Lens.Lens' Integration (Prelude.Maybe ConnectionType)
integration_connectionType :: (Maybe ConnectionType -> f (Maybe ConnectionType))
-> Integration -> f Integration
integration_connectionType = (Integration -> Maybe ConnectionType)
-> (Integration -> Maybe ConnectionType -> Integration)
-> Lens
Integration
Integration
(Maybe ConnectionType)
(Maybe ConnectionType)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe ConnectionType
connectionType :: Maybe ConnectionType
$sel:connectionType:Integration' :: Integration -> Maybe ConnectionType
connectionType} -> Maybe ConnectionType
connectionType) (\s :: Integration
s@Integration' {} Maybe ConnectionType
a -> Integration
s {$sel:connectionType:Integration' :: Maybe ConnectionType
connectionType = Maybe ConnectionType
a} :: Integration)
integration_responseParameters :: Lens.Lens' Integration (Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text)))
integration_responseParameters :: (Maybe (HashMap Text (HashMap Text Text))
-> f (Maybe (HashMap Text (HashMap Text Text))))
-> Integration -> f Integration
integration_responseParameters = (Integration -> Maybe (HashMap Text (HashMap Text Text)))
-> (Integration
-> Maybe (HashMap Text (HashMap Text Text)) -> Integration)
-> Lens
Integration
Integration
(Maybe (HashMap Text (HashMap Text Text)))
(Maybe (HashMap Text (HashMap Text Text)))
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Integration' {Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
$sel:responseParameters:Integration' :: Integration -> Maybe (HashMap Text (HashMap Text Text))
responseParameters} -> Maybe (HashMap Text (HashMap Text Text))
responseParameters) (\s :: Integration
s@Integration' {} Maybe (HashMap Text (HashMap Text Text))
a -> Integration
s {$sel:responseParameters:Integration' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = Maybe (HashMap Text (HashMap Text Text))
a} :: Integration) ((Maybe (HashMap Text (HashMap Text Text))
-> f (Maybe (HashMap Text (HashMap Text Text))))
-> Integration -> f Integration)
-> ((Maybe (HashMap Text (HashMap Text Text))
-> f (Maybe (HashMap Text (HashMap Text Text))))
-> Maybe (HashMap Text (HashMap Text Text))
-> f (Maybe (HashMap Text (HashMap Text Text))))
-> (Maybe (HashMap Text (HashMap Text Text))
-> f (Maybe (HashMap Text (HashMap Text Text))))
-> Integration
-> f Integration
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
-> Iso
(Maybe (HashMap Text (HashMap Text Text)))
(Maybe (HashMap Text (HashMap Text Text)))
(Maybe (HashMap Text (HashMap Text Text)))
(Maybe (HashMap Text (HashMap Text Text)))
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
(HashMap Text (HashMap Text Text))
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
instance Core.FromJSON Integration where
parseJSON :: Value -> Parser Integration
parseJSON =
String
-> (Object -> Parser Integration) -> Value -> Parser Integration
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"Integration"
( \Object
x ->
Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration
Integration'
(Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationResponseSelectionExpression")
Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe (HashMap Text Text))
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object -> Text -> Parser (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"requestTemplates"
Parser (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> Parser (Maybe (HashMap Text Text))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty
)
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationSubtype")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"credentialsArn")
Parser
(Maybe Text
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationUri")
Parser
(Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationId")
Parser
(Maybe (HashMap Text Text)
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe (HashMap Text Text))
-> Parser
(Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object -> Text -> Parser (Maybe (Maybe (HashMap Text Text)))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"requestParameters"
Parser (Maybe (Maybe (HashMap Text Text)))
-> Maybe (HashMap Text Text) -> Parser (Maybe (HashMap Text Text))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text Text)
forall a. Monoid a => a
Prelude.mempty
)
Parser
(Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"connectionId")
Parser
(Maybe PassthroughBehavior
-> Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe PassthroughBehavior)
-> Parser
(Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe PassthroughBehavior)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"passthroughBehavior")
Parser
(Maybe Text
-> Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationMethod")
Parser
(Maybe TlsConfig
-> Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe TlsConfig)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe TlsConfig)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"tlsConfig")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"payloadFormatVersion")
Parser
(Maybe Text
-> Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"templateSelectionExpression")
Parser
(Maybe Natural
-> Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Natural)
-> Parser
(Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Natural)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"timeoutInMillis")
Parser
(Maybe Bool
-> Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Bool)
-> Parser
(Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Bool)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"apiGatewayManaged")
Parser
(Maybe ContentHandlingStrategy
-> Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe ContentHandlingStrategy)
-> Parser
(Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe ContentHandlingStrategy)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"contentHandlingStrategy")
Parser
(Maybe IntegrationType
-> Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe IntegrationType)
-> Parser
(Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe IntegrationType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"integrationType")
Parser
(Maybe Text
-> Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text))
-> Integration)
-> Parser (Maybe Text)
-> Parser
(Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text)) -> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"description")
Parser
(Maybe ConnectionType
-> Maybe (HashMap Text (HashMap Text Text)) -> Integration)
-> Parser (Maybe ConnectionType)
-> Parser (Maybe (HashMap Text (HashMap Text Text)) -> Integration)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe ConnectionType)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"connectionType")
Parser (Maybe (HashMap Text (HashMap Text Text)) -> Integration)
-> Parser (Maybe (HashMap Text (HashMap Text Text)))
-> Parser Integration
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object
-> Text
-> Parser (Maybe (Maybe (HashMap Text (HashMap Text Text))))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"responseParameters"
Parser (Maybe (Maybe (HashMap Text (HashMap Text Text))))
-> Maybe (HashMap Text (HashMap Text Text))
-> Parser (Maybe (HashMap Text (HashMap Text Text)))
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe (HashMap Text (HashMap Text Text))
forall a. Monoid a => a
Prelude.mempty
)
)
instance Prelude.Hashable Integration
instance Prelude.NFData Integration