{-# 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.AppStream.Types.ImageBuilder where
import Amazonka.AppStream.Types.AccessEndpoint
import Amazonka.AppStream.Types.DomainJoinInfo
import Amazonka.AppStream.Types.ImageBuilderState
import Amazonka.AppStream.Types.ImageBuilderStateChangeReason
import Amazonka.AppStream.Types.NetworkAccessConfiguration
import Amazonka.AppStream.Types.PlatformType
import Amazonka.AppStream.Types.ResourceError
import Amazonka.AppStream.Types.VpcConfig
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
data ImageBuilder = ImageBuilder'
{
ImageBuilder -> Maybe (NonEmpty AccessEndpoint)
accessEndpoints :: Prelude.Maybe (Prelude.NonEmpty AccessEndpoint),
ImageBuilder -> Maybe Text
appstreamAgentVersion :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe Text
arn :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe POSIX
createdTime :: Prelude.Maybe Data.POSIX,
ImageBuilder -> Maybe Text
description :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe Text
displayName :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe DomainJoinInfo
domainJoinInfo :: Prelude.Maybe DomainJoinInfo,
ImageBuilder -> Maybe Bool
enableDefaultInternetAccess :: Prelude.Maybe Prelude.Bool,
ImageBuilder -> Maybe Text
iamRoleArn :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe Text
imageArn :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe [ResourceError]
imageBuilderErrors :: Prelude.Maybe [ResourceError],
ImageBuilder -> Maybe Text
instanceType :: Prelude.Maybe Prelude.Text,
ImageBuilder -> Maybe NetworkAccessConfiguration
networkAccessConfiguration :: Prelude.Maybe NetworkAccessConfiguration,
ImageBuilder -> Maybe PlatformType
platform :: Prelude.Maybe PlatformType,
ImageBuilder -> Maybe ImageBuilderState
state :: Prelude.Maybe ImageBuilderState,
ImageBuilder -> Maybe ImageBuilderStateChangeReason
stateChangeReason :: Prelude.Maybe ImageBuilderStateChangeReason,
ImageBuilder -> Maybe VpcConfig
vpcConfig :: Prelude.Maybe VpcConfig,
ImageBuilder -> Text
name :: Prelude.Text
}
deriving (ImageBuilder -> ImageBuilder -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ImageBuilder -> ImageBuilder -> Bool
$c/= :: ImageBuilder -> ImageBuilder -> Bool
== :: ImageBuilder -> ImageBuilder -> Bool
$c== :: ImageBuilder -> ImageBuilder -> Bool
Prelude.Eq, ReadPrec [ImageBuilder]
ReadPrec ImageBuilder
Int -> ReadS ImageBuilder
ReadS [ImageBuilder]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [ImageBuilder]
$creadListPrec :: ReadPrec [ImageBuilder]
readPrec :: ReadPrec ImageBuilder
$creadPrec :: ReadPrec ImageBuilder
readList :: ReadS [ImageBuilder]
$creadList :: ReadS [ImageBuilder]
readsPrec :: Int -> ReadS ImageBuilder
$creadsPrec :: Int -> ReadS ImageBuilder
Prelude.Read, Int -> ImageBuilder -> ShowS
[ImageBuilder] -> ShowS
ImageBuilder -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [ImageBuilder] -> ShowS
$cshowList :: [ImageBuilder] -> ShowS
show :: ImageBuilder -> String
$cshow :: ImageBuilder -> String
showsPrec :: Int -> ImageBuilder -> ShowS
$cshowsPrec :: Int -> ImageBuilder -> ShowS
Prelude.Show, forall x. Rep ImageBuilder x -> ImageBuilder
forall x. ImageBuilder -> Rep ImageBuilder x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep ImageBuilder x -> ImageBuilder
$cfrom :: forall x. ImageBuilder -> Rep ImageBuilder x
Prelude.Generic)
newImageBuilder ::
Prelude.Text ->
ImageBuilder
newImageBuilder :: Text -> ImageBuilder
newImageBuilder Text
pName_ =
ImageBuilder'
{ $sel:accessEndpoints:ImageBuilder' :: Maybe (NonEmpty AccessEndpoint)
accessEndpoints = forall a. Maybe a
Prelude.Nothing,
$sel:appstreamAgentVersion:ImageBuilder' :: Maybe Text
appstreamAgentVersion = forall a. Maybe a
Prelude.Nothing,
$sel:arn:ImageBuilder' :: Maybe Text
arn = forall a. Maybe a
Prelude.Nothing,
$sel:createdTime:ImageBuilder' :: Maybe POSIX
createdTime = forall a. Maybe a
Prelude.Nothing,
$sel:description:ImageBuilder' :: Maybe Text
description = forall a. Maybe a
Prelude.Nothing,
$sel:displayName:ImageBuilder' :: Maybe Text
displayName = forall a. Maybe a
Prelude.Nothing,
$sel:domainJoinInfo:ImageBuilder' :: Maybe DomainJoinInfo
domainJoinInfo = forall a. Maybe a
Prelude.Nothing,
$sel:enableDefaultInternetAccess:ImageBuilder' :: Maybe Bool
enableDefaultInternetAccess = forall a. Maybe a
Prelude.Nothing,
$sel:iamRoleArn:ImageBuilder' :: Maybe Text
iamRoleArn = forall a. Maybe a
Prelude.Nothing,
$sel:imageArn:ImageBuilder' :: Maybe Text
imageArn = forall a. Maybe a
Prelude.Nothing,
$sel:imageBuilderErrors:ImageBuilder' :: Maybe [ResourceError]
imageBuilderErrors = forall a. Maybe a
Prelude.Nothing,
$sel:instanceType:ImageBuilder' :: Maybe Text
instanceType = forall a. Maybe a
Prelude.Nothing,
$sel:networkAccessConfiguration:ImageBuilder' :: Maybe NetworkAccessConfiguration
networkAccessConfiguration = forall a. Maybe a
Prelude.Nothing,
$sel:platform:ImageBuilder' :: Maybe PlatformType
platform = forall a. Maybe a
Prelude.Nothing,
$sel:state:ImageBuilder' :: Maybe ImageBuilderState
state = forall a. Maybe a
Prelude.Nothing,
$sel:stateChangeReason:ImageBuilder' :: Maybe ImageBuilderStateChangeReason
stateChangeReason = forall a. Maybe a
Prelude.Nothing,
$sel:vpcConfig:ImageBuilder' :: Maybe VpcConfig
vpcConfig = forall a. Maybe a
Prelude.Nothing,
$sel:name:ImageBuilder' :: Text
name = Text
pName_
}
imageBuilder_accessEndpoints :: Lens.Lens' ImageBuilder (Prelude.Maybe (Prelude.NonEmpty AccessEndpoint))
imageBuilder_accessEndpoints :: Lens' ImageBuilder (Maybe (NonEmpty AccessEndpoint))
imageBuilder_accessEndpoints = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe (NonEmpty AccessEndpoint)
accessEndpoints :: Maybe (NonEmpty AccessEndpoint)
$sel:accessEndpoints:ImageBuilder' :: ImageBuilder -> Maybe (NonEmpty AccessEndpoint)
accessEndpoints} -> Maybe (NonEmpty AccessEndpoint)
accessEndpoints) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe (NonEmpty AccessEndpoint)
a -> ImageBuilder
s {$sel:accessEndpoints:ImageBuilder' :: Maybe (NonEmpty AccessEndpoint)
accessEndpoints = Maybe (NonEmpty AccessEndpoint)
a} :: ImageBuilder) 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
imageBuilder_appstreamAgentVersion :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_appstreamAgentVersion :: Lens' ImageBuilder (Maybe Text)
imageBuilder_appstreamAgentVersion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
appstreamAgentVersion :: Maybe Text
$sel:appstreamAgentVersion:ImageBuilder' :: ImageBuilder -> Maybe Text
appstreamAgentVersion} -> Maybe Text
appstreamAgentVersion) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:appstreamAgentVersion:ImageBuilder' :: Maybe Text
appstreamAgentVersion = Maybe Text
a} :: ImageBuilder)
imageBuilder_arn :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_arn :: Lens' ImageBuilder (Maybe Text)
imageBuilder_arn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
arn :: Maybe Text
$sel:arn:ImageBuilder' :: ImageBuilder -> Maybe Text
arn} -> Maybe Text
arn) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:arn:ImageBuilder' :: Maybe Text
arn = Maybe Text
a} :: ImageBuilder)
imageBuilder_createdTime :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.UTCTime)
imageBuilder_createdTime :: Lens' ImageBuilder (Maybe UTCTime)
imageBuilder_createdTime = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe POSIX
createdTime :: Maybe POSIX
$sel:createdTime:ImageBuilder' :: ImageBuilder -> Maybe POSIX
createdTime} -> Maybe POSIX
createdTime) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe POSIX
a -> ImageBuilder
s {$sel:createdTime:ImageBuilder' :: Maybe POSIX
createdTime = Maybe POSIX
a} :: ImageBuilder) 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
imageBuilder_description :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_description :: Lens' ImageBuilder (Maybe Text)
imageBuilder_description = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
description :: Maybe Text
$sel:description:ImageBuilder' :: ImageBuilder -> Maybe Text
description} -> Maybe Text
description) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:description:ImageBuilder' :: Maybe Text
description = Maybe Text
a} :: ImageBuilder)
imageBuilder_displayName :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_displayName :: Lens' ImageBuilder (Maybe Text)
imageBuilder_displayName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
displayName :: Maybe Text
$sel:displayName:ImageBuilder' :: ImageBuilder -> Maybe Text
displayName} -> Maybe Text
displayName) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:displayName:ImageBuilder' :: Maybe Text
displayName = Maybe Text
a} :: ImageBuilder)
imageBuilder_domainJoinInfo :: Lens.Lens' ImageBuilder (Prelude.Maybe DomainJoinInfo)
imageBuilder_domainJoinInfo :: Lens' ImageBuilder (Maybe DomainJoinInfo)
imageBuilder_domainJoinInfo = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe DomainJoinInfo
domainJoinInfo :: Maybe DomainJoinInfo
$sel:domainJoinInfo:ImageBuilder' :: ImageBuilder -> Maybe DomainJoinInfo
domainJoinInfo} -> Maybe DomainJoinInfo
domainJoinInfo) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe DomainJoinInfo
a -> ImageBuilder
s {$sel:domainJoinInfo:ImageBuilder' :: Maybe DomainJoinInfo
domainJoinInfo = Maybe DomainJoinInfo
a} :: ImageBuilder)
imageBuilder_enableDefaultInternetAccess :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Bool)
imageBuilder_enableDefaultInternetAccess :: Lens' ImageBuilder (Maybe Bool)
imageBuilder_enableDefaultInternetAccess = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Bool
enableDefaultInternetAccess :: Maybe Bool
$sel:enableDefaultInternetAccess:ImageBuilder' :: ImageBuilder -> Maybe Bool
enableDefaultInternetAccess} -> Maybe Bool
enableDefaultInternetAccess) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Bool
a -> ImageBuilder
s {$sel:enableDefaultInternetAccess:ImageBuilder' :: Maybe Bool
enableDefaultInternetAccess = Maybe Bool
a} :: ImageBuilder)
imageBuilder_iamRoleArn :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_iamRoleArn :: Lens' ImageBuilder (Maybe Text)
imageBuilder_iamRoleArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
iamRoleArn :: Maybe Text
$sel:iamRoleArn:ImageBuilder' :: ImageBuilder -> Maybe Text
iamRoleArn} -> Maybe Text
iamRoleArn) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:iamRoleArn:ImageBuilder' :: Maybe Text
iamRoleArn = Maybe Text
a} :: ImageBuilder)
imageBuilder_imageArn :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_imageArn :: Lens' ImageBuilder (Maybe Text)
imageBuilder_imageArn = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
imageArn :: Maybe Text
$sel:imageArn:ImageBuilder' :: ImageBuilder -> Maybe Text
imageArn} -> Maybe Text
imageArn) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:imageArn:ImageBuilder' :: Maybe Text
imageArn = Maybe Text
a} :: ImageBuilder)
imageBuilder_imageBuilderErrors :: Lens.Lens' ImageBuilder (Prelude.Maybe [ResourceError])
imageBuilder_imageBuilderErrors :: Lens' ImageBuilder (Maybe [ResourceError])
imageBuilder_imageBuilderErrors = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe [ResourceError]
imageBuilderErrors :: Maybe [ResourceError]
$sel:imageBuilderErrors:ImageBuilder' :: ImageBuilder -> Maybe [ResourceError]
imageBuilderErrors} -> Maybe [ResourceError]
imageBuilderErrors) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe [ResourceError]
a -> ImageBuilder
s {$sel:imageBuilderErrors:ImageBuilder' :: Maybe [ResourceError]
imageBuilderErrors = Maybe [ResourceError]
a} :: ImageBuilder) 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
imageBuilder_instanceType :: Lens.Lens' ImageBuilder (Prelude.Maybe Prelude.Text)
imageBuilder_instanceType :: Lens' ImageBuilder (Maybe Text)
imageBuilder_instanceType = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe Text
instanceType :: Maybe Text
$sel:instanceType:ImageBuilder' :: ImageBuilder -> Maybe Text
instanceType} -> Maybe Text
instanceType) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe Text
a -> ImageBuilder
s {$sel:instanceType:ImageBuilder' :: Maybe Text
instanceType = Maybe Text
a} :: ImageBuilder)
imageBuilder_networkAccessConfiguration :: Lens.Lens' ImageBuilder (Prelude.Maybe NetworkAccessConfiguration)
imageBuilder_networkAccessConfiguration :: Lens' ImageBuilder (Maybe NetworkAccessConfiguration)
imageBuilder_networkAccessConfiguration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe NetworkAccessConfiguration
networkAccessConfiguration :: Maybe NetworkAccessConfiguration
$sel:networkAccessConfiguration:ImageBuilder' :: ImageBuilder -> Maybe NetworkAccessConfiguration
networkAccessConfiguration} -> Maybe NetworkAccessConfiguration
networkAccessConfiguration) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe NetworkAccessConfiguration
a -> ImageBuilder
s {$sel:networkAccessConfiguration:ImageBuilder' :: Maybe NetworkAccessConfiguration
networkAccessConfiguration = Maybe NetworkAccessConfiguration
a} :: ImageBuilder)
imageBuilder_platform :: Lens.Lens' ImageBuilder (Prelude.Maybe PlatformType)
imageBuilder_platform :: Lens' ImageBuilder (Maybe PlatformType)
imageBuilder_platform = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe PlatformType
platform :: Maybe PlatformType
$sel:platform:ImageBuilder' :: ImageBuilder -> Maybe PlatformType
platform} -> Maybe PlatformType
platform) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe PlatformType
a -> ImageBuilder
s {$sel:platform:ImageBuilder' :: Maybe PlatformType
platform = Maybe PlatformType
a} :: ImageBuilder)
imageBuilder_state :: Lens.Lens' ImageBuilder (Prelude.Maybe ImageBuilderState)
imageBuilder_state :: Lens' ImageBuilder (Maybe ImageBuilderState)
imageBuilder_state = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe ImageBuilderState
state :: Maybe ImageBuilderState
$sel:state:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderState
state} -> Maybe ImageBuilderState
state) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe ImageBuilderState
a -> ImageBuilder
s {$sel:state:ImageBuilder' :: Maybe ImageBuilderState
state = Maybe ImageBuilderState
a} :: ImageBuilder)
imageBuilder_stateChangeReason :: Lens.Lens' ImageBuilder (Prelude.Maybe ImageBuilderStateChangeReason)
imageBuilder_stateChangeReason :: Lens' ImageBuilder (Maybe ImageBuilderStateChangeReason)
imageBuilder_stateChangeReason = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe ImageBuilderStateChangeReason
stateChangeReason :: Maybe ImageBuilderStateChangeReason
$sel:stateChangeReason:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderStateChangeReason
stateChangeReason} -> Maybe ImageBuilderStateChangeReason
stateChangeReason) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe ImageBuilderStateChangeReason
a -> ImageBuilder
s {$sel:stateChangeReason:ImageBuilder' :: Maybe ImageBuilderStateChangeReason
stateChangeReason = Maybe ImageBuilderStateChangeReason
a} :: ImageBuilder)
imageBuilder_vpcConfig :: Lens.Lens' ImageBuilder (Prelude.Maybe VpcConfig)
imageBuilder_vpcConfig :: Lens' ImageBuilder (Maybe VpcConfig)
imageBuilder_vpcConfig = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Maybe VpcConfig
vpcConfig :: Maybe VpcConfig
$sel:vpcConfig:ImageBuilder' :: ImageBuilder -> Maybe VpcConfig
vpcConfig} -> Maybe VpcConfig
vpcConfig) (\s :: ImageBuilder
s@ImageBuilder' {} Maybe VpcConfig
a -> ImageBuilder
s {$sel:vpcConfig:ImageBuilder' :: Maybe VpcConfig
vpcConfig = Maybe VpcConfig
a} :: ImageBuilder)
imageBuilder_name :: Lens.Lens' ImageBuilder Prelude.Text
imageBuilder_name :: Lens' ImageBuilder Text
imageBuilder_name = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\ImageBuilder' {Text
name :: Text
$sel:name:ImageBuilder' :: ImageBuilder -> Text
name} -> Text
name) (\s :: ImageBuilder
s@ImageBuilder' {} Text
a -> ImageBuilder
s {$sel:name:ImageBuilder' :: Text
name = Text
a} :: ImageBuilder)
instance Data.FromJSON ImageBuilder where
parseJSON :: Value -> Parser ImageBuilder
parseJSON =
forall a. String -> (Object -> Parser a) -> Value -> Parser a
Data.withObject
String
"ImageBuilder"
( \Object
x ->
Maybe (NonEmpty AccessEndpoint)
-> Maybe Text
-> Maybe Text
-> Maybe POSIX
-> Maybe Text
-> Maybe Text
-> Maybe DomainJoinInfo
-> Maybe Bool
-> Maybe Text
-> Maybe Text
-> Maybe [ResourceError]
-> Maybe Text
-> Maybe NetworkAccessConfiguration
-> Maybe PlatformType
-> Maybe ImageBuilderState
-> Maybe ImageBuilderStateChangeReason
-> Maybe VpcConfig
-> Text
-> ImageBuilder
ImageBuilder'
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
"AccessEndpoints")
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
"AppstreamAgentVersion")
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
"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
"CreatedTime")
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
"DisplayName")
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
"DomainJoinInfo")
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
"EnableDefaultInternetAccess")
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
"IamRoleArn")
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
"ImageArn")
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
"ImageBuilderErrors"
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
"InstanceType")
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
"NetworkAccessConfiguration")
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
"Platform")
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
"StateChangeReason")
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
"VpcConfig")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (Object
x forall a. FromJSON a => Object -> Key -> Parser a
Data..: Key
"Name")
)
instance Prelude.Hashable ImageBuilder where
hashWithSalt :: Int -> ImageBuilder -> Int
hashWithSalt Int
_salt ImageBuilder' {Maybe Bool
Maybe [ResourceError]
Maybe (NonEmpty AccessEndpoint)
Maybe Text
Maybe POSIX
Maybe DomainJoinInfo
Maybe ImageBuilderState
Maybe ImageBuilderStateChangeReason
Maybe NetworkAccessConfiguration
Maybe PlatformType
Maybe VpcConfig
Text
name :: Text
vpcConfig :: Maybe VpcConfig
stateChangeReason :: Maybe ImageBuilderStateChangeReason
state :: Maybe ImageBuilderState
platform :: Maybe PlatformType
networkAccessConfiguration :: Maybe NetworkAccessConfiguration
instanceType :: Maybe Text
imageBuilderErrors :: Maybe [ResourceError]
imageArn :: Maybe Text
iamRoleArn :: Maybe Text
enableDefaultInternetAccess :: Maybe Bool
domainJoinInfo :: Maybe DomainJoinInfo
displayName :: Maybe Text
description :: Maybe Text
createdTime :: Maybe POSIX
arn :: Maybe Text
appstreamAgentVersion :: Maybe Text
accessEndpoints :: Maybe (NonEmpty AccessEndpoint)
$sel:name:ImageBuilder' :: ImageBuilder -> Text
$sel:vpcConfig:ImageBuilder' :: ImageBuilder -> Maybe VpcConfig
$sel:stateChangeReason:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderStateChangeReason
$sel:state:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderState
$sel:platform:ImageBuilder' :: ImageBuilder -> Maybe PlatformType
$sel:networkAccessConfiguration:ImageBuilder' :: ImageBuilder -> Maybe NetworkAccessConfiguration
$sel:instanceType:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:imageBuilderErrors:ImageBuilder' :: ImageBuilder -> Maybe [ResourceError]
$sel:imageArn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:iamRoleArn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:enableDefaultInternetAccess:ImageBuilder' :: ImageBuilder -> Maybe Bool
$sel:domainJoinInfo:ImageBuilder' :: ImageBuilder -> Maybe DomainJoinInfo
$sel:displayName:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:description:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:createdTime:ImageBuilder' :: ImageBuilder -> Maybe POSIX
$sel:arn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:appstreamAgentVersion:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:accessEndpoints:ImageBuilder' :: ImageBuilder -> Maybe (NonEmpty AccessEndpoint)
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty AccessEndpoint)
accessEndpoints
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
appstreamAgentVersion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
arn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe POSIX
createdTime
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
description
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
displayName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe DomainJoinInfo
domainJoinInfo
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
enableDefaultInternetAccess
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
iamRoleArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
imageArn
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [ResourceError]
imageBuilderErrors
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
instanceType
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe NetworkAccessConfiguration
networkAccessConfiguration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe PlatformType
platform
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ImageBuilderState
state
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ImageBuilderStateChangeReason
stateChangeReason
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe VpcConfig
vpcConfig
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
name
instance Prelude.NFData ImageBuilder where
rnf :: ImageBuilder -> ()
rnf ImageBuilder' {Maybe Bool
Maybe [ResourceError]
Maybe (NonEmpty AccessEndpoint)
Maybe Text
Maybe POSIX
Maybe DomainJoinInfo
Maybe ImageBuilderState
Maybe ImageBuilderStateChangeReason
Maybe NetworkAccessConfiguration
Maybe PlatformType
Maybe VpcConfig
Text
name :: Text
vpcConfig :: Maybe VpcConfig
stateChangeReason :: Maybe ImageBuilderStateChangeReason
state :: Maybe ImageBuilderState
platform :: Maybe PlatformType
networkAccessConfiguration :: Maybe NetworkAccessConfiguration
instanceType :: Maybe Text
imageBuilderErrors :: Maybe [ResourceError]
imageArn :: Maybe Text
iamRoleArn :: Maybe Text
enableDefaultInternetAccess :: Maybe Bool
domainJoinInfo :: Maybe DomainJoinInfo
displayName :: Maybe Text
description :: Maybe Text
createdTime :: Maybe POSIX
arn :: Maybe Text
appstreamAgentVersion :: Maybe Text
accessEndpoints :: Maybe (NonEmpty AccessEndpoint)
$sel:name:ImageBuilder' :: ImageBuilder -> Text
$sel:vpcConfig:ImageBuilder' :: ImageBuilder -> Maybe VpcConfig
$sel:stateChangeReason:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderStateChangeReason
$sel:state:ImageBuilder' :: ImageBuilder -> Maybe ImageBuilderState
$sel:platform:ImageBuilder' :: ImageBuilder -> Maybe PlatformType
$sel:networkAccessConfiguration:ImageBuilder' :: ImageBuilder -> Maybe NetworkAccessConfiguration
$sel:instanceType:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:imageBuilderErrors:ImageBuilder' :: ImageBuilder -> Maybe [ResourceError]
$sel:imageArn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:iamRoleArn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:enableDefaultInternetAccess:ImageBuilder' :: ImageBuilder -> Maybe Bool
$sel:domainJoinInfo:ImageBuilder' :: ImageBuilder -> Maybe DomainJoinInfo
$sel:displayName:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:description:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:createdTime:ImageBuilder' :: ImageBuilder -> Maybe POSIX
$sel:arn:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:appstreamAgentVersion:ImageBuilder' :: ImageBuilder -> Maybe Text
$sel:accessEndpoints:ImageBuilder' :: ImageBuilder -> Maybe (NonEmpty AccessEndpoint)
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty AccessEndpoint)
accessEndpoints
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
appstreamAgentVersion
seq :: forall a b. a -> b -> b
`Prelude.seq` 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 POSIX
createdTime
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
description
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
displayName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe DomainJoinInfo
domainJoinInfo
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
enableDefaultInternetAccess
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
iamRoleArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
imageArn
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [ResourceError]
imageBuilderErrors
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
instanceType
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe NetworkAccessConfiguration
networkAccessConfiguration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe PlatformType
platform
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ImageBuilderState
state
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ImageBuilderStateChangeReason
stateChangeReason
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe VpcConfig
vpcConfig
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
name