{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.ApiGatewayV2.UpdateIntegration
(
UpdateIntegration (..),
newUpdateIntegration,
updateIntegration_connectionId,
updateIntegration_connectionType,
updateIntegration_contentHandlingStrategy,
updateIntegration_credentialsArn,
updateIntegration_description,
updateIntegration_integrationMethod,
updateIntegration_integrationSubtype,
updateIntegration_integrationType,
updateIntegration_integrationUri,
updateIntegration_passthroughBehavior,
updateIntegration_payloadFormatVersion,
updateIntegration_requestParameters,
updateIntegration_requestTemplates,
updateIntegration_responseParameters,
updateIntegration_templateSelectionExpression,
updateIntegration_timeoutInMillis,
updateIntegration_tlsConfig,
updateIntegration_apiId,
updateIntegration_integrationId,
UpdateIntegrationResponse' (..),
newUpdateIntegrationResponse',
updateIntegrationResponse'_apiGatewayManaged,
updateIntegrationResponse'_connectionId,
updateIntegrationResponse'_connectionType,
updateIntegrationResponse'_contentHandlingStrategy,
updateIntegrationResponse'_credentialsArn,
updateIntegrationResponse'_description,
updateIntegrationResponse'_integrationId,
updateIntegrationResponse'_integrationMethod,
updateIntegrationResponse'_integrationResponseSelectionExpression,
updateIntegrationResponse'_integrationSubtype,
updateIntegrationResponse'_integrationType,
updateIntegrationResponse'_integrationUri,
updateIntegrationResponse'_passthroughBehavior,
updateIntegrationResponse'_payloadFormatVersion,
updateIntegrationResponse'_requestParameters,
updateIntegrationResponse'_requestTemplates,
updateIntegrationResponse'_responseParameters,
updateIntegrationResponse'_templateSelectionExpression,
updateIntegrationResponse'_timeoutInMillis,
updateIntegrationResponse'_tlsConfig,
updateIntegrationResponse'_httpStatus,
)
where
import Amazonka.ApiGatewayV2.Types
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
data UpdateIntegration = UpdateIntegration'
{
UpdateIntegration -> Maybe Text
connectionId :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe ConnectionType
connectionType :: Prelude.Maybe ConnectionType,
UpdateIntegration -> Maybe ContentHandlingStrategy
contentHandlingStrategy :: Prelude.Maybe ContentHandlingStrategy,
UpdateIntegration -> Maybe Text
credentialsArn :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe Text
integrationMethod :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe Text
integrationSubtype :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe IntegrationType
integrationType :: Prelude.Maybe IntegrationType,
UpdateIntegration -> Maybe Text
integrationUri :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe PassthroughBehavior
passthroughBehavior :: Prelude.Maybe PassthroughBehavior,
UpdateIntegration -> Maybe Text
payloadFormatVersion :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe (HashMap Text Text)
requestParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
UpdateIntegration -> Maybe (HashMap Text Text)
requestTemplates :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text)),
UpdateIntegration -> Maybe Text
templateSelectionExpression :: Prelude.Maybe Prelude.Text,
UpdateIntegration -> Maybe Natural
timeoutInMillis :: Prelude.Maybe Prelude.Natural,
UpdateIntegration -> Maybe TlsConfigInput
tlsConfig :: Prelude.Maybe TlsConfigInput,
UpdateIntegration -> Text
apiId :: Prelude.Text,
UpdateIntegration -> Text
integrationId :: Prelude.Text
}
deriving (UpdateIntegration -> UpdateIntegration -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateIntegration -> UpdateIntegration -> Bool
$c/= :: UpdateIntegration -> UpdateIntegration -> Bool
== :: UpdateIntegration -> UpdateIntegration -> Bool
$c== :: UpdateIntegration -> UpdateIntegration -> Bool
Prelude.Eq, ReadPrec [UpdateIntegration]
ReadPrec UpdateIntegration
Int -> ReadS UpdateIntegration
ReadS [UpdateIntegration]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateIntegration]
$creadListPrec :: ReadPrec [UpdateIntegration]
readPrec :: ReadPrec UpdateIntegration
$creadPrec :: ReadPrec UpdateIntegration
readList :: ReadS [UpdateIntegration]
$creadList :: ReadS [UpdateIntegration]
readsPrec :: Int -> ReadS UpdateIntegration
$creadsPrec :: Int -> ReadS UpdateIntegration
Prelude.Read, Int -> UpdateIntegration -> ShowS
[UpdateIntegration] -> ShowS
UpdateIntegration -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateIntegration] -> ShowS
$cshowList :: [UpdateIntegration] -> ShowS
show :: UpdateIntegration -> String
$cshow :: UpdateIntegration -> String
showsPrec :: Int -> UpdateIntegration -> ShowS
$cshowsPrec :: Int -> UpdateIntegration -> ShowS
Prelude.Show, forall x. Rep UpdateIntegration x -> UpdateIntegration
forall x. UpdateIntegration -> Rep UpdateIntegration x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdateIntegration x -> UpdateIntegration
$cfrom :: forall x. UpdateIntegration -> Rep UpdateIntegration x
Prelude.Generic)
newUpdateIntegration ::
Prelude.Text ->
Prelude.Text ->
UpdateIntegration
newUpdateIntegration :: Text -> Text -> UpdateIntegration
newUpdateIntegration Text
pApiId_ Text
pIntegrationId_ =
UpdateIntegration'
{ $sel:connectionId:UpdateIntegration' :: Maybe Text
connectionId = forall a. Maybe a
Prelude.Nothing,
$sel:connectionType:UpdateIntegration' :: Maybe ConnectionType
connectionType = forall a. Maybe a
Prelude.Nothing,
$sel:contentHandlingStrategy:UpdateIntegration' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = forall a. Maybe a
Prelude.Nothing,
$sel:credentialsArn:UpdateIntegration' :: Maybe Text
credentialsArn = forall a. Maybe a
Prelude.Nothing,
$sel:description:UpdateIntegration' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:integrationMethod:UpdateIntegration' :: Maybe Text
integrationMethod = forall a. Maybe a
Prelude.Nothing,
$sel:integrationSubtype:UpdateIntegration' :: Maybe Text
integrationSubtype = forall a. Maybe a
Prelude.Nothing,
$sel:integrationType:UpdateIntegration' :: Maybe IntegrationType
integrationType = forall a. Maybe a
Prelude.Nothing,
$sel:integrationUri:UpdateIntegration' :: Maybe Text
integrationUri = forall a. Maybe a
Prelude.Nothing,
$sel:passthroughBehavior:UpdateIntegration' :: Maybe PassthroughBehavior
passthroughBehavior = forall a. Maybe a
Prelude.Nothing,
$sel:payloadFormatVersion:UpdateIntegration' :: Maybe Text
payloadFormatVersion = forall a. Maybe a
Prelude.Nothing,
$sel:requestParameters:UpdateIntegration' :: Maybe (HashMap Text Text)
requestParameters = forall a. Maybe a
Prelude.Nothing,
$sel:requestTemplates:UpdateIntegration' :: Maybe (HashMap Text Text)
requestTemplates = forall a. Maybe a
Prelude.Nothing,
$sel:responseParameters:UpdateIntegration' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = forall a. Maybe a
Prelude.Nothing,
$sel:templateSelectionExpression:UpdateIntegration' :: Maybe Text
templateSelectionExpression = forall a. Maybe a
Prelude.Nothing,
$sel:timeoutInMillis:UpdateIntegration' :: Maybe Natural
timeoutInMillis = forall a. Maybe a
Prelude.Nothing,
$sel:tlsConfig:UpdateIntegration' :: Maybe TlsConfigInput
tlsConfig = forall a. Maybe a
Prelude.Nothing,
$sel:apiId:UpdateIntegration' :: Text
apiId = Text
pApiId_,
$sel:integrationId:UpdateIntegration' :: Text
integrationId = Text
pIntegrationId_
}
updateIntegration_connectionId :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_connectionId :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_connectionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
connectionId :: Maybe Text
$sel:connectionId:UpdateIntegration' :: UpdateIntegration -> Maybe Text
connectionId} -> Maybe Text
connectionId) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:connectionId:UpdateIntegration' :: Maybe Text
connectionId = Maybe Text
a} :: UpdateIntegration)
updateIntegration_connectionType :: Lens.Lens' UpdateIntegration (Prelude.Maybe ConnectionType)
updateIntegration_connectionType :: Lens' UpdateIntegration (Maybe ConnectionType)
updateIntegration_connectionType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe ConnectionType
connectionType :: Maybe ConnectionType
$sel:connectionType:UpdateIntegration' :: UpdateIntegration -> Maybe ConnectionType
connectionType} -> Maybe ConnectionType
connectionType) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe ConnectionType
a -> UpdateIntegration
s {$sel:connectionType:UpdateIntegration' :: Maybe ConnectionType
connectionType = Maybe ConnectionType
a} :: UpdateIntegration)
updateIntegration_contentHandlingStrategy :: Lens.Lens' UpdateIntegration (Prelude.Maybe ContentHandlingStrategy)
updateIntegration_contentHandlingStrategy :: Lens' UpdateIntegration (Maybe ContentHandlingStrategy)
updateIntegration_contentHandlingStrategy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe ContentHandlingStrategy
contentHandlingStrategy :: Maybe ContentHandlingStrategy
$sel:contentHandlingStrategy:UpdateIntegration' :: UpdateIntegration -> Maybe ContentHandlingStrategy
contentHandlingStrategy} -> Maybe ContentHandlingStrategy
contentHandlingStrategy) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe ContentHandlingStrategy
a -> UpdateIntegration
s {$sel:contentHandlingStrategy:UpdateIntegration' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = Maybe ContentHandlingStrategy
a} :: UpdateIntegration)
updateIntegration_credentialsArn :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_credentialsArn :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_credentialsArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
credentialsArn :: Maybe Text
$sel:credentialsArn:UpdateIntegration' :: UpdateIntegration -> Maybe Text
credentialsArn} -> Maybe Text
credentialsArn) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:credentialsArn:UpdateIntegration' :: Maybe Text
credentialsArn = Maybe Text
a} :: UpdateIntegration)
updateIntegration_description :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_description :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
description :: Maybe Text
$sel:description:UpdateIntegration' :: UpdateIntegration -> Maybe Text
description} -> Maybe Text
description) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:description:UpdateIntegration' :: Maybe Text
description = Maybe Text
a} :: UpdateIntegration)
updateIntegration_integrationMethod :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_integrationMethod :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_integrationMethod = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
integrationMethod :: Maybe Text
$sel:integrationMethod:UpdateIntegration' :: UpdateIntegration -> Maybe Text
integrationMethod} -> Maybe Text
integrationMethod) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:integrationMethod:UpdateIntegration' :: Maybe Text
integrationMethod = Maybe Text
a} :: UpdateIntegration)
updateIntegration_integrationSubtype :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_integrationSubtype :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_integrationSubtype = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
integrationSubtype :: Maybe Text
$sel:integrationSubtype:UpdateIntegration' :: UpdateIntegration -> Maybe Text
integrationSubtype} -> Maybe Text
integrationSubtype) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:integrationSubtype:UpdateIntegration' :: Maybe Text
integrationSubtype = Maybe Text
a} :: UpdateIntegration)
updateIntegration_integrationType :: Lens.Lens' UpdateIntegration (Prelude.Maybe IntegrationType)
updateIntegration_integrationType :: Lens' UpdateIntegration (Maybe IntegrationType)
updateIntegration_integrationType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe IntegrationType
integrationType :: Maybe IntegrationType
$sel:integrationType:UpdateIntegration' :: UpdateIntegration -> Maybe IntegrationType
integrationType} -> Maybe IntegrationType
integrationType) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe IntegrationType
a -> UpdateIntegration
s {$sel:integrationType:UpdateIntegration' :: Maybe IntegrationType
integrationType = Maybe IntegrationType
a} :: UpdateIntegration)
updateIntegration_integrationUri :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_integrationUri :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_integrationUri = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
integrationUri :: Maybe Text
$sel:integrationUri:UpdateIntegration' :: UpdateIntegration -> Maybe Text
integrationUri} -> Maybe Text
integrationUri) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:integrationUri:UpdateIntegration' :: Maybe Text
integrationUri = Maybe Text
a} :: UpdateIntegration)
updateIntegration_passthroughBehavior :: Lens.Lens' UpdateIntegration (Prelude.Maybe PassthroughBehavior)
updateIntegration_passthroughBehavior :: Lens' UpdateIntegration (Maybe PassthroughBehavior)
updateIntegration_passthroughBehavior = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe PassthroughBehavior
passthroughBehavior :: Maybe PassthroughBehavior
$sel:passthroughBehavior:UpdateIntegration' :: UpdateIntegration -> Maybe PassthroughBehavior
passthroughBehavior} -> Maybe PassthroughBehavior
passthroughBehavior) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe PassthroughBehavior
a -> UpdateIntegration
s {$sel:passthroughBehavior:UpdateIntegration' :: Maybe PassthroughBehavior
passthroughBehavior = Maybe PassthroughBehavior
a} :: UpdateIntegration)
updateIntegration_payloadFormatVersion :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_payloadFormatVersion :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_payloadFormatVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
payloadFormatVersion :: Maybe Text
$sel:payloadFormatVersion:UpdateIntegration' :: UpdateIntegration -> Maybe Text
payloadFormatVersion} -> Maybe Text
payloadFormatVersion) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:payloadFormatVersion:UpdateIntegration' :: Maybe Text
payloadFormatVersion = Maybe Text
a} :: UpdateIntegration)
updateIntegration_requestParameters :: Lens.Lens' UpdateIntegration (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
updateIntegration_requestParameters :: Lens' UpdateIntegration (Maybe (HashMap Text Text))
updateIntegration_requestParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
requestParameters} -> Maybe (HashMap Text Text)
requestParameters) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe (HashMap Text Text)
a -> UpdateIntegration
s {$sel:requestParameters:UpdateIntegration' :: Maybe (HashMap Text Text)
requestParameters = Maybe (HashMap Text Text)
a} :: UpdateIntegration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegration_requestTemplates :: Lens.Lens' UpdateIntegration (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
updateIntegration_requestTemplates :: Lens' UpdateIntegration (Maybe (HashMap Text Text))
updateIntegration_requestTemplates = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe (HashMap Text Text)
requestTemplates :: Maybe (HashMap Text Text)
$sel:requestTemplates:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
requestTemplates} -> Maybe (HashMap Text Text)
requestTemplates) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe (HashMap Text Text)
a -> UpdateIntegration
s {$sel:requestTemplates:UpdateIntegration' :: Maybe (HashMap Text Text)
requestTemplates = Maybe (HashMap Text Text)
a} :: UpdateIntegration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegration_responseParameters :: Lens.Lens' UpdateIntegration (Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text)))
updateIntegration_responseParameters :: Lens' UpdateIntegration (Maybe (HashMap Text (HashMap Text Text)))
updateIntegration_responseParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
$sel:responseParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
responseParameters} -> Maybe (HashMap Text (HashMap Text Text))
responseParameters) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe (HashMap Text (HashMap Text Text))
a -> UpdateIntegration
s {$sel:responseParameters:UpdateIntegration' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = Maybe (HashMap Text (HashMap Text Text))
a} :: UpdateIntegration) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegration_templateSelectionExpression :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Text)
updateIntegration_templateSelectionExpression :: Lens' UpdateIntegration (Maybe Text)
updateIntegration_templateSelectionExpression = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Text
templateSelectionExpression :: Maybe Text
$sel:templateSelectionExpression:UpdateIntegration' :: UpdateIntegration -> Maybe Text
templateSelectionExpression} -> Maybe Text
templateSelectionExpression) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Text
a -> UpdateIntegration
s {$sel:templateSelectionExpression:UpdateIntegration' :: Maybe Text
templateSelectionExpression = Maybe Text
a} :: UpdateIntegration)
updateIntegration_timeoutInMillis :: Lens.Lens' UpdateIntegration (Prelude.Maybe Prelude.Natural)
updateIntegration_timeoutInMillis :: Lens' UpdateIntegration (Maybe Natural)
updateIntegration_timeoutInMillis = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe Natural
timeoutInMillis :: Maybe Natural
$sel:timeoutInMillis:UpdateIntegration' :: UpdateIntegration -> Maybe Natural
timeoutInMillis} -> Maybe Natural
timeoutInMillis) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe Natural
a -> UpdateIntegration
s {$sel:timeoutInMillis:UpdateIntegration' :: Maybe Natural
timeoutInMillis = Maybe Natural
a} :: UpdateIntegration)
updateIntegration_tlsConfig :: Lens.Lens' UpdateIntegration (Prelude.Maybe TlsConfigInput)
updateIntegration_tlsConfig :: Lens' UpdateIntegration (Maybe TlsConfigInput)
updateIntegration_tlsConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Maybe TlsConfigInput
tlsConfig :: Maybe TlsConfigInput
$sel:tlsConfig:UpdateIntegration' :: UpdateIntegration -> Maybe TlsConfigInput
tlsConfig} -> Maybe TlsConfigInput
tlsConfig) (\s :: UpdateIntegration
s@UpdateIntegration' {} Maybe TlsConfigInput
a -> UpdateIntegration
s {$sel:tlsConfig:UpdateIntegration' :: Maybe TlsConfigInput
tlsConfig = Maybe TlsConfigInput
a} :: UpdateIntegration)
updateIntegration_apiId :: Lens.Lens' UpdateIntegration Prelude.Text
updateIntegration_apiId :: Lens' UpdateIntegration Text
updateIntegration_apiId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Text
apiId :: Text
$sel:apiId:UpdateIntegration' :: UpdateIntegration -> Text
apiId} -> Text
apiId) (\s :: UpdateIntegration
s@UpdateIntegration' {} Text
a -> UpdateIntegration
s {$sel:apiId:UpdateIntegration' :: Text
apiId = Text
a} :: UpdateIntegration)
updateIntegration_integrationId :: Lens.Lens' UpdateIntegration Prelude.Text
updateIntegration_integrationId :: Lens' UpdateIntegration Text
updateIntegration_integrationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegration' {Text
integrationId :: Text
$sel:integrationId:UpdateIntegration' :: UpdateIntegration -> Text
integrationId} -> Text
integrationId) (\s :: UpdateIntegration
s@UpdateIntegration' {} Text
a -> UpdateIntegration
s {$sel:integrationId:UpdateIntegration' :: Text
integrationId = Text
a} :: UpdateIntegration)
instance Core.AWSRequest UpdateIntegration where
type
AWSResponse UpdateIntegration =
UpdateIntegrationResponse'
request :: (Service -> Service)
-> UpdateIntegration -> Request UpdateIntegration
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.patchJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy UpdateIntegration
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpdateIntegration)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Bool
-> Maybe Text
-> Maybe ConnectionType
-> Maybe ContentHandlingStrategy
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe IntegrationType
-> Maybe Text
-> Maybe PassthroughBehavior
-> Maybe Text
-> Maybe (HashMap Text Text)
-> Maybe (HashMap Text Text)
-> Maybe (HashMap Text (HashMap Text Text))
-> Maybe Text
-> Maybe Natural
-> Maybe TlsConfig
-> Int
-> UpdateIntegrationResponse'
UpdateIntegrationResponse''
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"apiGatewayManaged")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"connectionId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"connectionType")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"contentHandlingStrategy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"credentialsArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"description")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationId")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationMethod")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationResponseSelectionExpression")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationSubtype")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationType")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"integrationUri")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"passthroughBehavior")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"payloadFormatVersion")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"requestParameters"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"requestTemplates"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x
forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"responseParameters"
forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty
)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"templateSelectionExpression")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"timeoutInMillis")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"tlsConfig")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable UpdateIntegration where
hashWithSalt :: Int -> UpdateIntegration -> Int
hashWithSalt Int
_salt UpdateIntegration' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
Maybe (HashMap Text (HashMap Text Text))
Maybe ConnectionType
Maybe ContentHandlingStrategy
Maybe IntegrationType
Maybe PassthroughBehavior
Maybe TlsConfigInput
Text
integrationId :: Text
apiId :: Text
tlsConfig :: Maybe TlsConfigInput
timeoutInMillis :: Maybe Natural
templateSelectionExpression :: Maybe Text
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
requestTemplates :: Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
payloadFormatVersion :: Maybe Text
passthroughBehavior :: Maybe PassthroughBehavior
integrationUri :: Maybe Text
integrationType :: Maybe IntegrationType
integrationSubtype :: Maybe Text
integrationMethod :: Maybe Text
description :: Maybe Text
credentialsArn :: Maybe Text
contentHandlingStrategy :: Maybe ContentHandlingStrategy
connectionType :: Maybe ConnectionType
connectionId :: Maybe Text
$sel:integrationId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:apiId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:tlsConfig:UpdateIntegration' :: UpdateIntegration -> Maybe TlsConfigInput
$sel:timeoutInMillis:UpdateIntegration' :: UpdateIntegration -> Maybe Natural
$sel:templateSelectionExpression:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:responseParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
$sel:requestTemplates:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:payloadFormatVersion:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:passthroughBehavior:UpdateIntegration' :: UpdateIntegration -> Maybe PassthroughBehavior
$sel:integrationUri:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationType:UpdateIntegration' :: UpdateIntegration -> Maybe IntegrationType
$sel:integrationSubtype:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationMethod:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:description:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:credentialsArn:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:contentHandlingStrategy:UpdateIntegration' :: UpdateIntegration -> Maybe ContentHandlingStrategy
$sel:connectionType:UpdateIntegration' :: UpdateIntegration -> Maybe ConnectionType
$sel:connectionId:UpdateIntegration' :: UpdateIntegration -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
connectionId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ConnectionType
connectionType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ContentHandlingStrategy
contentHandlingStrategy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
credentialsArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
integrationMethod
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
integrationSubtype
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe IntegrationType
integrationType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
integrationUri
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe PassthroughBehavior
passthroughBehavior
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
payloadFormatVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
requestParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
requestTemplates
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text (HashMap Text Text))
responseParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
templateSelectionExpression
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Natural
timeoutInMillis
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe TlsConfigInput
tlsConfig
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
apiId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
integrationId
instance Prelude.NFData UpdateIntegration where
rnf :: UpdateIntegration -> ()
rnf UpdateIntegration' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
Maybe (HashMap Text (HashMap Text Text))
Maybe ConnectionType
Maybe ContentHandlingStrategy
Maybe IntegrationType
Maybe PassthroughBehavior
Maybe TlsConfigInput
Text
integrationId :: Text
apiId :: Text
tlsConfig :: Maybe TlsConfigInput
timeoutInMillis :: Maybe Natural
templateSelectionExpression :: Maybe Text
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
requestTemplates :: Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
payloadFormatVersion :: Maybe Text
passthroughBehavior :: Maybe PassthroughBehavior
integrationUri :: Maybe Text
integrationType :: Maybe IntegrationType
integrationSubtype :: Maybe Text
integrationMethod :: Maybe Text
description :: Maybe Text
credentialsArn :: Maybe Text
contentHandlingStrategy :: Maybe ContentHandlingStrategy
connectionType :: Maybe ConnectionType
connectionId :: Maybe Text
$sel:integrationId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:apiId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:tlsConfig:UpdateIntegration' :: UpdateIntegration -> Maybe TlsConfigInput
$sel:timeoutInMillis:UpdateIntegration' :: UpdateIntegration -> Maybe Natural
$sel:templateSelectionExpression:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:responseParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
$sel:requestTemplates:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:payloadFormatVersion:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:passthroughBehavior:UpdateIntegration' :: UpdateIntegration -> Maybe PassthroughBehavior
$sel:integrationUri:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationType:UpdateIntegration' :: UpdateIntegration -> Maybe IntegrationType
$sel:integrationSubtype:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationMethod:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:description:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:credentialsArn:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:contentHandlingStrategy:UpdateIntegration' :: UpdateIntegration -> Maybe ContentHandlingStrategy
$sel:connectionType:UpdateIntegration' :: UpdateIntegration -> Maybe ConnectionType
$sel:connectionId:UpdateIntegration' :: UpdateIntegration -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ConnectionType
connectionType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ContentHandlingStrategy
contentHandlingStrategy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
credentialsArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationMethod
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationSubtype
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe IntegrationType
integrationType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationUri
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe PassthroughBehavior
passthroughBehavior
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
payloadFormatVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
requestParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
requestTemplates
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text (HashMap Text Text))
responseParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
templateSelectionExpression
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
timeoutInMillis
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TlsConfigInput
tlsConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
apiId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
integrationId
instance Data.ToHeaders UpdateIntegration where
toHeaders :: UpdateIntegration -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON UpdateIntegration where
toJSON :: UpdateIntegration -> Value
toJSON UpdateIntegration' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
Maybe (HashMap Text (HashMap Text Text))
Maybe ConnectionType
Maybe ContentHandlingStrategy
Maybe IntegrationType
Maybe PassthroughBehavior
Maybe TlsConfigInput
Text
integrationId :: Text
apiId :: Text
tlsConfig :: Maybe TlsConfigInput
timeoutInMillis :: Maybe Natural
templateSelectionExpression :: Maybe Text
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
requestTemplates :: Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
payloadFormatVersion :: Maybe Text
passthroughBehavior :: Maybe PassthroughBehavior
integrationUri :: Maybe Text
integrationType :: Maybe IntegrationType
integrationSubtype :: Maybe Text
integrationMethod :: Maybe Text
description :: Maybe Text
credentialsArn :: Maybe Text
contentHandlingStrategy :: Maybe ContentHandlingStrategy
connectionType :: Maybe ConnectionType
connectionId :: Maybe Text
$sel:integrationId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:apiId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:tlsConfig:UpdateIntegration' :: UpdateIntegration -> Maybe TlsConfigInput
$sel:timeoutInMillis:UpdateIntegration' :: UpdateIntegration -> Maybe Natural
$sel:templateSelectionExpression:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:responseParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
$sel:requestTemplates:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:payloadFormatVersion:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:passthroughBehavior:UpdateIntegration' :: UpdateIntegration -> Maybe PassthroughBehavior
$sel:integrationUri:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationType:UpdateIntegration' :: UpdateIntegration -> Maybe IntegrationType
$sel:integrationSubtype:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationMethod:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:description:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:credentialsArn:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:contentHandlingStrategy:UpdateIntegration' :: UpdateIntegration -> Maybe ContentHandlingStrategy
$sel:connectionType:UpdateIntegration' :: UpdateIntegration -> Maybe ConnectionType
$sel:connectionId:UpdateIntegration' :: UpdateIntegration -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"connectionId" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
connectionId,
(Key
"connectionType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConnectionType
connectionType,
(Key
"contentHandlingStrategy" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ContentHandlingStrategy
contentHandlingStrategy,
(Key
"credentialsArn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
credentialsArn,
(Key
"description" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
description,
(Key
"integrationMethod" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
integrationMethod,
(Key
"integrationSubtype" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
integrationSubtype,
(Key
"integrationType" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe IntegrationType
integrationType,
(Key
"integrationUri" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
integrationUri,
(Key
"passthroughBehavior" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PassthroughBehavior
passthroughBehavior,
(Key
"payloadFormatVersion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
payloadFormatVersion,
(Key
"requestParameters" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text Text)
requestParameters,
(Key
"requestTemplates" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text Text)
requestTemplates,
(Key
"responseParameters" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (HashMap Text (HashMap Text Text))
responseParameters,
(Key
"templateSelectionExpression" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
templateSelectionExpression,
(Key
"timeoutInMillis" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Natural
timeoutInMillis,
(Key
"tlsConfig" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe TlsConfigInput
tlsConfig
]
)
instance Data.ToPath UpdateIntegration where
toPath :: UpdateIntegration -> ByteString
toPath UpdateIntegration' {Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
Maybe (HashMap Text (HashMap Text Text))
Maybe ConnectionType
Maybe ContentHandlingStrategy
Maybe IntegrationType
Maybe PassthroughBehavior
Maybe TlsConfigInput
Text
integrationId :: Text
apiId :: Text
tlsConfig :: Maybe TlsConfigInput
timeoutInMillis :: Maybe Natural
templateSelectionExpression :: Maybe Text
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
requestTemplates :: Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
payloadFormatVersion :: Maybe Text
passthroughBehavior :: Maybe PassthroughBehavior
integrationUri :: Maybe Text
integrationType :: Maybe IntegrationType
integrationSubtype :: Maybe Text
integrationMethod :: Maybe Text
description :: Maybe Text
credentialsArn :: Maybe Text
contentHandlingStrategy :: Maybe ContentHandlingStrategy
connectionType :: Maybe ConnectionType
connectionId :: Maybe Text
$sel:integrationId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:apiId:UpdateIntegration' :: UpdateIntegration -> Text
$sel:tlsConfig:UpdateIntegration' :: UpdateIntegration -> Maybe TlsConfigInput
$sel:timeoutInMillis:UpdateIntegration' :: UpdateIntegration -> Maybe Natural
$sel:templateSelectionExpression:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:responseParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text (HashMap Text Text))
$sel:requestTemplates:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegration' :: UpdateIntegration -> Maybe (HashMap Text Text)
$sel:payloadFormatVersion:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:passthroughBehavior:UpdateIntegration' :: UpdateIntegration -> Maybe PassthroughBehavior
$sel:integrationUri:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationType:UpdateIntegration' :: UpdateIntegration -> Maybe IntegrationType
$sel:integrationSubtype:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:integrationMethod:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:description:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:credentialsArn:UpdateIntegration' :: UpdateIntegration -> Maybe Text
$sel:contentHandlingStrategy:UpdateIntegration' :: UpdateIntegration -> Maybe ContentHandlingStrategy
$sel:connectionType:UpdateIntegration' :: UpdateIntegration -> Maybe ConnectionType
$sel:connectionId:UpdateIntegration' :: UpdateIntegration -> Maybe Text
..} =
forall a. Monoid a => [a] -> a
Prelude.mconcat
[ ByteString
"/v2/apis/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
apiId,
ByteString
"/integrations/",
forall a. ToByteString a => a -> ByteString
Data.toBS Text
integrationId
]
instance Data.ToQuery UpdateIntegration where
toQuery :: UpdateIntegration -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdateIntegrationResponse' = UpdateIntegrationResponse''
{
UpdateIntegrationResponse' -> Maybe Bool
apiGatewayManaged :: Prelude.Maybe Prelude.Bool,
UpdateIntegrationResponse' -> Maybe Text
connectionId :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe ConnectionType
connectionType :: Prelude.Maybe ConnectionType,
UpdateIntegrationResponse' -> Maybe ContentHandlingStrategy
contentHandlingStrategy :: Prelude.Maybe ContentHandlingStrategy,
UpdateIntegrationResponse' -> Maybe Text
credentialsArn :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Text
integrationId :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Text
integrationMethod :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Text
integrationResponseSelectionExpression :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Text
integrationSubtype :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe IntegrationType
integrationType :: Prelude.Maybe IntegrationType,
UpdateIntegrationResponse' -> Maybe Text
integrationUri :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe PassthroughBehavior
passthroughBehavior :: Prelude.Maybe PassthroughBehavior,
UpdateIntegrationResponse' -> Maybe Text
payloadFormatVersion :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
requestParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
requestTemplates :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
UpdateIntegrationResponse'
-> Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text)),
UpdateIntegrationResponse' -> Maybe Text
templateSelectionExpression :: Prelude.Maybe Prelude.Text,
UpdateIntegrationResponse' -> Maybe Natural
timeoutInMillis :: Prelude.Maybe Prelude.Natural,
UpdateIntegrationResponse' -> Maybe TlsConfig
tlsConfig :: Prelude.Maybe TlsConfig,
UpdateIntegrationResponse' -> Int
httpStatus :: Prelude.Int
}
deriving (UpdateIntegrationResponse' -> UpdateIntegrationResponse' -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateIntegrationResponse' -> UpdateIntegrationResponse' -> Bool
$c/= :: UpdateIntegrationResponse' -> UpdateIntegrationResponse' -> Bool
== :: UpdateIntegrationResponse' -> UpdateIntegrationResponse' -> Bool
$c== :: UpdateIntegrationResponse' -> UpdateIntegrationResponse' -> Bool
Prelude.Eq, ReadPrec [UpdateIntegrationResponse']
ReadPrec UpdateIntegrationResponse'
Int -> ReadS UpdateIntegrationResponse'
ReadS [UpdateIntegrationResponse']
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateIntegrationResponse']
$creadListPrec :: ReadPrec [UpdateIntegrationResponse']
readPrec :: ReadPrec UpdateIntegrationResponse'
$creadPrec :: ReadPrec UpdateIntegrationResponse'
readList :: ReadS [UpdateIntegrationResponse']
$creadList :: ReadS [UpdateIntegrationResponse']
readsPrec :: Int -> ReadS UpdateIntegrationResponse'
$creadsPrec :: Int -> ReadS UpdateIntegrationResponse'
Prelude.Read, Int -> UpdateIntegrationResponse' -> ShowS
[UpdateIntegrationResponse'] -> ShowS
UpdateIntegrationResponse' -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateIntegrationResponse'] -> ShowS
$cshowList :: [UpdateIntegrationResponse'] -> ShowS
show :: UpdateIntegrationResponse' -> String
$cshow :: UpdateIntegrationResponse' -> String
showsPrec :: Int -> UpdateIntegrationResponse' -> ShowS
$cshowsPrec :: Int -> UpdateIntegrationResponse' -> ShowS
Prelude.Show, forall x.
Rep UpdateIntegrationResponse' x -> UpdateIntegrationResponse'
forall x.
UpdateIntegrationResponse' -> Rep UpdateIntegrationResponse' x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdateIntegrationResponse' x -> UpdateIntegrationResponse'
$cfrom :: forall x.
UpdateIntegrationResponse' -> Rep UpdateIntegrationResponse' x
Prelude.Generic)
newUpdateIntegrationResponse' ::
Prelude.Int ->
UpdateIntegrationResponse'
newUpdateIntegrationResponse' :: Int -> UpdateIntegrationResponse'
newUpdateIntegrationResponse' Int
pHttpStatus_ =
UpdateIntegrationResponse''
{ $sel:apiGatewayManaged:UpdateIntegrationResponse'' :: Maybe Bool
apiGatewayManaged =
forall a. Maybe a
Prelude.Nothing,
$sel:connectionId:UpdateIntegrationResponse'' :: Maybe Text
connectionId = forall a. Maybe a
Prelude.Nothing,
$sel:connectionType:UpdateIntegrationResponse'' :: Maybe ConnectionType
connectionType = forall a. Maybe a
Prelude.Nothing,
$sel:contentHandlingStrategy:UpdateIntegrationResponse'' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = forall a. Maybe a
Prelude.Nothing,
$sel:credentialsArn:UpdateIntegrationResponse'' :: Maybe Text
credentialsArn = forall a. Maybe a
Prelude.Nothing,
$sel:description:UpdateIntegrationResponse'' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:integrationId:UpdateIntegrationResponse'' :: Maybe Text
integrationId = forall a. Maybe a
Prelude.Nothing,
$sel:integrationMethod:UpdateIntegrationResponse'' :: Maybe Text
integrationMethod = forall a. Maybe a
Prelude.Nothing,
$sel:integrationResponseSelectionExpression:UpdateIntegrationResponse'' :: Maybe Text
integrationResponseSelectionExpression =
forall a. Maybe a
Prelude.Nothing,
$sel:integrationSubtype:UpdateIntegrationResponse'' :: Maybe Text
integrationSubtype = forall a. Maybe a
Prelude.Nothing,
$sel:integrationType:UpdateIntegrationResponse'' :: Maybe IntegrationType
integrationType = forall a. Maybe a
Prelude.Nothing,
$sel:integrationUri:UpdateIntegrationResponse'' :: Maybe Text
integrationUri = forall a. Maybe a
Prelude.Nothing,
$sel:passthroughBehavior:UpdateIntegrationResponse'' :: Maybe PassthroughBehavior
passthroughBehavior = forall a. Maybe a
Prelude.Nothing,
$sel:payloadFormatVersion:UpdateIntegrationResponse'' :: Maybe Text
payloadFormatVersion = forall a. Maybe a
Prelude.Nothing,
$sel:requestParameters:UpdateIntegrationResponse'' :: Maybe (HashMap Text Text)
requestParameters = forall a. Maybe a
Prelude.Nothing,
$sel:requestTemplates:UpdateIntegrationResponse'' :: Maybe (HashMap Text Text)
requestTemplates = forall a. Maybe a
Prelude.Nothing,
$sel:responseParameters:UpdateIntegrationResponse'' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = forall a. Maybe a
Prelude.Nothing,
$sel:templateSelectionExpression:UpdateIntegrationResponse'' :: Maybe Text
templateSelectionExpression = forall a. Maybe a
Prelude.Nothing,
$sel:timeoutInMillis:UpdateIntegrationResponse'' :: Maybe Natural
timeoutInMillis = forall a. Maybe a
Prelude.Nothing,
$sel:tlsConfig:UpdateIntegrationResponse'' :: Maybe TlsConfig
tlsConfig = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpdateIntegrationResponse'' :: Int
httpStatus = Int
pHttpStatus_
}
updateIntegrationResponse'_apiGatewayManaged :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Bool)
updateIntegrationResponse'_apiGatewayManaged :: Lens' UpdateIntegrationResponse' (Maybe Bool)
updateIntegrationResponse'_apiGatewayManaged = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Bool
apiGatewayManaged :: Maybe Bool
$sel:apiGatewayManaged:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Bool
apiGatewayManaged} -> Maybe Bool
apiGatewayManaged) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Bool
a -> UpdateIntegrationResponse'
s {$sel:apiGatewayManaged:UpdateIntegrationResponse'' :: Maybe Bool
apiGatewayManaged = Maybe Bool
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_connectionId :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_connectionId :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_connectionId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
connectionId :: Maybe Text
$sel:connectionId:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
connectionId} -> Maybe Text
connectionId) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:connectionId:UpdateIntegrationResponse'' :: Maybe Text
connectionId = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_connectionType :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe ConnectionType)
updateIntegrationResponse'_connectionType :: Lens' UpdateIntegrationResponse' (Maybe ConnectionType)
updateIntegrationResponse'_connectionType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe ConnectionType
connectionType :: Maybe ConnectionType
$sel:connectionType:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe ConnectionType
connectionType} -> Maybe ConnectionType
connectionType) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe ConnectionType
a -> UpdateIntegrationResponse'
s {$sel:connectionType:UpdateIntegrationResponse'' :: Maybe ConnectionType
connectionType = Maybe ConnectionType
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_contentHandlingStrategy :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe ContentHandlingStrategy)
updateIntegrationResponse'_contentHandlingStrategy :: Lens' UpdateIntegrationResponse' (Maybe ContentHandlingStrategy)
updateIntegrationResponse'_contentHandlingStrategy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe ContentHandlingStrategy
contentHandlingStrategy :: Maybe ContentHandlingStrategy
$sel:contentHandlingStrategy:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe ContentHandlingStrategy
contentHandlingStrategy} -> Maybe ContentHandlingStrategy
contentHandlingStrategy) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe ContentHandlingStrategy
a -> UpdateIntegrationResponse'
s {$sel:contentHandlingStrategy:UpdateIntegrationResponse'' :: Maybe ContentHandlingStrategy
contentHandlingStrategy = Maybe ContentHandlingStrategy
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_credentialsArn :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_credentialsArn :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_credentialsArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
credentialsArn :: Maybe Text
$sel:credentialsArn:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
credentialsArn} -> Maybe Text
credentialsArn) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:credentialsArn:UpdateIntegrationResponse'' :: Maybe Text
credentialsArn = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_description :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_description :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
description :: Maybe Text
$sel:description:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
description} -> Maybe Text
description) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:description:UpdateIntegrationResponse'' :: Maybe Text
description = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationId :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_integrationId :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_integrationId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
integrationId :: Maybe Text
$sel:integrationId:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
integrationId} -> Maybe Text
integrationId) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:integrationId:UpdateIntegrationResponse'' :: Maybe Text
integrationId = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationMethod :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_integrationMethod :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_integrationMethod = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
integrationMethod :: Maybe Text
$sel:integrationMethod:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
integrationMethod} -> Maybe Text
integrationMethod) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:integrationMethod:UpdateIntegrationResponse'' :: Maybe Text
integrationMethod = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationResponseSelectionExpression :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_integrationResponseSelectionExpression :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_integrationResponseSelectionExpression = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
integrationResponseSelectionExpression :: Maybe Text
$sel:integrationResponseSelectionExpression:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
integrationResponseSelectionExpression} -> Maybe Text
integrationResponseSelectionExpression) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:integrationResponseSelectionExpression:UpdateIntegrationResponse'' :: Maybe Text
integrationResponseSelectionExpression = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationSubtype :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_integrationSubtype :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_integrationSubtype = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
integrationSubtype :: Maybe Text
$sel:integrationSubtype:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
integrationSubtype} -> Maybe Text
integrationSubtype) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:integrationSubtype:UpdateIntegrationResponse'' :: Maybe Text
integrationSubtype = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationType :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe IntegrationType)
updateIntegrationResponse'_integrationType :: Lens' UpdateIntegrationResponse' (Maybe IntegrationType)
updateIntegrationResponse'_integrationType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe IntegrationType
integrationType :: Maybe IntegrationType
$sel:integrationType:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe IntegrationType
integrationType} -> Maybe IntegrationType
integrationType) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe IntegrationType
a -> UpdateIntegrationResponse'
s {$sel:integrationType:UpdateIntegrationResponse'' :: Maybe IntegrationType
integrationType = Maybe IntegrationType
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_integrationUri :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_integrationUri :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_integrationUri = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
integrationUri :: Maybe Text
$sel:integrationUri:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
integrationUri} -> Maybe Text
integrationUri) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:integrationUri:UpdateIntegrationResponse'' :: Maybe Text
integrationUri = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_passthroughBehavior :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe PassthroughBehavior)
updateIntegrationResponse'_passthroughBehavior :: Lens' UpdateIntegrationResponse' (Maybe PassthroughBehavior)
updateIntegrationResponse'_passthroughBehavior = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe PassthroughBehavior
passthroughBehavior :: Maybe PassthroughBehavior
$sel:passthroughBehavior:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe PassthroughBehavior
passthroughBehavior} -> Maybe PassthroughBehavior
passthroughBehavior) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe PassthroughBehavior
a -> UpdateIntegrationResponse'
s {$sel:passthroughBehavior:UpdateIntegrationResponse'' :: Maybe PassthroughBehavior
passthroughBehavior = Maybe PassthroughBehavior
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_payloadFormatVersion :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_payloadFormatVersion :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_payloadFormatVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
payloadFormatVersion :: Maybe Text
$sel:payloadFormatVersion:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
payloadFormatVersion} -> Maybe Text
payloadFormatVersion) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:payloadFormatVersion:UpdateIntegrationResponse'' :: Maybe Text
payloadFormatVersion = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_requestParameters :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
updateIntegrationResponse'_requestParameters :: Lens' UpdateIntegrationResponse' (Maybe (HashMap Text Text))
updateIntegrationResponse'_requestParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
requestParameters} -> Maybe (HashMap Text Text)
requestParameters) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe (HashMap Text Text)
a -> UpdateIntegrationResponse'
s {$sel:requestParameters:UpdateIntegrationResponse'' :: Maybe (HashMap Text Text)
requestParameters = Maybe (HashMap Text Text)
a} :: UpdateIntegrationResponse') forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegrationResponse'_requestTemplates :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
updateIntegrationResponse'_requestTemplates :: Lens' UpdateIntegrationResponse' (Maybe (HashMap Text Text))
updateIntegrationResponse'_requestTemplates = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe (HashMap Text Text)
requestTemplates :: Maybe (HashMap Text Text)
$sel:requestTemplates:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
requestTemplates} -> Maybe (HashMap Text Text)
requestTemplates) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe (HashMap Text Text)
a -> UpdateIntegrationResponse'
s {$sel:requestTemplates:UpdateIntegrationResponse'' :: Maybe (HashMap Text Text)
requestTemplates = Maybe (HashMap Text Text)
a} :: UpdateIntegrationResponse') forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegrationResponse'_responseParameters :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe (Prelude.HashMap Prelude.Text (Prelude.HashMap Prelude.Text Prelude.Text)))
updateIntegrationResponse'_responseParameters :: Lens'
UpdateIntegrationResponse'
(Maybe (HashMap Text (HashMap Text Text)))
updateIntegrationResponse'_responseParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe (HashMap Text (HashMap Text Text))
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
$sel:responseParameters:UpdateIntegrationResponse'' :: UpdateIntegrationResponse'
-> Maybe (HashMap Text (HashMap Text Text))
responseParameters} -> Maybe (HashMap Text (HashMap Text Text))
responseParameters) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe (HashMap Text (HashMap Text Text))
a -> UpdateIntegrationResponse'
s {$sel:responseParameters:UpdateIntegrationResponse'' :: Maybe (HashMap Text (HashMap Text Text))
responseParameters = Maybe (HashMap Text (HashMap Text Text))
a} :: UpdateIntegrationResponse') forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. 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 forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
updateIntegrationResponse'_templateSelectionExpression :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Text)
updateIntegrationResponse'_templateSelectionExpression :: Lens' UpdateIntegrationResponse' (Maybe Text)
updateIntegrationResponse'_templateSelectionExpression = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Text
templateSelectionExpression :: Maybe Text
$sel:templateSelectionExpression:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
templateSelectionExpression} -> Maybe Text
templateSelectionExpression) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Text
a -> UpdateIntegrationResponse'
s {$sel:templateSelectionExpression:UpdateIntegrationResponse'' :: Maybe Text
templateSelectionExpression = Maybe Text
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_timeoutInMillis :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe Prelude.Natural)
updateIntegrationResponse'_timeoutInMillis :: Lens' UpdateIntegrationResponse' (Maybe Natural)
updateIntegrationResponse'_timeoutInMillis = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe Natural
timeoutInMillis :: Maybe Natural
$sel:timeoutInMillis:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Natural
timeoutInMillis} -> Maybe Natural
timeoutInMillis) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe Natural
a -> UpdateIntegrationResponse'
s {$sel:timeoutInMillis:UpdateIntegrationResponse'' :: Maybe Natural
timeoutInMillis = Maybe Natural
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_tlsConfig :: Lens.Lens' UpdateIntegrationResponse' (Prelude.Maybe TlsConfig)
updateIntegrationResponse'_tlsConfig :: Lens' UpdateIntegrationResponse' (Maybe TlsConfig)
updateIntegrationResponse'_tlsConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Maybe TlsConfig
tlsConfig :: Maybe TlsConfig
$sel:tlsConfig:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe TlsConfig
tlsConfig} -> Maybe TlsConfig
tlsConfig) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Maybe TlsConfig
a -> UpdateIntegrationResponse'
s {$sel:tlsConfig:UpdateIntegrationResponse'' :: Maybe TlsConfig
tlsConfig = Maybe TlsConfig
a} :: UpdateIntegrationResponse')
updateIntegrationResponse'_httpStatus :: Lens.Lens' UpdateIntegrationResponse' Prelude.Int
updateIntegrationResponse'_httpStatus :: Lens' UpdateIntegrationResponse' Int
updateIntegrationResponse'_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateIntegrationResponse'' {Int
httpStatus :: Int
$sel:httpStatus:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Int
httpStatus} -> Int
httpStatus) (\s :: UpdateIntegrationResponse'
s@UpdateIntegrationResponse'' {} Int
a -> UpdateIntegrationResponse'
s {$sel:httpStatus:UpdateIntegrationResponse'' :: Int
httpStatus = Int
a} :: UpdateIntegrationResponse')
instance Prelude.NFData UpdateIntegrationResponse' where
rnf :: UpdateIntegrationResponse' -> ()
rnf UpdateIntegrationResponse'' {Int
Maybe Bool
Maybe Natural
Maybe Text
Maybe (HashMap Text Text)
Maybe (HashMap Text (HashMap Text Text))
Maybe ConnectionType
Maybe ContentHandlingStrategy
Maybe IntegrationType
Maybe PassthroughBehavior
Maybe TlsConfig
httpStatus :: Int
tlsConfig :: Maybe TlsConfig
timeoutInMillis :: Maybe Natural
templateSelectionExpression :: Maybe Text
responseParameters :: Maybe (HashMap Text (HashMap Text Text))
requestTemplates :: Maybe (HashMap Text Text)
requestParameters :: Maybe (HashMap Text Text)
payloadFormatVersion :: Maybe Text
passthroughBehavior :: Maybe PassthroughBehavior
integrationUri :: Maybe Text
integrationType :: Maybe IntegrationType
integrationSubtype :: Maybe Text
integrationResponseSelectionExpression :: Maybe Text
integrationMethod :: Maybe Text
integrationId :: Maybe Text
description :: Maybe Text
credentialsArn :: Maybe Text
contentHandlingStrategy :: Maybe ContentHandlingStrategy
connectionType :: Maybe ConnectionType
connectionId :: Maybe Text
apiGatewayManaged :: Maybe Bool
$sel:httpStatus:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Int
$sel:tlsConfig:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe TlsConfig
$sel:timeoutInMillis:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Natural
$sel:templateSelectionExpression:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:responseParameters:UpdateIntegrationResponse'' :: UpdateIntegrationResponse'
-> Maybe (HashMap Text (HashMap Text Text))
$sel:requestTemplates:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
$sel:requestParameters:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe (HashMap Text Text)
$sel:payloadFormatVersion:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:passthroughBehavior:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe PassthroughBehavior
$sel:integrationUri:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:integrationType:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe IntegrationType
$sel:integrationSubtype:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:integrationResponseSelectionExpression:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:integrationMethod:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:integrationId:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:description:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:credentialsArn:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:contentHandlingStrategy:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe ContentHandlingStrategy
$sel:connectionType:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe ConnectionType
$sel:connectionId:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Text
$sel:apiGatewayManaged:UpdateIntegrationResponse'' :: UpdateIntegrationResponse' -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
apiGatewayManaged
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
connectionId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ConnectionType
connectionType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ContentHandlingStrategy
contentHandlingStrategy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
credentialsArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationMethod
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationResponseSelectionExpression
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationSubtype
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe IntegrationType
integrationType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
integrationUri
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe PassthroughBehavior
passthroughBehavior
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
payloadFormatVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
requestParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
requestTemplates
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text (HashMap Text Text))
responseParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf
Maybe Text
templateSelectionExpression
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Natural
timeoutInMillis
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe TlsConfig
tlsConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus