{-# 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 #-}
module Amazonka.Nimble.Types.StudioComponent where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import Amazonka.Nimble.Types.ScriptParameterKeyValue
import Amazonka.Nimble.Types.StudioComponentConfiguration
import Amazonka.Nimble.Types.StudioComponentInitializationScript
import Amazonka.Nimble.Types.StudioComponentState
import Amazonka.Nimble.Types.StudioComponentStatusCode
import Amazonka.Nimble.Types.StudioComponentSubtype
import Amazonka.Nimble.Types.StudioComponentType
import qualified Amazonka.Prelude as Prelude
data StudioComponent = StudioComponent'
{
StudioComponent -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe StudioComponentConfiguration
configuration :: Prelude.Maybe StudioComponentConfiguration,
StudioComponent -> Maybe ISO8601
createdAt :: Prelude.Maybe Data.ISO8601,
StudioComponent -> Maybe Text
createdBy :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe (Sensitive Text)
description :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StudioComponent -> Maybe [Text]
ec2SecurityGroupIds :: Prelude.Maybe [Prelude.Text],
StudioComponent -> Maybe [StudioComponentInitializationScript]
initializationScripts :: Prelude.Maybe [StudioComponentInitializationScript],
StudioComponent -> Maybe (Sensitive Text)
name :: Prelude.Maybe (Data.Sensitive Prelude.Text),
StudioComponent -> Maybe Text
runtimeRoleArn :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters :: Prelude.Maybe (Data.Sensitive [ScriptParameterKeyValue]),
StudioComponent -> Maybe Text
secureInitializationRoleArn :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe StudioComponentState
state :: Prelude.Maybe StudioComponentState,
StudioComponent -> Maybe StudioComponentStatusCode
statusCode :: Prelude.Maybe StudioComponentStatusCode,
StudioComponent -> Maybe Text
statusMessage :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe Text
studioComponentId :: Prelude.Maybe Prelude.Text,
StudioComponent -> Maybe StudioComponentSubtype
subtype :: Prelude.Maybe StudioComponentSubtype,
StudioComponent -> Maybe (HashMap Text Text)
tags :: Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text),
StudioComponent -> Maybe StudioComponentType
type' :: Prelude.Maybe StudioComponentType,
StudioComponent -> Maybe ISO8601
updatedAt :: Prelude.Maybe Data.ISO8601,
StudioComponent -> Maybe Text
updatedBy :: Prelude.Maybe Prelude.Text
}
deriving (StudioComponent -> StudioComponent -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: StudioComponent -> StudioComponent -> Bool
$c/= :: StudioComponent -> StudioComponent -> Bool
== :: StudioComponent -> StudioComponent -> Bool
$c== :: StudioComponent -> StudioComponent -> Bool
Prelude.Eq, Int -> StudioComponent -> ShowS
[StudioComponent] -> ShowS
StudioComponent -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [StudioComponent] -> ShowS
$cshowList :: [StudioComponent] -> ShowS
show :: StudioComponent -> String
$cshow :: StudioComponent -> String
showsPrec :: Int -> StudioComponent -> ShowS
$cshowsPrec :: Int -> StudioComponent -> ShowS
Prelude.Show, forall x. Rep StudioComponent x -> StudioComponent
forall x. StudioComponent -> Rep StudioComponent x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep StudioComponent x -> StudioComponent
$cfrom :: forall x. StudioComponent -> Rep StudioComponent x
Prelude.Generic)
newStudioComponent ::
StudioComponent
newStudioComponent :: StudioComponent
newStudioComponent =
StudioComponent'
{ $sel:arn:StudioComponent' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:configuration:StudioComponent' :: Maybe StudioComponentConfiguration
configuration = forall a. Maybe a
Prelude.Nothing,
$sel:createdAt:StudioComponent' :: Maybe ISO8601
createdAt = forall a. Maybe a
Prelude.Nothing,
$sel:createdBy:StudioComponent' :: Maybe Text
createdBy = forall a. Maybe a
Prelude.Nothing,
$sel:description:StudioComponent' :: Maybe (Sensitive Text)
description = forall a. Maybe a
Prelude.Nothing,
$sel:ec2SecurityGroupIds:StudioComponent' :: Maybe [Text]
ec2SecurityGroupIds = forall a. Maybe a
Prelude.Nothing,
$sel:initializationScripts:StudioComponent' :: Maybe [StudioComponentInitializationScript]
initializationScripts = forall a. Maybe a
Prelude.Nothing,
$sel:name:StudioComponent' :: Maybe (Sensitive Text)
name = forall a. Maybe a
Prelude.Nothing,
$sel:runtimeRoleArn:StudioComponent' :: Maybe Text
runtimeRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:scriptParameters:StudioComponent' :: Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters = forall a. Maybe a
Prelude.Nothing,
$sel:secureInitializationRoleArn:StudioComponent' :: Maybe Text
secureInitializationRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:state:StudioComponent' :: Maybe StudioComponentState
state = forall a. Maybe a
Prelude.Nothing,
$sel:statusCode:StudioComponent' :: Maybe StudioComponentStatusCode
statusCode = forall a. Maybe a
Prelude.Nothing,
$sel:statusMessage:StudioComponent' :: Maybe Text
statusMessage = forall a. Maybe a
Prelude.Nothing,
$sel:studioComponentId:StudioComponent' :: Maybe Text
studioComponentId = forall a. Maybe a
Prelude.Nothing,
$sel:subtype:StudioComponent' :: Maybe StudioComponentSubtype
subtype = forall a. Maybe a
Prelude.Nothing,
$sel:tags:StudioComponent' :: Maybe (HashMap Text Text)
tags = forall a. Maybe a
Prelude.Nothing,
$sel:type':StudioComponent' :: Maybe StudioComponentType
type' = forall a. Maybe a
Prelude.Nothing,
$sel:updatedAt:StudioComponent' :: Maybe ISO8601
updatedAt = forall a. Maybe a
Prelude.Nothing,
$sel:updatedBy:StudioComponent' :: Maybe Text
updatedBy = forall a. Maybe a
Prelude.Nothing
}
studioComponent_arn :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_arn :: Lens' StudioComponent (Maybe Text)
studioComponent_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
arn :: Maybe Text
$sel:arn:StudioComponent' :: StudioComponent -> Maybe Text
arn} -> Maybe Text
arn) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:arn:StudioComponent' :: Maybe Text
arn = Maybe Text
a} :: StudioComponent)
studioComponent_configuration :: Lens.Lens' StudioComponent (Prelude.Maybe StudioComponentConfiguration)
studioComponent_configuration :: Lens' StudioComponent (Maybe StudioComponentConfiguration)
studioComponent_configuration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe StudioComponentConfiguration
configuration :: Maybe StudioComponentConfiguration
$sel:configuration:StudioComponent' :: StudioComponent -> Maybe StudioComponentConfiguration
configuration} -> Maybe StudioComponentConfiguration
configuration) (\s :: StudioComponent
s@StudioComponent' {} Maybe StudioComponentConfiguration
a -> StudioComponent
s {$sel:configuration:StudioComponent' :: Maybe StudioComponentConfiguration
configuration = Maybe StudioComponentConfiguration
a} :: StudioComponent)
studioComponent_createdAt :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.UTCTime)
studioComponent_createdAt :: Lens' StudioComponent (Maybe UTCTime)
studioComponent_createdAt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe ISO8601
createdAt :: Maybe ISO8601
$sel:createdAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
createdAt} -> Maybe ISO8601
createdAt) (\s :: StudioComponent
s@StudioComponent' {} Maybe ISO8601
a -> StudioComponent
s {$sel:createdAt:StudioComponent' :: Maybe ISO8601
createdAt = Maybe ISO8601
a} :: StudioComponent) 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
studioComponent_createdBy :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_createdBy :: Lens' StudioComponent (Maybe Text)
studioComponent_createdBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
createdBy :: Maybe Text
$sel:createdBy:StudioComponent' :: StudioComponent -> Maybe Text
createdBy} -> Maybe Text
createdBy) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:createdBy:StudioComponent' :: Maybe Text
createdBy = Maybe Text
a} :: StudioComponent)
studioComponent_description :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_description :: Lens' StudioComponent (Maybe Text)
studioComponent_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe (Sensitive Text)
description :: Maybe (Sensitive Text)
$sel:description:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
description} -> Maybe (Sensitive Text)
description) (\s :: StudioComponent
s@StudioComponent' {} Maybe (Sensitive Text)
a -> StudioComponent
s {$sel:description:StudioComponent' :: Maybe (Sensitive Text)
description = Maybe (Sensitive Text)
a} :: StudioComponent) 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. Iso' (Sensitive a) a
Data._Sensitive
studioComponent_ec2SecurityGroupIds :: Lens.Lens' StudioComponent (Prelude.Maybe [Prelude.Text])
studioComponent_ec2SecurityGroupIds :: Lens' StudioComponent (Maybe [Text])
studioComponent_ec2SecurityGroupIds = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe [Text]
ec2SecurityGroupIds :: Maybe [Text]
$sel:ec2SecurityGroupIds:StudioComponent' :: StudioComponent -> Maybe [Text]
ec2SecurityGroupIds} -> Maybe [Text]
ec2SecurityGroupIds) (\s :: StudioComponent
s@StudioComponent' {} Maybe [Text]
a -> StudioComponent
s {$sel:ec2SecurityGroupIds:StudioComponent' :: Maybe [Text]
ec2SecurityGroupIds = Maybe [Text]
a} :: StudioComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
studioComponent_initializationScripts :: Lens.Lens' StudioComponent (Prelude.Maybe [StudioComponentInitializationScript])
studioComponent_initializationScripts :: Lens' StudioComponent (Maybe [StudioComponentInitializationScript])
studioComponent_initializationScripts = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe [StudioComponentInitializationScript]
initializationScripts :: Maybe [StudioComponentInitializationScript]
$sel:initializationScripts:StudioComponent' :: StudioComponent -> Maybe [StudioComponentInitializationScript]
initializationScripts} -> Maybe [StudioComponentInitializationScript]
initializationScripts) (\s :: StudioComponent
s@StudioComponent' {} Maybe [StudioComponentInitializationScript]
a -> StudioComponent
s {$sel:initializationScripts:StudioComponent' :: Maybe [StudioComponentInitializationScript]
initializationScripts = Maybe [StudioComponentInitializationScript]
a} :: StudioComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
studioComponent_name :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_name :: Lens' StudioComponent (Maybe Text)
studioComponent_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe (Sensitive Text)
name :: Maybe (Sensitive Text)
$sel:name:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
name} -> Maybe (Sensitive Text)
name) (\s :: StudioComponent
s@StudioComponent' {} Maybe (Sensitive Text)
a -> StudioComponent
s {$sel:name:StudioComponent' :: Maybe (Sensitive Text)
name = Maybe (Sensitive Text)
a} :: StudioComponent) 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. Iso' (Sensitive a) a
Data._Sensitive
studioComponent_runtimeRoleArn :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_runtimeRoleArn :: Lens' StudioComponent (Maybe Text)
studioComponent_runtimeRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
runtimeRoleArn :: Maybe Text
$sel:runtimeRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
runtimeRoleArn} -> Maybe Text
runtimeRoleArn) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:runtimeRoleArn:StudioComponent' :: Maybe Text
runtimeRoleArn = Maybe Text
a} :: StudioComponent)
studioComponent_scriptParameters :: Lens.Lens' StudioComponent (Prelude.Maybe [ScriptParameterKeyValue])
studioComponent_scriptParameters :: Lens' StudioComponent (Maybe [ScriptParameterKeyValue])
studioComponent_scriptParameters = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters :: Maybe (Sensitive [ScriptParameterKeyValue])
$sel:scriptParameters:StudioComponent' :: StudioComponent -> Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters} -> Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters) (\s :: StudioComponent
s@StudioComponent' {} Maybe (Sensitive [ScriptParameterKeyValue])
a -> StudioComponent
s {$sel:scriptParameters:StudioComponent' :: Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters = Maybe (Sensitive [ScriptParameterKeyValue])
a} :: StudioComponent) 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. Iso' (Sensitive a) a
Data._Sensitive 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)
studioComponent_secureInitializationRoleArn :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_secureInitializationRoleArn :: Lens' StudioComponent (Maybe Text)
studioComponent_secureInitializationRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
secureInitializationRoleArn :: Maybe Text
$sel:secureInitializationRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
secureInitializationRoleArn} -> Maybe Text
secureInitializationRoleArn) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:secureInitializationRoleArn:StudioComponent' :: Maybe Text
secureInitializationRoleArn = Maybe Text
a} :: StudioComponent)
studioComponent_state :: Lens.Lens' StudioComponent (Prelude.Maybe StudioComponentState)
studioComponent_state :: Lens' StudioComponent (Maybe StudioComponentState)
studioComponent_state = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe StudioComponentState
state :: Maybe StudioComponentState
$sel:state:StudioComponent' :: StudioComponent -> Maybe StudioComponentState
state} -> Maybe StudioComponentState
state) (\s :: StudioComponent
s@StudioComponent' {} Maybe StudioComponentState
a -> StudioComponent
s {$sel:state:StudioComponent' :: Maybe StudioComponentState
state = Maybe StudioComponentState
a} :: StudioComponent)
studioComponent_statusCode :: Lens.Lens' StudioComponent (Prelude.Maybe StudioComponentStatusCode)
studioComponent_statusCode :: Lens' StudioComponent (Maybe StudioComponentStatusCode)
studioComponent_statusCode = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe StudioComponentStatusCode
statusCode :: Maybe StudioComponentStatusCode
$sel:statusCode:StudioComponent' :: StudioComponent -> Maybe StudioComponentStatusCode
statusCode} -> Maybe StudioComponentStatusCode
statusCode) (\s :: StudioComponent
s@StudioComponent' {} Maybe StudioComponentStatusCode
a -> StudioComponent
s {$sel:statusCode:StudioComponent' :: Maybe StudioComponentStatusCode
statusCode = Maybe StudioComponentStatusCode
a} :: StudioComponent)
studioComponent_statusMessage :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_statusMessage :: Lens' StudioComponent (Maybe Text)
studioComponent_statusMessage = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
statusMessage :: Maybe Text
$sel:statusMessage:StudioComponent' :: StudioComponent -> Maybe Text
statusMessage} -> Maybe Text
statusMessage) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:statusMessage:StudioComponent' :: Maybe Text
statusMessage = Maybe Text
a} :: StudioComponent)
studioComponent_studioComponentId :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_studioComponentId :: Lens' StudioComponent (Maybe Text)
studioComponent_studioComponentId = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
studioComponentId :: Maybe Text
$sel:studioComponentId:StudioComponent' :: StudioComponent -> Maybe Text
studioComponentId} -> Maybe Text
studioComponentId) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:studioComponentId:StudioComponent' :: Maybe Text
studioComponentId = Maybe Text
a} :: StudioComponent)
studioComponent_subtype :: Lens.Lens' StudioComponent (Prelude.Maybe StudioComponentSubtype)
studioComponent_subtype :: Lens' StudioComponent (Maybe StudioComponentSubtype)
studioComponent_subtype = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe StudioComponentSubtype
subtype :: Maybe StudioComponentSubtype
$sel:subtype:StudioComponent' :: StudioComponent -> Maybe StudioComponentSubtype
subtype} -> Maybe StudioComponentSubtype
subtype) (\s :: StudioComponent
s@StudioComponent' {} Maybe StudioComponentSubtype
a -> StudioComponent
s {$sel:subtype:StudioComponent' :: Maybe StudioComponentSubtype
subtype = Maybe StudioComponentSubtype
a} :: StudioComponent)
studioComponent_tags :: Lens.Lens' StudioComponent (Prelude.Maybe (Prelude.HashMap Prelude.Text Prelude.Text))
studioComponent_tags :: Lens' StudioComponent (Maybe (HashMap Text Text))
studioComponent_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe (HashMap Text Text)
tags :: Maybe (HashMap Text Text)
$sel:tags:StudioComponent' :: StudioComponent -> Maybe (HashMap Text Text)
tags} -> Maybe (HashMap Text Text)
tags) (\s :: StudioComponent
s@StudioComponent' {} Maybe (HashMap Text Text)
a -> StudioComponent
s {$sel:tags:StudioComponent' :: Maybe (HashMap Text Text)
tags = Maybe (HashMap Text Text)
a} :: StudioComponent) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
studioComponent_type :: Lens.Lens' StudioComponent (Prelude.Maybe StudioComponentType)
studioComponent_type :: Lens' StudioComponent (Maybe StudioComponentType)
studioComponent_type = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe StudioComponentType
type' :: Maybe StudioComponentType
$sel:type':StudioComponent' :: StudioComponent -> Maybe StudioComponentType
type'} -> Maybe StudioComponentType
type') (\s :: StudioComponent
s@StudioComponent' {} Maybe StudioComponentType
a -> StudioComponent
s {$sel:type':StudioComponent' :: Maybe StudioComponentType
type' = Maybe StudioComponentType
a} :: StudioComponent)
studioComponent_updatedAt :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.UTCTime)
studioComponent_updatedAt :: Lens' StudioComponent (Maybe UTCTime)
studioComponent_updatedAt = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe ISO8601
updatedAt :: Maybe ISO8601
$sel:updatedAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
updatedAt} -> Maybe ISO8601
updatedAt) (\s :: StudioComponent
s@StudioComponent' {} Maybe ISO8601
a -> StudioComponent
s {$sel:updatedAt:StudioComponent' :: Maybe ISO8601
updatedAt = Maybe ISO8601
a} :: StudioComponent) 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
studioComponent_updatedBy :: Lens.Lens' StudioComponent (Prelude.Maybe Prelude.Text)
studioComponent_updatedBy :: Lens' StudioComponent (Maybe Text)
studioComponent_updatedBy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\StudioComponent' {Maybe Text
updatedBy :: Maybe Text
$sel:updatedBy:StudioComponent' :: StudioComponent -> Maybe Text
updatedBy} -> Maybe Text
updatedBy) (\s :: StudioComponent
s@StudioComponent' {} Maybe Text
a -> StudioComponent
s {$sel:updatedBy:StudioComponent' :: Maybe Text
updatedBy = Maybe Text
a} :: StudioComponent)
instance Data.FromJSON StudioComponent where
parseJSON :: Value -> Parser StudioComponent
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"StudioComponent"
( \Object
x ->
Maybe Text
-> Maybe StudioComponentConfiguration
-> Maybe ISO8601
-> Maybe Text
-> Maybe (Sensitive Text)
-> Maybe [Text]
-> Maybe [StudioComponentInitializationScript]
-> Maybe (Sensitive Text)
-> Maybe Text
-> Maybe (Sensitive [ScriptParameterKeyValue])
-> Maybe Text
-> Maybe StudioComponentState
-> Maybe StudioComponentStatusCode
-> Maybe Text
-> Maybe Text
-> Maybe StudioComponentSubtype
-> Maybe (HashMap Text Text)
-> Maybe StudioComponentType
-> Maybe ISO8601
-> Maybe Text
-> StudioComponent
StudioComponent'
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
"arn")
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
"configuration")
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
"createdAt")
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
"createdBy")
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
"description")
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
"ec2SecurityGroupIds"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> Parser (Maybe a)
Data..:? Key
"initializationScripts"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> 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
"runtimeRoleArn")
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
"scriptParameters"
forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> Parser (Maybe a)
Data..:? Key
"secureInitializationRoleArn")
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
"state")
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
"statusCode")
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
"statusMessage")
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
"studioComponentId")
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
"subtype")
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
"tags" forall a. Parser (Maybe a) -> a -> Parser a
Data..!= 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 -> Parser (Maybe a)
Data..:? Key
"type")
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
"updatedAt")
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
"updatedBy")
)
instance Prelude.Hashable StudioComponent where
hashWithSalt :: Int -> StudioComponent -> Int
hashWithSalt Int
_salt StudioComponent' {Maybe [Text]
Maybe [StudioComponentInitializationScript]
Maybe Text
Maybe (HashMap Text Text)
Maybe (Sensitive [ScriptParameterKeyValue])
Maybe (Sensitive Text)
Maybe ISO8601
Maybe StudioComponentConfiguration
Maybe StudioComponentState
Maybe StudioComponentStatusCode
Maybe StudioComponentSubtype
Maybe StudioComponentType
updatedBy :: Maybe Text
updatedAt :: Maybe ISO8601
type' :: Maybe StudioComponentType
tags :: Maybe (HashMap Text Text)
subtype :: Maybe StudioComponentSubtype
studioComponentId :: Maybe Text
statusMessage :: Maybe Text
statusCode :: Maybe StudioComponentStatusCode
state :: Maybe StudioComponentState
secureInitializationRoleArn :: Maybe Text
scriptParameters :: Maybe (Sensitive [ScriptParameterKeyValue])
runtimeRoleArn :: Maybe Text
name :: Maybe (Sensitive Text)
initializationScripts :: Maybe [StudioComponentInitializationScript]
ec2SecurityGroupIds :: Maybe [Text]
description :: Maybe (Sensitive Text)
createdBy :: Maybe Text
createdAt :: Maybe ISO8601
configuration :: Maybe StudioComponentConfiguration
arn :: Maybe Text
$sel:updatedBy:StudioComponent' :: StudioComponent -> Maybe Text
$sel:updatedAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
$sel:type':StudioComponent' :: StudioComponent -> Maybe StudioComponentType
$sel:tags:StudioComponent' :: StudioComponent -> Maybe (HashMap Text Text)
$sel:subtype:StudioComponent' :: StudioComponent -> Maybe StudioComponentSubtype
$sel:studioComponentId:StudioComponent' :: StudioComponent -> Maybe Text
$sel:statusMessage:StudioComponent' :: StudioComponent -> Maybe Text
$sel:statusCode:StudioComponent' :: StudioComponent -> Maybe StudioComponentStatusCode
$sel:state:StudioComponent' :: StudioComponent -> Maybe StudioComponentState
$sel:secureInitializationRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
$sel:scriptParameters:StudioComponent' :: StudioComponent -> Maybe (Sensitive [ScriptParameterKeyValue])
$sel:runtimeRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
$sel:name:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
$sel:initializationScripts:StudioComponent' :: StudioComponent -> Maybe [StudioComponentInitializationScript]
$sel:ec2SecurityGroupIds:StudioComponent' :: StudioComponent -> Maybe [Text]
$sel:description:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
$sel:createdBy:StudioComponent' :: StudioComponent -> Maybe Text
$sel:createdAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
$sel:configuration:StudioComponent' :: StudioComponent -> Maybe StudioComponentConfiguration
$sel:arn:StudioComponent' :: StudioComponent -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
arn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe StudioComponentConfiguration
configuration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
createdAt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
createdBy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
ec2SecurityGroupIds
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [StudioComponentInitializationScript]
initializationScripts
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive Text)
name
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
runtimeRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
secureInitializationRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe StudioComponentState
state
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe StudioComponentStatusCode
statusCode
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
statusMessage
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
studioComponentId
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe StudioComponentSubtype
subtype
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (HashMap Text Text)
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe StudioComponentType
type'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ISO8601
updatedAt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
updatedBy
instance Prelude.NFData StudioComponent where
rnf :: StudioComponent -> ()
rnf StudioComponent' {Maybe [Text]
Maybe [StudioComponentInitializationScript]
Maybe Text
Maybe (HashMap Text Text)
Maybe (Sensitive [ScriptParameterKeyValue])
Maybe (Sensitive Text)
Maybe ISO8601
Maybe StudioComponentConfiguration
Maybe StudioComponentState
Maybe StudioComponentStatusCode
Maybe StudioComponentSubtype
Maybe StudioComponentType
updatedBy :: Maybe Text
updatedAt :: Maybe ISO8601
type' :: Maybe StudioComponentType
tags :: Maybe (HashMap Text Text)
subtype :: Maybe StudioComponentSubtype
studioComponentId :: Maybe Text
statusMessage :: Maybe Text
statusCode :: Maybe StudioComponentStatusCode
state :: Maybe StudioComponentState
secureInitializationRoleArn :: Maybe Text
scriptParameters :: Maybe (Sensitive [ScriptParameterKeyValue])
runtimeRoleArn :: Maybe Text
name :: Maybe (Sensitive Text)
initializationScripts :: Maybe [StudioComponentInitializationScript]
ec2SecurityGroupIds :: Maybe [Text]
description :: Maybe (Sensitive Text)
createdBy :: Maybe Text
createdAt :: Maybe ISO8601
configuration :: Maybe StudioComponentConfiguration
arn :: Maybe Text
$sel:updatedBy:StudioComponent' :: StudioComponent -> Maybe Text
$sel:updatedAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
$sel:type':StudioComponent' :: StudioComponent -> Maybe StudioComponentType
$sel:tags:StudioComponent' :: StudioComponent -> Maybe (HashMap Text Text)
$sel:subtype:StudioComponent' :: StudioComponent -> Maybe StudioComponentSubtype
$sel:studioComponentId:StudioComponent' :: StudioComponent -> Maybe Text
$sel:statusMessage:StudioComponent' :: StudioComponent -> Maybe Text
$sel:statusCode:StudioComponent' :: StudioComponent -> Maybe StudioComponentStatusCode
$sel:state:StudioComponent' :: StudioComponent -> Maybe StudioComponentState
$sel:secureInitializationRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
$sel:scriptParameters:StudioComponent' :: StudioComponent -> Maybe (Sensitive [ScriptParameterKeyValue])
$sel:runtimeRoleArn:StudioComponent' :: StudioComponent -> Maybe Text
$sel:name:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
$sel:initializationScripts:StudioComponent' :: StudioComponent -> Maybe [StudioComponentInitializationScript]
$sel:ec2SecurityGroupIds:StudioComponent' :: StudioComponent -> Maybe [Text]
$sel:description:StudioComponent' :: StudioComponent -> Maybe (Sensitive Text)
$sel:createdBy:StudioComponent' :: StudioComponent -> Maybe Text
$sel:createdAt:StudioComponent' :: StudioComponent -> Maybe ISO8601
$sel:configuration:StudioComponent' :: StudioComponent -> Maybe StudioComponentConfiguration
$sel:arn:StudioComponent' :: StudioComponent -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
arn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StudioComponentConfiguration
configuration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
createdAt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
createdBy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
ec2SecurityGroupIds
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [StudioComponentInitializationScript]
initializationScripts
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive Text)
name
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
runtimeRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (Sensitive [ScriptParameterKeyValue])
scriptParameters
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
secureInitializationRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StudioComponentState
state
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StudioComponentStatusCode
statusCode
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
statusMessage
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
studioComponentId
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StudioComponentSubtype
subtype
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (HashMap Text Text)
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe StudioComponentType
type'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ISO8601
updatedAt
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
updatedBy