module Stratosphere.Glue.DataCatalogEncryptionSettings.DataCatalogEncryptionSettingsProperty (
module Exports, DataCatalogEncryptionSettingsProperty(..),
mkDataCatalogEncryptionSettingsProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.Glue.DataCatalogEncryptionSettings.ConnectionPasswordEncryptionProperty as Exports
import {-# SOURCE #-} Stratosphere.Glue.DataCatalogEncryptionSettings.EncryptionAtRestProperty as Exports
import Stratosphere.ResourceProperties
data DataCatalogEncryptionSettingsProperty
=
DataCatalogEncryptionSettingsProperty {DataCatalogEncryptionSettingsProperty -> ()
haddock_workaround_ :: (),
DataCatalogEncryptionSettingsProperty
-> Maybe ConnectionPasswordEncryptionProperty
connectionPasswordEncryption :: (Prelude.Maybe ConnectionPasswordEncryptionProperty),
DataCatalogEncryptionSettingsProperty
-> Maybe EncryptionAtRestProperty
encryptionAtRest :: (Prelude.Maybe EncryptionAtRestProperty)}
deriving stock (DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool
(DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool)
-> (DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool)
-> Eq DataCatalogEncryptionSettingsProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool
== :: DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool
$c/= :: DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool
/= :: DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty -> Bool
Prelude.Eq, Int -> DataCatalogEncryptionSettingsProperty -> ShowS
[DataCatalogEncryptionSettingsProperty] -> ShowS
DataCatalogEncryptionSettingsProperty -> String
(Int -> DataCatalogEncryptionSettingsProperty -> ShowS)
-> (DataCatalogEncryptionSettingsProperty -> String)
-> ([DataCatalogEncryptionSettingsProperty] -> ShowS)
-> Show DataCatalogEncryptionSettingsProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> DataCatalogEncryptionSettingsProperty -> ShowS
showsPrec :: Int -> DataCatalogEncryptionSettingsProperty -> ShowS
$cshow :: DataCatalogEncryptionSettingsProperty -> String
show :: DataCatalogEncryptionSettingsProperty -> String
$cshowList :: [DataCatalogEncryptionSettingsProperty] -> ShowS
showList :: [DataCatalogEncryptionSettingsProperty] -> ShowS
Prelude.Show)
mkDataCatalogEncryptionSettingsProperty ::
DataCatalogEncryptionSettingsProperty
mkDataCatalogEncryptionSettingsProperty :: DataCatalogEncryptionSettingsProperty
mkDataCatalogEncryptionSettingsProperty
= DataCatalogEncryptionSettingsProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (),
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
connectionPasswordEncryption = Maybe ConnectionPasswordEncryptionProperty
forall a. Maybe a
Prelude.Nothing,
encryptionAtRest :: Maybe EncryptionAtRestProperty
encryptionAtRest = Maybe EncryptionAtRestProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties DataCatalogEncryptionSettingsProperty where
toResourceProperties :: DataCatalogEncryptionSettingsProperty -> ResourceProperties
toResourceProperties DataCatalogEncryptionSettingsProperty {Maybe ConnectionPasswordEncryptionProperty
Maybe EncryptionAtRestProperty
()
haddock_workaround_ :: DataCatalogEncryptionSettingsProperty -> ()
connectionPasswordEncryption :: DataCatalogEncryptionSettingsProperty
-> Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: DataCatalogEncryptionSettingsProperty
-> Maybe EncryptionAtRestProperty
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: Maybe EncryptionAtRestProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::Glue::DataCatalogEncryptionSettings.DataCatalogEncryptionSettings",
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 -> ConnectionPasswordEncryptionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionPasswordEncryption"
(ConnectionPasswordEncryptionProperty -> (Key, Value))
-> Maybe ConnectionPasswordEncryptionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConnectionPasswordEncryptionProperty
connectionPasswordEncryption,
Key -> EncryptionAtRestProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EncryptionAtRest" (EncryptionAtRestProperty -> (Key, Value))
-> Maybe EncryptionAtRestProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionAtRestProperty
encryptionAtRest])}
instance JSON.ToJSON DataCatalogEncryptionSettingsProperty where
toJSON :: DataCatalogEncryptionSettingsProperty -> Value
toJSON DataCatalogEncryptionSettingsProperty {Maybe ConnectionPasswordEncryptionProperty
Maybe EncryptionAtRestProperty
()
haddock_workaround_ :: DataCatalogEncryptionSettingsProperty -> ()
connectionPasswordEncryption :: DataCatalogEncryptionSettingsProperty
-> Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: DataCatalogEncryptionSettingsProperty
-> Maybe EncryptionAtRestProperty
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: Maybe EncryptionAtRestProperty
..}
= [(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 -> ConnectionPasswordEncryptionProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ConnectionPasswordEncryption"
(ConnectionPasswordEncryptionProperty -> (Key, Value))
-> Maybe ConnectionPasswordEncryptionProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ConnectionPasswordEncryptionProperty
connectionPasswordEncryption,
Key -> EncryptionAtRestProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"EncryptionAtRest" (EncryptionAtRestProperty -> (Key, Value))
-> Maybe EncryptionAtRestProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe EncryptionAtRestProperty
encryptionAtRest]))
instance Property "ConnectionPasswordEncryption" DataCatalogEncryptionSettingsProperty where
type PropertyType "ConnectionPasswordEncryption" DataCatalogEncryptionSettingsProperty = ConnectionPasswordEncryptionProperty
set :: PropertyType
"ConnectionPasswordEncryption"
DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty
set PropertyType
"ConnectionPasswordEncryption"
DataCatalogEncryptionSettingsProperty
newValue DataCatalogEncryptionSettingsProperty {Maybe ConnectionPasswordEncryptionProperty
Maybe EncryptionAtRestProperty
()
haddock_workaround_ :: DataCatalogEncryptionSettingsProperty -> ()
connectionPasswordEncryption :: DataCatalogEncryptionSettingsProperty
-> Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: DataCatalogEncryptionSettingsProperty
-> Maybe EncryptionAtRestProperty
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: Maybe EncryptionAtRestProperty
..}
= DataCatalogEncryptionSettingsProperty
{connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
connectionPasswordEncryption = ConnectionPasswordEncryptionProperty
-> Maybe ConnectionPasswordEncryptionProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"ConnectionPasswordEncryption"
DataCatalogEncryptionSettingsProperty
ConnectionPasswordEncryptionProperty
newValue, Maybe EncryptionAtRestProperty
()
haddock_workaround_ :: ()
encryptionAtRest :: Maybe EncryptionAtRestProperty
haddock_workaround_ :: ()
encryptionAtRest :: Maybe EncryptionAtRestProperty
..}
instance Property "EncryptionAtRest" DataCatalogEncryptionSettingsProperty where
type PropertyType "EncryptionAtRest" DataCatalogEncryptionSettingsProperty = EncryptionAtRestProperty
set :: PropertyType
"EncryptionAtRest" DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty
-> DataCatalogEncryptionSettingsProperty
set PropertyType
"EncryptionAtRest" DataCatalogEncryptionSettingsProperty
newValue DataCatalogEncryptionSettingsProperty {Maybe ConnectionPasswordEncryptionProperty
Maybe EncryptionAtRestProperty
()
haddock_workaround_ :: DataCatalogEncryptionSettingsProperty -> ()
connectionPasswordEncryption :: DataCatalogEncryptionSettingsProperty
-> Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: DataCatalogEncryptionSettingsProperty
-> Maybe EncryptionAtRestProperty
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
encryptionAtRest :: Maybe EncryptionAtRestProperty
..}
= DataCatalogEncryptionSettingsProperty
{encryptionAtRest :: Maybe EncryptionAtRestProperty
encryptionAtRest = EncryptionAtRestProperty -> Maybe EncryptionAtRestProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType
"EncryptionAtRest" DataCatalogEncryptionSettingsProperty
EncryptionAtRestProperty
newValue, Maybe ConnectionPasswordEncryptionProperty
()
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
haddock_workaround_ :: ()
connectionPasswordEncryption :: Maybe ConnectionPasswordEncryptionProperty
..}