module Stratosphere.ODB.OdbNetwork.ManagedServicesProperty (
module Exports, ManagedServicesProperty(..),
mkManagedServicesProperty
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.ODB.OdbNetwork.ManagedS3BackupAccessProperty as Exports
import {-# SOURCE #-} Stratosphere.ODB.OdbNetwork.S3AccessProperty as Exports
import {-# SOURCE #-} Stratosphere.ODB.OdbNetwork.ServiceNetworkEndpointProperty as Exports
import {-# SOURCE #-} Stratosphere.ODB.OdbNetwork.ZeroEtlAccessProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Value
data ManagedServicesProperty
=
ManagedServicesProperty {ManagedServicesProperty -> ()
haddock_workaround_ :: (),
ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedS3BackupAccess :: (Prelude.Maybe ManagedS3BackupAccessProperty),
ManagedServicesProperty -> Maybe (ValueList Text)
managedServicesIpv4Cidrs :: (Prelude.Maybe (ValueList Prelude.Text)),
ManagedServicesProperty -> Maybe (Value Text)
resourceGatewayArn :: (Prelude.Maybe (Value Prelude.Text)),
ManagedServicesProperty -> Maybe S3AccessProperty
s3Access :: (Prelude.Maybe S3AccessProperty),
ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkArn :: (Prelude.Maybe (Value Prelude.Text)),
ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
serviceNetworkEndpoint :: (Prelude.Maybe ServiceNetworkEndpointProperty),
ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
zeroEtlAccess :: (Prelude.Maybe ZeroEtlAccessProperty)}
deriving stock (ManagedServicesProperty -> ManagedServicesProperty -> Bool
(ManagedServicesProperty -> ManagedServicesProperty -> Bool)
-> (ManagedServicesProperty -> ManagedServicesProperty -> Bool)
-> Eq ManagedServicesProperty
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ManagedServicesProperty -> ManagedServicesProperty -> Bool
== :: ManagedServicesProperty -> ManagedServicesProperty -> Bool
$c/= :: ManagedServicesProperty -> ManagedServicesProperty -> Bool
/= :: ManagedServicesProperty -> ManagedServicesProperty -> Bool
Prelude.Eq, Int -> ManagedServicesProperty -> ShowS
[ManagedServicesProperty] -> ShowS
ManagedServicesProperty -> String
(Int -> ManagedServicesProperty -> ShowS)
-> (ManagedServicesProperty -> String)
-> ([ManagedServicesProperty] -> ShowS)
-> Show ManagedServicesProperty
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> ManagedServicesProperty -> ShowS
showsPrec :: Int -> ManagedServicesProperty -> ShowS
$cshow :: ManagedServicesProperty -> String
show :: ManagedServicesProperty -> String
$cshowList :: [ManagedServicesProperty] -> ShowS
showList :: [ManagedServicesProperty] -> ShowS
Prelude.Show)
mkManagedServicesProperty :: ManagedServicesProperty
mkManagedServicesProperty :: ManagedServicesProperty
mkManagedServicesProperty
= ManagedServicesProperty
{haddock_workaround_ :: ()
haddock_workaround_ = (), managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedS3BackupAccess = Maybe ManagedS3BackupAccessProperty
forall a. Maybe a
Prelude.Nothing,
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
managedServicesIpv4Cidrs = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing,
resourceGatewayArn :: Maybe (Value Text)
resourceGatewayArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, s3Access :: Maybe S3AccessProperty
s3Access = Maybe S3AccessProperty
forall a. Maybe a
Prelude.Nothing,
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkArn = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
serviceNetworkEndpoint = Maybe ServiceNetworkEndpointProperty
forall a. Maybe a
Prelude.Nothing,
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
zeroEtlAccess = Maybe ZeroEtlAccessProperty
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties ManagedServicesProperty where
toResourceProperties :: ManagedServicesProperty -> ResourceProperties
toResourceProperties ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::ODB::OdbNetwork.ManagedServices",
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 -> ManagedS3BackupAccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ManagedS3BackupAccess"
(ManagedS3BackupAccessProperty -> (Key, Value))
-> Maybe ManagedS3BackupAccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ManagedS3BackupAccessProperty
managedS3BackupAccess,
Key -> ValueList 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
"ManagedServicesIpv4Cidrs"
(ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
managedServicesIpv4Cidrs,
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
"ResourceGatewayArn" (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)
resourceGatewayArn,
Key -> S3AccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3Access" (S3AccessProperty -> (Key, Value))
-> Maybe S3AccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3AccessProperty
s3Access,
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
"ServiceNetworkArn" (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)
serviceNetworkArn,
Key -> ServiceNetworkEndpointProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ServiceNetworkEndpoint"
(ServiceNetworkEndpointProperty -> (Key, Value))
-> Maybe ServiceNetworkEndpointProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ServiceNetworkEndpointProperty
serviceNetworkEndpoint,
Key -> ZeroEtlAccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ZeroEtlAccess" (ZeroEtlAccessProperty -> (Key, Value))
-> Maybe ZeroEtlAccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ZeroEtlAccessProperty
zeroEtlAccess])}
instance JSON.ToJSON ManagedServicesProperty where
toJSON :: ManagedServicesProperty -> Value
toJSON ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= [(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 -> ManagedS3BackupAccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ManagedS3BackupAccess"
(ManagedS3BackupAccessProperty -> (Key, Value))
-> Maybe ManagedS3BackupAccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ManagedS3BackupAccessProperty
managedS3BackupAccess,
Key -> ValueList 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
"ManagedServicesIpv4Cidrs"
(ValueList Text -> (Key, Value))
-> Maybe (ValueList Text) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (ValueList Text)
managedServicesIpv4Cidrs,
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
"ResourceGatewayArn" (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)
resourceGatewayArn,
Key -> S3AccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"S3Access" (S3AccessProperty -> (Key, Value))
-> Maybe S3AccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe S3AccessProperty
s3Access,
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
"ServiceNetworkArn" (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)
serviceNetworkArn,
Key -> ServiceNetworkEndpointProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ServiceNetworkEndpoint"
(ServiceNetworkEndpointProperty -> (Key, Value))
-> Maybe ServiceNetworkEndpointProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ServiceNetworkEndpointProperty
serviceNetworkEndpoint,
Key -> ZeroEtlAccessProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ZeroEtlAccess" (ZeroEtlAccessProperty -> (Key, Value))
-> Maybe ZeroEtlAccessProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ZeroEtlAccessProperty
zeroEtlAccess]))
instance Property "ManagedS3BackupAccess" ManagedServicesProperty where
type PropertyType "ManagedS3BackupAccess" ManagedServicesProperty = ManagedS3BackupAccessProperty
set :: PropertyType "ManagedS3BackupAccess" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ManagedS3BackupAccess" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedS3BackupAccess = ManagedS3BackupAccessProperty
-> Maybe ManagedS3BackupAccessProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ManagedS3BackupAccess" ManagedServicesProperty
ManagedS3BackupAccessProperty
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "ManagedServicesIpv4Cidrs" ManagedServicesProperty where
type PropertyType "ManagedServicesIpv4Cidrs" ManagedServicesProperty = ValueList Prelude.Text
set :: PropertyType "ManagedServicesIpv4Cidrs" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ManagedServicesIpv4Cidrs" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{managedServicesIpv4Cidrs :: Maybe (ValueList Text)
managedServicesIpv4Cidrs = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ManagedServicesIpv4Cidrs" ManagedServicesProperty
ValueList Text
newValue, Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "ResourceGatewayArn" ManagedServicesProperty where
type PropertyType "ResourceGatewayArn" ManagedServicesProperty = Value Prelude.Text
set :: PropertyType "ResourceGatewayArn" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ResourceGatewayArn" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{resourceGatewayArn :: Maybe (Value Text)
resourceGatewayArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ResourceGatewayArn" ManagedServicesProperty
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "S3Access" ManagedServicesProperty where
type PropertyType "S3Access" ManagedServicesProperty = S3AccessProperty
set :: PropertyType "S3Access" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "S3Access" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty {s3Access :: Maybe S3AccessProperty
s3Access = S3AccessProperty -> Maybe S3AccessProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "S3Access" ManagedServicesProperty
S3AccessProperty
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "ServiceNetworkArn" ManagedServicesProperty where
type PropertyType "ServiceNetworkArn" ManagedServicesProperty = Value Prelude.Text
set :: PropertyType "ServiceNetworkArn" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ServiceNetworkArn" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{serviceNetworkArn :: Maybe (Value Text)
serviceNetworkArn = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServiceNetworkArn" ManagedServicesProperty
Value Text
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "ServiceNetworkEndpoint" ManagedServicesProperty where
type PropertyType "ServiceNetworkEndpoint" ManagedServicesProperty = ServiceNetworkEndpointProperty
set :: PropertyType "ServiceNetworkEndpoint" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ServiceNetworkEndpoint" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
serviceNetworkEndpoint = ServiceNetworkEndpointProperty
-> Maybe ServiceNetworkEndpointProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServiceNetworkEndpoint" ManagedServicesProperty
ServiceNetworkEndpointProperty
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
instance Property "ZeroEtlAccess" ManagedServicesProperty where
type PropertyType "ZeroEtlAccess" ManagedServicesProperty = ZeroEtlAccessProperty
set :: PropertyType "ZeroEtlAccess" ManagedServicesProperty
-> ManagedServicesProperty -> ManagedServicesProperty
set PropertyType "ZeroEtlAccess" ManagedServicesProperty
newValue ManagedServicesProperty {Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
Maybe ZeroEtlAccessProperty
()
haddock_workaround_ :: ManagedServicesProperty -> ()
managedS3BackupAccess :: ManagedServicesProperty -> Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: ManagedServicesProperty -> Maybe (ValueList Text)
resourceGatewayArn :: ManagedServicesProperty -> Maybe (Value Text)
s3Access :: ManagedServicesProperty -> Maybe S3AccessProperty
serviceNetworkArn :: ManagedServicesProperty -> Maybe (Value Text)
serviceNetworkEndpoint :: ManagedServicesProperty -> Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: ManagedServicesProperty -> Maybe ZeroEtlAccessProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
zeroEtlAccess :: Maybe ZeroEtlAccessProperty
..}
= ManagedServicesProperty
{zeroEtlAccess :: Maybe ZeroEtlAccessProperty
zeroEtlAccess = ZeroEtlAccessProperty -> Maybe ZeroEtlAccessProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ZeroEtlAccess" ManagedServicesProperty
ZeroEtlAccessProperty
newValue, Maybe (ValueList Text)
Maybe (Value Text)
Maybe ManagedS3BackupAccessProperty
Maybe S3AccessProperty
Maybe ServiceNetworkEndpointProperty
()
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
haddock_workaround_ :: ()
managedS3BackupAccess :: Maybe ManagedS3BackupAccessProperty
managedServicesIpv4Cidrs :: Maybe (ValueList Text)
resourceGatewayArn :: Maybe (Value Text)
s3Access :: Maybe S3AccessProperty
serviceNetworkArn :: Maybe (Value Text)
serviceNetworkEndpoint :: Maybe ServiceNetworkEndpointProperty
..}