{-# 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.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
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
assessmentStatus :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskArn :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe Text
replicationTaskIdentifier :: Prelude.Maybe Prelude.Text,
ReplicationTaskAssessmentResult -> Maybe POSIX
replicationTaskLastAssessmentDate :: Prelude.Maybe Data.POSIX,
ReplicationTaskAssessmentResult -> Maybe Text
s3ObjectUrl :: Prelude.Maybe Prelude.Text
}
deriving (ReplicationTaskAssessmentResult
-> ReplicationTaskAssessmentResult -> Bool
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]
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
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.
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'
{ $sel:assessmentResults:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResults =
forall a. Maybe a
Prelude.Nothing,
$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentResultsFile = forall a. Maybe a
Prelude.Nothing,
$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: Maybe Text
assessmentStatus = forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskArn = forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: Maybe Text
replicationTaskIdentifier =
forall a. Maybe a
Prelude.Nothing,
$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: Maybe POSIX
replicationTaskLastAssessmentDate =
forall a. Maybe a
Prelude.Nothing,
$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: Maybe Text
s3ObjectUrl = forall a. Maybe a
Prelude.Nothing
}
replicationTaskAssessmentResult_assessmentResults :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_assessmentResults :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_assessmentResults = 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 :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_assessmentResultsFile = 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_assessmentStatus :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_assessmentStatus :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_assessmentStatus = 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_replicationTaskArn :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_replicationTaskArn :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_replicationTaskArn = 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)
replicationTaskAssessmentResult_replicationTaskIdentifier :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_replicationTaskIdentifier :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_replicationTaskIdentifier = 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_replicationTaskLastAssessmentDate :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.UTCTime)
replicationTaskAssessmentResult_replicationTaskLastAssessmentDate :: Lens' ReplicationTaskAssessmentResult (Maybe UTCTime)
replicationTaskAssessmentResult_replicationTaskLastAssessmentDate = 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) 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 (a :: Format). Iso' (Time a) UTCTime
Data._Time
replicationTaskAssessmentResult_s3ObjectUrl :: Lens.Lens' ReplicationTaskAssessmentResult (Prelude.Maybe Prelude.Text)
replicationTaskAssessmentResult_s3ObjectUrl :: Lens' ReplicationTaskAssessmentResult (Maybe Text)
replicationTaskAssessmentResult_s3ObjectUrl = 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)
instance
Data.FromJSON
ReplicationTaskAssessmentResult
where
parseJSON :: Value -> Parser ReplicationTaskAssessmentResult
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ReplicationTaskAssessmentResult"
( \Object
x ->
Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> ReplicationTaskAssessmentResult
ReplicationTaskAssessmentResult'
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
"AssessmentResults")
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
"AssessmentResultsFile")
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
"AssessmentStatus")
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
"ReplicationTaskArn")
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
"ReplicationTaskIdentifier")
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
"ReplicationTaskLastAssessmentDate")
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
"S3ObjectUrl")
)
instance
Prelude.Hashable
ReplicationTaskAssessmentResult
where
hashWithSalt :: Int -> ReplicationTaskAssessmentResult -> Int
hashWithSalt
Int
_salt
ReplicationTaskAssessmentResult' {Maybe Text
Maybe POSIX
s3ObjectUrl :: Maybe Text
replicationTaskLastAssessmentDate :: Maybe POSIX
replicationTaskIdentifier :: Maybe Text
replicationTaskArn :: Maybe Text
assessmentStatus :: Maybe Text
assessmentResultsFile :: Maybe Text
assessmentResults :: Maybe Text
$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe POSIX
$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentResults:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
assessmentResults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
assessmentResultsFile
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
assessmentStatus
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replicationTaskArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
replicationTaskIdentifier
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
replicationTaskLastAssessmentDate
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
s3ObjectUrl
instance
Prelude.NFData
ReplicationTaskAssessmentResult
where
rnf :: ReplicationTaskAssessmentResult -> ()
rnf ReplicationTaskAssessmentResult' {Maybe Text
Maybe POSIX
s3ObjectUrl :: Maybe Text
replicationTaskLastAssessmentDate :: Maybe POSIX
replicationTaskIdentifier :: Maybe Text
replicationTaskArn :: Maybe Text
assessmentStatus :: Maybe Text
assessmentResultsFile :: Maybe Text
assessmentResults :: Maybe Text
$sel:s3ObjectUrl:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:replicationTaskLastAssessmentDate:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe POSIX
$sel:replicationTaskIdentifier:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:replicationTaskArn:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentStatus:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentResultsFile:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
$sel:assessmentResults:ReplicationTaskAssessmentResult' :: ReplicationTaskAssessmentResult -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
assessmentResults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
assessmentResultsFile
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
assessmentStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
replicationTaskArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
replicationTaskIdentifier
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
replicationTaskLastAssessmentDate
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
s3ObjectUrl