{-# 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.UpdateNFSFileShare
(
UpdateNFSFileShare (..),
newUpdateNFSFileShare,
updateNFSFileShare_auditDestinationARN,
updateNFSFileShare_cacheAttributes,
updateNFSFileShare_clientList,
updateNFSFileShare_defaultStorageClass,
updateNFSFileShare_fileShareName,
updateNFSFileShare_guessMIMETypeEnabled,
updateNFSFileShare_kmsEncrypted,
updateNFSFileShare_kmsKey,
updateNFSFileShare_nFSFileShareDefaults,
updateNFSFileShare_notificationPolicy,
updateNFSFileShare_objectACL,
updateNFSFileShare_readOnly,
updateNFSFileShare_requesterPays,
updateNFSFileShare_squash,
updateNFSFileShare_fileShareARN,
UpdateNFSFileShareResponse (..),
newUpdateNFSFileShareResponse,
updateNFSFileShareResponse_fileShareARN,
updateNFSFileShareResponse_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 UpdateNFSFileShare = UpdateNFSFileShare'
{
UpdateNFSFileShare -> Maybe Text
auditDestinationARN :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Maybe CacheAttributes
cacheAttributes :: Prelude.Maybe CacheAttributes,
UpdateNFSFileShare -> Maybe (NonEmpty Text)
clientList :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text),
UpdateNFSFileShare -> Maybe Text
defaultStorageClass :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Maybe Text
fileShareName :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Maybe Bool
guessMIMETypeEnabled :: Prelude.Maybe Prelude.Bool,
UpdateNFSFileShare -> Maybe Bool
kmsEncrypted :: Prelude.Maybe Prelude.Bool,
UpdateNFSFileShare -> Maybe Text
kmsKey :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Maybe NFSFileShareDefaults
nFSFileShareDefaults :: Prelude.Maybe NFSFileShareDefaults,
UpdateNFSFileShare -> Maybe Text
notificationPolicy :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Maybe ObjectACL
objectACL :: Prelude.Maybe ObjectACL,
UpdateNFSFileShare -> Maybe Bool
readOnly :: Prelude.Maybe Prelude.Bool,
UpdateNFSFileShare -> Maybe Bool
requesterPays :: Prelude.Maybe Prelude.Bool,
UpdateNFSFileShare -> Maybe Text
squash :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShare -> Text
fileShareARN :: Prelude.Text
}
deriving (UpdateNFSFileShare -> UpdateNFSFileShare -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateNFSFileShare -> UpdateNFSFileShare -> Bool
$c/= :: UpdateNFSFileShare -> UpdateNFSFileShare -> Bool
== :: UpdateNFSFileShare -> UpdateNFSFileShare -> Bool
$c== :: UpdateNFSFileShare -> UpdateNFSFileShare -> Bool
Prelude.Eq, ReadPrec [UpdateNFSFileShare]
ReadPrec UpdateNFSFileShare
Int -> ReadS UpdateNFSFileShare
ReadS [UpdateNFSFileShare]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateNFSFileShare]
$creadListPrec :: ReadPrec [UpdateNFSFileShare]
readPrec :: ReadPrec UpdateNFSFileShare
$creadPrec :: ReadPrec UpdateNFSFileShare
readList :: ReadS [UpdateNFSFileShare]
$creadList :: ReadS [UpdateNFSFileShare]
readsPrec :: Int -> ReadS UpdateNFSFileShare
$creadsPrec :: Int -> ReadS UpdateNFSFileShare
Prelude.Read, Int -> UpdateNFSFileShare -> ShowS
[UpdateNFSFileShare] -> ShowS
UpdateNFSFileShare -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateNFSFileShare] -> ShowS
$cshowList :: [UpdateNFSFileShare] -> ShowS
show :: UpdateNFSFileShare -> String
$cshow :: UpdateNFSFileShare -> String
showsPrec :: Int -> UpdateNFSFileShare -> ShowS
$cshowsPrec :: Int -> UpdateNFSFileShare -> ShowS
Prelude.Show, forall x. Rep UpdateNFSFileShare x -> UpdateNFSFileShare
forall x. UpdateNFSFileShare -> Rep UpdateNFSFileShare x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdateNFSFileShare x -> UpdateNFSFileShare
$cfrom :: forall x. UpdateNFSFileShare -> Rep UpdateNFSFileShare x
Prelude.Generic)
newUpdateNFSFileShare ::
Prelude.Text ->
UpdateNFSFileShare
newUpdateNFSFileShare :: Text -> UpdateNFSFileShare
newUpdateNFSFileShare Text
pFileShareARN_ =
UpdateNFSFileShare'
{ $sel:auditDestinationARN:UpdateNFSFileShare' :: Maybe Text
auditDestinationARN =
forall a. Maybe a
Prelude.Nothing,
$sel:cacheAttributes:UpdateNFSFileShare' :: Maybe CacheAttributes
cacheAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:clientList:UpdateNFSFileShare' :: Maybe (NonEmpty Text)
clientList = forall a. Maybe a
Prelude.Nothing,
$sel:defaultStorageClass:UpdateNFSFileShare' :: Maybe Text
defaultStorageClass = forall a. Maybe a
Prelude.Nothing,
$sel:fileShareName:UpdateNFSFileShare' :: Maybe Text
fileShareName = forall a. Maybe a
Prelude.Nothing,
$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: Maybe Bool
guessMIMETypeEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:kmsEncrypted:UpdateNFSFileShare' :: Maybe Bool
kmsEncrypted = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKey:UpdateNFSFileShare' :: Maybe Text
kmsKey = forall a. Maybe a
Prelude.Nothing,
$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: Maybe NFSFileShareDefaults
nFSFileShareDefaults = forall a. Maybe a
Prelude.Nothing,
$sel:notificationPolicy:UpdateNFSFileShare' :: Maybe Text
notificationPolicy = forall a. Maybe a
Prelude.Nothing,
$sel:objectACL:UpdateNFSFileShare' :: Maybe ObjectACL
objectACL = forall a. Maybe a
Prelude.Nothing,
$sel:readOnly:UpdateNFSFileShare' :: Maybe Bool
readOnly = forall a. Maybe a
Prelude.Nothing,
$sel:requesterPays:UpdateNFSFileShare' :: Maybe Bool
requesterPays = forall a. Maybe a
Prelude.Nothing,
$sel:squash:UpdateNFSFileShare' :: Maybe Text
squash = forall a. Maybe a
Prelude.Nothing,
$sel:fileShareARN:UpdateNFSFileShare' :: Text
fileShareARN = Text
pFileShareARN_
}
updateNFSFileShare_auditDestinationARN :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_auditDestinationARN :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_auditDestinationARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
auditDestinationARN :: Maybe Text
$sel:auditDestinationARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
auditDestinationARN} -> Maybe Text
auditDestinationARN) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:auditDestinationARN:UpdateNFSFileShare' :: Maybe Text
auditDestinationARN = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_cacheAttributes :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe CacheAttributes)
updateNFSFileShare_cacheAttributes :: Lens' UpdateNFSFileShare (Maybe CacheAttributes)
updateNFSFileShare_cacheAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe CacheAttributes
cacheAttributes :: Maybe CacheAttributes
$sel:cacheAttributes:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe CacheAttributes
cacheAttributes} -> Maybe CacheAttributes
cacheAttributes) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe CacheAttributes
a -> UpdateNFSFileShare
s {$sel:cacheAttributes:UpdateNFSFileShare' :: Maybe CacheAttributes
cacheAttributes = Maybe CacheAttributes
a} :: UpdateNFSFileShare)
updateNFSFileShare_clientList :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe (Prelude.NonEmpty Prelude.Text))
updateNFSFileShare_clientList :: Lens' UpdateNFSFileShare (Maybe (NonEmpty Text))
updateNFSFileShare_clientList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe (NonEmpty Text)
clientList :: Maybe (NonEmpty Text)
$sel:clientList:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe (NonEmpty Text)
clientList} -> Maybe (NonEmpty Text)
clientList) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe (NonEmpty Text)
a -> UpdateNFSFileShare
s {$sel:clientList:UpdateNFSFileShare' :: Maybe (NonEmpty Text)
clientList = Maybe (NonEmpty Text)
a} :: UpdateNFSFileShare) 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
updateNFSFileShare_defaultStorageClass :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_defaultStorageClass :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_defaultStorageClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
defaultStorageClass :: Maybe Text
$sel:defaultStorageClass:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
defaultStorageClass} -> Maybe Text
defaultStorageClass) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:defaultStorageClass:UpdateNFSFileShare' :: Maybe Text
defaultStorageClass = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_fileShareName :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_fileShareName :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_fileShareName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
fileShareName :: Maybe Text
$sel:fileShareName:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
fileShareName} -> Maybe Text
fileShareName) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:fileShareName:UpdateNFSFileShare' :: Maybe Text
fileShareName = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_guessMIMETypeEnabled :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool)
updateNFSFileShare_guessMIMETypeEnabled :: Lens' UpdateNFSFileShare (Maybe Bool)
updateNFSFileShare_guessMIMETypeEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
guessMIMETypeEnabled} -> Maybe Bool
guessMIMETypeEnabled) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Bool
a -> UpdateNFSFileShare
s {$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: Maybe Bool
guessMIMETypeEnabled = Maybe Bool
a} :: UpdateNFSFileShare)
updateNFSFileShare_kmsEncrypted :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool)
updateNFSFileShare_kmsEncrypted :: Lens' UpdateNFSFileShare (Maybe Bool)
updateNFSFileShare_kmsEncrypted = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Bool
kmsEncrypted :: Maybe Bool
$sel:kmsEncrypted:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
kmsEncrypted} -> Maybe Bool
kmsEncrypted) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Bool
a -> UpdateNFSFileShare
s {$sel:kmsEncrypted:UpdateNFSFileShare' :: Maybe Bool
kmsEncrypted = Maybe Bool
a} :: UpdateNFSFileShare)
updateNFSFileShare_kmsKey :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_kmsKey :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_kmsKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
kmsKey :: Maybe Text
$sel:kmsKey:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
kmsKey} -> Maybe Text
kmsKey) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:kmsKey:UpdateNFSFileShare' :: Maybe Text
kmsKey = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_nFSFileShareDefaults :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe NFSFileShareDefaults)
updateNFSFileShare_nFSFileShareDefaults :: Lens' UpdateNFSFileShare (Maybe NFSFileShareDefaults)
updateNFSFileShare_nFSFileShareDefaults = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe NFSFileShareDefaults
nFSFileShareDefaults :: Maybe NFSFileShareDefaults
$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe NFSFileShareDefaults
nFSFileShareDefaults} -> Maybe NFSFileShareDefaults
nFSFileShareDefaults) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe NFSFileShareDefaults
a -> UpdateNFSFileShare
s {$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: Maybe NFSFileShareDefaults
nFSFileShareDefaults = Maybe NFSFileShareDefaults
a} :: UpdateNFSFileShare)
updateNFSFileShare_notificationPolicy :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_notificationPolicy :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_notificationPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
notificationPolicy :: Maybe Text
$sel:notificationPolicy:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
notificationPolicy} -> Maybe Text
notificationPolicy) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:notificationPolicy:UpdateNFSFileShare' :: Maybe Text
notificationPolicy = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_objectACL :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe ObjectACL)
updateNFSFileShare_objectACL :: Lens' UpdateNFSFileShare (Maybe ObjectACL)
updateNFSFileShare_objectACL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe ObjectACL
objectACL :: Maybe ObjectACL
$sel:objectACL:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe ObjectACL
objectACL} -> Maybe ObjectACL
objectACL) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe ObjectACL
a -> UpdateNFSFileShare
s {$sel:objectACL:UpdateNFSFileShare' :: Maybe ObjectACL
objectACL = Maybe ObjectACL
a} :: UpdateNFSFileShare)
updateNFSFileShare_readOnly :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool)
updateNFSFileShare_readOnly :: Lens' UpdateNFSFileShare (Maybe Bool)
updateNFSFileShare_readOnly = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Bool
readOnly :: Maybe Bool
$sel:readOnly:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
readOnly} -> Maybe Bool
readOnly) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Bool
a -> UpdateNFSFileShare
s {$sel:readOnly:UpdateNFSFileShare' :: Maybe Bool
readOnly = Maybe Bool
a} :: UpdateNFSFileShare)
updateNFSFileShare_requesterPays :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool)
updateNFSFileShare_requesterPays :: Lens' UpdateNFSFileShare (Maybe Bool)
updateNFSFileShare_requesterPays = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Bool
requesterPays :: Maybe Bool
$sel:requesterPays:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
requesterPays} -> Maybe Bool
requesterPays) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Bool
a -> UpdateNFSFileShare
s {$sel:requesterPays:UpdateNFSFileShare' :: Maybe Bool
requesterPays = Maybe Bool
a} :: UpdateNFSFileShare)
updateNFSFileShare_squash :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text)
updateNFSFileShare_squash :: Lens' UpdateNFSFileShare (Maybe Text)
updateNFSFileShare_squash = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Maybe Text
squash :: Maybe Text
$sel:squash:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
squash} -> Maybe Text
squash) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Maybe Text
a -> UpdateNFSFileShare
s {$sel:squash:UpdateNFSFileShare' :: Maybe Text
squash = Maybe Text
a} :: UpdateNFSFileShare)
updateNFSFileShare_fileShareARN :: Lens.Lens' UpdateNFSFileShare Prelude.Text
updateNFSFileShare_fileShareARN :: Lens' UpdateNFSFileShare Text
updateNFSFileShare_fileShareARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShare' {Text
fileShareARN :: Text
$sel:fileShareARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> Text
fileShareARN} -> Text
fileShareARN) (\s :: UpdateNFSFileShare
s@UpdateNFSFileShare' {} Text
a -> UpdateNFSFileShare
s {$sel:fileShareARN:UpdateNFSFileShare' :: Text
fileShareARN = Text
a} :: UpdateNFSFileShare)
instance Core.AWSRequest UpdateNFSFileShare where
type
AWSResponse UpdateNFSFileShare =
UpdateNFSFileShareResponse
request :: (Service -> Service)
-> UpdateNFSFileShare -> Request UpdateNFSFileShare
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 UpdateNFSFileShare
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpdateNFSFileShare)))
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 -> UpdateNFSFileShareResponse
UpdateNFSFileShareResponse'
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 UpdateNFSFileShare where
hashWithSalt :: Int -> UpdateNFSFileShare -> Int
hashWithSalt Int
_salt UpdateNFSFileShare' {Maybe Bool
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
fileShareARN :: Text
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
auditDestinationARN :: Maybe Text
$sel:fileShareARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> Text
$sel:squash:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:requesterPays:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:readOnly:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:objectACL:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:fileShareName:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:clientList:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> 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 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` Text
fileShareARN
instance Prelude.NFData UpdateNFSFileShare where
rnf :: UpdateNFSFileShare -> ()
rnf UpdateNFSFileShare' {Maybe Bool
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
fileShareARN :: Text
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
auditDestinationARN :: Maybe Text
$sel:fileShareARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> Text
$sel:squash:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:requesterPays:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:readOnly:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:objectACL:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:fileShareName:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:clientList:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> 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 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 Text
fileShareARN
instance Data.ToHeaders UpdateNFSFileShare where
toHeaders :: UpdateNFSFileShare -> 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.UpdateNFSFileShare" ::
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 UpdateNFSFileShare where
toJSON :: UpdateNFSFileShare -> Value
toJSON UpdateNFSFileShare' {Maybe Bool
Maybe (NonEmpty Text)
Maybe Text
Maybe CacheAttributes
Maybe NFSFileShareDefaults
Maybe ObjectACL
Text
fileShareARN :: Text
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
auditDestinationARN :: Maybe Text
$sel:fileShareARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> Text
$sel:squash:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:requesterPays:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:readOnly:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:objectACL:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:nFSFileShareDefaults:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe NFSFileShareDefaults
$sel:kmsKey:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:guessMIMETypeEnabled:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Bool
$sel:fileShareName:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe Text
$sel:clientList:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe (NonEmpty Text)
$sel:cacheAttributes:UpdateNFSFileShare' :: UpdateNFSFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateNFSFileShare' :: UpdateNFSFileShare -> 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
"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,
forall a. a -> Maybe a
Prelude.Just (Key
"FileShareARN" forall kv v. (KeyValue kv, ToJSON v) => Key -> v -> kv
Data..= Text
fileShareARN)
]
)
instance Data.ToPath UpdateNFSFileShare where
toPath :: UpdateNFSFileShare -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery UpdateNFSFileShare where
toQuery :: UpdateNFSFileShare -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdateNFSFileShareResponse = UpdateNFSFileShareResponse'
{
UpdateNFSFileShareResponse -> Maybe Text
fileShareARN :: Prelude.Maybe Prelude.Text,
UpdateNFSFileShareResponse -> Int
httpStatus :: Prelude.Int
}
deriving (UpdateNFSFileShareResponse -> UpdateNFSFileShareResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateNFSFileShareResponse -> UpdateNFSFileShareResponse -> Bool
$c/= :: UpdateNFSFileShareResponse -> UpdateNFSFileShareResponse -> Bool
== :: UpdateNFSFileShareResponse -> UpdateNFSFileShareResponse -> Bool
$c== :: UpdateNFSFileShareResponse -> UpdateNFSFileShareResponse -> Bool
Prelude.Eq, ReadPrec [UpdateNFSFileShareResponse]
ReadPrec UpdateNFSFileShareResponse
Int -> ReadS UpdateNFSFileShareResponse
ReadS [UpdateNFSFileShareResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateNFSFileShareResponse]
$creadListPrec :: ReadPrec [UpdateNFSFileShareResponse]
readPrec :: ReadPrec UpdateNFSFileShareResponse
$creadPrec :: ReadPrec UpdateNFSFileShareResponse
readList :: ReadS [UpdateNFSFileShareResponse]
$creadList :: ReadS [UpdateNFSFileShareResponse]
readsPrec :: Int -> ReadS UpdateNFSFileShareResponse
$creadsPrec :: Int -> ReadS UpdateNFSFileShareResponse
Prelude.Read, Int -> UpdateNFSFileShareResponse -> ShowS
[UpdateNFSFileShareResponse] -> ShowS
UpdateNFSFileShareResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateNFSFileShareResponse] -> ShowS
$cshowList :: [UpdateNFSFileShareResponse] -> ShowS
show :: UpdateNFSFileShareResponse -> String
$cshow :: UpdateNFSFileShareResponse -> String
showsPrec :: Int -> UpdateNFSFileShareResponse -> ShowS
$cshowsPrec :: Int -> UpdateNFSFileShareResponse -> ShowS
Prelude.Show, forall x.
Rep UpdateNFSFileShareResponse x -> UpdateNFSFileShareResponse
forall x.
UpdateNFSFileShareResponse -> Rep UpdateNFSFileShareResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdateNFSFileShareResponse x -> UpdateNFSFileShareResponse
$cfrom :: forall x.
UpdateNFSFileShareResponse -> Rep UpdateNFSFileShareResponse x
Prelude.Generic)
newUpdateNFSFileShareResponse ::
Prelude.Int ->
UpdateNFSFileShareResponse
newUpdateNFSFileShareResponse :: Int -> UpdateNFSFileShareResponse
newUpdateNFSFileShareResponse Int
pHttpStatus_ =
UpdateNFSFileShareResponse'
{ $sel:fileShareARN:UpdateNFSFileShareResponse' :: Maybe Text
fileShareARN =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpdateNFSFileShareResponse' :: Int
httpStatus = Int
pHttpStatus_
}
updateNFSFileShareResponse_fileShareARN :: Lens.Lens' UpdateNFSFileShareResponse (Prelude.Maybe Prelude.Text)
updateNFSFileShareResponse_fileShareARN :: Lens' UpdateNFSFileShareResponse (Maybe Text)
updateNFSFileShareResponse_fileShareARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShareResponse' {Maybe Text
fileShareARN :: Maybe Text
$sel:fileShareARN:UpdateNFSFileShareResponse' :: UpdateNFSFileShareResponse -> Maybe Text
fileShareARN} -> Maybe Text
fileShareARN) (\s :: UpdateNFSFileShareResponse
s@UpdateNFSFileShareResponse' {} Maybe Text
a -> UpdateNFSFileShareResponse
s {$sel:fileShareARN:UpdateNFSFileShareResponse' :: Maybe Text
fileShareARN = Maybe Text
a} :: UpdateNFSFileShareResponse)
updateNFSFileShareResponse_httpStatus :: Lens.Lens' UpdateNFSFileShareResponse Prelude.Int
updateNFSFileShareResponse_httpStatus :: Lens' UpdateNFSFileShareResponse Int
updateNFSFileShareResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateNFSFileShareResponse' {Int
httpStatus :: Int
$sel:httpStatus:UpdateNFSFileShareResponse' :: UpdateNFSFileShareResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: UpdateNFSFileShareResponse
s@UpdateNFSFileShareResponse' {} Int
a -> UpdateNFSFileShareResponse
s {$sel:httpStatus:UpdateNFSFileShareResponse' :: Int
httpStatus = Int
a} :: UpdateNFSFileShareResponse)
instance Prelude.NFData UpdateNFSFileShareResponse where
rnf :: UpdateNFSFileShareResponse -> ()
rnf UpdateNFSFileShareResponse' {Int
Maybe Text
httpStatus :: Int
fileShareARN :: Maybe Text
$sel:httpStatus:UpdateNFSFileShareResponse' :: UpdateNFSFileShareResponse -> Int
$sel:fileShareARN:UpdateNFSFileShareResponse' :: UpdateNFSFileShareResponse -> 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