module Stratosphere.DataSync.LocationObjectStorage (
module Exports, LocationObjectStorage(..), mkLocationObjectStorage
) where
import qualified Data.Aeson as JSON
import qualified Stratosphere.Prelude as Prelude
import Stratosphere.Property
import {-# SOURCE #-} Stratosphere.DataSync.LocationObjectStorage.CmkSecretConfigProperty as Exports
import {-# SOURCE #-} Stratosphere.DataSync.LocationObjectStorage.CustomSecretConfigProperty as Exports
import Stratosphere.ResourceProperties
import Stratosphere.Tag
import Stratosphere.Value
data LocationObjectStorage
=
LocationObjectStorage {LocationObjectStorage -> ()
haddock_workaround_ :: (),
LocationObjectStorage -> Maybe (Value Text)
accessKey :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe (ValueList Text)
agentArns :: (Prelude.Maybe (ValueList Prelude.Text)),
LocationObjectStorage -> Maybe (Value Text)
bucketName :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe CmkSecretConfigProperty
cmkSecretConfig :: (Prelude.Maybe CmkSecretConfigProperty),
LocationObjectStorage -> Maybe CustomSecretConfigProperty
customSecretConfig :: (Prelude.Maybe CustomSecretConfigProperty),
LocationObjectStorage -> Maybe (Value Text)
secretKey :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe (Value Text)
serverHostname :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe (Value Integer)
serverPort :: (Prelude.Maybe (Value Prelude.Integer)),
LocationObjectStorage -> Maybe (Value Text)
serverProtocol :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe (Value Text)
subdirectory :: (Prelude.Maybe (Value Prelude.Text)),
LocationObjectStorage -> Maybe [Tag]
tags :: (Prelude.Maybe [Tag])}
deriving stock (LocationObjectStorage -> LocationObjectStorage -> Bool
(LocationObjectStorage -> LocationObjectStorage -> Bool)
-> (LocationObjectStorage -> LocationObjectStorage -> Bool)
-> Eq LocationObjectStorage
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: LocationObjectStorage -> LocationObjectStorage -> Bool
== :: LocationObjectStorage -> LocationObjectStorage -> Bool
$c/= :: LocationObjectStorage -> LocationObjectStorage -> Bool
/= :: LocationObjectStorage -> LocationObjectStorage -> Bool
Prelude.Eq, Int -> LocationObjectStorage -> ShowS
[LocationObjectStorage] -> ShowS
LocationObjectStorage -> String
(Int -> LocationObjectStorage -> ShowS)
-> (LocationObjectStorage -> String)
-> ([LocationObjectStorage] -> ShowS)
-> Show LocationObjectStorage
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> LocationObjectStorage -> ShowS
showsPrec :: Int -> LocationObjectStorage -> ShowS
$cshow :: LocationObjectStorage -> String
show :: LocationObjectStorage -> String
$cshowList :: [LocationObjectStorage] -> ShowS
showList :: [LocationObjectStorage] -> ShowS
Prelude.Show)
mkLocationObjectStorage :: LocationObjectStorage
mkLocationObjectStorage :: LocationObjectStorage
mkLocationObjectStorage
= LocationObjectStorage
{haddock_workaround_ :: ()
haddock_workaround_ = (), accessKey :: Maybe (Value Text)
accessKey = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
agentArns :: Maybe (ValueList Text)
agentArns = Maybe (ValueList Text)
forall a. Maybe a
Prelude.Nothing, bucketName :: Maybe (Value Text)
bucketName = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
cmkSecretConfig :: Maybe CmkSecretConfigProperty
cmkSecretConfig = Maybe CmkSecretConfigProperty
forall a. Maybe a
Prelude.Nothing,
customSecretConfig :: Maybe CustomSecretConfigProperty
customSecretConfig = Maybe CustomSecretConfigProperty
forall a. Maybe a
Prelude.Nothing, secretKey :: Maybe (Value Text)
secretKey = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
serverCertificate :: Maybe (Value Text)
serverCertificate = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
serverHostname :: Maybe (Value Text)
serverHostname = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, serverPort :: Maybe (Value Integer)
serverPort = Maybe (Value Integer)
forall a. Maybe a
Prelude.Nothing,
serverProtocol :: Maybe (Value Text)
serverProtocol = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing, subdirectory :: Maybe (Value Text)
subdirectory = Maybe (Value Text)
forall a. Maybe a
Prelude.Nothing,
tags :: Maybe [Tag]
tags = Maybe [Tag]
forall a. Maybe a
Prelude.Nothing}
instance ToResourceProperties LocationObjectStorage where
toResourceProperties :: LocationObjectStorage -> ResourceProperties
toResourceProperties LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= ResourceProperties
{awsType :: Text
awsType = Text
"AWS::DataSync::LocationObjectStorage",
supportsTags :: Bool
supportsTags = Bool
Prelude.True,
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 -> 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
"AccessKey" (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)
accessKey,
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
"AgentArns" (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)
agentArns,
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
"BucketName" (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)
bucketName,
Key -> CmkSecretConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CmkSecretConfig" (CmkSecretConfigProperty -> (Key, Value))
-> Maybe CmkSecretConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CmkSecretConfigProperty
cmkSecretConfig,
Key -> CustomSecretConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CustomSecretConfig" (CustomSecretConfigProperty -> (Key, Value))
-> Maybe CustomSecretConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CustomSecretConfigProperty
customSecretConfig,
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
"SecretKey" (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)
secretKey,
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
"ServerCertificate" (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)
serverCertificate,
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
"ServerHostname" (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)
serverHostname,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ServerPort" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
serverPort,
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
"ServerProtocol" (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)
serverProtocol,
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
"Subdirectory" (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)
subdirectory,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags])}
instance JSON.ToJSON LocationObjectStorage where
toJSON :: LocationObjectStorage -> Value
toJSON LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= [(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 -> 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
"AccessKey" (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)
accessKey,
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
"AgentArns" (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)
agentArns,
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
"BucketName" (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)
bucketName,
Key -> CmkSecretConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CmkSecretConfig" (CmkSecretConfigProperty -> (Key, Value))
-> Maybe CmkSecretConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CmkSecretConfigProperty
cmkSecretConfig,
Key -> CustomSecretConfigProperty -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"CustomSecretConfig" (CustomSecretConfigProperty -> (Key, Value))
-> Maybe CustomSecretConfigProperty -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CustomSecretConfigProperty
customSecretConfig,
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
"SecretKey" (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)
secretKey,
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
"ServerCertificate" (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)
serverCertificate,
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
"ServerHostname" (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)
serverHostname,
Key -> Value Integer -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"ServerPort" (Value Integer -> (Key, Value))
-> Maybe (Value Integer) -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (Value Integer)
serverPort,
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
"ServerProtocol" (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)
serverProtocol,
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
"Subdirectory" (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)
subdirectory,
Key -> [Tag] -> (Key, Value)
forall v. ToJSON v => Key -> v -> (Key, Value)
forall e kv v. (KeyValue e kv, ToJSON v) => Key -> v -> kv
(JSON..=) Key
"Tags" ([Tag] -> (Key, Value)) -> Maybe [Tag] -> Maybe (Key, Value)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags]))
instance Property "AccessKey" LocationObjectStorage where
type PropertyType "AccessKey" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "AccessKey" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "AccessKey" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {accessKey :: Maybe (Value Text)
accessKey = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AccessKey" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "AgentArns" LocationObjectStorage where
type PropertyType "AgentArns" LocationObjectStorage = ValueList Prelude.Text
set :: PropertyType "AgentArns" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "AgentArns" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {agentArns :: Maybe (ValueList Text)
agentArns = ValueList Text -> Maybe (ValueList Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "AgentArns" LocationObjectStorage
ValueList Text
newValue, Maybe [Tag]
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "BucketName" LocationObjectStorage where
type PropertyType "BucketName" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "BucketName" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "BucketName" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {bucketName :: Maybe (Value Text)
bucketName = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "BucketName" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "CmkSecretConfig" LocationObjectStorage where
type PropertyType "CmkSecretConfig" LocationObjectStorage = CmkSecretConfigProperty
set :: PropertyType "CmkSecretConfig" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "CmkSecretConfig" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage
{cmkSecretConfig :: Maybe CmkSecretConfigProperty
cmkSecretConfig = CmkSecretConfigProperty -> Maybe CmkSecretConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CmkSecretConfig" LocationObjectStorage
CmkSecretConfigProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "CustomSecretConfig" LocationObjectStorage where
type PropertyType "CustomSecretConfig" LocationObjectStorage = CustomSecretConfigProperty
set :: PropertyType "CustomSecretConfig" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "CustomSecretConfig" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage
{customSecretConfig :: Maybe CustomSecretConfigProperty
customSecretConfig = CustomSecretConfigProperty -> Maybe CustomSecretConfigProperty
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "CustomSecretConfig" LocationObjectStorage
CustomSecretConfigProperty
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "SecretKey" LocationObjectStorage where
type PropertyType "SecretKey" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "SecretKey" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "SecretKey" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {secretKey :: Maybe (Value Text)
secretKey = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "SecretKey" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ServerCertificate" LocationObjectStorage where
type PropertyType "ServerCertificate" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "ServerCertificate" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "ServerCertificate" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage
{serverCertificate :: Maybe (Value Text)
serverCertificate = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServerCertificate" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ServerHostname" LocationObjectStorage where
type PropertyType "ServerHostname" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "ServerHostname" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "ServerHostname" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage
{serverHostname :: Maybe (Value Text)
serverHostname = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServerHostname" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ServerPort" LocationObjectStorage where
type PropertyType "ServerPort" LocationObjectStorage = Value Prelude.Integer
set :: PropertyType "ServerPort" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "ServerPort" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {serverPort :: Maybe (Value Integer)
serverPort = Value Integer -> Maybe (Value Integer)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServerPort" LocationObjectStorage
Value Integer
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "ServerProtocol" LocationObjectStorage where
type PropertyType "ServerProtocol" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "ServerProtocol" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "ServerProtocol" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage
{serverProtocol :: Maybe (Value Text)
serverProtocol = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "ServerProtocol" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "Subdirectory" LocationObjectStorage where
type PropertyType "Subdirectory" LocationObjectStorage = Value Prelude.Text
set :: PropertyType "Subdirectory" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "Subdirectory" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {subdirectory :: Maybe (Value Text)
subdirectory = Value Text -> Maybe (Value Text)
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure PropertyType "Subdirectory" LocationObjectStorage
Value Text
newValue, Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
tags :: Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
instance Property "Tags" LocationObjectStorage where
type PropertyType "Tags" LocationObjectStorage = [Tag]
set :: PropertyType "Tags" LocationObjectStorage
-> LocationObjectStorage -> LocationObjectStorage
set PropertyType "Tags" LocationObjectStorage
newValue LocationObjectStorage {Maybe [Tag]
Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: LocationObjectStorage -> ()
accessKey :: LocationObjectStorage -> Maybe (Value Text)
agentArns :: LocationObjectStorage -> Maybe (ValueList Text)
bucketName :: LocationObjectStorage -> Maybe (Value Text)
cmkSecretConfig :: LocationObjectStorage -> Maybe CmkSecretConfigProperty
customSecretConfig :: LocationObjectStorage -> Maybe CustomSecretConfigProperty
secretKey :: LocationObjectStorage -> Maybe (Value Text)
serverCertificate :: LocationObjectStorage -> Maybe (Value Text)
serverHostname :: LocationObjectStorage -> Maybe (Value Text)
serverPort :: LocationObjectStorage -> Maybe (Value Integer)
serverProtocol :: LocationObjectStorage -> Maybe (Value Text)
subdirectory :: LocationObjectStorage -> Maybe (Value Text)
tags :: LocationObjectStorage -> Maybe [Tag]
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
tags :: Maybe [Tag]
..}
= LocationObjectStorage {tags :: Maybe [Tag]
tags = [Tag] -> Maybe [Tag]
forall a. a -> Maybe a
forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure [Tag]
PropertyType "Tags" LocationObjectStorage
newValue, Maybe (ValueList Text)
Maybe (Value Integer)
Maybe (Value Text)
Maybe CmkSecretConfigProperty
Maybe CustomSecretConfigProperty
()
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
haddock_workaround_ :: ()
accessKey :: Maybe (Value Text)
agentArns :: Maybe (ValueList Text)
bucketName :: Maybe (Value Text)
cmkSecretConfig :: Maybe CmkSecretConfigProperty
customSecretConfig :: Maybe CustomSecretConfigProperty
secretKey :: Maybe (Value Text)
serverCertificate :: Maybe (Value Text)
serverHostname :: Maybe (Value Text)
serverPort :: Maybe (Value Integer)
serverProtocol :: Maybe (Value Text)
subdirectory :: Maybe (Value Text)
..}