{-# 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 #-}

-- Derived from AWS service descriptions, licensed under Apache 2.0.

-- |
-- Module      : Amazonka.SageMaker.DescribeEdgeDeploymentPlan
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
--
-- Describes an edge deployment plan with deployment status per stage.
module Amazonka.SageMaker.DescribeEdgeDeploymentPlan
  ( -- * Creating a Request
    DescribeEdgeDeploymentPlan (..),
    newDescribeEdgeDeploymentPlan,

    -- * Request Lenses
    describeEdgeDeploymentPlan_maxResults,
    describeEdgeDeploymentPlan_nextToken,
    describeEdgeDeploymentPlan_edgeDeploymentPlanName,

    -- * Destructuring the Response
    DescribeEdgeDeploymentPlanResponse (..),
    newDescribeEdgeDeploymentPlanResponse,

    -- * Response Lenses
    describeEdgeDeploymentPlanResponse_creationTime,
    describeEdgeDeploymentPlanResponse_edgeDeploymentFailed,
    describeEdgeDeploymentPlanResponse_edgeDeploymentPending,
    describeEdgeDeploymentPlanResponse_edgeDeploymentSuccess,
    describeEdgeDeploymentPlanResponse_lastModifiedTime,
    describeEdgeDeploymentPlanResponse_nextToken,
    describeEdgeDeploymentPlanResponse_httpStatus,
    describeEdgeDeploymentPlanResponse_edgeDeploymentPlanArn,
    describeEdgeDeploymentPlanResponse_edgeDeploymentPlanName,
    describeEdgeDeploymentPlanResponse_modelConfigs,
    describeEdgeDeploymentPlanResponse_deviceFleetName,
    describeEdgeDeploymentPlanResponse_stages,
  )
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

-- | /See:/ 'newDescribeEdgeDeploymentPlan' smart constructor.
data DescribeEdgeDeploymentPlan = DescribeEdgeDeploymentPlan'
  { -- | The maximum number of results to select (50 by default).
    DescribeEdgeDeploymentPlan -> Maybe Int
maxResults :: Prelude.Maybe Prelude.Int,
    -- | If the edge deployment plan has enough stages to require tokening, then
    -- this is the response from the last list of stages returned.
    DescribeEdgeDeploymentPlan -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The name of the deployment plan to describe.
    DescribeEdgeDeploymentPlan -> Text
edgeDeploymentPlanName :: Prelude.Text
  }
  deriving (DescribeEdgeDeploymentPlan -> DescribeEdgeDeploymentPlan -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEdgeDeploymentPlan -> DescribeEdgeDeploymentPlan -> Bool
$c/= :: DescribeEdgeDeploymentPlan -> DescribeEdgeDeploymentPlan -> Bool
== :: DescribeEdgeDeploymentPlan -> DescribeEdgeDeploymentPlan -> Bool
$c== :: DescribeEdgeDeploymentPlan -> DescribeEdgeDeploymentPlan -> Bool
Prelude.Eq, ReadPrec [DescribeEdgeDeploymentPlan]
ReadPrec DescribeEdgeDeploymentPlan
Int -> ReadS DescribeEdgeDeploymentPlan
ReadS [DescribeEdgeDeploymentPlan]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEdgeDeploymentPlan]
$creadListPrec :: ReadPrec [DescribeEdgeDeploymentPlan]
readPrec :: ReadPrec DescribeEdgeDeploymentPlan
$creadPrec :: ReadPrec DescribeEdgeDeploymentPlan
readList :: ReadS [DescribeEdgeDeploymentPlan]
$creadList :: ReadS [DescribeEdgeDeploymentPlan]
readsPrec :: Int -> ReadS DescribeEdgeDeploymentPlan
$creadsPrec :: Int -> ReadS DescribeEdgeDeploymentPlan
Prelude.Read, Int -> DescribeEdgeDeploymentPlan -> ShowS
[DescribeEdgeDeploymentPlan] -> ShowS
DescribeEdgeDeploymentPlan -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEdgeDeploymentPlan] -> ShowS
$cshowList :: [DescribeEdgeDeploymentPlan] -> ShowS
show :: DescribeEdgeDeploymentPlan -> String
$cshow :: DescribeEdgeDeploymentPlan -> String
showsPrec :: Int -> DescribeEdgeDeploymentPlan -> ShowS
$cshowsPrec :: Int -> DescribeEdgeDeploymentPlan -> ShowS
Prelude.Show, forall x.
Rep DescribeEdgeDeploymentPlan x -> DescribeEdgeDeploymentPlan
forall x.
DescribeEdgeDeploymentPlan -> Rep DescribeEdgeDeploymentPlan x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeEdgeDeploymentPlan x -> DescribeEdgeDeploymentPlan
$cfrom :: forall x.
DescribeEdgeDeploymentPlan -> Rep DescribeEdgeDeploymentPlan x
Prelude.Generic)

-- |
-- Create a value of 'DescribeEdgeDeploymentPlan' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'maxResults', 'describeEdgeDeploymentPlan_maxResults' - The maximum number of results to select (50 by default).
--
-- 'nextToken', 'describeEdgeDeploymentPlan_nextToken' - If the edge deployment plan has enough stages to require tokening, then
-- this is the response from the last list of stages returned.
--
-- 'edgeDeploymentPlanName', 'describeEdgeDeploymentPlan_edgeDeploymentPlanName' - The name of the deployment plan to describe.
newDescribeEdgeDeploymentPlan ::
  -- | 'edgeDeploymentPlanName'
  Prelude.Text ->
  DescribeEdgeDeploymentPlan
newDescribeEdgeDeploymentPlan :: Text -> DescribeEdgeDeploymentPlan
newDescribeEdgeDeploymentPlan
  Text
pEdgeDeploymentPlanName_ =
    DescribeEdgeDeploymentPlan'
      { $sel:maxResults:DescribeEdgeDeploymentPlan' :: Maybe Int
maxResults =
          forall a. Maybe a
Prelude.Nothing,
        $sel:nextToken:DescribeEdgeDeploymentPlan' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
        $sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: Text
edgeDeploymentPlanName =
          Text
pEdgeDeploymentPlanName_
      }

-- | The maximum number of results to select (50 by default).
describeEdgeDeploymentPlan_maxResults :: Lens.Lens' DescribeEdgeDeploymentPlan (Prelude.Maybe Prelude.Int)
describeEdgeDeploymentPlan_maxResults :: Lens' DescribeEdgeDeploymentPlan (Maybe Int)
describeEdgeDeploymentPlan_maxResults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlan' {Maybe Int
maxResults :: Maybe Int
$sel:maxResults:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Int
maxResults} -> Maybe Int
maxResults) (\s :: DescribeEdgeDeploymentPlan
s@DescribeEdgeDeploymentPlan' {} Maybe Int
a -> DescribeEdgeDeploymentPlan
s {$sel:maxResults:DescribeEdgeDeploymentPlan' :: Maybe Int
maxResults = Maybe Int
a} :: DescribeEdgeDeploymentPlan)

-- | If the edge deployment plan has enough stages to require tokening, then
-- this is the response from the last list of stages returned.
describeEdgeDeploymentPlan_nextToken :: Lens.Lens' DescribeEdgeDeploymentPlan (Prelude.Maybe Prelude.Text)
describeEdgeDeploymentPlan_nextToken :: Lens' DescribeEdgeDeploymentPlan (Maybe Text)
describeEdgeDeploymentPlan_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlan' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeEdgeDeploymentPlan
s@DescribeEdgeDeploymentPlan' {} Maybe Text
a -> DescribeEdgeDeploymentPlan
s {$sel:nextToken:DescribeEdgeDeploymentPlan' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeEdgeDeploymentPlan)

-- | The name of the deployment plan to describe.
describeEdgeDeploymentPlan_edgeDeploymentPlanName :: Lens.Lens' DescribeEdgeDeploymentPlan Prelude.Text
describeEdgeDeploymentPlan_edgeDeploymentPlanName :: Lens' DescribeEdgeDeploymentPlan Text
describeEdgeDeploymentPlan_edgeDeploymentPlanName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlan' {Text
edgeDeploymentPlanName :: Text
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Text
edgeDeploymentPlanName} -> Text
edgeDeploymentPlanName) (\s :: DescribeEdgeDeploymentPlan
s@DescribeEdgeDeploymentPlan' {} Text
a -> DescribeEdgeDeploymentPlan
s {$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: Text
edgeDeploymentPlanName = Text
a} :: DescribeEdgeDeploymentPlan)

instance Core.AWSRequest DescribeEdgeDeploymentPlan where
  type
    AWSResponse DescribeEdgeDeploymentPlan =
      DescribeEdgeDeploymentPlanResponse
  request :: (Service -> Service)
-> DescribeEdgeDeploymentPlan -> Request DescribeEdgeDeploymentPlan
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 DescribeEdgeDeploymentPlan
-> ClientResponse ClientBody
-> m (Either
        Error (ClientResponse (AWSResponse DescribeEdgeDeploymentPlan)))
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 Int
-> Maybe Int
-> Maybe Int
-> Maybe POSIX
-> Maybe Text
-> Int
-> Text
-> Text
-> [EdgeDeploymentModelConfig]
-> Text
-> [DeploymentStageStatusSummary]
-> DescribeEdgeDeploymentPlanResponse
DescribeEdgeDeploymentPlanResponse'
            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
"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
"EdgeDeploymentFailed")
            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
"EdgeDeploymentPending")
            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
"EdgeDeploymentSuccess")
            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
"NextToken")
            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
"EdgeDeploymentPlanArn")
            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
"EdgeDeploymentPlanName")
            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
"ModelConfigs" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
            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
"DeviceFleetName")
            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
"Stages" forall (f :: * -> *) a. Functor f => f (Maybe a) -> a -> f a
Core..!@ forall a. Monoid a => a
Prelude.mempty)
      )

instance Prelude.Hashable DescribeEdgeDeploymentPlan where
  hashWithSalt :: Int -> DescribeEdgeDeploymentPlan -> Int
hashWithSalt Int
_salt DescribeEdgeDeploymentPlan' {Maybe Int
Maybe Text
Text
edgeDeploymentPlanName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Text
$sel:nextToken:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Text
$sel:maxResults:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Int
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Int
maxResults
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
nextToken
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
edgeDeploymentPlanName

instance Prelude.NFData DescribeEdgeDeploymentPlan where
  rnf :: DescribeEdgeDeploymentPlan -> ()
rnf DescribeEdgeDeploymentPlan' {Maybe Int
Maybe Text
Text
edgeDeploymentPlanName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Text
$sel:nextToken:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Text
$sel:maxResults:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Int
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
maxResults
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
nextToken
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
edgeDeploymentPlanName

instance Data.ToHeaders DescribeEdgeDeploymentPlan where
  toHeaders :: DescribeEdgeDeploymentPlan -> 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.DescribeEdgeDeploymentPlan" ::
                          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 DescribeEdgeDeploymentPlan where
  toJSON :: DescribeEdgeDeploymentPlan -> Value
toJSON DescribeEdgeDeploymentPlan' {Maybe Int
Maybe Text
Text
edgeDeploymentPlanName :: Text
nextToken :: Maybe Text
maxResults :: Maybe Int
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Text
$sel:nextToken:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Text
$sel:maxResults:DescribeEdgeDeploymentPlan' :: DescribeEdgeDeploymentPlan -> Maybe Int
..} =
    [Pair] -> Value
Data.object
      ( forall a. [Maybe a] -> [a]
Prelude.catMaybes
          [ (Key
"MaxResults" 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 Int
maxResults,
            (Key
"NextToken" 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
nextToken,
            forall a. a -> Maybe a
Prelude.Just
              ( Key
"EdgeDeploymentPlanName"
                  forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
edgeDeploymentPlanName
              )
          ]
      )

instance Data.ToPath DescribeEdgeDeploymentPlan where
  toPath :: DescribeEdgeDeploymentPlan -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"

instance Data.ToQuery DescribeEdgeDeploymentPlan where
  toQuery :: DescribeEdgeDeploymentPlan -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty

-- | /See:/ 'newDescribeEdgeDeploymentPlanResponse' smart constructor.
data DescribeEdgeDeploymentPlanResponse = DescribeEdgeDeploymentPlanResponse'
  { -- | The time when the edge deployment plan was created.
    DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
creationTime :: Prelude.Maybe Data.POSIX,
    -- | The number of edge devices that failed the deployment.
    DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentFailed :: Prelude.Maybe Prelude.Int,
    -- | The number of edge devices yet to pick up deployment, or in progress.
    DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentPending :: Prelude.Maybe Prelude.Int,
    -- | The number of edge devices with the successful deployment.
    DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentSuccess :: Prelude.Maybe Prelude.Int,
    -- | The time when the edge deployment plan was last updated.
    DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
lastModifiedTime :: Prelude.Maybe Data.POSIX,
    -- | Token to use when calling the next set of stages in the edge deployment
    -- plan.
    DescribeEdgeDeploymentPlanResponse -> Maybe Text
nextToken :: Prelude.Maybe Prelude.Text,
    -- | The response's http status code.
    DescribeEdgeDeploymentPlanResponse -> Int
httpStatus :: Prelude.Int,
    -- | The ARN of edge deployment plan.
    DescribeEdgeDeploymentPlanResponse -> Text
edgeDeploymentPlanArn :: Prelude.Text,
    -- | The name of the edge deployment plan.
    DescribeEdgeDeploymentPlanResponse -> Text
edgeDeploymentPlanName :: Prelude.Text,
    -- | List of models associated with the edge deployment plan.
    DescribeEdgeDeploymentPlanResponse -> [EdgeDeploymentModelConfig]
modelConfigs :: [EdgeDeploymentModelConfig],
    -- | The device fleet used for this edge deployment plan.
    DescribeEdgeDeploymentPlanResponse -> Text
deviceFleetName :: Prelude.Text,
    -- | List of stages in the edge deployment plan.
    DescribeEdgeDeploymentPlanResponse
-> [DeploymentStageStatusSummary]
stages :: [DeploymentStageStatusSummary]
  }
  deriving (DescribeEdgeDeploymentPlanResponse
-> DescribeEdgeDeploymentPlanResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: DescribeEdgeDeploymentPlanResponse
-> DescribeEdgeDeploymentPlanResponse -> Bool
$c/= :: DescribeEdgeDeploymentPlanResponse
-> DescribeEdgeDeploymentPlanResponse -> Bool
== :: DescribeEdgeDeploymentPlanResponse
-> DescribeEdgeDeploymentPlanResponse -> Bool
$c== :: DescribeEdgeDeploymentPlanResponse
-> DescribeEdgeDeploymentPlanResponse -> Bool
Prelude.Eq, ReadPrec [DescribeEdgeDeploymentPlanResponse]
ReadPrec DescribeEdgeDeploymentPlanResponse
Int -> ReadS DescribeEdgeDeploymentPlanResponse
ReadS [DescribeEdgeDeploymentPlanResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [DescribeEdgeDeploymentPlanResponse]
$creadListPrec :: ReadPrec [DescribeEdgeDeploymentPlanResponse]
readPrec :: ReadPrec DescribeEdgeDeploymentPlanResponse
$creadPrec :: ReadPrec DescribeEdgeDeploymentPlanResponse
readList :: ReadS [DescribeEdgeDeploymentPlanResponse]
$creadList :: ReadS [DescribeEdgeDeploymentPlanResponse]
readsPrec :: Int -> ReadS DescribeEdgeDeploymentPlanResponse
$creadsPrec :: Int -> ReadS DescribeEdgeDeploymentPlanResponse
Prelude.Read, Int -> DescribeEdgeDeploymentPlanResponse -> ShowS
[DescribeEdgeDeploymentPlanResponse] -> ShowS
DescribeEdgeDeploymentPlanResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [DescribeEdgeDeploymentPlanResponse] -> ShowS
$cshowList :: [DescribeEdgeDeploymentPlanResponse] -> ShowS
show :: DescribeEdgeDeploymentPlanResponse -> String
$cshow :: DescribeEdgeDeploymentPlanResponse -> String
showsPrec :: Int -> DescribeEdgeDeploymentPlanResponse -> ShowS
$cshowsPrec :: Int -> DescribeEdgeDeploymentPlanResponse -> ShowS
Prelude.Show, forall x.
Rep DescribeEdgeDeploymentPlanResponse x
-> DescribeEdgeDeploymentPlanResponse
forall x.
DescribeEdgeDeploymentPlanResponse
-> Rep DescribeEdgeDeploymentPlanResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep DescribeEdgeDeploymentPlanResponse x
-> DescribeEdgeDeploymentPlanResponse
$cfrom :: forall x.
DescribeEdgeDeploymentPlanResponse
-> Rep DescribeEdgeDeploymentPlanResponse x
Prelude.Generic)

-- |
-- Create a value of 'DescribeEdgeDeploymentPlanResponse' with all optional fields omitted.
--
-- Use <https://hackage.haskell.org/package/generic-lens generic-lens> or <https://hackage.haskell.org/package/optics optics> to modify other optional fields.
--
-- The following record fields are available, with the corresponding lenses provided
-- for backwards compatibility:
--
-- 'creationTime', 'describeEdgeDeploymentPlanResponse_creationTime' - The time when the edge deployment plan was created.
--
-- 'edgeDeploymentFailed', 'describeEdgeDeploymentPlanResponse_edgeDeploymentFailed' - The number of edge devices that failed the deployment.
--
-- 'edgeDeploymentPending', 'describeEdgeDeploymentPlanResponse_edgeDeploymentPending' - The number of edge devices yet to pick up deployment, or in progress.
--
-- 'edgeDeploymentSuccess', 'describeEdgeDeploymentPlanResponse_edgeDeploymentSuccess' - The number of edge devices with the successful deployment.
--
-- 'lastModifiedTime', 'describeEdgeDeploymentPlanResponse_lastModifiedTime' - The time when the edge deployment plan was last updated.
--
-- 'nextToken', 'describeEdgeDeploymentPlanResponse_nextToken' - Token to use when calling the next set of stages in the edge deployment
-- plan.
--
-- 'httpStatus', 'describeEdgeDeploymentPlanResponse_httpStatus' - The response's http status code.
--
-- 'edgeDeploymentPlanArn', 'describeEdgeDeploymentPlanResponse_edgeDeploymentPlanArn' - The ARN of edge deployment plan.
--
-- 'edgeDeploymentPlanName', 'describeEdgeDeploymentPlanResponse_edgeDeploymentPlanName' - The name of the edge deployment plan.
--
-- 'modelConfigs', 'describeEdgeDeploymentPlanResponse_modelConfigs' - List of models associated with the edge deployment plan.
--
-- 'deviceFleetName', 'describeEdgeDeploymentPlanResponse_deviceFleetName' - The device fleet used for this edge deployment plan.
--
-- 'stages', 'describeEdgeDeploymentPlanResponse_stages' - List of stages in the edge deployment plan.
newDescribeEdgeDeploymentPlanResponse ::
  -- | 'httpStatus'
  Prelude.Int ->
  -- | 'edgeDeploymentPlanArn'
  Prelude.Text ->
  -- | 'edgeDeploymentPlanName'
  Prelude.Text ->
  -- | 'deviceFleetName'
  Prelude.Text ->
  DescribeEdgeDeploymentPlanResponse
newDescribeEdgeDeploymentPlanResponse :: Int -> Text -> Text -> Text -> DescribeEdgeDeploymentPlanResponse
newDescribeEdgeDeploymentPlanResponse
  Int
pHttpStatus_
  Text
pEdgeDeploymentPlanArn_
  Text
pEdgeDeploymentPlanName_
  Text
pDeviceFleetName_ =
    DescribeEdgeDeploymentPlanResponse'
      { $sel:creationTime:DescribeEdgeDeploymentPlanResponse' :: Maybe POSIX
creationTime =
          forall a. Maybe a
Prelude.Nothing,
        $sel:edgeDeploymentFailed:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentFailed = forall a. Maybe a
Prelude.Nothing,
        $sel:edgeDeploymentPending:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentPending = forall a. Maybe a
Prelude.Nothing,
        $sel:edgeDeploymentSuccess:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentSuccess = forall a. Maybe a
Prelude.Nothing,
        $sel:lastModifiedTime:DescribeEdgeDeploymentPlanResponse' :: Maybe POSIX
lastModifiedTime = forall a. Maybe a
Prelude.Nothing,
        $sel:nextToken:DescribeEdgeDeploymentPlanResponse' :: Maybe Text
nextToken = forall a. Maybe a
Prelude.Nothing,
        $sel:httpStatus:DescribeEdgeDeploymentPlanResponse' :: Int
httpStatus = Int
pHttpStatus_,
        $sel:edgeDeploymentPlanArn:DescribeEdgeDeploymentPlanResponse' :: Text
edgeDeploymentPlanArn =
          Text
pEdgeDeploymentPlanArn_,
        $sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlanResponse' :: Text
edgeDeploymentPlanName =
          Text
pEdgeDeploymentPlanName_,
        $sel:modelConfigs:DescribeEdgeDeploymentPlanResponse' :: [EdgeDeploymentModelConfig]
modelConfigs = forall a. Monoid a => a
Prelude.mempty,
        $sel:deviceFleetName:DescribeEdgeDeploymentPlanResponse' :: Text
deviceFleetName = Text
pDeviceFleetName_,
        $sel:stages:DescribeEdgeDeploymentPlanResponse' :: [DeploymentStageStatusSummary]
stages = forall a. Monoid a => a
Prelude.mempty
      }

-- | The time when the edge deployment plan was created.
describeEdgeDeploymentPlanResponse_creationTime :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.UTCTime)
describeEdgeDeploymentPlanResponse_creationTime :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe UTCTime)
describeEdgeDeploymentPlanResponse_creationTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe POSIX
creationTime :: Maybe POSIX
$sel:creationTime:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
creationTime} -> Maybe POSIX
creationTime) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe POSIX
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:creationTime:DescribeEdgeDeploymentPlanResponse' :: Maybe POSIX
creationTime = Maybe POSIX
a} :: DescribeEdgeDeploymentPlanResponse) 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

-- | The number of edge devices that failed the deployment.
describeEdgeDeploymentPlanResponse_edgeDeploymentFailed :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentFailed :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentFailed = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe Int
edgeDeploymentFailed :: Maybe Int
$sel:edgeDeploymentFailed:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentFailed} -> Maybe Int
edgeDeploymentFailed) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe Int
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:edgeDeploymentFailed:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentFailed = Maybe Int
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The number of edge devices yet to pick up deployment, or in progress.
describeEdgeDeploymentPlanResponse_edgeDeploymentPending :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentPending :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentPending = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe Int
edgeDeploymentPending :: Maybe Int
$sel:edgeDeploymentPending:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentPending} -> Maybe Int
edgeDeploymentPending) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe Int
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:edgeDeploymentPending:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentPending = Maybe Int
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The number of edge devices with the successful deployment.
describeEdgeDeploymentPlanResponse_edgeDeploymentSuccess :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentSuccess :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe Int)
describeEdgeDeploymentPlanResponse_edgeDeploymentSuccess = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe Int
edgeDeploymentSuccess :: Maybe Int
$sel:edgeDeploymentSuccess:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
edgeDeploymentSuccess} -> Maybe Int
edgeDeploymentSuccess) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe Int
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:edgeDeploymentSuccess:DescribeEdgeDeploymentPlanResponse' :: Maybe Int
edgeDeploymentSuccess = Maybe Int
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The time when the edge deployment plan was last updated.
describeEdgeDeploymentPlanResponse_lastModifiedTime :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.UTCTime)
describeEdgeDeploymentPlanResponse_lastModifiedTime :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe UTCTime)
describeEdgeDeploymentPlanResponse_lastModifiedTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe POSIX
lastModifiedTime :: Maybe POSIX
$sel:lastModifiedTime:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
lastModifiedTime} -> Maybe POSIX
lastModifiedTime) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe POSIX
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:lastModifiedTime:DescribeEdgeDeploymentPlanResponse' :: Maybe POSIX
lastModifiedTime = Maybe POSIX
a} :: DescribeEdgeDeploymentPlanResponse) 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

-- | Token to use when calling the next set of stages in the edge deployment
-- plan.
describeEdgeDeploymentPlanResponse_nextToken :: Lens.Lens' DescribeEdgeDeploymentPlanResponse (Prelude.Maybe Prelude.Text)
describeEdgeDeploymentPlanResponse_nextToken :: Lens' DescribeEdgeDeploymentPlanResponse (Maybe Text)
describeEdgeDeploymentPlanResponse_nextToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Maybe Text
nextToken :: Maybe Text
$sel:nextToken:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Text
nextToken} -> Maybe Text
nextToken) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Maybe Text
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:nextToken:DescribeEdgeDeploymentPlanResponse' :: Maybe Text
nextToken = Maybe Text
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The response's http status code.
describeEdgeDeploymentPlanResponse_httpStatus :: Lens.Lens' DescribeEdgeDeploymentPlanResponse Prelude.Int
describeEdgeDeploymentPlanResponse_httpStatus :: Lens' DescribeEdgeDeploymentPlanResponse Int
describeEdgeDeploymentPlanResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Int
httpStatus :: Int
$sel:httpStatus:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Int
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:httpStatus:DescribeEdgeDeploymentPlanResponse' :: Int
httpStatus = Int
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The ARN of edge deployment plan.
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanArn :: Lens.Lens' DescribeEdgeDeploymentPlanResponse Prelude.Text
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanArn :: Lens' DescribeEdgeDeploymentPlanResponse Text
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Text
edgeDeploymentPlanArn :: Text
$sel:edgeDeploymentPlanArn:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
edgeDeploymentPlanArn} -> Text
edgeDeploymentPlanArn) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Text
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:edgeDeploymentPlanArn:DescribeEdgeDeploymentPlanResponse' :: Text
edgeDeploymentPlanArn = Text
a} :: DescribeEdgeDeploymentPlanResponse)

-- | The name of the edge deployment plan.
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanName :: Lens.Lens' DescribeEdgeDeploymentPlanResponse Prelude.Text
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanName :: Lens' DescribeEdgeDeploymentPlanResponse Text
describeEdgeDeploymentPlanResponse_edgeDeploymentPlanName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Text
edgeDeploymentPlanName :: Text
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
edgeDeploymentPlanName} -> Text
edgeDeploymentPlanName) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Text
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlanResponse' :: Text
edgeDeploymentPlanName = Text
a} :: DescribeEdgeDeploymentPlanResponse)

-- | List of models associated with the edge deployment plan.
describeEdgeDeploymentPlanResponse_modelConfigs :: Lens.Lens' DescribeEdgeDeploymentPlanResponse [EdgeDeploymentModelConfig]
describeEdgeDeploymentPlanResponse_modelConfigs :: Lens'
  DescribeEdgeDeploymentPlanResponse [EdgeDeploymentModelConfig]
describeEdgeDeploymentPlanResponse_modelConfigs = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {[EdgeDeploymentModelConfig]
modelConfigs :: [EdgeDeploymentModelConfig]
$sel:modelConfigs:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> [EdgeDeploymentModelConfig]
modelConfigs} -> [EdgeDeploymentModelConfig]
modelConfigs) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} [EdgeDeploymentModelConfig]
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:modelConfigs:DescribeEdgeDeploymentPlanResponse' :: [EdgeDeploymentModelConfig]
modelConfigs = [EdgeDeploymentModelConfig]
a} :: DescribeEdgeDeploymentPlanResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | The device fleet used for this edge deployment plan.
describeEdgeDeploymentPlanResponse_deviceFleetName :: Lens.Lens' DescribeEdgeDeploymentPlanResponse Prelude.Text
describeEdgeDeploymentPlanResponse_deviceFleetName :: Lens' DescribeEdgeDeploymentPlanResponse Text
describeEdgeDeploymentPlanResponse_deviceFleetName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {Text
deviceFleetName :: Text
$sel:deviceFleetName:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
deviceFleetName} -> Text
deviceFleetName) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} Text
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:deviceFleetName:DescribeEdgeDeploymentPlanResponse' :: Text
deviceFleetName = Text
a} :: DescribeEdgeDeploymentPlanResponse)

-- | List of stages in the edge deployment plan.
describeEdgeDeploymentPlanResponse_stages :: Lens.Lens' DescribeEdgeDeploymentPlanResponse [DeploymentStageStatusSummary]
describeEdgeDeploymentPlanResponse_stages :: Lens'
  DescribeEdgeDeploymentPlanResponse [DeploymentStageStatusSummary]
describeEdgeDeploymentPlanResponse_stages = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\DescribeEdgeDeploymentPlanResponse' {[DeploymentStageStatusSummary]
stages :: [DeploymentStageStatusSummary]
$sel:stages:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse
-> [DeploymentStageStatusSummary]
stages} -> [DeploymentStageStatusSummary]
stages) (\s :: DescribeEdgeDeploymentPlanResponse
s@DescribeEdgeDeploymentPlanResponse' {} [DeploymentStageStatusSummary]
a -> DescribeEdgeDeploymentPlanResponse
s {$sel:stages:DescribeEdgeDeploymentPlanResponse' :: [DeploymentStageStatusSummary]
stages = [DeploymentStageStatusSummary]
a} :: DescribeEdgeDeploymentPlanResponse) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

instance
  Prelude.NFData
    DescribeEdgeDeploymentPlanResponse
  where
  rnf :: DescribeEdgeDeploymentPlanResponse -> ()
rnf DescribeEdgeDeploymentPlanResponse' {Int
[EdgeDeploymentModelConfig]
[DeploymentStageStatusSummary]
Maybe Int
Maybe Text
Maybe POSIX
Text
stages :: [DeploymentStageStatusSummary]
deviceFleetName :: Text
modelConfigs :: [EdgeDeploymentModelConfig]
edgeDeploymentPlanName :: Text
edgeDeploymentPlanArn :: Text
httpStatus :: Int
nextToken :: Maybe Text
lastModifiedTime :: Maybe POSIX
edgeDeploymentSuccess :: Maybe Int
edgeDeploymentPending :: Maybe Int
edgeDeploymentFailed :: Maybe Int
creationTime :: Maybe POSIX
$sel:stages:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse
-> [DeploymentStageStatusSummary]
$sel:deviceFleetName:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
$sel:modelConfigs:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> [EdgeDeploymentModelConfig]
$sel:edgeDeploymentPlanName:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
$sel:edgeDeploymentPlanArn:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Text
$sel:httpStatus:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Int
$sel:nextToken:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Text
$sel:lastModifiedTime:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
$sel:edgeDeploymentSuccess:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
$sel:edgeDeploymentPending:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
$sel:edgeDeploymentFailed:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe Int
$sel:creationTime:DescribeEdgeDeploymentPlanResponse' :: DescribeEdgeDeploymentPlanResponse -> Maybe POSIX
..} =
    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 Int
edgeDeploymentFailed
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
edgeDeploymentPending
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Int
edgeDeploymentSuccess
      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
nextToken
      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
edgeDeploymentPlanArn
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
edgeDeploymentPlanName
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [EdgeDeploymentModelConfig]
modelConfigs
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
deviceFleetName
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf [DeploymentStageStatusSummary]
stages