module Stratosphere.GameLift.ContainerGroupDefinition.GameServerContainerDefinitionProperty (
        module Exports, GameServerContainerDefinitionProperty(..),
        mkGameServerContainerDefinitionProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.GameLift.ContainerGroupDefinition.ContainerDependencyProperty as Exports
import {-# SOURCE #-} Stratosphere.GameLift.ContainerGroupDefinition.ContainerEnvironmentProperty as Exports
import {-# SOURCE #-} Stratosphere.GameLift.ContainerGroupDefinition.ContainerMountPointProperty as Exports
import {-# SOURCE #-} Stratosphere.GameLift.ContainerGroupDefinition.PortConfigurationProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data GameServerContainerDefinitionProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html>
    GameServerContainerDefinitionProperty {GameServerContainerDefinitionProperty -> ()
haddock_workaround_ :: (),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-containername>
                                           GameServerContainerDefinitionProperty -> Value Text
containerName :: (Value Prelude.Text),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-dependson>
                                           GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
dependsOn :: (Prelude.Maybe [ContainerDependencyProperty]),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-environmentoverride>
                                           GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
environmentOverride :: (Prelude.Maybe [ContainerEnvironmentProperty]),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-imageuri>
                                           GameServerContainerDefinitionProperty -> Value Text
imageUri :: (Value Prelude.Text),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-mountpoints>
                                           GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
mountPoints :: (Prelude.Maybe [ContainerMountPointProperty]),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-portconfiguration>
                                           GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
portConfiguration :: (Prelude.Maybe PortConfigurationProperty),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-resolvedimagedigest>
                                           GameServerContainerDefinitionProperty -> Maybe (Value Text)
resolvedImageDigest :: (Prelude.Maybe (Value Prelude.Text)),
                                           -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-gamelift-containergroupdefinition-gameservercontainerdefinition.html#cfn-gamelift-containergroupdefinition-gameservercontainerdefinition-serversdkversion>
                                           GameServerContainerDefinitionProperty -> Value Text
serverSdkVersion :: (Value Prelude.Text)}
  deriving stock (GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty -> Bool
(GameServerContainerDefinitionProperty
 -> GameServerContainerDefinitionProperty -> Bool)
-> (GameServerContainerDefinitionProperty
    -> GameServerContainerDefinitionProperty -> Bool)
-> Eq GameServerContainerDefinitionProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty -> Bool
== :: GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty -> Bool
$c/= :: GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty -> Bool
/= :: GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty -> Bool
Prelude.Eq, Int -> GameServerContainerDefinitionProperty -> ShowS
[GameServerContainerDefinitionProperty] -> ShowS
GameServerContainerDefinitionProperty -> String
(Int -> GameServerContainerDefinitionProperty -> ShowS)
-> (GameServerContainerDefinitionProperty -> String)
-> ([GameServerContainerDefinitionProperty] -> ShowS)
-> Show GameServerContainerDefinitionProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> GameServerContainerDefinitionProperty -> ShowS
showsPrec :: Int -> GameServerContainerDefinitionProperty -> ShowS
$cshow :: GameServerContainerDefinitionProperty -> String
show :: GameServerContainerDefinitionProperty -> String
$cshowList :: [GameServerContainerDefinitionProperty] -> ShowS
showList :: [GameServerContainerDefinitionProperty] -> ShowS
Prelude.Show)
mkGameServerContainerDefinitionProperty ::
  Value Prelude.Text
  -> Value Prelude.Text
     -> Value Prelude.Text -> GameServerContainerDefinitionProperty
mkGameServerContainerDefinitionProperty :: Value Text
-> Value Text
-> Value Text
-> GameServerContainerDefinitionProperty
mkGameServerContainerDefinitionProperty
  Value Text
containerName
  Value Text
imageUri
  Value Text
serverSdkVersion
  = GameServerContainerDefinitionProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), containerName :: Value Text
containerName = Value Text
containerName,
       imageUri :: Value Text
imageUri = Value Text
imageUri, serverSdkVersion :: Value Text
serverSdkVersion = Value Text
serverSdkVersion,
       dependsOn :: Maybe [ContainerDependencyProperty]
dependsOn = Maybe [ContainerDependencyProperty]
forall a. Maybe a
Prelude.Nothing, environmentOverride :: Maybe [ContainerEnvironmentProperty]
environmentOverride = Maybe [ContainerEnvironmentProperty]
forall a. Maybe a
Prelude.Nothing,
       mountPoints :: Maybe [ContainerMountPointProperty]
mountPoints = Maybe [ContainerMountPointProperty]
forall a. Maybe a
Prelude.Nothing, portConfiguration :: Maybe PortConfigurationProperty
portConfiguration = Maybe PortConfigurationProperty
forall a. Maybe a
Prelude.Nothing,
       resolvedImageDigest :: Maybe (Value Text)
resolvedImageDigest = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties GameServerContainerDefinitionProperty where
  toResourceProperties :: GameServerContainerDefinitionProperty -> ResourceProperties
toResourceProperties GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::GameLift::ContainerGroupDefinition.GameServerContainerDefinition",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
                           [Key
"ContainerName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
containerName,
                            Key
"ImageUri" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
imageUri,
                            Key
"ServerSdkVersion" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
serverSdkVersion]
                           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                              [Key -> [ContainerDependencyProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DependsOn" ([ContainerDependencyProperty] -> (Key, Value))
-> Maybe [ContainerDependencyProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerDependencyProperty]
dependsOn,
                               Key -> [ContainerEnvironmentProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentOverride" ([ContainerEnvironmentProperty] -> (Key, Value))
-> Maybe [ContainerEnvironmentProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerEnvironmentProperty]
environmentOverride,
                               Key -> [ContainerMountPointProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MountPoints" ([ContainerMountPointProperty] -> (Key, Value))
-> Maybe [ContainerMountPointProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerMountPointProperty]
mountPoints,
                               Key -> PortConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PortConfiguration" (PortConfigurationProperty -> (Key, Value))
-> Maybe PortConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PortConfigurationProperty
portConfiguration,
                               Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResolvedImageDigest" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
resolvedImageDigest]))}
instance JSON.ToJSON GameServerContainerDefinitionProperty where
  toJSON :: GameServerContainerDefinitionProperty -> Value
toJSON GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([(Key, Value)] -> [(Key, Value)] -> [(Key, Value)]
forall a. Semigroup a => a -> a -> a
(Prelude.<>)
              [Key
"ContainerName" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
containerName,
               Key
"ImageUri" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
imageUri,
               Key
"ServerSdkVersion" Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= Value Text
serverSdkVersion]
              ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                 [Key -> [ContainerDependencyProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"DependsOn" ([ContainerDependencyProperty] -> (Key, Value))
-> Maybe [ContainerDependencyProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerDependencyProperty]
dependsOn,
                  Key -> [ContainerEnvironmentProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EnvironmentOverride" ([ContainerEnvironmentProperty] -> (Key, Value))
-> Maybe [ContainerEnvironmentProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerEnvironmentProperty]
environmentOverride,
                  Key -> [ContainerMountPointProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"MountPoints" ([ContainerMountPointProperty] -> (Key, Value))
-> Maybe [ContainerMountPointProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerMountPointProperty]
mountPoints,
                  Key -> PortConfigurationProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PortConfiguration" (PortConfigurationProperty -> (Key, Value))
-> Maybe PortConfigurationProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PortConfigurationProperty
portConfiguration,
                  Key -> Value Text -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ResolvedImageDigest" (Value Text -> (Key, Value))
-> Maybe (Value Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Text)
resolvedImageDigest])))
instance Property "ContainerName" GameServerContainerDefinitionProperty where
  type PropertyType "ContainerName" GameServerContainerDefinitionProperty = Value Prelude.Text
  set :: PropertyType "ContainerName" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType "ContainerName" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {containerName :: Value Text
containerName = PropertyType "ContainerName" GameServerContainerDefinitionProperty
Value Text
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "DependsOn" GameServerContainerDefinitionProperty where
  type PropertyType "DependsOn" GameServerContainerDefinitionProperty = [ContainerDependencyProperty]
  set :: PropertyType "DependsOn" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType "DependsOn" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {dependsOn :: Maybe [ContainerDependencyProperty]
dependsOn = [ContainerDependencyProperty]
-> Maybe [ContainerDependencyProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ContainerDependencyProperty]
PropertyType "DependsOn" GameServerContainerDefinitionProperty
newValue, Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "EnvironmentOverride" GameServerContainerDefinitionProperty where
  type PropertyType "EnvironmentOverride" GameServerContainerDefinitionProperty = [ContainerEnvironmentProperty]
  set :: PropertyType
  "EnvironmentOverride" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType
  "EnvironmentOverride" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {environmentOverride :: Maybe [ContainerEnvironmentProperty]
environmentOverride = [ContainerEnvironmentProperty]
-> Maybe [ContainerEnvironmentProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ContainerEnvironmentProperty]
PropertyType
  "EnvironmentOverride" GameServerContainerDefinitionProperty
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "ImageUri" GameServerContainerDefinitionProperty where
  type PropertyType "ImageUri" GameServerContainerDefinitionProperty = Value Prelude.Text
  set :: PropertyType "ImageUri" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType "ImageUri" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty {imageUri :: Value Text
imageUri = PropertyType "ImageUri" GameServerContainerDefinitionProperty
Value Text
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "MountPoints" GameServerContainerDefinitionProperty where
  type PropertyType "MountPoints" GameServerContainerDefinitionProperty = [ContainerMountPointProperty]
  set :: PropertyType "MountPoints" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType "MountPoints" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {mountPoints :: Maybe [ContainerMountPointProperty]
mountPoints = [ContainerMountPointProperty]
-> Maybe [ContainerMountPointProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ContainerMountPointProperty]
PropertyType "MountPoints" GameServerContainerDefinitionProperty
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "PortConfiguration" GameServerContainerDefinitionProperty where
  type PropertyType "PortConfiguration" GameServerContainerDefinitionProperty = PortConfigurationProperty
  set :: PropertyType
  "PortConfiguration" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType
  "PortConfiguration" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {portConfiguration :: Maybe PortConfigurationProperty
portConfiguration = PortConfigurationProperty -> Maybe PortConfigurationProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "PortConfiguration" GameServerContainerDefinitionProperty
PortConfigurationProperty
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
instance Property "ResolvedImageDigest" GameServerContainerDefinitionProperty where
  type PropertyType "ResolvedImageDigest" GameServerContainerDefinitionProperty = Value Prelude.Text
  set :: PropertyType
  "ResolvedImageDigest" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType
  "ResolvedImageDigest" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {resolvedImageDigest :: Maybe (Value Text)
resolvedImageDigest = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
  "ResolvedImageDigest" GameServerContainerDefinitionProperty
Value Text
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
serverSdkVersion :: Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
serverSdkVersion :: Value Text
..}
instance Property "ServerSdkVersion" GameServerContainerDefinitionProperty where
  type PropertyType "ServerSdkVersion" GameServerContainerDefinitionProperty = Value Prelude.Text
  set :: PropertyType
  "ServerSdkVersion" GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
-> GameServerContainerDefinitionProperty
set PropertyType
  "ServerSdkVersion" GameServerContainerDefinitionProperty
newValue GameServerContainerDefinitionProperty {Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: GameServerContainerDefinitionProperty -> ()
containerName :: GameServerContainerDefinitionProperty -> Value Text
dependsOn :: GameServerContainerDefinitionProperty
-> Maybe [ContainerDependencyProperty]
environmentOverride :: GameServerContainerDefinitionProperty
-> Maybe [ContainerEnvironmentProperty]
imageUri :: GameServerContainerDefinitionProperty -> Value Text
mountPoints :: GameServerContainerDefinitionProperty
-> Maybe [ContainerMountPointProperty]
portConfiguration :: GameServerContainerDefinitionProperty
-> Maybe PortConfigurationProperty
resolvedImageDigest :: GameServerContainerDefinitionProperty -> Maybe (Value Text)
serverSdkVersion :: GameServerContainerDefinitionProperty -> Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
serverSdkVersion :: Value Text
..}
    = GameServerContainerDefinitionProperty
        {serverSdkVersion :: Value Text
serverSdkVersion = PropertyType
  "ServerSdkVersion" GameServerContainerDefinitionProperty
Value Text
newValue, Maybe [ContainerDependencyProperty]
Maybe [ContainerEnvironmentProperty]
Maybe [ContainerMountPointProperty]
Maybe (Value Text)
Maybe PortConfigurationProperty
()
Value Text
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
haddock_workaround_ :: ()
containerName :: Value Text
dependsOn :: Maybe [ContainerDependencyProperty]
environmentOverride :: Maybe [ContainerEnvironmentProperty]
imageUri :: Value Text
mountPoints :: Maybe [ContainerMountPointProperty]
portConfiguration :: Maybe PortConfigurationProperty
resolvedImageDigest :: Maybe (Value Text)
..}