{-# 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.SimSpaceWeaver.Types.SimulationAppMetadata
-- Copyright   : (c) 2013-2023 Brendan Hay
-- License     : Mozilla Public License, v. 2.0.
-- Maintainer  : Brendan Hay
-- Stability   : auto-generated
-- Portability : non-portable (GHC extensions)
module Amazonka.SimSpaceWeaver.Types.SimulationAppMetadata 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 Amazonka.SimSpaceWeaver.Types.SimulationAppStatus
import Amazonka.SimSpaceWeaver.Types.SimulationAppTargetStatus

-- | A collection of metadata about an app.
--
-- /See:/ 'newSimulationAppMetadata' smart constructor.
data SimulationAppMetadata = SimulationAppMetadata'
  { -- | The domain of the app. For more information about domains, see
    -- <https://docs.aws.amazon.com/simspaceweaver/latest/userguide/what-is_key-concepts.html Key concepts>
    -- in the /Amazon Web Services SimSpace Weaver User Guide/.
    SimulationAppMetadata -> Maybe Text
domain :: Prelude.Maybe Prelude.Text,
    -- | The name of the app.
    SimulationAppMetadata -> Maybe Text
name :: Prelude.Maybe Prelude.Text,
    -- | The name of the simulation of the app.
    SimulationAppMetadata -> Maybe Text
simulation :: Prelude.Maybe Prelude.Text,
    -- | The current status of the app.
    SimulationAppMetadata -> Maybe SimulationAppStatus
status :: Prelude.Maybe SimulationAppStatus,
    -- | The desired status of the app.
    SimulationAppMetadata -> Maybe SimulationAppTargetStatus
targetStatus :: Prelude.Maybe SimulationAppTargetStatus
  }
  deriving (SimulationAppMetadata -> SimulationAppMetadata -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
$c/= :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
== :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
$c== :: SimulationAppMetadata -> SimulationAppMetadata -> Bool
Prelude.Eq, ReadPrec [SimulationAppMetadata]
ReadPrec SimulationAppMetadata
Int -> ReadS SimulationAppMetadata
ReadS [SimulationAppMetadata]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [SimulationAppMetadata]
$creadListPrec :: ReadPrec [SimulationAppMetadata]
readPrec :: ReadPrec SimulationAppMetadata
$creadPrec :: ReadPrec SimulationAppMetadata
readList :: ReadS [SimulationAppMetadata]
$creadList :: ReadS [SimulationAppMetadata]
readsPrec :: Int -> ReadS SimulationAppMetadata
$creadsPrec :: Int -> ReadS SimulationAppMetadata
Prelude.Read, Int -> SimulationAppMetadata -> ShowS
[SimulationAppMetadata] -> ShowS
SimulationAppMetadata -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [SimulationAppMetadata] -> ShowS
$cshowList :: [SimulationAppMetadata] -> ShowS
show :: SimulationAppMetadata -> String
$cshow :: SimulationAppMetadata -> String
showsPrec :: Int -> SimulationAppMetadata -> ShowS
$cshowsPrec :: Int -> SimulationAppMetadata -> ShowS
Prelude.Show, forall x. Rep SimulationAppMetadata x -> SimulationAppMetadata
forall x. SimulationAppMetadata -> Rep SimulationAppMetadata x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep SimulationAppMetadata x -> SimulationAppMetadata
$cfrom :: forall x. SimulationAppMetadata -> Rep SimulationAppMetadata x
Prelude.Generic)

-- |
-- Create a value of 'SimulationAppMetadata' 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:
--
-- 'domain', 'simulationAppMetadata_domain' - The domain of the app. For more information about domains, see
-- <https://docs.aws.amazon.com/simspaceweaver/latest/userguide/what-is_key-concepts.html Key concepts>
-- in the /Amazon Web Services SimSpace Weaver User Guide/.
--
-- 'name', 'simulationAppMetadata_name' - The name of the app.
--
-- 'simulation', 'simulationAppMetadata_simulation' - The name of the simulation of the app.
--
-- 'status', 'simulationAppMetadata_status' - The current status of the app.
--
-- 'targetStatus', 'simulationAppMetadata_targetStatus' - The desired status of the app.
newSimulationAppMetadata ::
  SimulationAppMetadata
newSimulationAppMetadata :: SimulationAppMetadata
newSimulationAppMetadata =
  SimulationAppMetadata'
    { $sel:domain:SimulationAppMetadata' :: Maybe Text
domain = forall a. Maybe a
Prelude.Nothing,
      $sel:name:SimulationAppMetadata' :: Maybe Text
name = forall a. Maybe a
Prelude.Nothing,
      $sel:simulation:SimulationAppMetadata' :: Maybe Text
simulation = forall a. Maybe a
Prelude.Nothing,
      $sel:status:SimulationAppMetadata' :: Maybe SimulationAppStatus
status = forall a. Maybe a
Prelude.Nothing,
      $sel:targetStatus:SimulationAppMetadata' :: Maybe SimulationAppTargetStatus
targetStatus = forall a. Maybe a
Prelude.Nothing
    }

-- | The domain of the app. For more information about domains, see
-- <https://docs.aws.amazon.com/simspaceweaver/latest/userguide/what-is_key-concepts.html Key concepts>
-- in the /Amazon Web Services SimSpace Weaver User Guide/.
simulationAppMetadata_domain :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_domain :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_domain = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
domain :: Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
domain} -> Maybe Text
domain) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:domain:SimulationAppMetadata' :: Maybe Text
domain = Maybe Text
a} :: SimulationAppMetadata)

-- | The name of the app.
simulationAppMetadata_name :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_name :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
name :: Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
name} -> Maybe Text
name) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:name:SimulationAppMetadata' :: Maybe Text
name = Maybe Text
a} :: SimulationAppMetadata)

-- | The name of the simulation of the app.
simulationAppMetadata_simulation :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe Prelude.Text)
simulationAppMetadata_simulation :: Lens' SimulationAppMetadata (Maybe Text)
simulationAppMetadata_simulation = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe Text
simulation :: Maybe Text
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
simulation} -> Maybe Text
simulation) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe Text
a -> SimulationAppMetadata
s {$sel:simulation:SimulationAppMetadata' :: Maybe Text
simulation = Maybe Text
a} :: SimulationAppMetadata)

-- | The current status of the app.
simulationAppMetadata_status :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe SimulationAppStatus)
simulationAppMetadata_status :: Lens' SimulationAppMetadata (Maybe SimulationAppStatus)
simulationAppMetadata_status = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe SimulationAppStatus
status :: Maybe SimulationAppStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
status} -> Maybe SimulationAppStatus
status) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe SimulationAppStatus
a -> SimulationAppMetadata
s {$sel:status:SimulationAppMetadata' :: Maybe SimulationAppStatus
status = Maybe SimulationAppStatus
a} :: SimulationAppMetadata)

-- | The desired status of the app.
simulationAppMetadata_targetStatus :: Lens.Lens' SimulationAppMetadata (Prelude.Maybe SimulationAppTargetStatus)
simulationAppMetadata_targetStatus :: Lens' SimulationAppMetadata (Maybe SimulationAppTargetStatus)
simulationAppMetadata_targetStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\SimulationAppMetadata' {Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
targetStatus} -> Maybe SimulationAppTargetStatus
targetStatus) (\s :: SimulationAppMetadata
s@SimulationAppMetadata' {} Maybe SimulationAppTargetStatus
a -> SimulationAppMetadata
s {$sel:targetStatus:SimulationAppMetadata' :: Maybe SimulationAppTargetStatus
targetStatus = Maybe SimulationAppTargetStatus
a} :: SimulationAppMetadata)

instance Data.FromJSON SimulationAppMetadata where
  parseJSON :: Value -> Parser SimulationAppMetadata
parseJSON =
    forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
      String
"SimulationAppMetadata"
      ( \Object
x ->
          Maybe Text
-> Maybe Text
-> Maybe Text
-> Maybe SimulationAppStatus
-> Maybe SimulationAppTargetStatus
-> SimulationAppMetadata
SimulationAppMetadata'
            forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Domain")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Name")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Simulation")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"Status")
            forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser (Maybe a)
Data..:? Key
"TargetStatus")
      )

instance Prelude.Hashable SimulationAppMetadata where
  hashWithSalt :: Int -> SimulationAppMetadata -> Int
hashWithSalt Int
_salt SimulationAppMetadata' {Maybe Text
Maybe SimulationAppStatus
Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
status :: Maybe SimulationAppStatus
simulation :: Maybe Text
name :: Maybe Text
domain :: Maybe Text
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
..} =
    Int
_salt
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
domain
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
name
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
simulation
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SimulationAppStatus
status
      forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe SimulationAppTargetStatus
targetStatus

instance Prelude.NFData SimulationAppMetadata where
  rnf :: SimulationAppMetadata -> ()
rnf SimulationAppMetadata' {Maybe Text
Maybe SimulationAppStatus
Maybe SimulationAppTargetStatus
targetStatus :: Maybe SimulationAppTargetStatus
status :: Maybe SimulationAppStatus
simulation :: Maybe Text
name :: Maybe Text
domain :: Maybe Text
$sel:targetStatus:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppTargetStatus
$sel:status:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe SimulationAppStatus
$sel:simulation:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:name:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
$sel:domain:SimulationAppMetadata' :: SimulationAppMetadata -> Maybe Text
..} =
    forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
domain
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
name
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
simulation
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SimulationAppStatus
status
      seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe SimulationAppTargetStatus
targetStatus