{-# LANGUAGE DeriveGeneric #-}
{-# LANGUAGE DuplicateRecordFields #-}
{-# LANGUAGE NamedFieldPuns #-}
{-# LANGUAGE OverloadedStrings #-}
{-# LANGUAGE RecordWildCards #-}
{-# LANGUAGE StrictData #-}
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE NoImplicitPrelude #-}
{-# OPTIONS_GHC -fno-warn-unused-binds #-}
{-# OPTIONS_GHC -fno-warn-unused-imports #-}
{-# OPTIONS_GHC -fno-warn-unused-matches #-}
module Amazonka.StorageGateway.CreateNFSFileShare
(
CreateNFSFileShare (..),
newCreateNFSFileShare,
createNFSFileShare_auditDestinationARN,
createNFSFileShare_bucketRegion,
createNFSFileShare_cacheAttributes,
createNFSFileShare_clientList,
createNFSFileShare_defaultStorageClass,
createNFSFileShare_fileShareName,
createNFSFileShare_guessMIMETypeEnabled,
createNFSFileShare_kmsEncrypted,
createNFSFileShare_kmsKey,
createNFSFileShare_nFSFileShareDefaults,
createNFSFileShare_notificationPolicy,
createNFSFileShare_objectACL,
createNFSFileShare_readOnly,
createNFSFileShare_requesterPays,
createNFSFileShare_squash,
createNFSFileShare_tags,
createNFSFileShare_vPCEndpointDNSName,
createNFSFileShare_clientToken,
createNFSFileShare_gatewayARN,
createNFSFileShare_role,
createNFSFileShare_locationARN,
CreateNFSFileShareResponse (..),
newCreateNFSFileShareResponse,
createNFSFileShareResponse_fileShareARN,
createNFSFileShareResponse_httpStatus,
)
where
import qualified Amazonka.Core as Core
import qualified Amazonka.Core.Lens.Internal as Lens
import qualified Amazonka.Data as Data
import qualified Amazonka.Prelude as Prelude
import qualified Amazonka.Request as Request
import qualified Amazonka.Response as Response
import Amazonka.StorageGateway.Types
data CreateNFSFileShare = CreateNFSFileShare'
{
CreateNFSFileShare -> Maybe Text
auditDestinationARN :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe Text
bucketRegion :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe CacheAttributes
cacheAttributes :: Prelude.Maybe CacheAttributes,
CreateNFSFileShare -> Maybe (NonEmpty Text)
clientList :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
CreateNFSFileShare -> Maybe Text
defaultStorageClass :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe Text
fileShareName :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe Bool
guessMIMETypeEnabled :: Prelude.Maybe Prelude.Bool,
CreateNFSFileShare -> Maybe Bool
kmsEncrypted :: Prelude.Maybe Prelude.Bool,
CreateNFSFileShare -> Maybe Text
kmsKey :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe NFSFileShareDefaults
nFSFileShareDefaults :: Prelude.Maybe NFSFileShareDefaults,
CreateNFSFileShare -> Maybe Text
notificationPolicy :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe ObjectACL
objectACL :: Prelude.Maybe ObjectACL,
CreateNFSFileShare -> Maybe Bool
readOnly :: Prelude.Maybe Prelude.Bool,
CreateNFSFileShare -> Maybe Bool
requesterPays :: Prelude.Maybe Prelude.Bool,
CreateNFSFileShare -> Maybe Text
squash :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Maybe [Tag]
tags :: Prelude.Maybe [Tag],
CreateNFSFileShare -> Maybe Text
vPCEndpointDNSName :: Prelude.Maybe Prelude.Text,
CreateNFSFileShare -> Text
clientToken :: Prelude.Text,
CreateNFSFileShare -> Text
gatewayARN :: Prelude.Text,
CreateNFSFileShare -> Text
role' :: Prelude.Text,
CreateNFSFileShare -> Text
locationARN :: Prelude.Text
}
deriving (CreateNFSFileShare -> CreateNFSFileShare -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateNFSFileShare -> CreateNFSFileShare -> Bool
$c/= :: CreateNFSFileShare -> CreateNFSFileShare -> Bool
== :: CreateNFSFileShare -> CreateNFSFileShare -> Bool
$c== :: CreateNFSFileShare -> CreateNFSFileShare -> Bool
Prelude.Eq, ReadPrec [CreateNFSFileShare]
ReadPrec CreateNFSFileShare
Int -> ReadS CreateNFSFileShare
ReadS [CreateNFSFileShare]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateNFSFileShare]
$creadListPrec :: ReadPrec [CreateNFSFileShare]
readPrec :: ReadPrec CreateNFSFileShare
$creadPrec :: ReadPrec CreateNFSFileShare
readList :: ReadS [CreateNFSFileShare]
$creadList :: ReadS [CreateNFSFileShare]
readsPrec :: Int -> ReadS CreateNFSFileShare
$creadsPrec :: Int -> ReadS CreateNFSFileShare
Prelude.Read, Int -> CreateNFSFileShare -> ShowS
[CreateNFSFileShare] -> ShowS
CreateNFSFileShare -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateNFSFileShare] -> ShowS
$cshowList :: [CreateNFSFileShare] -> ShowS
show :: CreateNFSFileShare -> String
$cshow :: CreateNFSFileShare -> String
showsPrec :: Int -> CreateNFSFileShare -> ShowS
$cshowsPrec :: Int -> CreateNFSFileShare -> ShowS
Prelude.Show, forall x. Rep CreateNFSFileShare x -> CreateNFSFileShare
forall x. CreateNFSFileShare -> Rep CreateNFSFileShare x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep CreateNFSFileShare x -> CreateNFSFileShare
$cfrom :: forall x. CreateNFSFileShare -> Rep CreateNFSFileShare x
Prelude.Generic)
newCreateNFSFileShare ::
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
Prelude.Text ->
CreateNFSFileShare
newCreateNFSFileShare :: Text -> Text -> Text -> Text -> CreateNFSFileShare
newCreateNFSFileShare
Text
pClientToken_
Text
pGatewayARN_
Text
pRole_
Text
pLocationARN_ =
CreateNFSFileShare'
{ $sel:auditDestinationARN:CreateNFSFileShare' :: Maybe Text
auditDestinationARN =
forall a. Maybe a
Prelude.Nothing,
$sel:bucketRegion:CreateNFSFileShare' :: Maybe Text
bucketRegion = forall a. Maybe a
Prelude.Nothing,
$sel:cacheAttributes:CreateNFSFileShare' :: Maybe CacheAttributes
cacheAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:clientList:CreateNFSFileShare' :: Maybe (NonEmpty Text)
clientList = forall a. Maybe a
Prelude.Nothing,
$sel:defaultStorageClass:CreateNFSFileShare' :: Maybe Text
defaultStorageClass = forall a. Maybe a
Prelude.Nothing,
$sel:fileShareName:CreateNFSFileShare' :: Maybe Text
fileShareName = forall a. Maybe a
Prelude.Nothing,
$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: Maybe Bool
guessMIMETypeEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:kmsEncrypted:CreateNFSFileShare' :: Maybe Bool
kmsEncrypted = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKey:CreateNFSFileShare' :: Maybe Text
kmsKey = forall a. Maybe a
Prelude.Nothing,
$sel:nFSFileShareDefaults:CreateNFSFileShare' :: Maybe NFSFileShareDefaults
nFSFileShareDefaults = forall a. Maybe a
Prelude.Nothing,
$sel:notificationPolicy:CreateNFSFileShare' :: Maybe Text
notificationPolicy = forall a. Maybe a
Prelude.Nothing,
$sel:objectACL:CreateNFSFileShare' :: Maybe ObjectACL
objectACL = forall a. Maybe a
Prelude.Nothing,
$sel:readOnly:CreateNFSFileShare' :: Maybe Bool
readOnly = forall a. Maybe a
Prelude.Nothing,
$sel:requesterPays:CreateNFSFileShare' :: Maybe Bool
requesterPays = forall a. Maybe a
Prelude.Nothing,
$sel:squash:CreateNFSFileShare' :: Maybe Text
squash = forall a. Maybe a
Prelude.Nothing,
$sel:tags:CreateNFSFileShare' :: Maybe [Tag]
tags = forall a. Maybe a
Prelude.Nothing,
$sel:vPCEndpointDNSName:CreateNFSFileShare' :: Maybe Text
vPCEndpointDNSName = forall a. Maybe a
Prelude.Nothing,
$sel:clientToken:CreateNFSFileShare' :: Text
clientToken = Text
pClientToken_,
$sel:gatewayARN:CreateNFSFileShare' :: Text
gatewayARN = Text
pGatewayARN_,
$sel:role':CreateNFSFileShare' :: Text
role' = Text
pRole_,
$sel:locationARN:CreateNFSFileShare' :: Text
locationARN = Text
pLocationARN_
}
createNFSFileShare_auditDestinationARN :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_auditDestinationARN :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_auditDestinationARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
auditDestinationARN :: Maybe Text
$sel:auditDestinationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
auditDestinationARN} -> Maybe Text
auditDestinationARN) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:auditDestinationARN:CreateNFSFileShare' :: Maybe Text
auditDestinationARN = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_bucketRegion :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_bucketRegion :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_bucketRegion = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
bucketRegion :: Maybe Text
$sel:bucketRegion:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
bucketRegion} -> Maybe Text
bucketRegion) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:bucketRegion:CreateNFSFileShare' :: Maybe Text
bucketRegion = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_cacheAttributes :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe CacheAttributes)
createNFSFileShare_cacheAttributes :: Lens' CreateNFSFileShare (Maybe CacheAttributes)
createNFSFileShare_cacheAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe CacheAttributes
cacheAttributes :: Maybe CacheAttributes
$sel:cacheAttributes:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe CacheAttributes
cacheAttributes} -> Maybe CacheAttributes
cacheAttributes) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe CacheAttributes
a -> CreateNFSFileShare
s {$sel:cacheAttributes:CreateNFSFileShare' :: Maybe CacheAttributes
cacheAttributes = Maybe CacheAttributes
a} :: CreateNFSFileShare)
createNFSFileShare_clientList :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
createNFSFileShare_clientList :: Lens' CreateNFSFileShare (Maybe (NonEmpty Text))
createNFSFileShare_clientList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe (NonEmpty Text)
clientList :: Maybe (NonEmpty Text)
$sel:clientList:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe (NonEmpty Text)
clientList} -> Maybe (NonEmpty Text)
clientList) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe (NonEmpty Text)
a -> CreateNFSFileShare
s {$sel:clientList:CreateNFSFileShare' :: Maybe (NonEmpty Text)
clientList = Maybe (NonEmpty Text)
a} :: CreateNFSFileShare) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createNFSFileShare_defaultStorageClass :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_defaultStorageClass :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_defaultStorageClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
defaultStorageClass :: Maybe Text
$sel:defaultStorageClass:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
defaultStorageClass} -> Maybe Text
defaultStorageClass) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:defaultStorageClass:CreateNFSFileShare' :: Maybe Text
defaultStorageClass = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_fileShareName :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_fileShareName :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_fileShareName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
fileShareName :: Maybe Text
$sel:fileShareName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
fileShareName} -> Maybe Text
fileShareName) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:fileShareName:CreateNFSFileShare' :: Maybe Text
fileShareName = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_guessMIMETypeEnabled :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)
createNFSFileShare_guessMIMETypeEnabled :: Lens' CreateNFSFileShare (Maybe Bool)
createNFSFileShare_guessMIMETypeEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
guessMIMETypeEnabled} -> Maybe Bool
guessMIMETypeEnabled) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Bool
a -> CreateNFSFileShare
s {$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: Maybe Bool
guessMIMETypeEnabled = Maybe Bool
a} :: CreateNFSFileShare)
createNFSFileShare_kmsEncrypted :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)
createNFSFileShare_kmsEncrypted :: Lens' CreateNFSFileShare (Maybe Bool)
createNFSFileShare_kmsEncrypted = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Bool
kmsEncrypted :: Maybe Bool
$sel:kmsEncrypted:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
kmsEncrypted} -> Maybe Bool
kmsEncrypted) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Bool
a -> CreateNFSFileShare
s {$sel:kmsEncrypted:CreateNFSFileShare' :: Maybe Bool
kmsEncrypted = Maybe Bool
a} :: CreateNFSFileShare)
createNFSFileShare_kmsKey :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_kmsKey :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_kmsKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
kmsKey :: Maybe Text
$sel:kmsKey:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
kmsKey} -> Maybe Text
kmsKey) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:kmsKey:CreateNFSFileShare' :: Maybe Text
kmsKey = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_nFSFileShareDefaults :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe NFSFileShareDefaults)
createNFSFileShare_nFSFileShareDefaults :: Lens' CreateNFSFileShare (Maybe NFSFileShareDefaults)
createNFSFileShare_nFSFileShareDefaults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe NFSFileShareDefaults
nFSFileShareDefaults :: Maybe NFSFileShareDefaults
$sel:nFSFileShareDefaults:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe NFSFileShareDefaults
nFSFileShareDefaults} -> Maybe NFSFileShareDefaults
nFSFileShareDefaults) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe NFSFileShareDefaults
a -> CreateNFSFileShare
s {$sel:nFSFileShareDefaults:CreateNFSFileShare' :: Maybe NFSFileShareDefaults
nFSFileShareDefaults = Maybe NFSFileShareDefaults
a} :: CreateNFSFileShare)
createNFSFileShare_notificationPolicy :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_notificationPolicy :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_notificationPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
notificationPolicy :: Maybe Text
$sel:notificationPolicy:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
notificationPolicy} -> Maybe Text
notificationPolicy) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:notificationPolicy:CreateNFSFileShare' :: Maybe Text
notificationPolicy = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_objectACL :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe ObjectACL)
createNFSFileShare_objectACL :: Lens' CreateNFSFileShare (Maybe ObjectACL)
createNFSFileShare_objectACL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe ObjectACL
objectACL :: Maybe ObjectACL
$sel:objectACL:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe ObjectACL
objectACL} -> Maybe ObjectACL
objectACL) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe ObjectACL
a -> CreateNFSFileShare
s {$sel:objectACL:CreateNFSFileShare' :: Maybe ObjectACL
objectACL = Maybe ObjectACL
a} :: CreateNFSFileShare)
createNFSFileShare_readOnly :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)
createNFSFileShare_readOnly :: Lens' CreateNFSFileShare (Maybe Bool)
createNFSFileShare_readOnly = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Bool
readOnly :: Maybe Bool
$sel:readOnly:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
readOnly} -> Maybe Bool
readOnly) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Bool
a -> CreateNFSFileShare
s {$sel:readOnly:CreateNFSFileShare' :: Maybe Bool
readOnly = Maybe Bool
a} :: CreateNFSFileShare)
createNFSFileShare_requesterPays :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Bool)
createNFSFileShare_requesterPays :: Lens' CreateNFSFileShare (Maybe Bool)
createNFSFileShare_requesterPays = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Bool
requesterPays :: Maybe Bool
$sel:requesterPays:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
requesterPays} -> Maybe Bool
requesterPays) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Bool
a -> CreateNFSFileShare
s {$sel:requesterPays:CreateNFSFileShare' :: Maybe Bool
requesterPays = Maybe Bool
a} :: CreateNFSFileShare)
createNFSFileShare_squash :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_squash :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_squash = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
squash :: Maybe Text
$sel:squash:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
squash} -> Maybe Text
squash) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:squash:CreateNFSFileShare' :: Maybe Text
squash = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_tags :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe [Tag])
createNFSFileShare_tags :: Lens' CreateNFSFileShare (Maybe [Tag])
createNFSFileShare_tags = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe [Tag]
tags :: Maybe [Tag]
$sel:tags:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe [Tag]
tags} -> Maybe [Tag]
tags) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe [Tag]
a -> CreateNFSFileShare
s {$sel:tags:CreateNFSFileShare' :: Maybe [Tag]
tags = Maybe [Tag]
a} :: CreateNFSFileShare) forall b c a. (b -> c) -> (a -> b) -> a -> c
Prelude.. forall (f :: * -> *) (g :: * -> *) s t a b.
(Functor f, Functor g) =>
AnIso s t a b -> Iso (f s) (g t) (f a) (g b)
Lens.mapping forall s t a b. (Coercible s a, Coercible t b) => Iso s t a b
Lens.coerced
createNFSFileShare_vPCEndpointDNSName :: Lens.Lens' CreateNFSFileShare (Prelude.Maybe Prelude.Text)
createNFSFileShare_vPCEndpointDNSName :: Lens' CreateNFSFileShare (Maybe Text)
createNFSFileShare_vPCEndpointDNSName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Maybe Text
vPCEndpointDNSName :: Maybe Text
$sel:vPCEndpointDNSName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
vPCEndpointDNSName} -> Maybe Text
vPCEndpointDNSName) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Maybe Text
a -> CreateNFSFileShare
s {$sel:vPCEndpointDNSName:CreateNFSFileShare' :: Maybe Text
vPCEndpointDNSName = Maybe Text
a} :: CreateNFSFileShare)
createNFSFileShare_clientToken :: Lens.Lens' CreateNFSFileShare Prelude.Text
createNFSFileShare_clientToken :: Lens' CreateNFSFileShare Text
createNFSFileShare_clientToken = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Text
clientToken :: Text
$sel:clientToken:CreateNFSFileShare' :: CreateNFSFileShare -> Text
clientToken} -> Text
clientToken) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Text
a -> CreateNFSFileShare
s {$sel:clientToken:CreateNFSFileShare' :: Text
clientToken = Text
a} :: CreateNFSFileShare)
createNFSFileShare_gatewayARN :: Lens.Lens' CreateNFSFileShare Prelude.Text
createNFSFileShare_gatewayARN :: Lens' CreateNFSFileShare Text
createNFSFileShare_gatewayARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Text
gatewayARN :: Text
$sel:gatewayARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
gatewayARN} -> Text
gatewayARN) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Text
a -> CreateNFSFileShare
s {$sel:gatewayARN:CreateNFSFileShare' :: Text
gatewayARN = Text
a} :: CreateNFSFileShare)
createNFSFileShare_role :: Lens.Lens' CreateNFSFileShare Prelude.Text
createNFSFileShare_role :: Lens' CreateNFSFileShare Text
createNFSFileShare_role = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Text
role' :: Text
$sel:role':CreateNFSFileShare' :: CreateNFSFileShare -> Text
role'} -> Text
role') (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Text
a -> CreateNFSFileShare
s {$sel:role':CreateNFSFileShare' :: Text
role' = Text
a} :: CreateNFSFileShare)
createNFSFileShare_locationARN :: Lens.Lens' CreateNFSFileShare Prelude.Text
createNFSFileShare_locationARN :: Lens' CreateNFSFileShare Text
createNFSFileShare_locationARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShare' {Text
locationARN :: Text
$sel:locationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
locationARN} -> Text
locationARN) (\s :: CreateNFSFileShare
s@CreateNFSFileShare' {} Text
a -> CreateNFSFileShare
s {$sel:locationARN:CreateNFSFileShare' :: Text
locationARN = Text
a} :: CreateNFSFileShare)
instance Core.AWSRequest CreateNFSFileShare where
type
AWSResponse CreateNFSFileShare =
CreateNFSFileShareResponse
request :: (Service -> Service)
-> CreateNFSFileShare -> Request CreateNFSFileShare
request Service -> Service
overrides =
forall a. (ToRequest a, ToJSON a) => Service -> a -> Request a
Request.postJSON (Service -> Service
overrides Service
defaultService)
response :: forall (m :: * -> *).
MonadResource m =>
(ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy CreateNFSFileShare
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse CreateNFSFileShare)))
response =
forall (m :: * -> *) a.
MonadResource m =>
(Int -> ResponseHeaders -> Object -> Either String (AWSResponse a))
-> (ByteStringLazy -> IO ByteStringLazy)
-> Service
-> Proxy a
-> ClientResponse ClientBody
-> m (Either Error (ClientResponse (AWSResponse a)))
Response.receiveJSON
( \Int
s ResponseHeaders
h Object
x ->
Maybe Text -> Int -> CreateNFSFileShareResponse
CreateNFSFileShareResponse'
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> (Object
x forall a. FromJSON a => Object -> Key -> Either String (Maybe a)
Data..?> Key
"FileShareARN")
forall (f :: * -> *) a b. Applicative f => f (a -> b) -> f a -> f b
Prelude.<*> (forall (f :: * -> *) a. Applicative f => a -> f a
Prelude.pure (forall a. Enum a => a -> Int
Prelude.fromEnum Int
s))
)
instance Prelude.Hashable CreateNFSFileShare where
hashWithSalt :: Int -> CreateNFSFileShare -> Int
hashWithSalt Int
_salt CreateNFSFileShare' {Maybe Bool
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
locationARN :: Text
role' :: Text
gatewayARN :: Text
clientToken :: Text
vPCEndpointDNSName :: Maybe Text
tags :: Maybe [Tag]
squash :: Maybe Text
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
nFSFileShareDefaults :: Maybe NFSFileShareDefaults
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
clientList :: Maybe (NonEmpty Text)
cacheAttributes :: Maybe CacheAttributes
bucketRegion :: Maybe Text
auditDestinationARN :: Maybe Text
$sel:locationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:role':CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:gatewayARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:clientToken:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:vPCEndpointDNSName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:tags:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe [Tag]
$sel:squash:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:requesterPays:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:readOnly:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:objectACL:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:fileShareName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:clientList:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe CacheAttributes
$sel:bucketRegion:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:auditDestinationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
auditDestinationARN
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
bucketRegion
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe CacheAttributes
cacheAttributes
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe (NonEmpty Text)
clientList
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
defaultStorageClass
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
fileShareName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
guessMIMETypeEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
kmsEncrypted
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
kmsKey
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe NFSFileShareDefaults
nFSFileShareDefaults
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
notificationPolicy
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe ObjectACL
objectACL
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
readOnly
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
requesterPays
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
squash
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Tag]
tags
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Text
vPCEndpointDNSName
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
clientToken
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
gatewayARN
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
role'
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
locationARN
instance Prelude.NFData CreateNFSFileShare where
rnf :: CreateNFSFileShare -> ()
rnf CreateNFSFileShare' {Maybe Bool
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
locationARN :: Text
role' :: Text
gatewayARN :: Text
clientToken :: Text
vPCEndpointDNSName :: Maybe Text
tags :: Maybe [Tag]
squash :: Maybe Text
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
nFSFileShareDefaults :: Maybe NFSFileShareDefaults
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
clientList :: Maybe (NonEmpty Text)
cacheAttributes :: Maybe CacheAttributes
bucketRegion :: Maybe Text
auditDestinationARN :: Maybe Text
$sel:locationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:role':CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:gatewayARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:clientToken:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:vPCEndpointDNSName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:tags:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe [Tag]
$sel:squash:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:requesterPays:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:readOnly:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:objectACL:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:fileShareName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:clientList:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe CacheAttributes
$sel:bucketRegion:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:auditDestinationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
auditDestinationARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
bucketRegion
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe CacheAttributes
cacheAttributes
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe (NonEmpty Text)
clientList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
defaultStorageClass
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
fileShareName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
guessMIMETypeEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
kmsEncrypted
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
kmsKey
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe NFSFileShareDefaults
nFSFileShareDefaults
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
notificationPolicy
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe ObjectACL
objectACL
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
readOnly
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
requesterPays
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
squash
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Tag]
tags
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
vPCEndpointDNSName
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
clientToken
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
gatewayARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
role'
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
locationARN
instance Data.ToHeaders CreateNFSFileShare where
toHeaders :: CreateNFSFileShare -> ResponseHeaders
toHeaders =
forall a b. a -> b -> a
Prelude.const
( forall a. Monoid a => [a] -> a
Prelude.mconcat
[ HeaderName
"X-Amz-Target"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"StorageGateway_20130630.CreateNFSFileShare" ::
Prelude.ByteString
),
HeaderName
"Content-Type"
forall a. ToHeader a => HeaderName -> a -> ResponseHeaders
Data.=# ( ByteString
"application/x-amz-json-1.1" ::
Prelude.ByteString
)
]
)
instance Data.ToJSON CreateNFSFileShare where
toJSON :: CreateNFSFileShare -> Value
toJSON CreateNFSFileShare' {Maybe Bool
Maybe [Tag]
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
locationARN :: Text
role' :: Text
gatewayARN :: Text
clientToken :: Text
vPCEndpointDNSName :: Maybe Text
tags :: Maybe [Tag]
squash :: Maybe Text
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
nFSFileShareDefaults :: Maybe NFSFileShareDefaults
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
clientList :: Maybe (NonEmpty Text)
cacheAttributes :: Maybe CacheAttributes
bucketRegion :: Maybe Text
auditDestinationARN :: Maybe Text
$sel:locationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:role':CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:gatewayARN:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:clientToken:CreateNFSFileShare' :: CreateNFSFileShare -> Text
$sel:vPCEndpointDNSName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:tags:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe [Tag]
$sel:squash:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:requesterPays:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:readOnly:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:objectACL:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Bool
$sel:fileShareName:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:clientList:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe CacheAttributes
$sel:bucketRegion:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
$sel:auditDestinationARN:CreateNFSFileShare' :: CreateNFSFileShare -> Maybe Text
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"AuditDestinationARN" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
auditDestinationARN,
(Key
"BucketRegion" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
bucketRegion,
(Key
"CacheAttributes" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe CacheAttributes
cacheAttributes,
(Key
"ClientList" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe (NonEmpty Text)
clientList,
(Key
"DefaultStorageClass" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
defaultStorageClass,
(Key
"FileShareName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
fileShareName,
(Key
"GuessMIMETypeEnabled" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
guessMIMETypeEnabled,
(Key
"KMSEncrypted" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
kmsEncrypted,
(Key
"KMSKey" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
kmsKey,
(Key
"NFSFileShareDefaults" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe NFSFileShareDefaults
nFSFileShareDefaults,
(Key
"NotificationPolicy" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
notificationPolicy,
(Key
"ObjectACL" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe ObjectACL
objectACL,
(Key
"ReadOnly" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
readOnly,
(Key
"RequesterPays" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Bool
requesterPays,
(Key
"Squash" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
squash,
(Key
"Tags" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=) forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe [Tag]
tags,
(Key
"VPCEndpointDNSName" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..=)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
Prelude.<$> Maybe Text
vPCEndpointDNSName,
forall a. a -> Maybe a
Prelude.Just (Key
"ClientToken" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
clientToken),
forall a. a -> Maybe a
Prelude.Just (Key
"GatewayARN" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
gatewayARN),
forall a. a -> Maybe a
Prelude.Just (Key
"Role" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
role'),
forall a. a -> Maybe a
Prelude.Just (Key
"LocationARN" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
locationARN)
]
)
instance Data.ToPath CreateNFSFileShare where
toPath :: CreateNFSFileShare -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery CreateNFSFileShare where
toQuery :: CreateNFSFileShare -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data CreateNFSFileShareResponse = CreateNFSFileShareResponse'
{
CreateNFSFileShareResponse -> Maybe Text
fileShareARN :: Prelude.Maybe Prelude.Text,
CreateNFSFileShareResponse -> Int
httpStatus :: Prelude.Int
}
deriving (CreateNFSFileShareResponse -> CreateNFSFileShareResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: CreateNFSFileShareResponse -> CreateNFSFileShareResponse -> Bool
$c/= :: CreateNFSFileShareResponse -> CreateNFSFileShareResponse -> Bool
== :: CreateNFSFileShareResponse -> CreateNFSFileShareResponse -> Bool
$c== :: CreateNFSFileShareResponse -> CreateNFSFileShareResponse -> Bool
Prelude.Eq, ReadPrec [CreateNFSFileShareResponse]
ReadPrec CreateNFSFileShareResponse
Int -> ReadS CreateNFSFileShareResponse
ReadS [CreateNFSFileShareResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [CreateNFSFileShareResponse]
$creadListPrec :: ReadPrec [CreateNFSFileShareResponse]
readPrec :: ReadPrec CreateNFSFileShareResponse
$creadPrec :: ReadPrec CreateNFSFileShareResponse
readList :: ReadS [CreateNFSFileShareResponse]
$creadList :: ReadS [CreateNFSFileShareResponse]
readsPrec :: Int -> ReadS CreateNFSFileShareResponse
$creadsPrec :: Int -> ReadS CreateNFSFileShareResponse
Prelude.Read, Int -> CreateNFSFileShareResponse -> ShowS
[CreateNFSFileShareResponse] -> ShowS
CreateNFSFileShareResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [CreateNFSFileShareResponse] -> ShowS
$cshowList :: [CreateNFSFileShareResponse] -> ShowS
show :: CreateNFSFileShareResponse -> String
$cshow :: CreateNFSFileShareResponse -> String
showsPrec :: Int -> CreateNFSFileShareResponse -> ShowS
$cshowsPrec :: Int -> CreateNFSFileShareResponse -> ShowS
Prelude.Show, forall x.
Rep CreateNFSFileShareResponse x -> CreateNFSFileShareResponse
forall x.
CreateNFSFileShareResponse -> Rep CreateNFSFileShareResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep CreateNFSFileShareResponse x -> CreateNFSFileShareResponse
$cfrom :: forall x.
CreateNFSFileShareResponse -> Rep CreateNFSFileShareResponse x
Prelude.Generic)
newCreateNFSFileShareResponse ::
Prelude.Int ->
CreateNFSFileShareResponse
newCreateNFSFileShareResponse :: Int -> CreateNFSFileShareResponse
newCreateNFSFileShareResponse Int
pHttpStatus_ =
CreateNFSFileShareResponse'
{ $sel:fileShareARN:CreateNFSFileShareResponse' :: Maybe Text
fileShareARN =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:CreateNFSFileShareResponse' :: Int
httpStatus = Int
pHttpStatus_
}
createNFSFileShareResponse_fileShareARN :: Lens.Lens' CreateNFSFileShareResponse (Prelude.Maybe Prelude.Text)
createNFSFileShareResponse_fileShareARN :: Lens' CreateNFSFileShareResponse (Maybe Text)
createNFSFileShareResponse_fileShareARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShareResponse' {Maybe Text
fileShareARN :: Maybe Text
$sel:fileShareARN:CreateNFSFileShareResponse' :: CreateNFSFileShareResponse -> Maybe Text
fileShareARN} -> Maybe Text
fileShareARN) (\s :: CreateNFSFileShareResponse
s@CreateNFSFileShareResponse' {} Maybe Text
a -> CreateNFSFileShareResponse
s {$sel:fileShareARN:CreateNFSFileShareResponse' :: Maybe Text
fileShareARN = Maybe Text
a} :: CreateNFSFileShareResponse)
createNFSFileShareResponse_httpStatus :: Lens.Lens' CreateNFSFileShareResponse Prelude.Int
createNFSFileShareResponse_httpStatus :: Lens' CreateNFSFileShareResponse Int
createNFSFileShareResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\CreateNFSFileShareResponse' {Int
httpStatus :: Int
$sel:httpStatus:CreateNFSFileShareResponse' :: CreateNFSFileShareResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: CreateNFSFileShareResponse
s@CreateNFSFileShareResponse' {} Int
a -> CreateNFSFileShareResponse
s {$sel:httpStatus:CreateNFSFileShareResponse' :: Int
httpStatus = Int
a} :: CreateNFSFileShareResponse)
instance Prelude.NFData CreateNFSFileShareResponse where
rnf :: CreateNFSFileShareResponse -> ()
rnf CreateNFSFileShareResponse' {Int
Maybe Text
httpStatus :: Int
fileShareARN :: Maybe Text
$sel:httpStatus:CreateNFSFileShareResponse' :: CreateNFSFileShareResponse -> Int
$sel:fileShareARN:CreateNFSFileShareResponse' :: CreateNFSFileShareResponse -> Maybe Text
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Text
fileShareARN
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Int
httpStatus