{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}

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

-- |
-- Module      : Amazonka.IoTThingsGraph.Types.SystemInstanceDescription
-- Copyright   : (c) 2013-2021 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay <brendan.g.hay+amazonka@gmail.com>
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.IoTThingsGraph.Types.SystemInstanceDescription where

import qualified Amazonka.Core as Core
import Amazonka.IoTThingsGraph.Types.DefinitionDocument
import Amazonka.IoTThingsGraph.Types.DependencyRevision
import Amazonka.IoTThingsGraph.Types.MetricsConfiguration
import Amazonka.IoTThingsGraph.Types.SystemInstanceSummary
import qualified Amazonka.Lens as Lens
import qualified Amazonka.Prelude as Prelude

-- | An object that contains a system instance definition and summary
-- information.
--
-- /See:/ 'newSystemInstanceDescription' smart constructor.
data SystemInstanceDescription = SystemInstanceDescription'
  { -- | An object that contains summary information about a system instance.
    SystemInstanceDescription -> Maybe SystemInstanceSummary
summary :: Prelude.Maybe SystemInstanceSummary,
    SystemInstanceDescription -> Maybe MetricsConfiguration
metricsConfiguration :: Prelude.Maybe MetricsConfiguration,
    -- | A list of objects that contain all of the IDs and revision numbers of
    -- workflows and systems that are used in a system instance.
    SystemInstanceDescription -> Maybe [DependencyRevision]
validatedDependencyRevisions :: Prelude.Maybe [DependencyRevision],
    SystemInstanceDescription -> Maybe DefinitionDocument
definition :: Prelude.Maybe DefinitionDocument,
    -- | The version of the user\'s namespace against which the system instance
    -- was validated.
    SystemInstanceDescription -> Maybe Integer
validatedNamespaceVersion :: Prelude.Maybe Prelude.Integer,
    -- | The AWS Identity and Access Management (IAM) role that AWS IoT Things
    -- Graph assumes during flow execution in a cloud deployment. This role
    -- must have read and write permissionss to AWS Lambda and AWS IoT and to
    -- any other AWS services that the flow uses.
    SystemInstanceDescription -> Maybe Text
flowActionsRoleArn :: Prelude.Maybe Prelude.Text,
    -- | The Amazon Simple Storage Service bucket where information about a
    -- system instance is stored.
    SystemInstanceDescription -> Maybe Text
s3BucketName :: Prelude.Maybe Prelude.Text
  }
  deriving (SystemInstanceDescription -> SystemInstanceDescription -> Bool
(SystemInstanceDescription -> SystemInstanceDescription -> Bool)
-> (SystemInstanceDescription -> SystemInstanceDescription -> Bool)
-> Eq SystemInstanceDescription
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SystemInstanceDescription -> SystemInstanceDescription -> Bool
$c/= :: SystemInstanceDescription -> SystemInstanceDescription -> Bool
== :: SystemInstanceDescription -> SystemInstanceDescription -> Bool
$c== :: SystemInstanceDescription -> SystemInstanceDescription -> Bool
Prelude.Eq, ReadPrec [SystemInstanceDescription]
ReadPrec SystemInstanceDescription
Int -> ReadS SystemInstanceDescription
ReadS [SystemInstanceDescription]
(Int -> ReadS SystemInstanceDescription)
-> ReadS [SystemInstanceDescription]
-> ReadPrec SystemInstanceDescription
-> ReadPrec [SystemInstanceDescription]
-> Read SystemInstanceDescription
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SystemInstanceDescription]
$creadListPrec :: ReadPrec [SystemInstanceDescription]
readPrec :: ReadPrec SystemInstanceDescription
$creadPrec :: ReadPrec SystemInstanceDescription
readList :: ReadS [SystemInstanceDescription]
$creadList :: ReadS [SystemInstanceDescription]
readsPrec :: Int -> ReadS SystemInstanceDescription
$creadsPrec :: Int -> ReadS SystemInstanceDescription
Prelude.Read, Int -> SystemInstanceDescription -> ShowS
[SystemInstanceDescription] -> ShowS
SystemInstanceDescription -> String
(Int -> SystemInstanceDescription -> ShowS)
-> (SystemInstanceDescription -> String)
-> ([SystemInstanceDescription] -> ShowS)
-> Show SystemInstanceDescription
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SystemInstanceDescription] -> ShowS
$cshowList :: [SystemInstanceDescription] -> ShowS
show :: SystemInstanceDescription -> String
$cshow :: SystemInstanceDescription -> String
showsPrec :: Int -> SystemInstanceDescription -> ShowS
$cshowsPrec :: Int -> SystemInstanceDescription -> ShowS
Prelude.Show, (forall x.
 SystemInstanceDescription -> Rep SystemInstanceDescription x)
-> (forall x.
    Rep SystemInstanceDescription x -> SystemInstanceDescription)
-> Generic SystemInstanceDescription
forall x.
Rep SystemInstanceDescription x -> SystemInstanceDescription
forall x.
SystemInstanceDescription -> Rep SystemInstanceDescription x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep SystemInstanceDescription x -> SystemInstanceDescription
$cfrom :: forall x.
SystemInstanceDescription -> Rep SystemInstanceDescription x
Prelude.Generic)

-- |
-- Create a value of 'SystemInstanceDescription' 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:
--
-- 'summary', 'systemInstanceDescription_summary' - An object that contains summary information about a system instance.
--
-- 'metricsConfiguration', 'systemInstanceDescription_metricsConfiguration' - Undocumented member.
--
-- 'validatedDependencyRevisions', 'systemInstanceDescription_validatedDependencyRevisions' - A list of objects that contain all of the IDs and revision numbers of
-- workflows and systems that are used in a system instance.
--
-- 'definition', 'systemInstanceDescription_definition' - Undocumented member.
--
-- 'validatedNamespaceVersion', 'systemInstanceDescription_validatedNamespaceVersion' - The version of the user\'s namespace against which the system instance
-- was validated.
--
-- 'flowActionsRoleArn', 'systemInstanceDescription_flowActionsRoleArn' - The AWS Identity and Access Management (IAM) role that AWS IoT Things
-- Graph assumes during flow execution in a cloud deployment. This role
-- must have read and write permissionss to AWS Lambda and AWS IoT and to
-- any other AWS services that the flow uses.
--
-- 's3BucketName', 'systemInstanceDescription_s3BucketName' - The Amazon Simple Storage Service bucket where information about a
-- system instance is stored.
newSystemInstanceDescription ::
  SystemInstanceDescription
newSystemInstanceDescription :: SystemInstanceDescription
newSystemInstanceDescription =
  SystemInstanceDescription' :: Maybe SystemInstanceSummary
-> Maybe MetricsConfiguration
-> Maybe [DependencyRevision]
-> Maybe DefinitionDocument
-> Maybe Integer
-> Maybe Text
-> Maybe Text
-> SystemInstanceDescription
SystemInstanceDescription'
    { $sel:summary:SystemInstanceDescription' :: Maybe SystemInstanceSummary
summary =
        Maybe SystemInstanceSummary
forall a. Maybe a
Prelude.Nothing,
      $sel:metricsConfiguration:SystemInstanceDescription' :: Maybe MetricsConfiguration
metricsConfiguration = Maybe MetricsConfiguration
forall a. Maybe a
Prelude.Nothing,
      $sel:validatedDependencyRevisions:SystemInstanceDescription' :: Maybe [DependencyRevision]
validatedDependencyRevisions = Maybe [DependencyRevision]
forall a. Maybe a
Prelude.Nothing,
      $sel:definition:SystemInstanceDescription' :: Maybe DefinitionDocument
definition = Maybe DefinitionDocument
forall a. Maybe a
Prelude.Nothing,
      $sel:validatedNamespaceVersion:SystemInstanceDescription' :: Maybe Integer
validatedNamespaceVersion = Maybe Integer
forall a. Maybe a
Prelude.Nothing,
      $sel:flowActionsRoleArn:SystemInstanceDescription' :: Maybe Text
flowActionsRoleArn = Maybe Text
forall a. Maybe a
Prelude.Nothing,
      $sel:s3BucketName:SystemInstanceDescription' :: Maybe Text
s3BucketName = Maybe Text
forall a. Maybe a
Prelude.Nothing
    }

-- | An object that contains summary information about a system instance.
systemInstanceDescription_summary :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe SystemInstanceSummary)
systemInstanceDescription_summary :: (Maybe SystemInstanceSummary -> f (Maybe SystemInstanceSummary))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_summary = (SystemInstanceDescription -> Maybe SystemInstanceSummary)
-> (SystemInstanceDescription
    -> Maybe SystemInstanceSummary -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe SystemInstanceSummary)
     (Maybe SystemInstanceSummary)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe SystemInstanceSummary
summary :: Maybe SystemInstanceSummary
$sel:summary:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe SystemInstanceSummary
summary} -> Maybe SystemInstanceSummary
summary) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe SystemInstanceSummary
a -> SystemInstanceDescription
s {$sel:summary:SystemInstanceDescription' :: Maybe SystemInstanceSummary
summary = Maybe SystemInstanceSummary
a} :: SystemInstanceDescription)

-- | Undocumented member.
systemInstanceDescription_metricsConfiguration :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe MetricsConfiguration)
systemInstanceDescription_metricsConfiguration :: (Maybe MetricsConfiguration -> f (Maybe MetricsConfiguration))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_metricsConfiguration = (SystemInstanceDescription -> Maybe MetricsConfiguration)
-> (SystemInstanceDescription
    -> Maybe MetricsConfiguration -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe MetricsConfiguration)
     (Maybe MetricsConfiguration)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe MetricsConfiguration
metricsConfiguration :: Maybe MetricsConfiguration
$sel:metricsConfiguration:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe MetricsConfiguration
metricsConfiguration} -> Maybe MetricsConfiguration
metricsConfiguration) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe MetricsConfiguration
a -> SystemInstanceDescription
s {$sel:metricsConfiguration:SystemInstanceDescription' :: Maybe MetricsConfiguration
metricsConfiguration = Maybe MetricsConfiguration
a} :: SystemInstanceDescription)

-- | A list of objects that contain all of the IDs and revision numbers of
-- workflows and systems that are used in a system instance.
systemInstanceDescription_validatedDependencyRevisions :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe [DependencyRevision])
systemInstanceDescription_validatedDependencyRevisions :: (Maybe [DependencyRevision] -> f (Maybe [DependencyRevision]))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_validatedDependencyRevisions = (SystemInstanceDescription -> Maybe [DependencyRevision])
-> (SystemInstanceDescription
    -> Maybe [DependencyRevision] -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe [DependencyRevision])
     (Maybe [DependencyRevision])
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe [DependencyRevision]
validatedDependencyRevisions :: Maybe [DependencyRevision]
$sel:validatedDependencyRevisions:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe [DependencyRevision]
validatedDependencyRevisions} -> Maybe [DependencyRevision]
validatedDependencyRevisions) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe [DependencyRevision]
a -> SystemInstanceDescription
s {$sel:validatedDependencyRevisions:SystemInstanceDescription' :: Maybe [DependencyRevision]
validatedDependencyRevisions = Maybe [DependencyRevision]
a} :: SystemInstanceDescription) ((Maybe [DependencyRevision] -> f (Maybe [DependencyRevision]))
 -> SystemInstanceDescription -> f SystemInstanceDescription)
-> ((Maybe [DependencyRevision] -> f (Maybe [DependencyRevision]))
    -> Maybe [DependencyRevision] -> f (Maybe [DependencyRevision]))
-> (Maybe [DependencyRevision] -> f (Maybe [DependencyRevision]))
-> SystemInstanceDescription
-> f SystemInstanceDescription
forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. AnIso
  [DependencyRevision]
  [DependencyRevision]
  [DependencyRevision]
  [DependencyRevision]
-> Iso
     (Maybe [DependencyRevision])
     (Maybe [DependencyRevision])
     (Maybe [DependencyRevision])
     (Maybe [DependencyRevision])
forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping AnIso
  [DependencyRevision]
  [DependencyRevision]
  [DependencyRevision]
  [DependencyRevision]
forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced

-- | Undocumented member.
systemInstanceDescription_definition :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe DefinitionDocument)
systemInstanceDescription_definition :: (Maybe DefinitionDocument -> f (Maybe DefinitionDocument))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_definition = (SystemInstanceDescription -> Maybe DefinitionDocument)
-> (SystemInstanceDescription
    -> Maybe DefinitionDocument -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe DefinitionDocument)
     (Maybe DefinitionDocument)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe DefinitionDocument
definition :: Maybe DefinitionDocument
$sel:definition:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe DefinitionDocument
definition} -> Maybe DefinitionDocument
definition) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe DefinitionDocument
a -> SystemInstanceDescription
s {$sel:definition:SystemInstanceDescription' :: Maybe DefinitionDocument
definition = Maybe DefinitionDocument
a} :: SystemInstanceDescription)

-- | The version of the user\'s namespace against which the system instance
-- was validated.
systemInstanceDescription_validatedNamespaceVersion :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe Prelude.Integer)
systemInstanceDescription_validatedNamespaceVersion :: (Maybe Integer -> f (Maybe Integer))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_validatedNamespaceVersion = (SystemInstanceDescription -> Maybe Integer)
-> (SystemInstanceDescription
    -> Maybe Integer -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe Integer)
     (Maybe Integer)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe Integer
validatedNamespaceVersion :: Maybe Integer
$sel:validatedNamespaceVersion:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe Integer
validatedNamespaceVersion} -> Maybe Integer
validatedNamespaceVersion) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe Integer
a -> SystemInstanceDescription
s {$sel:validatedNamespaceVersion:SystemInstanceDescription' :: Maybe Integer
validatedNamespaceVersion = Maybe Integer
a} :: SystemInstanceDescription)

-- | The AWS Identity and Access Management (IAM) role that AWS IoT Things
-- Graph assumes during flow execution in a cloud deployment. This role
-- must have read and write permissionss to AWS Lambda and AWS IoT and to
-- any other AWS services that the flow uses.
systemInstanceDescription_flowActionsRoleArn :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe Prelude.Text)
systemInstanceDescription_flowActionsRoleArn :: (Maybe Text -> f (Maybe Text))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_flowActionsRoleArn = (SystemInstanceDescription -> Maybe Text)
-> (SystemInstanceDescription
    -> Maybe Text -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe Text
flowActionsRoleArn :: Maybe Text
$sel:flowActionsRoleArn:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe Text
flowActionsRoleArn} -> Maybe Text
flowActionsRoleArn) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe Text
a -> SystemInstanceDescription
s {$sel:flowActionsRoleArn:SystemInstanceDescription' :: Maybe Text
flowActionsRoleArn = Maybe Text
a} :: SystemInstanceDescription)

-- | The Amazon Simple Storage Service bucket where information about a
-- system instance is stored.
systemInstanceDescription_s3BucketName :: Lens.Lens' SystemInstanceDescription (Prelude.Maybe Prelude.Text)
systemInstanceDescription_s3BucketName :: (Maybe Text -> f (Maybe Text))
-> SystemInstanceDescription -> f SystemInstanceDescription
systemInstanceDescription_s3BucketName = (SystemInstanceDescription -> Maybe Text)
-> (SystemInstanceDescription
    -> Maybe Text -> SystemInstanceDescription)
-> Lens
     SystemInstanceDescription
     SystemInstanceDescription
     (Maybe Text)
     (Maybe Text)
forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SystemInstanceDescription' {Maybe Text
s3BucketName :: Maybe Text
$sel:s3BucketName:SystemInstanceDescription' :: SystemInstanceDescription -> Maybe Text
s3BucketName} -> Maybe Text
s3BucketName) (\s :: SystemInstanceDescription
s@SystemInstanceDescription' {} Maybe Text
a -> SystemInstanceDescription
s {$sel:s3BucketName:SystemInstanceDescription' :: Maybe Text
s3BucketName = Maybe Text
a} :: SystemInstanceDescription)

instance Core.FromJSON SystemInstanceDescription where
  parseJSON :: Value -> Parser SystemInstanceDescription
parseJSON =
    String
-> (Object -> Parser SystemInstanceDescription)
-> Value
-> Parser SystemInstanceDescription
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Core.withObject
      String
"SystemInstanceDescription"
      ( \Object
x ->
          Maybe SystemInstanceSummary
-> Maybe MetricsConfiguration
-> Maybe [DependencyRevision]
-> Maybe DefinitionDocument
-> Maybe Integer
-> Maybe Text
-> Maybe Text
-> SystemInstanceDescription
SystemInstanceDescription'
            (Maybe SystemInstanceSummary
 -> Maybe MetricsConfiguration
 -> Maybe [DependencyRevision]
 -> Maybe DefinitionDocument
 -> Maybe Integer
 -> Maybe Text
 -> Maybe Text
 -> SystemInstanceDescription)
-> Parser (Maybe SystemInstanceSummary)
-> Parser
     (Maybe MetricsConfiguration
      -> Maybe [DependencyRevision]
      -> Maybe DefinitionDocument
      -> Maybe Integer
      -> Maybe Text
      -> Maybe Text
      -> SystemInstanceDescription)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x Object -> Text -> Parser (Maybe SystemInstanceSummary)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"summary")
            Parser
  (Maybe MetricsConfiguration
   -> Maybe [DependencyRevision]
   -> Maybe DefinitionDocument
   -> Maybe Integer
   -> Maybe Text
   -> Maybe Text
   -> SystemInstanceDescription)
-> Parser (Maybe MetricsConfiguration)
-> Parser
     (Maybe [DependencyRevision]
      -> Maybe DefinitionDocument
      -> Maybe Integer
      -> Maybe Text
      -> Maybe Text
      -> SystemInstanceDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe MetricsConfiguration)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"metricsConfiguration")
            Parser
  (Maybe [DependencyRevision]
   -> Maybe DefinitionDocument
   -> Maybe Integer
   -> Maybe Text
   -> Maybe Text
   -> SystemInstanceDescription)
-> Parser (Maybe [DependencyRevision])
-> Parser
     (Maybe DefinitionDocument
      -> Maybe Integer
      -> Maybe Text
      -> Maybe Text
      -> SystemInstanceDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> ( Object
x Object -> Text -> Parser (Maybe (Maybe [DependencyRevision]))
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"validatedDependencyRevisions"
                            Parser (Maybe (Maybe [DependencyRevision]))
-> Maybe [DependencyRevision]
-> Parser (Maybe [DependencyRevision])
forall a. Parser (Maybe a) -> a -> Parser a
Core..!= Maybe [DependencyRevision]
forall a. Monoid a => a
Prelude.mempty
                        )
            Parser
  (Maybe DefinitionDocument
   -> Maybe Integer
   -> Maybe Text
   -> Maybe Text
   -> SystemInstanceDescription)
-> Parser (Maybe DefinitionDocument)
-> Parser
     (Maybe Integer
      -> Maybe Text -> Maybe Text -> SystemInstanceDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe DefinitionDocument)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"definition")
            Parser
  (Maybe Integer
   -> Maybe Text -> Maybe Text -> SystemInstanceDescription)
-> Parser (Maybe Integer)
-> Parser (Maybe Text -> Maybe Text -> SystemInstanceDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Integer)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"validatedNamespaceVersion")
            Parser (Maybe Text -> Maybe Text -> SystemInstanceDescription)
-> Parser (Maybe Text)
-> Parser (Maybe Text -> SystemInstanceDescription)
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"flowActionsRoleArn")
            Parser (Maybe Text -> SystemInstanceDescription)
-> Parser (Maybe Text) -> Parser SystemInstanceDescription
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x Object -> Text -> Parser (Maybe Text)
forall a. FromJSON a => Object -> Text -> Parser (Maybe a)
Core..:? Text
"s3BucketName")
      )

instance Prelude.Hashable SystemInstanceDescription

instance Prelude.NFData SystemInstanceDescription