{-# 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.CloudWatchEvents.Types.Target where
import Amazonka.CloudWatchEvents.Types.BatchParameters
import Amazonka.CloudWatchEvents.Types.DeadLetterConfig
import Amazonka.CloudWatchEvents.Types.EcsParameters
import Amazonka.CloudWatchEvents.Types.HttpParameters
import Amazonka.CloudWatchEvents.Types.InputTransformer
import Amazonka.CloudWatchEvents.Types.KinesisParameters
import Amazonka.CloudWatchEvents.Types.RedshiftDataParameters
import Amazonka.CloudWatchEvents.Types.RetryPolicy
import Amazonka.CloudWatchEvents.Types.RunCommandParameters
import Amazonka.CloudWatchEvents.Types.SageMakerPipelineParameters
import Amazonka.CloudWatchEvents.Types.SqsParameters
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
data Target = Target'
{
Target -> Maybe BatchParameters
batchParameters :: Prelude.Maybe BatchParameters,
Target -> Maybe DeadLetterConfig
deadLetterConfig :: Prelude.Maybe DeadLetterConfig,
Target -> Maybe EcsParameters
ecsParameters :: Prelude.Maybe EcsParameters,
Target -> Maybe HttpParameters
httpParameters :: Prelude.Maybe HttpParameters,
Target -> Maybe Text
input :: Prelude.Maybe Prelude.Text,
Target -> Maybe Text
inputPath :: Prelude.Maybe Prelude.Text,
Target -> Maybe InputTransformer
inputTransformer :: Prelude.Maybe InputTransformer,
Target -> Maybe KinesisParameters
kinesisParameters :: Prelude.Maybe KinesisParameters,
Target -> Maybe RedshiftDataParameters
redshiftDataParameters :: Prelude.Maybe RedshiftDataParameters,
Target -> Maybe RetryPolicy
retryPolicy :: Prelude.Maybe RetryPolicy,
Target -> Maybe Text
roleArn :: Prelude.Maybe Prelude.Text,
Target -> Maybe RunCommandParameters
runCommandParameters :: Prelude.Maybe RunCommandParameters,
Target -> Maybe SageMakerPipelineParameters
sageMakerPipelineParameters :: Prelude.Maybe SageMakerPipelineParameters,
Target -> Maybe SqsParameters
sqsParameters :: Prelude.Maybe SqsParameters,
Target -> Text
id :: Prelude.Text,
Target -> Text
arn :: Prelude.Text
}
deriving (Target -> Target -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Target -> Target -> Bool
$c/= :: Target -> Target -> Bool
== :: Target -> Target -> Bool
$c== :: Target -> Target -> Bool
Prelude.Eq, ReadPrec [Target]
ReadPrec Target
Int -> ReadS Target
ReadS [Target]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [Target]
$creadListPrec :: ReadPrec [Target]
readPrec :: ReadPrec Target
$creadPrec :: ReadPrec Target
readList :: ReadS [Target]
$creadList :: ReadS [Target]
readsPrec :: Int -> ReadS Target
$creadsPrec :: Int -> ReadS Target
Prelude.Read, Int -> Target -> ShowS
[Target] -> ShowS
Target -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [Target] -> ShowS
$cshowList :: [Target] -> ShowS
show :: Target -> String
$cshow :: Target -> String
showsPrec :: Int -> Target -> ShowS
$cshowsPrec :: Int -> Target -> ShowS
Prelude.Show, forall x. Rep Target x -> Target
forall x. Target -> Rep Target x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep Target x -> Target
$cfrom :: forall x. Target -> Rep Target x
Prelude.Generic)
newTarget ::
Prelude.Text ->
Prelude.Text ->
Target
newTarget :: Text -> Text -> Target
newTarget Text
pId_ Text
pArn_ =
Target'
{ $sel:batchParameters:Target' :: Maybe BatchParameters
batchParameters = forall a. Maybe a
Prelude.Nothing,
$sel:deadLetterConfig:Target' :: Maybe DeadLetterConfig
deadLetterConfig = forall a. Maybe a
Prelude.Nothing,
$sel:ecsParameters:Target' :: Maybe EcsParameters
ecsParameters = forall a. Maybe a
Prelude.Nothing,
$sel:httpParameters:Target' :: Maybe HttpParameters
httpParameters = forall a. Maybe a
Prelude.Nothing,
$sel:input:Target' :: Maybe Text
input = forall a. Maybe a
Prelude.Nothing,
$sel:inputPath:Target' :: Maybe Text
inputPath = forall a. Maybe a
Prelude.Nothing,
$sel:inputTransformer:Target' :: Maybe InputTransformer
inputTransformer = forall a. Maybe a
Prelude.Nothing,
$sel:kinesisParameters:Target' :: Maybe KinesisParameters
kinesisParameters = forall a. Maybe a
Prelude.Nothing,
$sel:redshiftDataParameters:Target' :: Maybe RedshiftDataParameters
redshiftDataParameters = forall a. Maybe a
Prelude.Nothing,
$sel:retryPolicy:Target' :: Maybe RetryPolicy
retryPolicy = forall a. Maybe a
Prelude.Nothing,
$sel:roleArn:Target' :: Maybe Text
roleArn = forall a. Maybe a
Prelude.Nothing,
$sel:runCommandParameters:Target' :: Maybe RunCommandParameters
runCommandParameters = forall a. Maybe a
Prelude.Nothing,
$sel:sageMakerPipelineParameters:Target' :: Maybe SageMakerPipelineParameters
sageMakerPipelineParameters = forall a. Maybe a
Prelude.Nothing,
$sel:sqsParameters:Target' :: Maybe SqsParameters
sqsParameters = forall a. Maybe a
Prelude.Nothing,
$sel:id:Target' :: Text
id = Text
pId_,
$sel:arn:Target' :: Text
arn = Text
pArn_
}
target_batchParameters :: Lens.Lens' Target (Prelude.Maybe BatchParameters)
target_batchParameters :: Lens' Target (Maybe BatchParameters)
target_batchParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe BatchParameters
batchParameters :: Maybe BatchParameters
$sel:batchParameters:Target' :: Target -> Maybe BatchParameters
batchParameters} -> Maybe BatchParameters
batchParameters) (\s :: Target
s@Target' {} Maybe BatchParameters
a -> Target
s {$sel:batchParameters:Target' :: Maybe BatchParameters
batchParameters = Maybe BatchParameters
a} :: Target)
target_deadLetterConfig :: Lens.Lens' Target (Prelude.Maybe DeadLetterConfig)
target_deadLetterConfig :: Lens' Target (Maybe DeadLetterConfig)
target_deadLetterConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe DeadLetterConfig
deadLetterConfig :: Maybe DeadLetterConfig
$sel:deadLetterConfig:Target' :: Target -> Maybe DeadLetterConfig
deadLetterConfig} -> Maybe DeadLetterConfig
deadLetterConfig) (\s :: Target
s@Target' {} Maybe DeadLetterConfig
a -> Target
s {$sel:deadLetterConfig:Target' :: Maybe DeadLetterConfig
deadLetterConfig = Maybe DeadLetterConfig
a} :: Target)
target_ecsParameters :: Lens.Lens' Target (Prelude.Maybe EcsParameters)
target_ecsParameters :: Lens' Target (Maybe EcsParameters)
target_ecsParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe EcsParameters
ecsParameters :: Maybe EcsParameters
$sel:ecsParameters:Target' :: Target -> Maybe EcsParameters
ecsParameters} -> Maybe EcsParameters
ecsParameters) (\s :: Target
s@Target' {} Maybe EcsParameters
a -> Target
s {$sel:ecsParameters:Target' :: Maybe EcsParameters
ecsParameters = Maybe EcsParameters
a} :: Target)
target_httpParameters :: Lens.Lens' Target (Prelude.Maybe HttpParameters)
target_httpParameters :: Lens' Target (Maybe HttpParameters)
target_httpParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe HttpParameters
httpParameters :: Maybe HttpParameters
$sel:httpParameters:Target' :: Target -> Maybe HttpParameters
httpParameters} -> Maybe HttpParameters
httpParameters) (\s :: Target
s@Target' {} Maybe HttpParameters
a -> Target
s {$sel:httpParameters:Target' :: Maybe HttpParameters
httpParameters = Maybe HttpParameters
a} :: Target)
target_input :: Lens.Lens' Target (Prelude.Maybe Prelude.Text)
target_input :: Lens' Target (Maybe Text)
target_input = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe Text
input :: Maybe Text
$sel:input:Target' :: Target -> Maybe Text
input} -> Maybe Text
input) (\s :: Target
s@Target' {} Maybe Text
a -> Target
s {$sel:input:Target' :: Maybe Text
input = Maybe Text
a} :: Target)
target_inputPath :: Lens.Lens' Target (Prelude.Maybe Prelude.Text)
target_inputPath :: Lens' Target (Maybe Text)
target_inputPath = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe Text
inputPath :: Maybe Text
$sel:inputPath:Target' :: Target -> Maybe Text
inputPath} -> Maybe Text
inputPath) (\s :: Target
s@Target' {} Maybe Text
a -> Target
s {$sel:inputPath:Target' :: Maybe Text
inputPath = Maybe Text
a} :: Target)
target_inputTransformer :: Lens.Lens' Target (Prelude.Maybe InputTransformer)
target_inputTransformer :: Lens' Target (Maybe InputTransformer)
target_inputTransformer = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe InputTransformer
inputTransformer :: Maybe InputTransformer
$sel:inputTransformer:Target' :: Target -> Maybe InputTransformer
inputTransformer} -> Maybe InputTransformer
inputTransformer) (\s :: Target
s@Target' {} Maybe InputTransformer
a -> Target
s {$sel:inputTransformer:Target' :: Maybe InputTransformer
inputTransformer = Maybe InputTransformer
a} :: Target)
target_kinesisParameters :: Lens.Lens' Target (Prelude.Maybe KinesisParameters)
target_kinesisParameters :: Lens' Target (Maybe KinesisParameters)
target_kinesisParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe KinesisParameters
kinesisParameters :: Maybe KinesisParameters
$sel:kinesisParameters:Target' :: Target -> Maybe KinesisParameters
kinesisParameters} -> Maybe KinesisParameters
kinesisParameters) (\s :: Target
s@Target' {} Maybe KinesisParameters
a -> Target
s {$sel:kinesisParameters:Target' :: Maybe KinesisParameters
kinesisParameters = Maybe KinesisParameters
a} :: Target)
target_redshiftDataParameters :: Lens.Lens' Target (Prelude.Maybe RedshiftDataParameters)
target_redshiftDataParameters :: Lens' Target (Maybe RedshiftDataParameters)
target_redshiftDataParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe RedshiftDataParameters
redshiftDataParameters :: Maybe RedshiftDataParameters
$sel:redshiftDataParameters:Target' :: Target -> Maybe RedshiftDataParameters
redshiftDataParameters} -> Maybe RedshiftDataParameters
redshiftDataParameters) (\s :: Target
s@Target' {} Maybe RedshiftDataParameters
a -> Target
s {$sel:redshiftDataParameters:Target' :: Maybe RedshiftDataParameters
redshiftDataParameters = Maybe RedshiftDataParameters
a} :: Target)
target_retryPolicy :: Lens.Lens' Target (Prelude.Maybe RetryPolicy)
target_retryPolicy :: Lens' Target (Maybe RetryPolicy)
target_retryPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe RetryPolicy
retryPolicy :: Maybe RetryPolicy
$sel:retryPolicy:Target' :: Target -> Maybe RetryPolicy
retryPolicy} -> Maybe RetryPolicy
retryPolicy) (\s :: Target
s@Target' {} Maybe RetryPolicy
a -> Target
s {$sel:retryPolicy:Target' :: Maybe RetryPolicy
retryPolicy = Maybe RetryPolicy
a} :: Target)
target_roleArn :: Lens.Lens' Target (Prelude.Maybe Prelude.Text)
target_roleArn :: Lens' Target (Maybe Text)
target_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe Text
roleArn :: Maybe Text
$sel:roleArn:Target' :: Target -> Maybe Text
roleArn} -> Maybe Text
roleArn) (\s :: Target
s@Target' {} Maybe Text
a -> Target
s {$sel:roleArn:Target' :: Maybe Text
roleArn = Maybe Text
a} :: Target)
target_runCommandParameters :: Lens.Lens' Target (Prelude.Maybe RunCommandParameters)
target_runCommandParameters :: Lens' Target (Maybe RunCommandParameters)
target_runCommandParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe RunCommandParameters
runCommandParameters :: Maybe RunCommandParameters
$sel:runCommandParameters:Target' :: Target -> Maybe RunCommandParameters
runCommandParameters} -> Maybe RunCommandParameters
runCommandParameters) (\s :: Target
s@Target' {} Maybe RunCommandParameters
a -> Target
s {$sel:runCommandParameters:Target' :: Maybe RunCommandParameters
runCommandParameters = Maybe RunCommandParameters
a} :: Target)
target_sageMakerPipelineParameters :: Lens.Lens' Target (Prelude.Maybe SageMakerPipelineParameters)
target_sageMakerPipelineParameters :: Lens' Target (Maybe SageMakerPipelineParameters)
target_sageMakerPipelineParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe SageMakerPipelineParameters
sageMakerPipelineParameters :: Maybe SageMakerPipelineParameters
$sel:sageMakerPipelineParameters:Target' :: Target -> Maybe SageMakerPipelineParameters
sageMakerPipelineParameters} -> Maybe SageMakerPipelineParameters
sageMakerPipelineParameters) (\s :: Target
s@Target' {} Maybe SageMakerPipelineParameters
a -> Target
s {$sel:sageMakerPipelineParameters:Target' :: Maybe SageMakerPipelineParameters
sageMakerPipelineParameters = Maybe SageMakerPipelineParameters
a} :: Target)
target_sqsParameters :: Lens.Lens' Target (Prelude.Maybe SqsParameters)
target_sqsParameters :: Lens' Target (Maybe SqsParameters)
target_sqsParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Maybe SqsParameters
sqsParameters :: Maybe SqsParameters
$sel:sqsParameters:Target' :: Target -> Maybe SqsParameters
sqsParameters} -> Maybe SqsParameters
sqsParameters) (\s :: Target
s@Target' {} Maybe SqsParameters
a -> Target
s {$sel:sqsParameters:Target' :: Maybe SqsParameters
sqsParameters = Maybe SqsParameters
a} :: Target)
target_id :: Lens.Lens' Target Prelude.Text
target_id :: Lens' Target Text
target_id = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Text
id :: Text
$sel:id:Target' :: Target -> Text
id} -> Text
id) (\s :: Target
s@Target' {} Text
a -> Target
s {$sel:id:Target' :: Text
id = Text
a} :: Target)
target_arn :: Lens.Lens' Target Prelude.Text
target_arn :: Lens' Target Text
target_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\Target' {Text
arn :: Text
$sel:arn:Target' :: Target -> Text
arn} -> Text
arn) (\s :: Target
s@Target' {} Text
a -> Target
s {$sel:arn:Target' :: Text
arn = Text
a} :: Target)
instance Data.FromJSON Target where
parseJSON :: Value -> Parser Target
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"Target"
( \Object
x ->
Maybe BatchParameters
-> Maybe DeadLetterConfig
-> Maybe EcsParameters
-> Maybe HttpParameters
-> Maybe Text
-> Maybe Text
-> Maybe InputTransformer
-> Maybe KinesisParameters
-> Maybe RedshiftDataParameters
-> Maybe RetryPolicy
-> Maybe Text
-> Maybe RunCommandParameters
-> Maybe SageMakerPipelineParameters
-> Maybe SqsParameters
-> Text
-> Text
-> Target
Target'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"BatchParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"DeadLetterConfig")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"EcsParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"HttpParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Input")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"InputPath")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"InputTransformer")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"KinesisParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RedshiftDataParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RetryPolicy")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RoleArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"RunCommandParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SageMakerPipelineParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"SqsParameters")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"Id")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"Arn")
)
instance Prelude.Hashable Target where
hashWithSalt :: Int -> Target -> Int
hashWithSalt Int
_salt Target' {Maybe Text
Maybe BatchParameters
Maybe DeadLetterConfig
Maybe HttpParameters
Maybe InputTransformer
Maybe KinesisParameters
Maybe RedshiftDataParameters
Maybe RetryPolicy
Maybe RunCommandParameters
Maybe SageMakerPipelineParameters
Maybe SqsParameters
Maybe EcsParameters
Text
arn :: Text
id :: Text
sqsParameters :: Maybe SqsParameters
sageMakerPipelineParameters :: Maybe SageMakerPipelineParameters
runCommandParameters :: Maybe RunCommandParameters
roleArn :: Maybe Text
retryPolicy :: Maybe RetryPolicy
redshiftDataParameters :: Maybe RedshiftDataParameters
kinesisParameters :: Maybe KinesisParameters
inputTransformer :: Maybe InputTransformer
inputPath :: Maybe Text
input :: Maybe Text
httpParameters :: Maybe HttpParameters
ecsParameters :: Maybe EcsParameters
deadLetterConfig :: Maybe DeadLetterConfig
batchParameters :: Maybe BatchParameters
$sel:arn:Target' :: Target -> Text
$sel:id:Target' :: Target -> Text
$sel:sqsParameters:Target' :: Target -> Maybe SqsParameters
$sel:sageMakerPipelineParameters:Target' :: Target -> Maybe SageMakerPipelineParameters
$sel:runCommandParameters:Target' :: Target -> Maybe RunCommandParameters
$sel:roleArn:Target' :: Target -> Maybe Text
$sel:retryPolicy:Target' :: Target -> Maybe RetryPolicy
$sel:redshiftDataParameters:Target' :: Target -> Maybe RedshiftDataParameters
$sel:kinesisParameters:Target' :: Target -> Maybe KinesisParameters
$sel:inputTransformer:Target' :: Target -> Maybe InputTransformer
$sel:inputPath:Target' :: Target -> Maybe Text
$sel:input:Target' :: Target -> Maybe Text
$sel:httpParameters:Target' :: Target -> Maybe HttpParameters
$sel:ecsParameters:Target' :: Target -> Maybe EcsParameters
$sel:deadLetterConfig:Target' :: Target -> Maybe DeadLetterConfig
$sel:batchParameters:Target' :: Target -> Maybe BatchParameters
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe BatchParameters
batchParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DeadLetterConfig
deadLetterConfig
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe EcsParameters
ecsParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe HttpParameters
httpParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
input
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
inputPath
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe InputTransformer
inputTransformer
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe KinesisParameters
kinesisParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RedshiftDataParameters
redshiftDataParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RetryPolicy
retryPolicy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
roleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe RunCommandParameters
runCommandParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SageMakerPipelineParameters
sageMakerPipelineParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SqsParameters
sqsParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
id
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
arn
instance Prelude.NFData Target where
rnf :: Target -> ()
rnf Target' {Maybe Text
Maybe BatchParameters
Maybe DeadLetterConfig
Maybe HttpParameters
Maybe InputTransformer
Maybe KinesisParameters
Maybe RedshiftDataParameters
Maybe RetryPolicy
Maybe RunCommandParameters
Maybe SageMakerPipelineParameters
Maybe SqsParameters
Maybe EcsParameters
Text
arn :: Text
id :: Text
sqsParameters :: Maybe SqsParameters
sageMakerPipelineParameters :: Maybe SageMakerPipelineParameters
runCommandParameters :: Maybe RunCommandParameters
roleArn :: Maybe Text
retryPolicy :: Maybe RetryPolicy
redshiftDataParameters :: Maybe RedshiftDataParameters
kinesisParameters :: Maybe KinesisParameters
inputTransformer :: Maybe InputTransformer
inputPath :: Maybe Text
input :: Maybe Text
httpParameters :: Maybe HttpParameters
ecsParameters :: Maybe EcsParameters
deadLetterConfig :: Maybe DeadLetterConfig
batchParameters :: Maybe BatchParameters
$sel:arn:Target' :: Target -> Text
$sel:id:Target' :: Target -> Text
$sel:sqsParameters:Target' :: Target -> Maybe SqsParameters
$sel:sageMakerPipelineParameters:Target' :: Target -> Maybe SageMakerPipelineParameters
$sel:runCommandParameters:Target' :: Target -> Maybe RunCommandParameters
$sel:roleArn:Target' :: Target -> Maybe Text
$sel:retryPolicy:Target' :: Target -> Maybe RetryPolicy
$sel:redshiftDataParameters:Target' :: Target -> Maybe RedshiftDataParameters
$sel:kinesisParameters:Target' :: Target -> Maybe KinesisParameters
$sel:inputTransformer:Target' :: Target -> Maybe InputTransformer
$sel:inputPath:Target' :: Target -> Maybe Text
$sel:input:Target' :: Target -> Maybe Text
$sel:httpParameters:Target' :: Target -> Maybe HttpParameters
$sel:ecsParameters:Target' :: Target -> Maybe EcsParameters
$sel:deadLetterConfig:Target' :: Target -> Maybe DeadLetterConfig
$sel:batchParameters:Target' :: Target -> Maybe BatchParameters
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe BatchParameters
batchParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DeadLetterConfig
deadLetterConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe EcsParameters
ecsParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe HttpParameters
httpParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
input
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
inputPath
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe InputTransformer
inputTransformer
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe KinesisParameters
kinesisParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RedshiftDataParameters
redshiftDataParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RetryPolicy
retryPolicy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
roleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe RunCommandParameters
runCommandParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SageMakerPipelineParameters
sageMakerPipelineParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SqsParameters
sqsParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
id
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
arn
instance Data.ToJSON Target where
toJSON :: Target -> Value
toJSON Target' {Maybe Text
Maybe BatchParameters
Maybe DeadLetterConfig
Maybe HttpParameters
Maybe InputTransformer
Maybe KinesisParameters
Maybe RedshiftDataParameters
Maybe RetryPolicy
Maybe RunCommandParameters
Maybe SageMakerPipelineParameters
Maybe SqsParameters
Maybe EcsParameters
Text
arn :: Text
id :: Text
sqsParameters :: Maybe SqsParameters
sageMakerPipelineParameters :: Maybe SageMakerPipelineParameters
runCommandParameters :: Maybe RunCommandParameters
roleArn :: Maybe Text
retryPolicy :: Maybe RetryPolicy
redshiftDataParameters :: Maybe RedshiftDataParameters
kinesisParameters :: Maybe KinesisParameters
inputTransformer :: Maybe InputTransformer
inputPath :: Maybe Text
input :: Maybe Text
httpParameters :: Maybe HttpParameters
ecsParameters :: Maybe EcsParameters
deadLetterConfig :: Maybe DeadLetterConfig
batchParameters :: Maybe BatchParameters
$sel:arn:Target' :: Target -> Text
$sel:id:Target' :: Target -> Text
$sel:sqsParameters:Target' :: Target -> Maybe SqsParameters
$sel:sageMakerPipelineParameters:Target' :: Target -> Maybe SageMakerPipelineParameters
$sel:runCommandParameters:Target' :: Target -> Maybe RunCommandParameters
$sel:roleArn:Target' :: Target -> Maybe Text
$sel:retryPolicy:Target' :: Target -> Maybe RetryPolicy
$sel:redshiftDataParameters:Target' :: Target -> Maybe RedshiftDataParameters
$sel:kinesisParameters:Target' :: Target -> Maybe KinesisParameters
$sel:inputTransformer:Target' :: Target -> Maybe InputTransformer
$sel:inputPath:Target' :: Target -> Maybe Text
$sel:input:Target' :: Target -> Maybe Text
$sel:httpParameters:Target' :: Target -> Maybe HttpParameters
$sel:ecsParameters:Target' :: Target -> Maybe EcsParameters
$sel:deadLetterConfig:Target' :: Target -> Maybe DeadLetterConfig
$sel:batchParameters:Target' :: Target -> Maybe BatchParameters
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"BatchParameters" 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 BatchParameters
batchParameters,
(Key
"DeadLetterConfig" 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 DeadLetterConfig
deadLetterConfig,
(Key
"EcsParameters" 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 EcsParameters
ecsParameters,
(Key
"HttpParameters" 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 HttpParameters
httpParameters,
(Key
"Input" 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
input,
(Key
"InputPath" 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
inputPath,
(Key
"InputTransformer" 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 InputTransformer
inputTransformer,
(Key
"KinesisParameters" 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 KinesisParameters
kinesisParameters,
(Key
"RedshiftDataParameters" 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 RedshiftDataParameters
redshiftDataParameters,
(Key
"RetryPolicy" 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 RetryPolicy
retryPolicy,
(Key
"RoleArn" 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
roleArn,
(Key
"RunCommandParameters" 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 RunCommandParameters
runCommandParameters,
(Key
"SageMakerPipelineParameters" 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 SageMakerPipelineParameters
sageMakerPipelineParameters,
(Key
"SqsParameters" 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 SqsParameters
sqsParameters,
forall a. a -> Maybe a
Prelude.Just (Key
"Id" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
id),
forall a. a -> Maybe a
Prelude.Just (Key
"Arn" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
arn)
]
)