module Stratosphere.Lightsail.Container.ContainerServiceDeploymentProperty (
        module Exports, ContainerServiceDeploymentProperty(..),
        mkContainerServiceDeploymentProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Lightsail.Container.ContainerProperty as Exports
import {-# SOURCE #-} Stratosphere.Lightsail.Container.PublicEndpointProperty as Exports
import Stratosphere.ResourceProperties
data ContainerServiceDeploymentProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lightsail-container-containerservicedeployment.html>
    ContainerServiceDeploymentProperty {ContainerServiceDeploymentProperty -> ()
haddock_workaround_ :: (),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lightsail-container-containerservicedeployment.html#cfn-lightsail-container-containerservicedeployment-containers>
                                        ContainerServiceDeploymentProperty -> Maybe [ContainerProperty]
containers :: (Prelude.Maybe [ContainerProperty]),
                                        -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-lightsail-container-containerservicedeployment.html#cfn-lightsail-container-containerservicedeployment-publicendpoint>
                                        ContainerServiceDeploymentProperty -> Maybe PublicEndpointProperty
publicEndpoint :: (Prelude.Maybe PublicEndpointProperty)}
  deriving stock (ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty -> Bool
(ContainerServiceDeploymentProperty
 -> ContainerServiceDeploymentProperty -> Bool)
-> (ContainerServiceDeploymentProperty
    -> ContainerServiceDeploymentProperty -> Bool)
-> Eq ContainerServiceDeploymentProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty -> Bool
== :: ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty -> Bool
$c/= :: ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty -> Bool
/= :: ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty -> Bool
Prelude.Eq, Int -> ContainerServiceDeploymentProperty -> ShowS
[ContainerServiceDeploymentProperty] -> ShowS
ContainerServiceDeploymentProperty -> String
(Int -> ContainerServiceDeploymentProperty -> ShowS)
-> (ContainerServiceDeploymentProperty -> String)
-> ([ContainerServiceDeploymentProperty] -> ShowS)
-> Show ContainerServiceDeploymentProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ContainerServiceDeploymentProperty -> ShowS
showsPrec :: Int -> ContainerServiceDeploymentProperty -> ShowS
$cshow :: ContainerServiceDeploymentProperty -> String
show :: ContainerServiceDeploymentProperty -> String
$cshowList :: [ContainerServiceDeploymentProperty] -> ShowS
showList :: [ContainerServiceDeploymentProperty] -> ShowS
Prelude.Show)
mkContainerServiceDeploymentProperty ::
  ContainerServiceDeploymentProperty
mkContainerServiceDeploymentProperty :: ContainerServiceDeploymentProperty
mkContainerServiceDeploymentProperty
  = ContainerServiceDeploymentProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), containers :: Maybe [ContainerProperty]
containers = Maybe [ContainerProperty]
forall a. Maybe a
Prelude.Nothing,
       publicEndpoint :: Maybe PublicEndpointProperty
publicEndpoint = Maybe PublicEndpointProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ContainerServiceDeploymentProperty where
  toResourceProperties :: ContainerServiceDeploymentProperty -> ResourceProperties
toResourceProperties ContainerServiceDeploymentProperty {Maybe [ContainerProperty]
Maybe PublicEndpointProperty
()
haddock_workaround_ :: ContainerServiceDeploymentProperty -> ()
containers :: ContainerServiceDeploymentProperty -> Maybe [ContainerProperty]
publicEndpoint :: ContainerServiceDeploymentProperty -> Maybe PublicEndpointProperty
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
publicEndpoint :: Maybe PublicEndpointProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::Lightsail::Container.ContainerServiceDeployment",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Item Object] -> Object
forall l. IsList l => [Item l] -> l
Prelude.fromList
                        ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
                           [Key -> [ContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Containers" ([ContainerProperty] -> (Key, Value))
-> Maybe [ContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerProperty]
containers,
                            Key -> PublicEndpointProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PublicEndpoint" (PublicEndpointProperty -> (Key, Value))
-> Maybe PublicEndpointProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PublicEndpointProperty
publicEndpoint])}
instance JSON.ToJSON ContainerServiceDeploymentProperty where
  toJSON :: ContainerServiceDeploymentProperty -> Value
toJSON ContainerServiceDeploymentProperty {Maybe [ContainerProperty]
Maybe PublicEndpointProperty
()
haddock_workaround_ :: ContainerServiceDeploymentProperty -> ()
containers :: ContainerServiceDeploymentProperty -> Maybe [ContainerProperty]
publicEndpoint :: ContainerServiceDeploymentProperty -> Maybe PublicEndpointProperty
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
publicEndpoint :: Maybe PublicEndpointProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        ([Item [(Key, Value)]] -> [(Key, Value)]
forall l. IsList l => [Item l] -> l
Prelude.fromList
           ([Maybe (Key, Value)] -> [(Key, Value)]
forall a. [Maybe a] -> [a]
Prelude.catMaybes
              [Key -> [ContainerProperty] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Containers" ([ContainerProperty] -> (Key, Value))
-> Maybe [ContainerProperty] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [ContainerProperty]
containers,
               Key -> PublicEndpointProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"PublicEndpoint" (PublicEndpointProperty -> (Key, Value))
-> Maybe PublicEndpointProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe PublicEndpointProperty
publicEndpoint]))
instance Property "Containers" ContainerServiceDeploymentProperty where
  type PropertyType "Containers" ContainerServiceDeploymentProperty = [ContainerProperty]
  set :: PropertyType "Containers" ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty
set PropertyType "Containers" ContainerServiceDeploymentProperty
newValue ContainerServiceDeploymentProperty {Maybe [ContainerProperty]
Maybe PublicEndpointProperty
()
haddock_workaround_ :: ContainerServiceDeploymentProperty -> ()
containers :: ContainerServiceDeploymentProperty -> Maybe [ContainerProperty]
publicEndpoint :: ContainerServiceDeploymentProperty -> Maybe PublicEndpointProperty
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
publicEndpoint :: Maybe PublicEndpointProperty
..}
    = ContainerServiceDeploymentProperty
        {containers :: Maybe [ContainerProperty]
containers = [ContainerProperty] -> Maybe [ContainerProperty]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [ContainerProperty]
PropertyType "Containers" ContainerServiceDeploymentProperty
newValue, Maybe PublicEndpointProperty
()
haddock_workaround_ :: ()
publicEndpoint :: Maybe PublicEndpointProperty
haddock_workaround_ :: ()
publicEndpoint :: Maybe PublicEndpointProperty
..}
instance Property "PublicEndpoint" ContainerServiceDeploymentProperty where
  type PropertyType "PublicEndpoint" ContainerServiceDeploymentProperty = PublicEndpointProperty
  set :: PropertyType "PublicEndpoint" ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty
-> ContainerServiceDeploymentProperty
set PropertyType "PublicEndpoint" ContainerServiceDeploymentProperty
newValue ContainerServiceDeploymentProperty {Maybe [ContainerProperty]
Maybe PublicEndpointProperty
()
haddock_workaround_ :: ContainerServiceDeploymentProperty -> ()
containers :: ContainerServiceDeploymentProperty -> Maybe [ContainerProperty]
publicEndpoint :: ContainerServiceDeploymentProperty -> Maybe PublicEndpointProperty
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
publicEndpoint :: Maybe PublicEndpointProperty
..}
    = ContainerServiceDeploymentProperty
        {publicEndpoint :: Maybe PublicEndpointProperty
publicEndpoint = PublicEndpointProperty -> Maybe PublicEndpointProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "PublicEndpoint" ContainerServiceDeploymentProperty
PublicEndpointProperty
newValue, Maybe [ContainerProperty]
()
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
haddock_workaround_ :: ()
containers :: Maybe [ContainerProperty]
..}