{-# 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.UpdateSMBFileShare
(
UpdateSMBFileShare (..),
newUpdateSMBFileShare,
updateSMBFileShare_accessBasedEnumeration,
updateSMBFileShare_adminUserList,
updateSMBFileShare_auditDestinationARN,
updateSMBFileShare_cacheAttributes,
updateSMBFileShare_caseSensitivity,
updateSMBFileShare_defaultStorageClass,
updateSMBFileShare_fileShareName,
updateSMBFileShare_guessMIMETypeEnabled,
updateSMBFileShare_invalidUserList,
updateSMBFileShare_kmsEncrypted,
updateSMBFileShare_kmsKey,
updateSMBFileShare_notificationPolicy,
updateSMBFileShare_objectACL,
updateSMBFileShare_oplocksEnabled,
updateSMBFileShare_readOnly,
updateSMBFileShare_requesterPays,
updateSMBFileShare_sMBACLEnabled,
updateSMBFileShare_validUserList,
updateSMBFileShare_fileShareARN,
UpdateSMBFileShareResponse (..),
newUpdateSMBFileShareResponse,
updateSMBFileShareResponse_fileShareARN,
updateSMBFileShareResponse_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 UpdateSMBFileShare = UpdateSMBFileShare'
{
UpdateSMBFileShare -> Maybe Bool
accessBasedEnumeration :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe [Text]
adminUserList :: Prelude.Maybe [Prelude.Text],
UpdateSMBFileShare -> Maybe Text
auditDestinationARN :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShare -> Maybe CacheAttributes
cacheAttributes :: Prelude.Maybe CacheAttributes,
UpdateSMBFileShare -> Maybe CaseSensitivity
caseSensitivity :: Prelude.Maybe CaseSensitivity,
UpdateSMBFileShare -> Maybe Text
defaultStorageClass :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShare -> Maybe Text
fileShareName :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShare -> Maybe Bool
guessMIMETypeEnabled :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe [Text]
invalidUserList :: Prelude.Maybe [Prelude.Text],
UpdateSMBFileShare -> Maybe Bool
kmsEncrypted :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe Text
kmsKey :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShare -> Maybe Text
notificationPolicy :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShare -> Maybe ObjectACL
objectACL :: Prelude.Maybe ObjectACL,
UpdateSMBFileShare -> Maybe Bool
oplocksEnabled :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe Bool
readOnly :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe Bool
requesterPays :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe Bool
sMBACLEnabled :: Prelude.Maybe Prelude.Bool,
UpdateSMBFileShare -> Maybe [Text]
validUserList :: Prelude.Maybe [Prelude.Text],
UpdateSMBFileShare -> Text
fileShareARN :: Prelude.Text
}
deriving (UpdateSMBFileShare -> UpdateSMBFileShare -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateSMBFileShare -> UpdateSMBFileShare -> Bool
$c/= :: UpdateSMBFileShare -> UpdateSMBFileShare -> Bool
== :: UpdateSMBFileShare -> UpdateSMBFileShare -> Bool
$c== :: UpdateSMBFileShare -> UpdateSMBFileShare -> Bool
Prelude.Eq, ReadPrec [UpdateSMBFileShare]
ReadPrec UpdateSMBFileShare
Int -> ReadS UpdateSMBFileShare
ReadS [UpdateSMBFileShare]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateSMBFileShare]
$creadListPrec :: ReadPrec [UpdateSMBFileShare]
readPrec :: ReadPrec UpdateSMBFileShare
$creadPrec :: ReadPrec UpdateSMBFileShare
readList :: ReadS [UpdateSMBFileShare]
$creadList :: ReadS [UpdateSMBFileShare]
readsPrec :: Int -> ReadS UpdateSMBFileShare
$creadsPrec :: Int -> ReadS UpdateSMBFileShare
Prelude.Read, Int -> UpdateSMBFileShare -> ShowS
[UpdateSMBFileShare] -> ShowS
UpdateSMBFileShare -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateSMBFileShare] -> ShowS
$cshowList :: [UpdateSMBFileShare] -> ShowS
show :: UpdateSMBFileShare -> String
$cshow :: UpdateSMBFileShare -> String
showsPrec :: Int -> UpdateSMBFileShare -> ShowS
$cshowsPrec :: Int -> UpdateSMBFileShare -> ShowS
Prelude.Show, forall x. Rep UpdateSMBFileShare x -> UpdateSMBFileShare
forall x. UpdateSMBFileShare -> Rep UpdateSMBFileShare x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x. Rep UpdateSMBFileShare x -> UpdateSMBFileShare
$cfrom :: forall x. UpdateSMBFileShare -> Rep UpdateSMBFileShare x
Prelude.Generic)
newUpdateSMBFileShare ::
Prelude.Text ->
UpdateSMBFileShare
newUpdateSMBFileShare :: Text -> UpdateSMBFileShare
newUpdateSMBFileShare Text
pFileShareARN_ =
UpdateSMBFileShare'
{ $sel:accessBasedEnumeration:UpdateSMBFileShare' :: Maybe Bool
accessBasedEnumeration =
forall a. Maybe a
Prelude.Nothing,
$sel:adminUserList:UpdateSMBFileShare' :: Maybe [Text]
adminUserList = forall a. Maybe a
Prelude.Nothing,
$sel:auditDestinationARN:UpdateSMBFileShare' :: Maybe Text
auditDestinationARN = forall a. Maybe a
Prelude.Nothing,
$sel:cacheAttributes:UpdateSMBFileShare' :: Maybe CacheAttributes
cacheAttributes = forall a. Maybe a
Prelude.Nothing,
$sel:caseSensitivity:UpdateSMBFileShare' :: Maybe CaseSensitivity
caseSensitivity = forall a. Maybe a
Prelude.Nothing,
$sel:defaultStorageClass:UpdateSMBFileShare' :: Maybe Text
defaultStorageClass = forall a. Maybe a
Prelude.Nothing,
$sel:fileShareName:UpdateSMBFileShare' :: Maybe Text
fileShareName = forall a. Maybe a
Prelude.Nothing,
$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: Maybe Bool
guessMIMETypeEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:invalidUserList:UpdateSMBFileShare' :: Maybe [Text]
invalidUserList = forall a. Maybe a
Prelude.Nothing,
$sel:kmsEncrypted:UpdateSMBFileShare' :: Maybe Bool
kmsEncrypted = forall a. Maybe a
Prelude.Nothing,
$sel:kmsKey:UpdateSMBFileShare' :: Maybe Text
kmsKey = forall a. Maybe a
Prelude.Nothing,
$sel:notificationPolicy:UpdateSMBFileShare' :: Maybe Text
notificationPolicy = forall a. Maybe a
Prelude.Nothing,
$sel:objectACL:UpdateSMBFileShare' :: Maybe ObjectACL
objectACL = forall a. Maybe a
Prelude.Nothing,
$sel:oplocksEnabled:UpdateSMBFileShare' :: Maybe Bool
oplocksEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:readOnly:UpdateSMBFileShare' :: Maybe Bool
readOnly = forall a. Maybe a
Prelude.Nothing,
$sel:requesterPays:UpdateSMBFileShare' :: Maybe Bool
requesterPays = forall a. Maybe a
Prelude.Nothing,
$sel:sMBACLEnabled:UpdateSMBFileShare' :: Maybe Bool
sMBACLEnabled = forall a. Maybe a
Prelude.Nothing,
$sel:validUserList:UpdateSMBFileShare' :: Maybe [Text]
validUserList = forall a. Maybe a
Prelude.Nothing,
$sel:fileShareARN:UpdateSMBFileShare' :: Text
fileShareARN = Text
pFileShareARN_
}
updateSMBFileShare_accessBasedEnumeration :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_accessBasedEnumeration :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_accessBasedEnumeration = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
accessBasedEnumeration :: Maybe Bool
$sel:accessBasedEnumeration:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
accessBasedEnumeration} -> Maybe Bool
accessBasedEnumeration) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:accessBasedEnumeration:UpdateSMBFileShare' :: Maybe Bool
accessBasedEnumeration = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_adminUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])
updateSMBFileShare_adminUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
updateSMBFileShare_adminUserList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe [Text]
adminUserList :: Maybe [Text]
$sel:adminUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
adminUserList} -> Maybe [Text]
adminUserList) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe [Text]
a -> UpdateSMBFileShare
s {$sel:adminUserList:UpdateSMBFileShare' :: Maybe [Text]
adminUserList = Maybe [Text]
a} :: UpdateSMBFileShare) 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
updateSMBFileShare_auditDestinationARN :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)
updateSMBFileShare_auditDestinationARN :: Lens' UpdateSMBFileShare (Maybe Text)
updateSMBFileShare_auditDestinationARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Text
auditDestinationARN :: Maybe Text
$sel:auditDestinationARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
auditDestinationARN} -> Maybe Text
auditDestinationARN) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Text
a -> UpdateSMBFileShare
s {$sel:auditDestinationARN:UpdateSMBFileShare' :: Maybe Text
auditDestinationARN = Maybe Text
a} :: UpdateSMBFileShare)
updateSMBFileShare_cacheAttributes :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe CacheAttributes)
updateSMBFileShare_cacheAttributes :: Lens' UpdateSMBFileShare (Maybe CacheAttributes)
updateSMBFileShare_cacheAttributes = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe CacheAttributes
cacheAttributes :: Maybe CacheAttributes
$sel:cacheAttributes:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CacheAttributes
cacheAttributes} -> Maybe CacheAttributes
cacheAttributes) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe CacheAttributes
a -> UpdateSMBFileShare
s {$sel:cacheAttributes:UpdateSMBFileShare' :: Maybe CacheAttributes
cacheAttributes = Maybe CacheAttributes
a} :: UpdateSMBFileShare)
updateSMBFileShare_caseSensitivity :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe CaseSensitivity)
updateSMBFileShare_caseSensitivity :: Lens' UpdateSMBFileShare (Maybe CaseSensitivity)
updateSMBFileShare_caseSensitivity = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe CaseSensitivity
caseSensitivity :: Maybe CaseSensitivity
$sel:caseSensitivity:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CaseSensitivity
caseSensitivity} -> Maybe CaseSensitivity
caseSensitivity) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe CaseSensitivity
a -> UpdateSMBFileShare
s {$sel:caseSensitivity:UpdateSMBFileShare' :: Maybe CaseSensitivity
caseSensitivity = Maybe CaseSensitivity
a} :: UpdateSMBFileShare)
updateSMBFileShare_defaultStorageClass :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)
updateSMBFileShare_defaultStorageClass :: Lens' UpdateSMBFileShare (Maybe Text)
updateSMBFileShare_defaultStorageClass = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Text
defaultStorageClass :: Maybe Text
$sel:defaultStorageClass:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
defaultStorageClass} -> Maybe Text
defaultStorageClass) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Text
a -> UpdateSMBFileShare
s {$sel:defaultStorageClass:UpdateSMBFileShare' :: Maybe Text
defaultStorageClass = Maybe Text
a} :: UpdateSMBFileShare)
updateSMBFileShare_fileShareName :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)
updateSMBFileShare_fileShareName :: Lens' UpdateSMBFileShare (Maybe Text)
updateSMBFileShare_fileShareName = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Text
fileShareName :: Maybe Text
$sel:fileShareName:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
fileShareName} -> Maybe Text
fileShareName) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Text
a -> UpdateSMBFileShare
s {$sel:fileShareName:UpdateSMBFileShare' :: Maybe Text
fileShareName = Maybe Text
a} :: UpdateSMBFileShare)
updateSMBFileShare_guessMIMETypeEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_guessMIMETypeEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_guessMIMETypeEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
guessMIMETypeEnabled :: Maybe Bool
$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
guessMIMETypeEnabled} -> Maybe Bool
guessMIMETypeEnabled) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: Maybe Bool
guessMIMETypeEnabled = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_invalidUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])
updateSMBFileShare_invalidUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
updateSMBFileShare_invalidUserList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe [Text]
invalidUserList :: Maybe [Text]
$sel:invalidUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
invalidUserList} -> Maybe [Text]
invalidUserList) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe [Text]
a -> UpdateSMBFileShare
s {$sel:invalidUserList:UpdateSMBFileShare' :: Maybe [Text]
invalidUserList = Maybe [Text]
a} :: UpdateSMBFileShare) 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
updateSMBFileShare_kmsEncrypted :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_kmsEncrypted :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_kmsEncrypted = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
kmsEncrypted :: Maybe Bool
$sel:kmsEncrypted:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
kmsEncrypted} -> Maybe Bool
kmsEncrypted) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:kmsEncrypted:UpdateSMBFileShare' :: Maybe Bool
kmsEncrypted = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_kmsKey :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)
updateSMBFileShare_kmsKey :: Lens' UpdateSMBFileShare (Maybe Text)
updateSMBFileShare_kmsKey = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Text
kmsKey :: Maybe Text
$sel:kmsKey:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
kmsKey} -> Maybe Text
kmsKey) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Text
a -> UpdateSMBFileShare
s {$sel:kmsKey:UpdateSMBFileShare' :: Maybe Text
kmsKey = Maybe Text
a} :: UpdateSMBFileShare)
updateSMBFileShare_notificationPolicy :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Text)
updateSMBFileShare_notificationPolicy :: Lens' UpdateSMBFileShare (Maybe Text)
updateSMBFileShare_notificationPolicy = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Text
notificationPolicy :: Maybe Text
$sel:notificationPolicy:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
notificationPolicy} -> Maybe Text
notificationPolicy) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Text
a -> UpdateSMBFileShare
s {$sel:notificationPolicy:UpdateSMBFileShare' :: Maybe Text
notificationPolicy = Maybe Text
a} :: UpdateSMBFileShare)
updateSMBFileShare_objectACL :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe ObjectACL)
updateSMBFileShare_objectACL :: Lens' UpdateSMBFileShare (Maybe ObjectACL)
updateSMBFileShare_objectACL = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe ObjectACL
objectACL :: Maybe ObjectACL
$sel:objectACL:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe ObjectACL
objectACL} -> Maybe ObjectACL
objectACL) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe ObjectACL
a -> UpdateSMBFileShare
s {$sel:objectACL:UpdateSMBFileShare' :: Maybe ObjectACL
objectACL = Maybe ObjectACL
a} :: UpdateSMBFileShare)
updateSMBFileShare_oplocksEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_oplocksEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_oplocksEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
oplocksEnabled :: Maybe Bool
$sel:oplocksEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
oplocksEnabled} -> Maybe Bool
oplocksEnabled) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:oplocksEnabled:UpdateSMBFileShare' :: Maybe Bool
oplocksEnabled = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_readOnly :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_readOnly :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_readOnly = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
readOnly :: Maybe Bool
$sel:readOnly:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
readOnly} -> Maybe Bool
readOnly) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:readOnly:UpdateSMBFileShare' :: Maybe Bool
readOnly = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_requesterPays :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_requesterPays :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_requesterPays = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
requesterPays :: Maybe Bool
$sel:requesterPays:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
requesterPays} -> Maybe Bool
requesterPays) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:requesterPays:UpdateSMBFileShare' :: Maybe Bool
requesterPays = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_sMBACLEnabled :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe Prelude.Bool)
updateSMBFileShare_sMBACLEnabled :: Lens' UpdateSMBFileShare (Maybe Bool)
updateSMBFileShare_sMBACLEnabled = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe Bool
sMBACLEnabled :: Maybe Bool
$sel:sMBACLEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
sMBACLEnabled} -> Maybe Bool
sMBACLEnabled) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe Bool
a -> UpdateSMBFileShare
s {$sel:sMBACLEnabled:UpdateSMBFileShare' :: Maybe Bool
sMBACLEnabled = Maybe Bool
a} :: UpdateSMBFileShare)
updateSMBFileShare_validUserList :: Lens.Lens' UpdateSMBFileShare (Prelude.Maybe [Prelude.Text])
updateSMBFileShare_validUserList :: Lens' UpdateSMBFileShare (Maybe [Text])
updateSMBFileShare_validUserList = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Maybe [Text]
validUserList :: Maybe [Text]
$sel:validUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
validUserList} -> Maybe [Text]
validUserList) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Maybe [Text]
a -> UpdateSMBFileShare
s {$sel:validUserList:UpdateSMBFileShare' :: Maybe [Text]
validUserList = Maybe [Text]
a} :: UpdateSMBFileShare) 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
updateSMBFileShare_fileShareARN :: Lens.Lens' UpdateSMBFileShare Prelude.Text
updateSMBFileShare_fileShareARN :: Lens' UpdateSMBFileShare Text
updateSMBFileShare_fileShareARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShare' {Text
fileShareARN :: Text
$sel:fileShareARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Text
fileShareARN} -> Text
fileShareARN) (\s :: UpdateSMBFileShare
s@UpdateSMBFileShare' {} Text
a -> UpdateSMBFileShare
s {$sel:fileShareARN:UpdateSMBFileShare' :: Text
fileShareARN = Text
a} :: UpdateSMBFileShare)
instance Core.AWSRequest UpdateSMBFileShare where
type
AWSResponse UpdateSMBFileShare =
UpdateSMBFileShareResponse
request :: (Service -> Service)
-> UpdateSMBFileShare -> Request UpdateSMBFileShare
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 UpdateSMBFileShare
-> ClientResponse ClientBody
-> m (Either
Error (ClientResponse (AWSResponse UpdateSMBFileShare)))
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 -> UpdateSMBFileShareResponse
UpdateSMBFileShareResponse'
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 UpdateSMBFileShare where
hashWithSalt :: Int -> UpdateSMBFileShare -> Int
hashWithSalt Int
_salt UpdateSMBFileShare' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe CacheAttributes
Maybe CaseSensitivity
Maybe ObjectACL
Text
fileShareARN :: Text
validUserList :: Maybe [Text]
sMBACLEnabled :: Maybe Bool
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
oplocksEnabled :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
invalidUserList :: Maybe [Text]
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
caseSensitivity :: Maybe CaseSensitivity
cacheAttributes :: Maybe CacheAttributes
auditDestinationARN :: Maybe Text
adminUserList :: Maybe [Text]
accessBasedEnumeration :: Maybe Bool
$sel:fileShareARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Text
$sel:validUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:sMBACLEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:requesterPays:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:readOnly:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:oplocksEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:objectACL:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsKey:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:invalidUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:fileShareName:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:caseSensitivity:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CaseSensitivity
$sel:cacheAttributes:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:adminUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:accessBasedEnumeration:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
..} =
Int
_salt
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe Bool
accessBasedEnumeration
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
adminUserList
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 CaseSensitivity
caseSensitivity
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 [Text]
invalidUserList
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 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
oplocksEnabled
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 Bool
sMBACLEnabled
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Maybe [Text]
validUserList
forall a. Hashable a => Int -> a -> Int
`Prelude.hashWithSalt` Text
fileShareARN
instance Prelude.NFData UpdateSMBFileShare where
rnf :: UpdateSMBFileShare -> ()
rnf UpdateSMBFileShare' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe CacheAttributes
Maybe CaseSensitivity
Maybe ObjectACL
Text
fileShareARN :: Text
validUserList :: Maybe [Text]
sMBACLEnabled :: Maybe Bool
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
oplocksEnabled :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
invalidUserList :: Maybe [Text]
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
caseSensitivity :: Maybe CaseSensitivity
cacheAttributes :: Maybe CacheAttributes
auditDestinationARN :: Maybe Text
adminUserList :: Maybe [Text]
accessBasedEnumeration :: Maybe Bool
$sel:fileShareARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Text
$sel:validUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:sMBACLEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:requesterPays:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:readOnly:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:oplocksEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:objectACL:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsKey:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:invalidUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:fileShareName:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:caseSensitivity:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CaseSensitivity
$sel:cacheAttributes:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:adminUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:accessBasedEnumeration:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
..} =
forall a. NFData a => a -> ()
Prelude.rnf Maybe Bool
accessBasedEnumeration
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
adminUserList
seq :: forall a b. a -> b -> b
`Prelude.seq` 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 CaseSensitivity
caseSensitivity
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 [Text]
invalidUserList
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 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
oplocksEnabled
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 Bool
sMBACLEnabled
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Maybe [Text]
validUserList
seq :: forall a b. a -> b -> b
`Prelude.seq` forall a. NFData a => a -> ()
Prelude.rnf Text
fileShareARN
instance Data.ToHeaders UpdateSMBFileShare where
toHeaders :: UpdateSMBFileShare -> 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.UpdateSMBFileShare" ::
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 UpdateSMBFileShare where
toJSON :: UpdateSMBFileShare -> Value
toJSON UpdateSMBFileShare' {Maybe Bool
Maybe [Text]
Maybe Text
Maybe CacheAttributes
Maybe CaseSensitivity
Maybe ObjectACL
Text
fileShareARN :: Text
validUserList :: Maybe [Text]
sMBACLEnabled :: Maybe Bool
requesterPays :: Maybe Bool
readOnly :: Maybe Bool
oplocksEnabled :: Maybe Bool
objectACL :: Maybe ObjectACL
notificationPolicy :: Maybe Text
kmsKey :: Maybe Text
kmsEncrypted :: Maybe Bool
invalidUserList :: Maybe [Text]
guessMIMETypeEnabled :: Maybe Bool
fileShareName :: Maybe Text
defaultStorageClass :: Maybe Text
caseSensitivity :: Maybe CaseSensitivity
cacheAttributes :: Maybe CacheAttributes
auditDestinationARN :: Maybe Text
adminUserList :: Maybe [Text]
accessBasedEnumeration :: Maybe Bool
$sel:fileShareARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Text
$sel:validUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:sMBACLEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:requesterPays:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:readOnly:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:oplocksEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:objectACL:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe ObjectACL
$sel:notificationPolicy:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsKey:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:kmsEncrypted:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:invalidUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:guessMIMETypeEnabled:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
$sel:fileShareName:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:defaultStorageClass:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:caseSensitivity:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CaseSensitivity
$sel:cacheAttributes:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe CacheAttributes
$sel:auditDestinationARN:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Text
$sel:adminUserList:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe [Text]
$sel:accessBasedEnumeration:UpdateSMBFileShare' :: UpdateSMBFileShare -> Maybe Bool
..} =
[Pair] -> Value
Data.object
( forall a. [Maybe a] -> [a]
Prelude.catMaybes
[ (Key
"AccessBasedEnumeration" 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
accessBasedEnumeration,
(Key
"AdminUserList" 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]
adminUserList,
(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
"CaseSensitivity" 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 CaseSensitivity
caseSensitivity,
(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
"InvalidUserList" 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]
invalidUserList,
(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
"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
"OplocksEnabled" 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
oplocksEnabled,
(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
"SMBACLEnabled" 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
sMBACLEnabled,
(Key
"ValidUserList" 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]
validUserList,
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 UpdateSMBFileShare where
toPath :: UpdateSMBFileShare -> ByteString
toPath = forall a b. a -> b -> a
Prelude.const ByteString
"/"
instance Data.ToQuery UpdateSMBFileShare where
toQuery :: UpdateSMBFileShare -> QueryString
toQuery = forall a b. a -> b -> a
Prelude.const forall a. Monoid a => a
Prelude.mempty
data UpdateSMBFileShareResponse = UpdateSMBFileShareResponse'
{
UpdateSMBFileShareResponse -> Maybe Text
fileShareARN :: Prelude.Maybe Prelude.Text,
UpdateSMBFileShareResponse -> Int
httpStatus :: Prelude.Int
}
deriving (UpdateSMBFileShareResponse -> UpdateSMBFileShareResponse -> Bool
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: UpdateSMBFileShareResponse -> UpdateSMBFileShareResponse -> Bool
$c/= :: UpdateSMBFileShareResponse -> UpdateSMBFileShareResponse -> Bool
== :: UpdateSMBFileShareResponse -> UpdateSMBFileShareResponse -> Bool
$c== :: UpdateSMBFileShareResponse -> UpdateSMBFileShareResponse -> Bool
Prelude.Eq, ReadPrec [UpdateSMBFileShareResponse]
ReadPrec UpdateSMBFileShareResponse
Int -> ReadS UpdateSMBFileShareResponse
ReadS [UpdateSMBFileShareResponse]
forall a.
(Int -> ReadS a)
-> ReadS [a] -> ReadPrec a -> ReadPrec [a] -> Read a
readListPrec :: ReadPrec [UpdateSMBFileShareResponse]
$creadListPrec :: ReadPrec [UpdateSMBFileShareResponse]
readPrec :: ReadPrec UpdateSMBFileShareResponse
$creadPrec :: ReadPrec UpdateSMBFileShareResponse
readList :: ReadS [UpdateSMBFileShareResponse]
$creadList :: ReadS [UpdateSMBFileShareResponse]
readsPrec :: Int -> ReadS UpdateSMBFileShareResponse
$creadsPrec :: Int -> ReadS UpdateSMBFileShareResponse
Prelude.Read, Int -> UpdateSMBFileShareResponse -> ShowS
[UpdateSMBFileShareResponse] -> ShowS
UpdateSMBFileShareResponse -> String
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
showList :: [UpdateSMBFileShareResponse] -> ShowS
$cshowList :: [UpdateSMBFileShareResponse] -> ShowS
show :: UpdateSMBFileShareResponse -> String
$cshow :: UpdateSMBFileShareResponse -> String
showsPrec :: Int -> UpdateSMBFileShareResponse -> ShowS
$cshowsPrec :: Int -> UpdateSMBFileShareResponse -> ShowS
Prelude.Show, forall x.
Rep UpdateSMBFileShareResponse x -> UpdateSMBFileShareResponse
forall x.
UpdateSMBFileShareResponse -> Rep UpdateSMBFileShareResponse x
forall a.
(forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a
$cto :: forall x.
Rep UpdateSMBFileShareResponse x -> UpdateSMBFileShareResponse
$cfrom :: forall x.
UpdateSMBFileShareResponse -> Rep UpdateSMBFileShareResponse x
Prelude.Generic)
newUpdateSMBFileShareResponse ::
Prelude.Int ->
UpdateSMBFileShareResponse
newUpdateSMBFileShareResponse :: Int -> UpdateSMBFileShareResponse
newUpdateSMBFileShareResponse Int
pHttpStatus_ =
UpdateSMBFileShareResponse'
{ $sel:fileShareARN:UpdateSMBFileShareResponse' :: Maybe Text
fileShareARN =
forall a. Maybe a
Prelude.Nothing,
$sel:httpStatus:UpdateSMBFileShareResponse' :: Int
httpStatus = Int
pHttpStatus_
}
updateSMBFileShareResponse_fileShareARN :: Lens.Lens' UpdateSMBFileShareResponse (Prelude.Maybe Prelude.Text)
updateSMBFileShareResponse_fileShareARN :: Lens' UpdateSMBFileShareResponse (Maybe Text)
updateSMBFileShareResponse_fileShareARN = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShareResponse' {Maybe Text
fileShareARN :: Maybe Text
$sel:fileShareARN:UpdateSMBFileShareResponse' :: UpdateSMBFileShareResponse -> Maybe Text
fileShareARN} -> Maybe Text
fileShareARN) (\s :: UpdateSMBFileShareResponse
s@UpdateSMBFileShareResponse' {} Maybe Text
a -> UpdateSMBFileShareResponse
s {$sel:fileShareARN:UpdateSMBFileShareResponse' :: Maybe Text
fileShareARN = Maybe Text
a} :: UpdateSMBFileShareResponse)
updateSMBFileShareResponse_httpStatus :: Lens.Lens' UpdateSMBFileShareResponse Prelude.Int
updateSMBFileShareResponse_httpStatus :: Lens' UpdateSMBFileShareResponse Int
updateSMBFileShareResponse_httpStatus = forall s a b t. (s -> a) -> (s -> b -> t) -> Lens s t a b
Lens.lens (\UpdateSMBFileShareResponse' {Int
httpStatus :: Int
$sel:httpStatus:UpdateSMBFileShareResponse' :: UpdateSMBFileShareResponse -> Int
httpStatus} -> Int
httpStatus) (\s :: UpdateSMBFileShareResponse
s@UpdateSMBFileShareResponse' {} Int
a -> UpdateSMBFileShareResponse
s {$sel:httpStatus:UpdateSMBFileShareResponse' :: Int
httpStatus = Int
a} :: UpdateSMBFileShareResponse)
instance Prelude.NFData UpdateSMBFileShareResponse where
rnf :: UpdateSMBFileShareResponse -> ()
rnf UpdateSMBFileShareResponse' {Int
Maybe Text
httpStatus :: Int
fileShareARN :: Maybe Text
$sel:httpStatus:UpdateSMBFileShareResponse' :: UpdateSMBFileShareResponse -> Int
$sel:fileShareARN:UpdateSMBFileShareResponse' :: UpdateSMBFileShareResponse -> 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