{-# 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.SageMaker.DescribeEdgePackagingJob
(
DescribeEdgePackagingJob (..),
newDescribeEdgePackagingJob,
describeEdgePackagingJob_edgePackagingJobName,
DescribeEdgePackagingJobResponse (..),
newDescribeEdgePackagingJobResponse,
describeEdgePackagingJobResponse_compilationJobName,
describeEdgePackagingJobResponse_creationTime,
describeEdgePackagingJobResponse_edgePackagingJobStatusMessage,
describeEdgePackagingJobResponse_lastModifiedTime,
describeEdgePackagingJobResponse_modelArtifact,
describeEdgePackagingJobResponse_modelName,
describeEdgePackagingJobResponse_modelSignature,
describeEdgePackagingJobResponse_modelVersion,
describeEdgePackagingJobResponse_outputConfig,
describeEdgePackagingJobResponse_presetDeploymentOutput,
describeEdgePackagingJobResponse_resourceKey,
describeEdgePackagingJobResponse_roleArn,
describeEdgePackagingJobResponse_httpStatus,
describeEdgePackagingJobResponse_edgePackagingJobArn,
describeEdgePackagingJobResponse_edgePackagingJobName,
describeEdgePackagingJobResponse_edgePackagingJobStatus,
)
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
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.SageMaker.Types
data DescribeEdgePackagingJob = DescribeEdgePackagingJob'
{
DescribeEdgePackagingJob -> Text
edgePackagingJobName :: Prelude.Text
}
deriving (DescribeEdgePackagingJob -> DescribeEdgePackagingJob -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEdgePackagingJob -> DescribeEdgePackagingJob -> Bool
$c/= :: DescribeEdgePackagingJob -> DescribeEdgePackagingJob -> Bool
== :: DescribeEdgePackagingJob -> DescribeEdgePackagingJob -> Bool
$c== :: DescribeEdgePackagingJob -> DescribeEdgePackagingJob -> Bool
Prelude.Eq, ReadPrec [DescribeEdgePackagingJob]
ReadPrec DescribeEdgePackagingJob
Int -> ReadS DescribeEdgePackagingJob
ReadS [DescribeEdgePackagingJob]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEdgePackagingJob]
$creadListPrec :: ReadPrec [DescribeEdgePackagingJob]
readPrec :: ReadPrec DescribeEdgePackagingJob
$creadPrec :: ReadPrec DescribeEdgePackagingJob
readList :: ReadS [DescribeEdgePackagingJob]
$creadList :: ReadS [DescribeEdgePackagingJob]
readsPrec :: Int -> ReadS DescribeEdgePackagingJob
$creadsPrec :: Int -> ReadS DescribeEdgePackagingJob
Prelude.Read, Int -> DescribeEdgePackagingJob -> ShowS
[DescribeEdgePackagingJob] -> ShowS
DescribeEdgePackagingJob -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEdgePackagingJob] -> ShowS
$cshowList :: [DescribeEdgePackagingJob] -> ShowS
show :: DescribeEdgePackagingJob -> String
$cshow :: DescribeEdgePackagingJob -> String
showsPrec :: Int -> DescribeEdgePackagingJob -> ShowS
$cshowsPrec :: Int -> DescribeEdgePackagingJob -> ShowS
Prelude.Show, forall x.
Rep DescribeEdgePackagingJob x -> DescribeEdgePackagingJob
forall x.
DescribeEdgePackagingJob -> Rep DescribeEdgePackagingJob x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeEdgePackagingJob x -> DescribeEdgePackagingJob
$cfrom :: forall x.
DescribeEdgePackagingJob -> Rep DescribeEdgePackagingJob x
Prelude.Generic)
newDescribeEdgePackagingJob ::
Prelude.Text ->
DescribeEdgePackagingJob
newDescribeEdgePackagingJob :: Text -> DescribeEdgePackagingJob
newDescribeEdgePackagingJob Text
pEdgePackagingJobName_ =
DescribeEdgePackagingJob'
{ $sel:edgePackagingJobName:DescribeEdgePackagingJob' :: Text
edgePackagingJobName =
Text
pEdgePackagingJobName_
}
describeEdgePackagingJob_edgePackagingJobName :: Lens.Lens' DescribeEdgePackagingJob Prelude.Text
describeEdgePackagingJob_edgePackagingJobName :: Lens' DescribeEdgePackagingJob Text
describeEdgePackagingJob_edgePackagingJobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJob' {Text
edgePackagingJobName :: Text
$sel:edgePackagingJobName:DescribeEdgePackagingJob' :: DescribeEdgePackagingJob -> Text
edgePackagingJobName} -> Text
edgePackagingJobName) (\s :: DescribeEdgePackagingJob
s@DescribeEdgePackagingJob' {} Text
a -> DescribeEdgePackagingJob
s {$sel:edgePackagingJobName:DescribeEdgePackagingJob' :: Text
edgePackagingJobName = Text
a} :: DescribeEdgePackagingJob)
instance Core.AWSRequest DescribeEdgePackagingJob where
type
AWSResponse DescribeEdgePackagingJob =
DescribeEdgePackagingJobResponse
request :: (Service -> Service)
-> DescribeEdgePackagingJob -> Request DescribeEdgePackagingJob
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 DescribeEdgePackagingJob
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse DescribeEdgePackagingJob)))
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 Text
-> Maybe POSIX
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe EdgeOutputConfig
-> Maybe EdgePresetDeploymentOutput
-> Maybe Text
-> Maybe Text
-> Int
-> Text
-> Text
-> EdgePackagingJobStatus
-> DescribeEdgePackagingJobResponse
DescribeEdgePackagingJobResponse'
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
"CompilationJobName")
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
"CreationTime")
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
"EdgePackagingJobStatusMessage")
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
"LastModifiedTime")
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
"ModelArtifact")
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
"ModelName")
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
"ModelSignature")
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
"ModelVersion")
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
"OutputConfig")
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
"PresetDeploymentOutput")
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
"ResourceKey")
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
"RoleArn")
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))
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"EdgePackagingJobArn")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"EdgePackagingJobName")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Either String a
Data..:> Key
"EdgePackagingJobStatus")
)
instance Prelude.Hashable DescribeEdgePackagingJob where
hashWithSalt :: Int -> DescribeEdgePackagingJob -> Int
hashWithSalt Int
_salt DescribeEdgePackagingJob' {Text
edgePackagingJobName :: Text
$sel:edgePackagingJobName:DescribeEdgePackagingJob' :: DescribeEdgePackagingJob -> Text
..} =
Int
_salt forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
edgePackagingJobName
instance Prelude.NFData DescribeEdgePackagingJob where
rnf :: DescribeEdgePackagingJob -> ()
rnf DescribeEdgePackagingJob' {Text
edgePackagingJobName :: Text
$sel:edgePackagingJobName:DescribeEdgePackagingJob' :: DescribeEdgePackagingJob -> Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Text
edgePackagingJobName
instance Data.ToHeaders DescribeEdgePackagingJob where
toHeaders :: DescribeEdgePackagingJob -> 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
"SageMaker.DescribeEdgePackagingJob" ::
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 DescribeEdgePackagingJob where
toJSON :: DescribeEdgePackagingJob -> Value
toJSON DescribeEdgePackagingJob' {Text
edgePackagingJobName :: Text
$sel:edgePackagingJobName:DescribeEdgePackagingJob' :: DescribeEdgePackagingJob -> Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ forall a. a -> Maybe a
Prelude.Just
( Key
"EdgePackagingJobName"
forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
edgePackagingJobName
)
]
)
instance Data.ToPath DescribeEdgePackagingJob where
toPath :: DescribeEdgePackagingJob -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery DescribeEdgePackagingJob where
toQuery :: DescribeEdgePackagingJob -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data DescribeEdgePackagingJobResponse = DescribeEdgePackagingJobResponse'
{
DescribeEdgePackagingJobResponse -> Maybe Text
compilationJobName :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
DescribeEdgePackagingJobResponse -> Maybe Text
edgePackagingJobStatusMessage :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe POSIX
lastModifiedTime :: Prelude.Maybe Data.POSIX,
DescribeEdgePackagingJobResponse -> Maybe Text
modelArtifact :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe Text
modelName :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe Text
modelSignature :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe Text
modelVersion :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe EdgeOutputConfig
outputConfig :: Prelude.Maybe EdgeOutputConfig,
DescribeEdgePackagingJobResponse
-> Maybe EdgePresetDeploymentOutput
presetDeploymentOutput :: Prelude.Maybe EdgePresetDeploymentOutput,
DescribeEdgePackagingJobResponse -> Maybe Text
resourceKey :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Maybe Text
roleArn :: Prelude.Maybe Prelude.Text,
DescribeEdgePackagingJobResponse -> Int
httpStatus :: Prelude.Int,
DescribeEdgePackagingJobResponse -> Text
edgePackagingJobArn :: Prelude.Text,
DescribeEdgePackagingJobResponse -> Text
edgePackagingJobName :: Prelude.Text,
DescribeEdgePackagingJobResponse -> EdgePackagingJobStatus
edgePackagingJobStatus :: EdgePackagingJobStatus
}
deriving (DescribeEdgePackagingJobResponse
-> DescribeEdgePackagingJobResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEdgePackagingJobResponse
-> DescribeEdgePackagingJobResponse -> Bool
$c/= :: DescribeEdgePackagingJobResponse
-> DescribeEdgePackagingJobResponse -> Bool
== :: DescribeEdgePackagingJobResponse
-> DescribeEdgePackagingJobResponse -> Bool
$c== :: DescribeEdgePackagingJobResponse
-> DescribeEdgePackagingJobResponse -> Bool
Prelude.Eq, ReadPrec [DescribeEdgePackagingJobResponse]
ReadPrec DescribeEdgePackagingJobResponse
Int -> ReadS DescribeEdgePackagingJobResponse
ReadS [DescribeEdgePackagingJobResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEdgePackagingJobResponse]
$creadListPrec :: ReadPrec [DescribeEdgePackagingJobResponse]
readPrec :: ReadPrec DescribeEdgePackagingJobResponse
$creadPrec :: ReadPrec DescribeEdgePackagingJobResponse
readList :: ReadS [DescribeEdgePackagingJobResponse]
$creadList :: ReadS [DescribeEdgePackagingJobResponse]
readsPrec :: Int -> ReadS DescribeEdgePackagingJobResponse
$creadsPrec :: Int -> ReadS DescribeEdgePackagingJobResponse
Prelude.Read, Int -> DescribeEdgePackagingJobResponse -> ShowS
[DescribeEdgePackagingJobResponse] -> ShowS
DescribeEdgePackagingJobResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEdgePackagingJobResponse] -> ShowS
$cshowList :: [DescribeEdgePackagingJobResponse] -> ShowS
show :: DescribeEdgePackagingJobResponse -> String
$cshow :: DescribeEdgePackagingJobResponse -> String
showsPrec :: Int -> DescribeEdgePackagingJobResponse -> ShowS
$cshowsPrec :: Int -> DescribeEdgePackagingJobResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeEdgePackagingJobResponse x
-> DescribeEdgePackagingJobResponse
forall x.
DescribeEdgePackagingJobResponse
-> Rep DescribeEdgePackagingJobResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeEdgePackagingJobResponse x
-> DescribeEdgePackagingJobResponse
$cfrom :: forall x.
DescribeEdgePackagingJobResponse
-> Rep DescribeEdgePackagingJobResponse x
Prelude.Generic)
newDescribeEdgePackagingJobResponse ::
Prelude.Int ->
Prelude.Text ->
Prelude.Text ->
EdgePackagingJobStatus ->
DescribeEdgePackagingJobResponse
newDescribeEdgePackagingJobResponse :: Int
-> Text
-> Text
-> EdgePackagingJobStatus
-> DescribeEdgePackagingJobResponse
newDescribeEdgePackagingJobResponse
Int
pHttpStatus_
Text
pEdgePackagingJobArn_
Text
pEdgePackagingJobName_
EdgePackagingJobStatus
pEdgePackagingJobStatus_ =
DescribeEdgePackagingJobResponse'
{ $sel:compilationJobName:DescribeEdgePackagingJobResponse' :: Maybe Text
compilationJobName =
forall a. Maybe a
Prelude.Nothing,
$sel:creationTime:DescribeEdgePackagingJobResponse' :: Maybe POSIX
creationTime = forall a. Maybe a
Prelude.Nothing,
$sel:edgePackagingJobStatusMessage:DescribeEdgePackagingJobResponse' :: Maybe Text
edgePackagingJobStatusMessage =
forall a. Maybe a
Prelude.Nothing,
$sel:lastModifiedTime:DescribeEdgePackagingJobResponse' :: Maybe POSIX
lastModifiedTime = forall a. Maybe a
Prelude.Nothing,
$sel:modelArtifact:DescribeEdgePackagingJobResponse' :: Maybe Text
modelArtifact = forall a. Maybe a
Prelude.Nothing,
$sel:modelName:DescribeEdgePackagingJobResponse' :: Maybe Text
modelName = forall a. Maybe a
Prelude.Nothing,
$sel:modelSignature:DescribeEdgePackagingJobResponse' :: Maybe Text
modelSignature = forall a. Maybe a
Prelude.Nothing,
$sel:modelVersion:DescribeEdgePackagingJobResponse' :: Maybe Text
modelVersion = forall a. Maybe a
Prelude.Nothing,
$sel:outputConfig:DescribeEdgePackagingJobResponse' :: Maybe EdgeOutputConfig
outputConfig = forall a. Maybe a
Prelude.Nothing,
$sel:presetDeploymentOutput:DescribeEdgePackagingJobResponse' :: Maybe EdgePresetDeploymentOutput
presetDeploymentOutput = forall a. Maybe a
Prelude.Nothing,
$sel:resourceKey:DescribeEdgePackagingJobResponse' :: Maybe Text
resourceKey = forall a. Maybe a
Prelude.Nothing,
$sel:roleArn:DescribeEdgePackagingJobResponse' :: Maybe Text
roleArn = forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:DescribeEdgePackagingJobResponse' :: Int
httpStatus = Int
pHttpStatus_,
$sel:edgePackagingJobArn:DescribeEdgePackagingJobResponse' :: Text
edgePackagingJobArn =
Text
pEdgePackagingJobArn_,
$sel:edgePackagingJobName:DescribeEdgePackagingJobResponse' :: Text
edgePackagingJobName =
Text
pEdgePackagingJobName_,
$sel:edgePackagingJobStatus:DescribeEdgePackagingJobResponse' :: EdgePackagingJobStatus
edgePackagingJobStatus =
EdgePackagingJobStatus
pEdgePackagingJobStatus_
}
describeEdgePackagingJobResponse_compilationJobName :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_compilationJobName :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_compilationJobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
compilationJobName :: Maybe Text
$sel:compilationJobName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
compilationJobName} -> Maybe Text
compilationJobName) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:compilationJobName:DescribeEdgePackagingJobResponse' :: Maybe Text
compilationJobName = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_creationTime :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.UTCTime)
describeEdgePackagingJobResponse_creationTime :: Lens' DescribeEdgePackagingJobResponse (Maybe UTCTime)
describeEdgePackagingJobResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe POSIX
a -> DescribeEdgePackagingJobResponse
s {$sel:creationTime:DescribeEdgePackagingJobResponse' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: DescribeEdgePackagingJobResponse) 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
describeEdgePackagingJobResponse_edgePackagingJobStatusMessage :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_edgePackagingJobStatusMessage :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_edgePackagingJobStatusMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
edgePackagingJobStatusMessage :: Maybe Text
$sel:edgePackagingJobStatusMessage:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
edgePackagingJobStatusMessage} -> Maybe Text
edgePackagingJobStatusMessage) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:edgePackagingJobStatusMessage:DescribeEdgePackagingJobResponse' :: Maybe Text
edgePackagingJobStatusMessage = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_lastModifiedTime :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.UTCTime)
describeEdgePackagingJobResponse_lastModifiedTime :: Lens' DescribeEdgePackagingJobResponse (Maybe UTCTime)
describeEdgePackagingJobResponse_lastModifiedTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe POSIX
lastModifiedTime :: Maybe POSIX
$sel:lastModifiedTime:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe POSIX
lastModifiedTime} -> Maybe POSIX
lastModifiedTime) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe POSIX
a -> DescribeEdgePackagingJobResponse
s {$sel:lastModifiedTime:DescribeEdgePackagingJobResponse' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
a} :: DescribeEdgePackagingJobResponse) 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
describeEdgePackagingJobResponse_modelArtifact :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_modelArtifact :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_modelArtifact = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
modelArtifact :: Maybe Text
$sel:modelArtifact:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
modelArtifact} -> Maybe Text
modelArtifact) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:modelArtifact:DescribeEdgePackagingJobResponse' :: Maybe Text
modelArtifact = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_modelName :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_modelName :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_modelName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
modelName :: Maybe Text
$sel:modelName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
modelName} -> Maybe Text
modelName) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:modelName:DescribeEdgePackagingJobResponse' :: Maybe Text
modelName = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_modelSignature :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_modelSignature :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_modelSignature = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
modelSignature :: Maybe Text
$sel:modelSignature:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
modelSignature} -> Maybe Text
modelSignature) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:modelSignature:DescribeEdgePackagingJobResponse' :: Maybe Text
modelSignature = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_modelVersion :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_modelVersion :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_modelVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
modelVersion :: Maybe Text
$sel:modelVersion:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
modelVersion} -> Maybe Text
modelVersion) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:modelVersion:DescribeEdgePackagingJobResponse' :: Maybe Text
modelVersion = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_outputConfig :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe EdgeOutputConfig)
describeEdgePackagingJobResponse_outputConfig :: Lens' DescribeEdgePackagingJobResponse (Maybe EdgeOutputConfig)
describeEdgePackagingJobResponse_outputConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe EdgeOutputConfig
outputConfig :: Maybe EdgeOutputConfig
$sel:outputConfig:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe EdgeOutputConfig
outputConfig} -> Maybe EdgeOutputConfig
outputConfig) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe EdgeOutputConfig
a -> DescribeEdgePackagingJobResponse
s {$sel:outputConfig:DescribeEdgePackagingJobResponse' :: Maybe EdgeOutputConfig
outputConfig = Maybe EdgeOutputConfig
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_presetDeploymentOutput :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe EdgePresetDeploymentOutput)
describeEdgePackagingJobResponse_presetDeploymentOutput :: Lens'
DescribeEdgePackagingJobResponse (Maybe EdgePresetDeploymentOutput)
describeEdgePackagingJobResponse_presetDeploymentOutput = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe EdgePresetDeploymentOutput
presetDeploymentOutput :: Maybe EdgePresetDeploymentOutput
$sel:presetDeploymentOutput:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse
-> Maybe EdgePresetDeploymentOutput
presetDeploymentOutput} -> Maybe EdgePresetDeploymentOutput
presetDeploymentOutput) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe EdgePresetDeploymentOutput
a -> DescribeEdgePackagingJobResponse
s {$sel:presetDeploymentOutput:DescribeEdgePackagingJobResponse' :: Maybe EdgePresetDeploymentOutput
presetDeploymentOutput = Maybe EdgePresetDeploymentOutput
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_resourceKey :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_resourceKey :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_resourceKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
resourceKey :: Maybe Text
$sel:resourceKey:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
resourceKey} -> Maybe Text
resourceKey) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:resourceKey:DescribeEdgePackagingJobResponse' :: Maybe Text
resourceKey = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_roleArn :: Lens.Lens' DescribeEdgePackagingJobResponse (Prelude.Maybe Prelude.Text)
describeEdgePackagingJobResponse_roleArn :: Lens' DescribeEdgePackagingJobResponse (Maybe Text)
describeEdgePackagingJobResponse_roleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Maybe Text
roleArn :: Maybe Text
$sel:roleArn:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
roleArn} -> Maybe Text
roleArn) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Maybe Text
a -> DescribeEdgePackagingJobResponse
s {$sel:roleArn:DescribeEdgePackagingJobResponse' :: Maybe Text
roleArn = Maybe Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_httpStatus :: Lens.Lens' DescribeEdgePackagingJobResponse Prelude.Int
describeEdgePackagingJobResponse_httpStatus :: Lens' DescribeEdgePackagingJobResponse Int
describeEdgePackagingJobResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Int
a -> DescribeEdgePackagingJobResponse
s {$sel:httpStatus:DescribeEdgePackagingJobResponse' :: Int
httpStatus = Int
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_edgePackagingJobArn :: Lens.Lens' DescribeEdgePackagingJobResponse Prelude.Text
describeEdgePackagingJobResponse_edgePackagingJobArn :: Lens' DescribeEdgePackagingJobResponse Text
describeEdgePackagingJobResponse_edgePackagingJobArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Text
edgePackagingJobArn :: Text
$sel:edgePackagingJobArn:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Text
edgePackagingJobArn} -> Text
edgePackagingJobArn) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Text
a -> DescribeEdgePackagingJobResponse
s {$sel:edgePackagingJobArn:DescribeEdgePackagingJobResponse' :: Text
edgePackagingJobArn = Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_edgePackagingJobName :: Lens.Lens' DescribeEdgePackagingJobResponse Prelude.Text
describeEdgePackagingJobResponse_edgePackagingJobName :: Lens' DescribeEdgePackagingJobResponse Text
describeEdgePackagingJobResponse_edgePackagingJobName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {Text
edgePackagingJobName :: Text
$sel:edgePackagingJobName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Text
edgePackagingJobName} -> Text
edgePackagingJobName) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} Text
a -> DescribeEdgePackagingJobResponse
s {$sel:edgePackagingJobName:DescribeEdgePackagingJobResponse' :: Text
edgePackagingJobName = Text
a} :: DescribeEdgePackagingJobResponse)
describeEdgePackagingJobResponse_edgePackagingJobStatus :: Lens.Lens' DescribeEdgePackagingJobResponse EdgePackagingJobStatus
describeEdgePackagingJobResponse_edgePackagingJobStatus :: Lens' DescribeEdgePackagingJobResponse EdgePackagingJobStatus
describeEdgePackagingJobResponse_edgePackagingJobStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgePackagingJobResponse' {EdgePackagingJobStatus
edgePackagingJobStatus :: EdgePackagingJobStatus
$sel:edgePackagingJobStatus:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> EdgePackagingJobStatus
edgePackagingJobStatus} -> EdgePackagingJobStatus
edgePackagingJobStatus) (\s :: DescribeEdgePackagingJobResponse
s@DescribeEdgePackagingJobResponse' {} EdgePackagingJobStatus
a -> DescribeEdgePackagingJobResponse
s {$sel:edgePackagingJobStatus:DescribeEdgePackagingJobResponse' :: EdgePackagingJobStatus
edgePackagingJobStatus = EdgePackagingJobStatus
a} :: DescribeEdgePackagingJobResponse)
instance
Prelude.NFData
DescribeEdgePackagingJobResponse
where
rnf :: DescribeEdgePackagingJobResponse -> ()
rnf DescribeEdgePackagingJobResponse' {Int
Maybe Text
Maybe POSIX
Maybe EdgePresetDeploymentOutput
Maybe EdgeOutputConfig
Text
EdgePackagingJobStatus
edgePackagingJobStatus :: EdgePackagingJobStatus
edgePackagingJobName :: Text
edgePackagingJobArn :: Text
httpStatus :: Int
roleArn :: Maybe Text
resourceKey :: Maybe Text
presetDeploymentOutput :: Maybe EdgePresetDeploymentOutput
outputConfig :: Maybe EdgeOutputConfig
modelVersion :: Maybe Text
modelSignature :: Maybe Text
modelName :: Maybe Text
modelArtifact :: Maybe Text
lastModifiedTime :: Maybe POSIX
edgePackagingJobStatusMessage :: Maybe Text
creationTime :: Maybe POSIX
compilationJobName :: Maybe Text
$sel:edgePackagingJobStatus:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> EdgePackagingJobStatus
$sel:edgePackagingJobName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Text
$sel:edgePackagingJobArn:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Text
$sel:httpStatus:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Int
$sel:roleArn:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:resourceKey:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:presetDeploymentOutput:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse
-> Maybe EdgePresetDeploymentOutput
$sel:outputConfig:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe EdgeOutputConfig
$sel:modelVersion:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:modelSignature:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:modelName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:modelArtifact:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:lastModifiedTime:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe POSIX
$sel:edgePackagingJobStatusMessage:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
$sel:creationTime:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe POSIX
$sel:compilationJobName:DescribeEdgePackagingJobResponse' :: DescribeEdgePackagingJobResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
compilationJobName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
creationTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
edgePackagingJobStatusMessage
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe POSIX
lastModifiedTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
modelArtifact
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
modelName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
modelSignature
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
modelVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe EdgeOutputConfig
outputConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe EdgePresetDeploymentOutput
presetDeploymentOutput
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
resourceKey
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 Int
httpStatus
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
edgePackagingJobArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
edgePackagingJobName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf EdgePackagingJobStatus
edgePackagingJobStatus