{-# 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.CloudTrail.StartImport
(
StartImport (..),
newStartImport,
startImport_destinations,
startImport_endEventTime,
startImport_importId,
startImport_importSource,
startImport_startEventTime,
StartImportResponse (..),
newStartImportResponse,
startImportResponse_createdTimestamp,
startImportResponse_destinations,
startImportResponse_endEventTime,
startImportResponse_importId,
startImportResponse_importSource,
startImportResponse_importStatus,
startImportResponse_startEventTime,
startImportResponse_updatedTimestamp,
startImportResponse_httpStatus,
)
where
import Amazonka.CloudTrail.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 StartImport = StartImport'
{
StartImport -> Maybe (NonEmpty Text)
destinations :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
StartImport -> Maybe POSIX
endEventTime :: Prelude.Maybe Data.POSIX,
StartImport -> Maybe Text
importId :: Prelude.Maybe Prelude.Text,
StartImport -> Maybe ImportSource
importSource :: Prelude.Maybe ImportSource,
StartImport -> Maybe POSIX
startEventTime :: Prelude.Maybe Data.POSIX
}
deriving (StartImport -> StartImport -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartImport -> StartImport -> Bool
$c/= :: StartImport -> StartImport -> Bool
== :: StartImport -> StartImport -> Bool
$c== :: StartImport -> StartImport -> Bool
Prelude.Eq, ReadPrec [StartImport]
ReadPrec StartImport
Int -> ReadS StartImport
ReadS [StartImport]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartImport]
$creadListPrec :: ReadPrec [StartImport]
readPrec :: ReadPrec StartImport
$creadPrec :: ReadPrec StartImport
readList :: ReadS [StartImport]
$creadList :: ReadS [StartImport]
readsPrec :: Int -> ReadS StartImport
$creadsPrec :: Int -> ReadS StartImport
Prelude.Read, Int -> StartImport -> ShowS
[StartImport] -> ShowS
StartImport -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartImport] -> ShowS
$cshowList :: [StartImport] -> ShowS
show :: StartImport -> String
$cshow :: StartImport -> String
showsPrec :: Int -> StartImport -> ShowS
$cshowsPrec :: Int -> StartImport -> ShowS
Prelude.Show, forall x. Rep StartImport x -> StartImport
forall x. StartImport -> Rep StartImport x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StartImport x -> StartImport
$cfrom :: forall x. StartImport -> Rep StartImport x
Prelude.Generic)
newStartImport ::
StartImport
newStartImport :: StartImport
newStartImport =
StartImport'
{ $sel:destinations:StartImport' :: Maybe (NonEmpty Text)
destinations = forall a. Maybe a
Prelude.Nothing,
$sel:endEventTime:StartImport' :: Maybe POSIX
endEventTime = forall a. Maybe a
Prelude.Nothing,
$sel:importId:StartImport' :: Maybe Text
importId = forall a. Maybe a
Prelude.Nothing,
$sel:importSource:StartImport' :: Maybe ImportSource
importSource = forall a. Maybe a
Prelude.Nothing,
$sel:startEventTime:StartImport' :: Maybe POSIX
startEventTime = forall a. Maybe a
Prelude.Nothing
}
startImport_destinations :: Lens.Lens' StartImport (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
startImport_destinations :: Lens' StartImport (Maybe (NonEmpty Text))
startImport_destinations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImport' {Maybe (NonEmpty Text)
destinations :: Maybe (NonEmpty Text)
$sel:destinations:StartImport' :: StartImport -> Maybe (NonEmpty Text)
destinations} -> Maybe (NonEmpty Text)
destinations) (\s :: StartImport
s@StartImport' {} Maybe (NonEmpty Text)
a -> StartImport
s {$sel:destinations:StartImport' :: Maybe (NonEmpty Text)
destinations = Maybe (NonEmpty Text)
a} :: StartImport) 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
startImport_endEventTime :: Lens.Lens' StartImport (Prelude.Maybe Prelude.UTCTime)
startImport_endEventTime :: Lens' StartImport (Maybe UTCTime)
startImport_endEventTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImport' {Maybe POSIX
endEventTime :: Maybe POSIX
$sel:endEventTime:StartImport' :: StartImport -> Maybe POSIX
endEventTime} -> Maybe POSIX
endEventTime) (\s :: StartImport
s@StartImport' {} Maybe POSIX
a -> StartImport
s {$sel:endEventTime:StartImport' :: Maybe POSIX
endEventTime = Maybe POSIX
a} :: StartImport) 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
startImport_importId :: Lens.Lens' StartImport (Prelude.Maybe Prelude.Text)
startImport_importId :: Lens' StartImport (Maybe Text)
startImport_importId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImport' {Maybe Text
importId :: Maybe Text
$sel:importId:StartImport' :: StartImport -> Maybe Text
importId} -> Maybe Text
importId) (\s :: StartImport
s@StartImport' {} Maybe Text
a -> StartImport
s {$sel:importId:StartImport' :: Maybe Text
importId = Maybe Text
a} :: StartImport)
startImport_importSource :: Lens.Lens' StartImport (Prelude.Maybe ImportSource)
startImport_importSource :: Lens' StartImport (Maybe ImportSource)
startImport_importSource = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImport' {Maybe ImportSource
importSource :: Maybe ImportSource
$sel:importSource:StartImport' :: StartImport -> Maybe ImportSource
importSource} -> Maybe ImportSource
importSource) (\s :: StartImport
s@StartImport' {} Maybe ImportSource
a -> StartImport
s {$sel:importSource:StartImport' :: Maybe ImportSource
importSource = Maybe ImportSource
a} :: StartImport)
startImport_startEventTime :: Lens.Lens' StartImport (Prelude.Maybe Prelude.UTCTime)
startImport_startEventTime :: Lens' StartImport (Maybe UTCTime)
startImport_startEventTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImport' {Maybe POSIX
startEventTime :: Maybe POSIX
$sel:startEventTime:StartImport' :: StartImport -> Maybe POSIX
startEventTime} -> Maybe POSIX
startEventTime) (\s :: StartImport
s@StartImport' {} Maybe POSIX
a -> StartImport
s {$sel:startEventTime:StartImport' :: Maybe POSIX
startEventTime = Maybe POSIX
a} :: StartImport) 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
instance Core.AWSRequest StartImport where
type AWSResponse StartImport = StartImportResponse
request :: (Service -> Service) -> StartImport -> Request StartImport
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy StartImport
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse StartImport)))
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 POSIX
-> Maybe (NonEmpty Text)
-> Maybe POSIX
-> Maybe Text
-> Maybe ImportSource
-> Maybe ImportStatus
-> Maybe POSIX
-> Maybe POSIX
-> Int
-> StartImportResponse
StartImportResponse'
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
"CreatedTimestamp")
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
"Destinations")
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
"EndEventTime")
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
"ImportId")
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
"ImportSource")
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
"ImportStatus")
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
"StartEventTime")
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
"UpdatedTimestamp")
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 StartImport where
hashWithSalt :: Int -> StartImport -> Int
hashWithSalt Int
_salt StartImport' {Maybe (NonEmpty Text)
Maybe Text
Maybe POSIX
Maybe ImportSource
startEventTime :: Maybe POSIX
importSource :: Maybe ImportSource
importId :: Maybe Text
endEventTime :: Maybe POSIX
destinations :: Maybe (NonEmpty Text)
$sel:startEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:importSource:StartImport' :: StartImport -> Maybe ImportSource
$sel:importId:StartImport' :: StartImport -> Maybe Text
$sel:endEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:destinations:StartImport' :: StartImport -> Maybe (NonEmpty Text)
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Text)
destinations
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
endEventTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
importId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ImportSource
importSource
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
startEventTime
instance Prelude.NFData StartImport where
rnf :: StartImport -> ()
rnf StartImport' {Maybe (NonEmpty Text)
Maybe Text
Maybe POSIX
Maybe ImportSource
startEventTime :: Maybe POSIX
importSource :: Maybe ImportSource
importId :: Maybe Text
endEventTime :: Maybe POSIX
destinations :: Maybe (NonEmpty Text)
$sel:startEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:importSource:StartImport' :: StartImport -> Maybe ImportSource
$sel:importId:StartImport' :: StartImport -> Maybe Text
$sel:endEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:destinations:StartImport' :: StartImport -> Maybe (NonEmpty Text)
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Text)
destinations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
endEventTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
importId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ImportSource
importSource
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
startEventTime
instance Data.ToHeaders StartImport where
toHeaders :: StartImport -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"com.amazonaws.cloudtrail.v20131101.CloudTrail_20131101.StartImport" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON StartImport where
toJSON :: StartImport -> Value
toJSON StartImport' {Maybe (NonEmpty Text)
Maybe Text
Maybe POSIX
Maybe ImportSource
startEventTime :: Maybe POSIX
importSource :: Maybe ImportSource
importId :: Maybe Text
endEventTime :: Maybe POSIX
destinations :: Maybe (NonEmpty Text)
$sel:startEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:importSource:StartImport' :: StartImport -> Maybe ImportSource
$sel:importId:StartImport' :: StartImport -> Maybe Text
$sel:endEventTime:StartImport' :: StartImport -> Maybe POSIX
$sel:destinations:StartImport' :: StartImport -> Maybe (NonEmpty Text)
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"Destinations" 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 (NonEmpty Text)
destinations,
(Key
"EndEventTime" 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 POSIX
endEventTime,
(Key
"ImportId" 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
importId,
(Key
"ImportSource" 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 ImportSource
importSource,
(Key
"StartEventTime" 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 POSIX
startEventTime
]
)
instance Data.ToPath StartImport where
toPath :: StartImport -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery StartImport where
toQuery :: StartImport -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data StartImportResponse = StartImportResponse'
{
StartImportResponse -> Maybe POSIX
createdTimestamp :: Prelude.Maybe Data.POSIX,
StartImportResponse -> Maybe (NonEmpty Text)
destinations :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
StartImportResponse -> Maybe POSIX
endEventTime :: Prelude.Maybe Data.POSIX,
StartImportResponse -> Maybe Text
importId :: Prelude.Maybe Prelude.Text,
StartImportResponse -> Maybe ImportSource
importSource :: Prelude.Maybe ImportSource,
StartImportResponse -> Maybe ImportStatus
importStatus :: Prelude.Maybe ImportStatus,
StartImportResponse -> Maybe POSIX
startEventTime :: Prelude.Maybe Data.POSIX,
StartImportResponse -> Maybe POSIX
updatedTimestamp :: Prelude.Maybe Data.POSIX,
StartImportResponse -> Int
httpStatus :: Prelude.Int
}
deriving (StartImportResponse -> StartImportResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StartImportResponse -> StartImportResponse -> Bool
$c/= :: StartImportResponse -> StartImportResponse -> Bool
== :: StartImportResponse -> StartImportResponse -> Bool
$c== :: StartImportResponse -> StartImportResponse -> Bool
Prelude.Eq, ReadPrec [StartImportResponse]
ReadPrec StartImportResponse
Int -> ReadS StartImportResponse
ReadS [StartImportResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [StartImportResponse]
$creadListPrec :: ReadPrec [StartImportResponse]
readPrec :: ReadPrec StartImportResponse
$creadPrec :: ReadPrec StartImportResponse
readList :: ReadS [StartImportResponse]
$creadList :: ReadS [StartImportResponse]
readsPrec :: Int -> ReadS StartImportResponse
$creadsPrec :: Int -> ReadS StartImportResponse
Prelude.Read, Int -> StartImportResponse -> ShowS
[StartImportResponse] -> ShowS
StartImportResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StartImportResponse] -> ShowS
$cshowList :: [StartImportResponse] -> ShowS
show :: StartImportResponse -> String
$cshow :: StartImportResponse -> String
showsPrec :: Int -> StartImportResponse -> ShowS
$cshowsPrec :: Int -> StartImportResponse -> ShowS
Prelude.Show, forall x. Rep StartImportResponse x -> StartImportResponse
forall x. StartImportResponse -> Rep StartImportResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StartImportResponse x -> StartImportResponse
$cfrom :: forall x. StartImportResponse -> Rep StartImportResponse x
Prelude.Generic)
newStartImportResponse ::
Prelude.Int ->
StartImportResponse
newStartImportResponse :: Int -> StartImportResponse
newStartImportResponse Int
pHttpStatus_ =
StartImportResponse'
{ $sel:createdTimestamp:StartImportResponse' :: Maybe POSIX
createdTimestamp =
forall a. Maybe a
Prelude.Nothing,
$sel:destinations:StartImportResponse' :: Maybe (NonEmpty Text)
destinations = forall a. Maybe a
Prelude.Nothing,
$sel:endEventTime:StartImportResponse' :: Maybe POSIX
endEventTime = forall a. Maybe a
Prelude.Nothing,
$sel:importId:StartImportResponse' :: Maybe Text
importId = forall a. Maybe a
Prelude.Nothing,
$sel:importSource:StartImportResponse' :: Maybe ImportSource
importSource = forall a. Maybe a
Prelude.Nothing,
$sel:importStatus:StartImportResponse' :: Maybe ImportStatus
importStatus = forall a. Maybe a
Prelude.Nothing,
$sel:startEventTime:StartImportResponse' :: Maybe POSIX
startEventTime = forall a. Maybe a
Prelude.Nothing,
$sel:updatedTimestamp:StartImportResponse' :: Maybe POSIX
updatedTimestamp = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:StartImportResponse' :: Int
httpStatus = Int
pHttpStatus_
}
startImportResponse_createdTimestamp :: Lens.Lens' StartImportResponse (Prelude.Maybe Prelude.UTCTime)
startImportResponse_createdTimestamp :: Lens' StartImportResponse (Maybe UTCTime)
startImportResponse_createdTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe POSIX
createdTimestamp :: Maybe POSIX
$sel:createdTimestamp:StartImportResponse' :: StartImportResponse -> Maybe POSIX
createdTimestamp} -> Maybe POSIX
createdTimestamp) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe POSIX
a -> StartImportResponse
s {$sel:createdTimestamp:StartImportResponse' :: Maybe POSIX
createdTimestamp = Maybe POSIX
a} :: StartImportResponse) 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
startImportResponse_destinations :: Lens.Lens' StartImportResponse (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
startImportResponse_destinations :: Lens' StartImportResponse (Maybe (NonEmpty Text))
startImportResponse_destinations = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe (NonEmpty Text)
destinations :: Maybe (NonEmpty Text)
$sel:destinations:StartImportResponse' :: StartImportResponse -> Maybe (NonEmpty Text)
destinations} -> Maybe (NonEmpty Text)
destinations) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe (NonEmpty Text)
a -> StartImportResponse
s {$sel:destinations:StartImportResponse' :: Maybe (NonEmpty Text)
destinations = Maybe (NonEmpty Text)
a} :: StartImportResponse) 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
startImportResponse_endEventTime :: Lens.Lens' StartImportResponse (Prelude.Maybe Prelude.UTCTime)
startImportResponse_endEventTime :: Lens' StartImportResponse (Maybe UTCTime)
startImportResponse_endEventTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe POSIX
endEventTime :: Maybe POSIX
$sel:endEventTime:StartImportResponse' :: StartImportResponse -> Maybe POSIX
endEventTime} -> Maybe POSIX
endEventTime) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe POSIX
a -> StartImportResponse
s {$sel:endEventTime:StartImportResponse' :: Maybe POSIX
endEventTime = Maybe POSIX
a} :: StartImportResponse) 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
startImportResponse_importId :: Lens.Lens' StartImportResponse (Prelude.Maybe Prelude.Text)
startImportResponse_importId :: Lens' StartImportResponse (Maybe Text)
startImportResponse_importId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe Text
importId :: Maybe Text
$sel:importId:StartImportResponse' :: StartImportResponse -> Maybe Text
importId} -> Maybe Text
importId) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe Text
a -> StartImportResponse
s {$sel:importId:StartImportResponse' :: Maybe Text
importId = Maybe Text
a} :: StartImportResponse)
startImportResponse_importSource :: Lens.Lens' StartImportResponse (Prelude.Maybe ImportSource)
startImportResponse_importSource :: Lens' StartImportResponse (Maybe ImportSource)
startImportResponse_importSource = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe ImportSource
importSource :: Maybe ImportSource
$sel:importSource:StartImportResponse' :: StartImportResponse -> Maybe ImportSource
importSource} -> Maybe ImportSource
importSource) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe ImportSource
a -> StartImportResponse
s {$sel:importSource:StartImportResponse' :: Maybe ImportSource
importSource = Maybe ImportSource
a} :: StartImportResponse)
startImportResponse_importStatus :: Lens.Lens' StartImportResponse (Prelude.Maybe ImportStatus)
startImportResponse_importStatus :: Lens' StartImportResponse (Maybe ImportStatus)
startImportResponse_importStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe ImportStatus
importStatus :: Maybe ImportStatus
$sel:importStatus:StartImportResponse' :: StartImportResponse -> Maybe ImportStatus
importStatus} -> Maybe ImportStatus
importStatus) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe ImportStatus
a -> StartImportResponse
s {$sel:importStatus:StartImportResponse' :: Maybe ImportStatus
importStatus = Maybe ImportStatus
a} :: StartImportResponse)
startImportResponse_startEventTime :: Lens.Lens' StartImportResponse (Prelude.Maybe Prelude.UTCTime)
startImportResponse_startEventTime :: Lens' StartImportResponse (Maybe UTCTime)
startImportResponse_startEventTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe POSIX
startEventTime :: Maybe POSIX
$sel:startEventTime:StartImportResponse' :: StartImportResponse -> Maybe POSIX
startEventTime} -> Maybe POSIX
startEventTime) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe POSIX
a -> StartImportResponse
s {$sel:startEventTime:StartImportResponse' :: Maybe POSIX
startEventTime = Maybe POSIX
a} :: StartImportResponse) 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
startImportResponse_updatedTimestamp :: Lens.Lens' StartImportResponse (Prelude.Maybe Prelude.UTCTime)
startImportResponse_updatedTimestamp :: Lens' StartImportResponse (Maybe UTCTime)
startImportResponse_updatedTimestamp = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Maybe POSIX
updatedTimestamp :: Maybe POSIX
$sel:updatedTimestamp:StartImportResponse' :: StartImportResponse -> Maybe POSIX
updatedTimestamp} -> Maybe POSIX
updatedTimestamp) (\s :: StartImportResponse
s@StartImportResponse' {} Maybe POSIX
a -> StartImportResponse
s {$sel:updatedTimestamp:StartImportResponse' :: Maybe POSIX
updatedTimestamp = Maybe POSIX
a} :: StartImportResponse) 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
startImportResponse_httpStatus :: Lens.Lens' StartImportResponse Prelude.Int
startImportResponse_httpStatus :: Lens' StartImportResponse Int
startImportResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StartImportResponse' {Int
httpStatus :: Int
$sel:httpStatus:StartImportResponse' :: StartImportResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: StartImportResponse
s@StartImportResponse' {} Int
a -> StartImportResponse
s {$sel:httpStatus:StartImportResponse' :: Int
httpStatus = Int
a} :: StartImportResponse)
instance Prelude.NFData StartImportResponse where
rnf :: StartImportResponse -> ()
rnf StartImportResponse' {Int
Maybe (NonEmpty Text)
Maybe Text
Maybe POSIX
Maybe ImportStatus
Maybe ImportSource
httpStatus :: Int
updatedTimestamp :: Maybe POSIX
startEventTime :: Maybe POSIX
importStatus :: Maybe ImportStatus
importSource :: Maybe ImportSource
importId :: Maybe Text
endEventTime :: Maybe POSIX
destinations :: Maybe (NonEmpty Text)
createdTimestamp :: Maybe POSIX
$sel:httpStatus:StartImportResponse' :: StartImportResponse -> Int
$sel:updatedTimestamp:StartImportResponse' :: StartImportResponse -> Maybe POSIX
$sel:startEventTime:StartImportResponse' :: StartImportResponse -> Maybe POSIX
$sel:importStatus:StartImportResponse' :: StartImportResponse -> Maybe ImportStatus
$sel:importSource:StartImportResponse' :: StartImportResponse -> Maybe ImportSource
$sel:importId:StartImportResponse' :: StartImportResponse -> Maybe Text
$sel:endEventTime:StartImportResponse' :: StartImportResponse -> Maybe POSIX
$sel:destinations:StartImportResponse' :: StartImportResponse -> Maybe (NonEmpty Text)
$sel:createdTimestamp:StartImportResponse' :: StartImportResponse -> Maybe POSIX
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
createdTimestamp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Text)
destinations
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
endEventTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
importId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ImportSource
importSource
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ImportStatus
importStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
startEventTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
updatedTimestamp
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus