module Stratosphere.MSK.Replicator.KafkaClusterProperty (
        module Exports, KafkaClusterProperty(..), mkKafkaClusterProperty
    ) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.MSK.Replicator.AmazonMskClusterProperty as Exports
import {-# SOURCE #-} Stratosphere.MSK.Replicator.KafkaClusterClientVpcConfigProperty as Exports
import Stratosphere.ResourceProperties
data KafkaClusterProperty
  = -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-msk-replicator-kafkacluster.html>
    KafkaClusterProperty {KafkaClusterProperty -> ()
haddock_workaround_ :: (),
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-msk-replicator-kafkacluster.html#cfn-msk-replicator-kafkacluster-amazonmskcluster>
                          KafkaClusterProperty -> AmazonMskClusterProperty
amazonMskCluster :: AmazonMskClusterProperty,
                          -- | See: <http://docs.aws.amazon.com/AWSCloudFormation/latest/UserGuide/aws-properties-msk-replicator-kafkacluster.html#cfn-msk-replicator-kafkacluster-vpcconfig>
                          KafkaClusterProperty -> KafkaClusterClientVpcConfigProperty
vpcConfig :: KafkaClusterClientVpcConfigProperty}
  deriving stock (KafkaClusterProperty -> KafkaClusterProperty -> Bool
(KafkaClusterProperty -> KafkaClusterProperty -> Bool)
-> (KafkaClusterProperty -> KafkaClusterProperty -> Bool)
-> Eq KafkaClusterProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: KafkaClusterProperty -> KafkaClusterProperty -> Bool
== :: KafkaClusterProperty -> KafkaClusterProperty -> Bool
$c/= :: KafkaClusterProperty -> KafkaClusterProperty -> Bool
/= :: KafkaClusterProperty -> KafkaClusterProperty -> Bool
Prelude.Eq, Int -> KafkaClusterProperty -> ShowS
[KafkaClusterProperty] -> ShowS
KafkaClusterProperty -> String
(Int -> KafkaClusterProperty -> ShowS)
-> (KafkaClusterProperty -> String)
-> ([KafkaClusterProperty] -> ShowS)
-> Show KafkaClusterProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> KafkaClusterProperty -> ShowS
showsPrec :: Int -> KafkaClusterProperty -> ShowS
$cshow :: KafkaClusterProperty -> String
show :: KafkaClusterProperty -> String
$cshowList :: [KafkaClusterProperty] -> ShowS
showList :: [KafkaClusterProperty] -> ShowS
Prelude.Show)
mkKafkaClusterProperty ::
  AmazonMskClusterProperty
  -> KafkaClusterClientVpcConfigProperty -> KafkaClusterProperty
mkKafkaClusterProperty :: AmazonMskClusterProperty
-> KafkaClusterClientVpcConfigProperty -> KafkaClusterProperty
mkKafkaClusterProperty AmazonMskClusterProperty
amazonMskCluster KafkaClusterClientVpcConfigProperty
vpcConfig
  = KafkaClusterProperty
      {haddock_workaround_ :: ()
haddock_workaround_ = (), amazonMskCluster :: AmazonMskClusterProperty
amazonMskCluster = AmazonMskClusterProperty
amazonMskCluster,
       vpcConfig :: KafkaClusterClientVpcConfigProperty
vpcConfig = KafkaClusterClientVpcConfigProperty
vpcConfig}
instance ToResourceProperties KafkaClusterProperty where
  toResourceProperties :: KafkaClusterProperty -> ResourceProperties
toResourceProperties KafkaClusterProperty {()
AmazonMskClusterProperty
KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: KafkaClusterProperty -> ()
amazonMskCluster :: KafkaClusterProperty -> AmazonMskClusterProperty
vpcConfig :: KafkaClusterProperty -> KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
vpcConfig :: KafkaClusterClientVpcConfigProperty
..}
    = ResourceProperties
        {awsType :: Text
awsType = Text
"AWS::MSK::Replicator.KafkaCluster",
         supportsTags :: Bool
supportsTags = Bool
Prelude.False,
         properties :: Object
properties = [Key
"AmazonMskCluster" Key -> AmazonMskClusterProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= AmazonMskClusterProperty
amazonMskCluster,
                       Key
"VpcConfig" Key -> KafkaClusterClientVpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= KafkaClusterClientVpcConfigProperty
vpcConfig]}
instance JSON.ToJSON KafkaClusterProperty where
  toJSON :: KafkaClusterProperty -> Value
toJSON KafkaClusterProperty {()
AmazonMskClusterProperty
KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: KafkaClusterProperty -> ()
amazonMskCluster :: KafkaClusterProperty -> AmazonMskClusterProperty
vpcConfig :: KafkaClusterProperty -> KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
vpcConfig :: KafkaClusterClientVpcConfigProperty
..}
    = [(Key, Value)] -> Value
JSON.object
        [Key
"AmazonMskCluster" Key -> AmazonMskClusterProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= AmazonMskClusterProperty
amazonMskCluster,
         Key
"VpcConfig" Key -> KafkaClusterClientVpcConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
JSON..= KafkaClusterClientVpcConfigProperty
vpcConfig]
instance Property "AmazonMskCluster" KafkaClusterProperty where
  type PropertyType "AmazonMskCluster" KafkaClusterProperty = AmazonMskClusterProperty
  set :: PropertyType "AmazonMskCluster" KafkaClusterProperty
-> KafkaClusterProperty -> KafkaClusterProperty
set PropertyType "AmazonMskCluster" KafkaClusterProperty
newValue KafkaClusterProperty {()
AmazonMskClusterProperty
KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: KafkaClusterProperty -> ()
amazonMskCluster :: KafkaClusterProperty -> AmazonMskClusterProperty
vpcConfig :: KafkaClusterProperty -> KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
vpcConfig :: KafkaClusterClientVpcConfigProperty
..}
    = KafkaClusterProperty {amazonMskCluster :: AmazonMskClusterProperty
amazonMskCluster = PropertyType "AmazonMskCluster" KafkaClusterProperty
AmazonMskClusterProperty
newValue, ()
KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
vpcConfig :: KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
vpcConfig :: KafkaClusterClientVpcConfigProperty
..}
instance Property "VpcConfig" KafkaClusterProperty where
  type PropertyType "VpcConfig" KafkaClusterProperty = KafkaClusterClientVpcConfigProperty
  set :: PropertyType "VpcConfig" KafkaClusterProperty
-> KafkaClusterProperty -> KafkaClusterProperty
set PropertyType "VpcConfig" KafkaClusterProperty
newValue KafkaClusterProperty {()
AmazonMskClusterProperty
KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: KafkaClusterProperty -> ()
amazonMskCluster :: KafkaClusterProperty -> AmazonMskClusterProperty
vpcConfig :: KafkaClusterProperty -> KafkaClusterClientVpcConfigProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
vpcConfig :: KafkaClusterClientVpcConfigProperty
..}
    = KafkaClusterProperty {vpcConfig :: KafkaClusterClientVpcConfigProperty
vpcConfig = PropertyType "VpcConfig" KafkaClusterProperty
KafkaClusterClientVpcConfigProperty
newValue, ()
AmazonMskClusterProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
haddock_workaround_ :: ()
amazonMskCluster :: AmazonMskClusterProperty
..}