{-# 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.DMS.Types.ReplicationTaskAssessmentResult where
import qualified Amazonka.Core as Core
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude
data ReplicationTaskAssessmentResult = ReplicationTaskAssessmentResult'
{
ReplicationTaskAssessmentResult -> Maybe Text
assessmentResults :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
assessmentResultsFile :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskIdentifier :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
assessmentStatus :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
s3ObjectUrl :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe POSIX
replicationTaskLastAssessmentDate :: Prelude.Maybe Core.POSIX,
ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskArn :: Prelude.Maybe Prelude.Text
}
deriving (ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
(ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool)
-> (ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool)
-> Eq ReplicationTaskAssessmentResult
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
$c/= :: ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
== :: ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
$c== :: ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
Prelude.Eq, ReadPrec [ReplicationTaskAssessmentResult]
ReadPrec ReplicationTaskAssessmentResult
Int -> ReadS ReplicationTaskAssessmentResult
ReadS [ReplicationTaskAssessmentResult]
(Int -> ReadS ReplicationTaskAssessmentResult)
-> ReadS [ReplicationTaskAssessmentResult]
-> ReadPrec ReplicationTaskAssessmentResult
-> ReadPrec [ReplicationTaskAssessmentResult]
-> Read ReplicationTaskAssessmentResult
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ReplicationTaskAssessmentResult]
$creadListPrec :: ReadPrec [ReplicationTaskAssessmentResult]
readPrec :: ReadPrec ReplicationTaskAssessmentResult
$creadPrec :: ReadPrec ReplicationTaskAssessmentResult
readList :: ReadS [ReplicationTaskAssessmentResult]
$creadList :: ReadS [ReplicationTaskAssessmentResult]
readsPrec :: Int -> ReadS ReplicationTaskAssessmentResult
$creadsPrec :: Int -> ReadS ReplicationTaskAssessmentResult
Prelude.Read, Int -> ReplicationTaskAssessmentResult -> ShowS
[ReplicationTaskAssessmentResult] -> ShowS
ReplicationTaskAssessmentResult -> String
(Int -> ReplicationTaskAssessmentResult -> ShowS)
-> (ReplicationTaskAssessmentResult -> String)
-> ([ReplicationTaskAssessmentResult] -> ShowS)
-> Show ReplicationTaskAssessmentResult
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ReplicationTaskAssessmentResult] -> ShowS
$cshowList :: [ReplicationTaskAssessmentResult] -> ShowS
show :: ReplicationTaskAssessmentResult -> String
$cshow :: ReplicationTaskAssessmentResult -> String
showsPrec :: Int -> ReplicationTaskAssessmentResult -> ShowS
$cshowsPrec :: Int -> ReplicationTaskAssessmentResult -> ShowS
Prelude.Show, (forall x.
ReplicationTaskAssessmentResult
-> Rep ReplicationTaskAssessmentResult x)
-> (forall x.
Rep ReplicationTaskAssessmentResult x
-> ReplicationTaskAssessmentResult)
-> Generic ReplicationTaskAssessmentResult
forall x.
Rep ReplicationTaskAssessmentResult x
-> ReplicationTaskAssessmentResult
forall x.
ReplicationTaskAssessmentResult
-> Rep ReplicationTaskAssessmentResult x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep ReplicationTaskAssessmentResult x
-> ReplicationTaskAssessmentResult
$cfrom :: forall x.
ReplicationTaskAssessmentResult
-> Rep ReplicationTaskAssessmentResult x
Prelude.Generic)
newReplicationTaskAssessmentResult ::
ReplicationTaskAssessmentResult
newReplicationTaskAssessmentResult :: ReplicationTaskAssessmentResult
newReplicationTaskAssessmentResult =
ReplicationTaskAssessmentResult' :: Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult'
{ $sel:assessmentResults:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResults =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResultsFile = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskIdentifier =
Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentStatus = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: Maybe Text
s3ObjectUrl = Maybe Text
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: Maybe POSIX
replicationTaskLastAssessmentDate =
Maybe POSIX
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskArn = Maybe Text
forall a. Maybe a
Prelude.Nothing
}
replicationTaskAssessmentResult_assessmentResults :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_assessmentResults :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_assessmentResults = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
assessmentResults :: Maybe Text
$sel:assessmentResults:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
assessmentResults} -> Maybe Text
assessmentResults) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:assessmentResults:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResults = Maybe Text
a} :: ReplicationTaskAssessmentResult)
replicationTaskAssessmentResult_assessmentResultsFile :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_assessmentResultsFile :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_assessmentResultsFile = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
assessmentResultsFile :: Maybe Text
$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
assessmentResultsFile} -> Maybe Text
assessmentResultsFile) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResultsFile = Maybe Text
a} :: ReplicationTaskAssessmentResult)
replicationTaskAssessmentResult_replicationTaskIdentifier :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_replicationTaskIdentifier :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_replicationTaskIdentifier = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
replicationTaskIdentifier :: Maybe Text
$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskIdentifier} -> Maybe Text
replicationTaskIdentifier) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskIdentifier = Maybe Text
a} :: ReplicationTaskAssessmentResult)
replicationTaskAssessmentResult_assessmentStatus :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_assessmentStatus :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_assessmentStatus = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
assessmentStatus :: Maybe Text
$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
assessmentStatus} -> Maybe Text
assessmentStatus) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentStatus = Maybe Text
a} :: ReplicationTaskAssessmentResult)
replicationTaskAssessmentResult_s3ObjectUrl :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_s3ObjectUrl :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_s3ObjectUrl = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
s3ObjectUrl :: Maybe Text
$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
s3ObjectUrl} -> Maybe Text
s3ObjectUrl) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: Maybe Text
s3ObjectUrl = Maybe Text
a} :: ReplicationTaskAssessmentResult)
replicationTaskAssessmentResult_replicationTaskLastAssessmentDate :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.UTCTime)
replicationTaskAssessmentResult_replicationTaskLastAssessmentDate :: (Maybe UTCTime -> f (Maybe UTCTime))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_replicationTaskLastAssessmentDate = (ReplicationTaskAssessmentResult -> Maybe POSIX)
-> (ReplicationTaskAssessmentResult
-> Maybe POSIX -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe POSIX)
(Maybe POSIX)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe POSIX
replicationTaskLastAssessmentDate :: Maybe POSIX
$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe POSIX
replicationTaskLastAssessmentDate} -> Maybe POSIX
replicationTaskLastAssessmentDate) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe POSIX
a -> ReplicationTaskAssessmentResult
s {$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: Maybe POSIX
replicationTaskLastAssessmentDate = Maybe POSIX
a} :: ReplicationTaskAssessmentResult) ((Maybe POSIX -> f (Maybe POSIX))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult)
-> ((Maybe UTCTime -> f (Maybe UTCTime))
-> Maybe POSIX -> f (Maybe POSIX))
-> (Maybe UTCTime -> f (Maybe UTCTime))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso POSIX POSIX UTCTime UTCTime
-> Iso (Maybe POSIX) (Maybe POSIX) (Maybe UTCTime) (Maybe UTCTime)
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso POSIX POSIX UTCTime UTCTime
forall (a :: Format). Iso' (Time a) UTCTime
Core._Time
replicationTaskAssessmentResult_replicationTaskArn :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_replicationTaskArn :: (Maybe Text -> f (Maybe Text))
-> ReplicationTaskAssessmentResult
-> f ReplicationTaskAssessmentResult
replicationTaskAssessmentResult_replicationTaskArn = (ReplicationTaskAssessmentResult -> Maybe Text)
-> (ReplicationTaskAssessmentResult
-> Maybe Text -> ReplicationTaskAssessmentResult)
-> Lens
ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult
(Maybe Text)
(Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ReplicationTaskAssessmentResult' {Maybe Text
replicationTaskArn :: Maybe Text
$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskArn} -> Maybe Text
replicationTaskArn) (\s :: ReplicationTaskAssessmentResult
s@ReplicationTaskAssessmentResult' {} Maybe Text
a -> ReplicationTaskAssessmentResult
s {$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskArn = Maybe Text
a} :: ReplicationTaskAssessmentResult)
instance
Core.FromJSON
ReplicationTaskAssessmentResult
where
parseJSON :: Value -> Parser ReplicationTaskAssessmentResult
parseJSON =
String
-> (Object -> Parser ReplicationTaskAssessmentResult)
-> Value
-> Parser ReplicationTaskAssessmentResult
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
String
"ReplicationTaskAssessmentResult"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult'
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"AssessmentResults")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"AssessmentResultsFile")
Parser
(Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ReplicationTaskIdentifier")
Parser
(Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text)
-> Parser
(Maybe Text
-> Maybe POSIX -> Maybe Text -> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"AssessmentStatus")
Parser
(Maybe Text
-> Maybe POSIX -> Maybe Text -> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text)
-> Parser
(Maybe POSIX -> Maybe Text -> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"S3ObjectUrl")
Parser
(Maybe POSIX -> Maybe Text -> ReplicationTaskAssessmentResult)
-> Parser (Maybe POSIX)
-> Parser (Maybe Text -> ReplicationTaskAssessmentResult)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe POSIX)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ReplicationTaskLastAssessmentDate")
Parser (Maybe Text -> ReplicationTaskAssessmentResult)
-> Parser (Maybe Text) -> Parser ReplicationTaskAssessmentResult
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"ReplicationTaskArn")
)
instance
Prelude.Hashable
ReplicationTaskAssessmentResult
instance
Prelude.NFData
ReplicationTaskAssessmentResult