module Stratosphere.MSK.Cluster.EncryptionInTransitProperty ( EncryptionInTransitProperty(..), mkEncryptionInTransitProperty ) where import qualified Data.Aeson as JSON import qualified Stratosphere.Prelude as Prelude import Stratosphere.Property import Stratosphere.ResourceProperties import Stratosphere.Value data EncryptionInTransitProperty = -- | See: EncryptionInTransitProperty {haddock_workaround_ :: (), -- | See: clientBroker :: (Prelude.Maybe (Value Prelude.Text)), -- | See: inCluster :: (Prelude.Maybe (Value Prelude.Bool))} deriving stock (Prelude.Eq, Prelude.Show) mkEncryptionInTransitProperty :: EncryptionInTransitProperty mkEncryptionInTransitProperty = EncryptionInTransitProperty {haddock_workaround_ = (), clientBroker = Prelude.Nothing, inCluster = Prelude.Nothing} instance ToResourceProperties EncryptionInTransitProperty where toResourceProperties EncryptionInTransitProperty {..} = ResourceProperties {awsType = "AWS::MSK::Cluster.EncryptionInTransit", supportsTags = Prelude.False, properties = Prelude.fromList (Prelude.catMaybes [(JSON..=) "ClientBroker" Prelude.<$> clientBroker, (JSON..=) "InCluster" Prelude.<$> inCluster])} instance JSON.ToJSON EncryptionInTransitProperty where toJSON EncryptionInTransitProperty {..} = JSON.object (Prelude.fromList (Prelude.catMaybes [(JSON..=) "ClientBroker" Prelude.<$> clientBroker, (JSON..=) "InCluster" Prelude.<$> inCluster])) instance Property "ClientBroker" EncryptionInTransitProperty where type PropertyType "ClientBroker" EncryptionInTransitProperty = Value Prelude.Text set newValue EncryptionInTransitProperty {..} = EncryptionInTransitProperty {clientBroker = Prelude.pure newValue, ..} instance Property "InCluster" EncryptionInTransitProperty where type PropertyType "InCluster" EncryptionInTransitProperty = Value Prelude.Bool set newValue EncryptionInTransitProperty {..} = EncryptionInTransitProperty {inCluster = Prelude.pure newValue, ..}