{-# 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 #-} -- Derived from AWS service descriptions, licensed under Apache 2.0. -- | -- Module : Amazonka.StorageGateway.UpdateNFSFileShare -- Copyright : (c) 2013-2023 Brendan Hay -- License : Mozilla Public License, v. 2.0. -- Maintainer : Brendan Hay -- Stability : auto-generated -- Portability : non-portable (GHC extensions) -- -- Updates a Network File System (NFS) file share. This operation is only -- supported in S3 File Gateways. -- -- To leave a file share field unchanged, set the corresponding input field -- to null. -- -- Updates the following file share settings: -- -- - Default storage class for your S3 bucket -- -- - Metadata defaults for your S3 bucket -- -- - Allowed NFS clients for your file share -- -- - Squash settings -- -- - Write status of your file share module Amazonka.StorageGateway.UpdateNFSFileShare ( -- * Creating a Request UpdateNFSFileShare (..), newUpdateNFSFileShare, -- * Request Lenses 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, -- * Destructuring the Response UpdateNFSFileShareResponse (..), newUpdateNFSFileShareResponse, -- * Response Lenses 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 -- | UpdateNFSFileShareInput -- -- /See:/ 'newUpdateNFSFileShare' smart constructor. data UpdateNFSFileShare = UpdateNFSFileShare' { -- | The Amazon Resource Name (ARN) of the storage used for audit logs. auditDestinationARN :: Prelude.Maybe Prelude.Text, -- | Specifies refresh cache information for the file share. cacheAttributes :: Prelude.Maybe CacheAttributes, -- | The list of clients that are allowed to access the S3 File Gateway. The -- list must contain either valid IP addresses or valid CIDR blocks. clientList :: Prelude.Maybe (Prelude.NonEmpty Prelude.Text), -- | The default storage class for objects put into an Amazon S3 bucket by -- the S3 File Gateway. The default value is @S3_STANDARD@. Optional. -- -- Valid Values: @S3_STANDARD@ | @S3_INTELLIGENT_TIERING@ | -- @S3_STANDARD_IA@ | @S3_ONEZONE_IA@ defaultStorageClass :: Prelude.Maybe Prelude.Text, -- | The name of the file share. Optional. -- -- @FileShareName@ must be set if an S3 prefix name is set in -- @LocationARN@, or if an access point or access point alias is used. fileShareName :: Prelude.Maybe Prelude.Text, -- | A value that enables guessing of the MIME type for uploaded objects -- based on file extensions. Set this value to @true@ to enable MIME type -- guessing, otherwise set to @false@. The default value is @true@. -- -- Valid Values: @true@ | @false@ guessMIMETypeEnabled :: Prelude.Maybe Prelude.Bool, -- | Set to @true@ to use Amazon S3 server-side encryption with your own KMS -- key, or @false@ to use a key managed by Amazon S3. Optional. -- -- Valid Values: @true@ | @false@ kmsEncrypted :: Prelude.Maybe Prelude.Bool, -- | The Amazon Resource Name (ARN) of a symmetric customer master key (CMK) -- used for Amazon S3 server-side encryption. Storage Gateway does not -- support asymmetric CMKs. This value can only be set when @KMSEncrypted@ -- is @true@. Optional. kmsKey :: Prelude.Maybe Prelude.Text, -- | The default values for the file share. Optional. nFSFileShareDefaults :: Prelude.Maybe NFSFileShareDefaults, -- | The notification policy of the file share. @SettlingTimeInSeconds@ -- controls the number of seconds to wait after the last point in time a -- client wrote to a file before generating an @ObjectUploaded@ -- notification. Because clients can make many small writes to files, it\'s -- best to set this parameter for as long as possible to avoid generating -- multiple notifications for the same file in a small time period. -- -- @SettlingTimeInSeconds@ has no effect on the timing of the object -- uploading to Amazon S3, only the timing of the notification. -- -- The following example sets @NotificationPolicy@ on with -- @SettlingTimeInSeconds@ set to 60. -- -- @{\\\"Upload\\\": {\\\"SettlingTimeInSeconds\\\": 60}}@ -- -- The following example sets @NotificationPolicy@ off. -- -- @{}@ notificationPolicy :: Prelude.Maybe Prelude.Text, -- | A value that sets the access control list (ACL) permission for objects -- in the S3 bucket that a S3 File Gateway puts objects into. The default -- value is @private@. objectACL :: Prelude.Maybe ObjectACL, -- | A value that sets the write status of a file share. Set this value to -- @true@ to set the write status to read-only, otherwise set to @false@. -- -- Valid Values: @true@ | @false@ readOnly :: Prelude.Maybe Prelude.Bool, -- | A value that sets who pays the cost of the request and the cost -- associated with data download from the S3 bucket. If this value is set -- to @true@, the requester pays the costs; otherwise, the S3 bucket owner -- pays. However, the S3 bucket owner always pays the cost of storing data. -- -- @RequesterPays@ is a configuration for the S3 bucket that backs the file -- share, so make sure that the configuration on the file share is the same -- as the S3 bucket configuration. -- -- Valid Values: @true@ | @false@ requesterPays :: Prelude.Maybe Prelude.Bool, -- | The user mapped to anonymous user. -- -- Valid values are the following: -- -- - @RootSquash@: Only root is mapped to anonymous user. -- -- - @NoSquash@: No one is mapped to anonymous user. -- -- - @AllSquash@: Everyone is mapped to anonymous user. squash :: Prelude.Maybe Prelude.Text, -- | The Amazon Resource Name (ARN) of the file share to be updated. fileShareARN :: Prelude.Text } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateNFSFileShare' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'auditDestinationARN', 'updateNFSFileShare_auditDestinationARN' - The Amazon Resource Name (ARN) of the storage used for audit logs. -- -- 'cacheAttributes', 'updateNFSFileShare_cacheAttributes' - Specifies refresh cache information for the file share. -- -- 'clientList', 'updateNFSFileShare_clientList' - The list of clients that are allowed to access the S3 File Gateway. The -- list must contain either valid IP addresses or valid CIDR blocks. -- -- 'defaultStorageClass', 'updateNFSFileShare_defaultStorageClass' - The default storage class for objects put into an Amazon S3 bucket by -- the S3 File Gateway. The default value is @S3_STANDARD@. Optional. -- -- Valid Values: @S3_STANDARD@ | @S3_INTELLIGENT_TIERING@ | -- @S3_STANDARD_IA@ | @S3_ONEZONE_IA@ -- -- 'fileShareName', 'updateNFSFileShare_fileShareName' - The name of the file share. Optional. -- -- @FileShareName@ must be set if an S3 prefix name is set in -- @LocationARN@, or if an access point or access point alias is used. -- -- 'guessMIMETypeEnabled', 'updateNFSFileShare_guessMIMETypeEnabled' - A value that enables guessing of the MIME type for uploaded objects -- based on file extensions. Set this value to @true@ to enable MIME type -- guessing, otherwise set to @false@. The default value is @true@. -- -- Valid Values: @true@ | @false@ -- -- 'kmsEncrypted', 'updateNFSFileShare_kmsEncrypted' - Set to @true@ to use Amazon S3 server-side encryption with your own KMS -- key, or @false@ to use a key managed by Amazon S3. Optional. -- -- Valid Values: @true@ | @false@ -- -- 'kmsKey', 'updateNFSFileShare_kmsKey' - The Amazon Resource Name (ARN) of a symmetric customer master key (CMK) -- used for Amazon S3 server-side encryption. Storage Gateway does not -- support asymmetric CMKs. This value can only be set when @KMSEncrypted@ -- is @true@. Optional. -- -- 'nFSFileShareDefaults', 'updateNFSFileShare_nFSFileShareDefaults' - The default values for the file share. Optional. -- -- 'notificationPolicy', 'updateNFSFileShare_notificationPolicy' - The notification policy of the file share. @SettlingTimeInSeconds@ -- controls the number of seconds to wait after the last point in time a -- client wrote to a file before generating an @ObjectUploaded@ -- notification. Because clients can make many small writes to files, it\'s -- best to set this parameter for as long as possible to avoid generating -- multiple notifications for the same file in a small time period. -- -- @SettlingTimeInSeconds@ has no effect on the timing of the object -- uploading to Amazon S3, only the timing of the notification. -- -- The following example sets @NotificationPolicy@ on with -- @SettlingTimeInSeconds@ set to 60. -- -- @{\\\"Upload\\\": {\\\"SettlingTimeInSeconds\\\": 60}}@ -- -- The following example sets @NotificationPolicy@ off. -- -- @{}@ -- -- 'objectACL', 'updateNFSFileShare_objectACL' - A value that sets the access control list (ACL) permission for objects -- in the S3 bucket that a S3 File Gateway puts objects into. The default -- value is @private@. -- -- 'readOnly', 'updateNFSFileShare_readOnly' - A value that sets the write status of a file share. Set this value to -- @true@ to set the write status to read-only, otherwise set to @false@. -- -- Valid Values: @true@ | @false@ -- -- 'requesterPays', 'updateNFSFileShare_requesterPays' - A value that sets who pays the cost of the request and the cost -- associated with data download from the S3 bucket. If this value is set -- to @true@, the requester pays the costs; otherwise, the S3 bucket owner -- pays. However, the S3 bucket owner always pays the cost of storing data. -- -- @RequesterPays@ is a configuration for the S3 bucket that backs the file -- share, so make sure that the configuration on the file share is the same -- as the S3 bucket configuration. -- -- Valid Values: @true@ | @false@ -- -- 'squash', 'updateNFSFileShare_squash' - The user mapped to anonymous user. -- -- Valid values are the following: -- -- - @RootSquash@: Only root is mapped to anonymous user. -- -- - @NoSquash@: No one is mapped to anonymous user. -- -- - @AllSquash@: Everyone is mapped to anonymous user. -- -- 'fileShareARN', 'updateNFSFileShare_fileShareARN' - The Amazon Resource Name (ARN) of the file share to be updated. newUpdateNFSFileShare :: -- | 'fileShareARN' Prelude.Text -> UpdateNFSFileShare newUpdateNFSFileShare pFileShareARN_ = UpdateNFSFileShare' { auditDestinationARN = Prelude.Nothing, cacheAttributes = Prelude.Nothing, clientList = Prelude.Nothing, defaultStorageClass = Prelude.Nothing, fileShareName = Prelude.Nothing, guessMIMETypeEnabled = Prelude.Nothing, kmsEncrypted = Prelude.Nothing, kmsKey = Prelude.Nothing, nFSFileShareDefaults = Prelude.Nothing, notificationPolicy = Prelude.Nothing, objectACL = Prelude.Nothing, readOnly = Prelude.Nothing, requesterPays = Prelude.Nothing, squash = Prelude.Nothing, fileShareARN = pFileShareARN_ } -- | The Amazon Resource Name (ARN) of the storage used for audit logs. updateNFSFileShare_auditDestinationARN :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_auditDestinationARN = Lens.lens (\UpdateNFSFileShare' {auditDestinationARN} -> auditDestinationARN) (\s@UpdateNFSFileShare' {} a -> s {auditDestinationARN = a} :: UpdateNFSFileShare) -- | Specifies refresh cache information for the file share. updateNFSFileShare_cacheAttributes :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe CacheAttributes) updateNFSFileShare_cacheAttributes = Lens.lens (\UpdateNFSFileShare' {cacheAttributes} -> cacheAttributes) (\s@UpdateNFSFileShare' {} a -> s {cacheAttributes = a} :: UpdateNFSFileShare) -- | The list of clients that are allowed to access the S3 File Gateway. The -- list must contain either valid IP addresses or valid CIDR blocks. updateNFSFileShare_clientList :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe (Prelude.NonEmpty Prelude.Text)) updateNFSFileShare_clientList = Lens.lens (\UpdateNFSFileShare' {clientList} -> clientList) (\s@UpdateNFSFileShare' {} a -> s {clientList = a} :: UpdateNFSFileShare) Prelude.. Lens.mapping Lens.coerced -- | The default storage class for objects put into an Amazon S3 bucket by -- the S3 File Gateway. The default value is @S3_STANDARD@. Optional. -- -- Valid Values: @S3_STANDARD@ | @S3_INTELLIGENT_TIERING@ | -- @S3_STANDARD_IA@ | @S3_ONEZONE_IA@ updateNFSFileShare_defaultStorageClass :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_defaultStorageClass = Lens.lens (\UpdateNFSFileShare' {defaultStorageClass} -> defaultStorageClass) (\s@UpdateNFSFileShare' {} a -> s {defaultStorageClass = a} :: UpdateNFSFileShare) -- | The name of the file share. Optional. -- -- @FileShareName@ must be set if an S3 prefix name is set in -- @LocationARN@, or if an access point or access point alias is used. updateNFSFileShare_fileShareName :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_fileShareName = Lens.lens (\UpdateNFSFileShare' {fileShareName} -> fileShareName) (\s@UpdateNFSFileShare' {} a -> s {fileShareName = a} :: UpdateNFSFileShare) -- | A value that enables guessing of the MIME type for uploaded objects -- based on file extensions. Set this value to @true@ to enable MIME type -- guessing, otherwise set to @false@. The default value is @true@. -- -- Valid Values: @true@ | @false@ updateNFSFileShare_guessMIMETypeEnabled :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool) updateNFSFileShare_guessMIMETypeEnabled = Lens.lens (\UpdateNFSFileShare' {guessMIMETypeEnabled} -> guessMIMETypeEnabled) (\s@UpdateNFSFileShare' {} a -> s {guessMIMETypeEnabled = a} :: UpdateNFSFileShare) -- | Set to @true@ to use Amazon S3 server-side encryption with your own KMS -- key, or @false@ to use a key managed by Amazon S3. Optional. -- -- Valid Values: @true@ | @false@ updateNFSFileShare_kmsEncrypted :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool) updateNFSFileShare_kmsEncrypted = Lens.lens (\UpdateNFSFileShare' {kmsEncrypted} -> kmsEncrypted) (\s@UpdateNFSFileShare' {} a -> s {kmsEncrypted = a} :: UpdateNFSFileShare) -- | The Amazon Resource Name (ARN) of a symmetric customer master key (CMK) -- used for Amazon S3 server-side encryption. Storage Gateway does not -- support asymmetric CMKs. This value can only be set when @KMSEncrypted@ -- is @true@. Optional. updateNFSFileShare_kmsKey :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_kmsKey = Lens.lens (\UpdateNFSFileShare' {kmsKey} -> kmsKey) (\s@UpdateNFSFileShare' {} a -> s {kmsKey = a} :: UpdateNFSFileShare) -- | The default values for the file share. Optional. updateNFSFileShare_nFSFileShareDefaults :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe NFSFileShareDefaults) updateNFSFileShare_nFSFileShareDefaults = Lens.lens (\UpdateNFSFileShare' {nFSFileShareDefaults} -> nFSFileShareDefaults) (\s@UpdateNFSFileShare' {} a -> s {nFSFileShareDefaults = a} :: UpdateNFSFileShare) -- | The notification policy of the file share. @SettlingTimeInSeconds@ -- controls the number of seconds to wait after the last point in time a -- client wrote to a file before generating an @ObjectUploaded@ -- notification. Because clients can make many small writes to files, it\'s -- best to set this parameter for as long as possible to avoid generating -- multiple notifications for the same file in a small time period. -- -- @SettlingTimeInSeconds@ has no effect on the timing of the object -- uploading to Amazon S3, only the timing of the notification. -- -- The following example sets @NotificationPolicy@ on with -- @SettlingTimeInSeconds@ set to 60. -- -- @{\\\"Upload\\\": {\\\"SettlingTimeInSeconds\\\": 60}}@ -- -- The following example sets @NotificationPolicy@ off. -- -- @{}@ updateNFSFileShare_notificationPolicy :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_notificationPolicy = Lens.lens (\UpdateNFSFileShare' {notificationPolicy} -> notificationPolicy) (\s@UpdateNFSFileShare' {} a -> s {notificationPolicy = a} :: UpdateNFSFileShare) -- | A value that sets the access control list (ACL) permission for objects -- in the S3 bucket that a S3 File Gateway puts objects into. The default -- value is @private@. updateNFSFileShare_objectACL :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe ObjectACL) updateNFSFileShare_objectACL = Lens.lens (\UpdateNFSFileShare' {objectACL} -> objectACL) (\s@UpdateNFSFileShare' {} a -> s {objectACL = a} :: UpdateNFSFileShare) -- | A value that sets the write status of a file share. Set this value to -- @true@ to set the write status to read-only, otherwise set to @false@. -- -- Valid Values: @true@ | @false@ updateNFSFileShare_readOnly :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool) updateNFSFileShare_readOnly = Lens.lens (\UpdateNFSFileShare' {readOnly} -> readOnly) (\s@UpdateNFSFileShare' {} a -> s {readOnly = a} :: UpdateNFSFileShare) -- | A value that sets who pays the cost of the request and the cost -- associated with data download from the S3 bucket. If this value is set -- to @true@, the requester pays the costs; otherwise, the S3 bucket owner -- pays. However, the S3 bucket owner always pays the cost of storing data. -- -- @RequesterPays@ is a configuration for the S3 bucket that backs the file -- share, so make sure that the configuration on the file share is the same -- as the S3 bucket configuration. -- -- Valid Values: @true@ | @false@ updateNFSFileShare_requesterPays :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Bool) updateNFSFileShare_requesterPays = Lens.lens (\UpdateNFSFileShare' {requesterPays} -> requesterPays) (\s@UpdateNFSFileShare' {} a -> s {requesterPays = a} :: UpdateNFSFileShare) -- | The user mapped to anonymous user. -- -- Valid values are the following: -- -- - @RootSquash@: Only root is mapped to anonymous user. -- -- - @NoSquash@: No one is mapped to anonymous user. -- -- - @AllSquash@: Everyone is mapped to anonymous user. updateNFSFileShare_squash :: Lens.Lens' UpdateNFSFileShare (Prelude.Maybe Prelude.Text) updateNFSFileShare_squash = Lens.lens (\UpdateNFSFileShare' {squash} -> squash) (\s@UpdateNFSFileShare' {} a -> s {squash = a} :: UpdateNFSFileShare) -- | The Amazon Resource Name (ARN) of the file share to be updated. updateNFSFileShare_fileShareARN :: Lens.Lens' UpdateNFSFileShare Prelude.Text updateNFSFileShare_fileShareARN = Lens.lens (\UpdateNFSFileShare' {fileShareARN} -> fileShareARN) (\s@UpdateNFSFileShare' {} a -> s {fileShareARN = a} :: UpdateNFSFileShare) instance Core.AWSRequest UpdateNFSFileShare where type AWSResponse UpdateNFSFileShare = UpdateNFSFileShareResponse request overrides = Request.postJSON (overrides defaultService) response = Response.receiveJSON ( \s h x -> UpdateNFSFileShareResponse' Prelude.<$> (x Data..?> "FileShareARN") Prelude.<*> (Prelude.pure (Prelude.fromEnum s)) ) instance Prelude.Hashable UpdateNFSFileShare where hashWithSalt _salt UpdateNFSFileShare' {..} = _salt `Prelude.hashWithSalt` auditDestinationARN `Prelude.hashWithSalt` cacheAttributes `Prelude.hashWithSalt` clientList `Prelude.hashWithSalt` defaultStorageClass `Prelude.hashWithSalt` fileShareName `Prelude.hashWithSalt` guessMIMETypeEnabled `Prelude.hashWithSalt` kmsEncrypted `Prelude.hashWithSalt` kmsKey `Prelude.hashWithSalt` nFSFileShareDefaults `Prelude.hashWithSalt` notificationPolicy `Prelude.hashWithSalt` objectACL `Prelude.hashWithSalt` readOnly `Prelude.hashWithSalt` requesterPays `Prelude.hashWithSalt` squash `Prelude.hashWithSalt` fileShareARN instance Prelude.NFData UpdateNFSFileShare where rnf UpdateNFSFileShare' {..} = Prelude.rnf auditDestinationARN `Prelude.seq` Prelude.rnf cacheAttributes `Prelude.seq` Prelude.rnf clientList `Prelude.seq` Prelude.rnf defaultStorageClass `Prelude.seq` Prelude.rnf fileShareName `Prelude.seq` Prelude.rnf guessMIMETypeEnabled `Prelude.seq` Prelude.rnf kmsEncrypted `Prelude.seq` Prelude.rnf kmsKey `Prelude.seq` Prelude.rnf nFSFileShareDefaults `Prelude.seq` Prelude.rnf notificationPolicy `Prelude.seq` Prelude.rnf objectACL `Prelude.seq` Prelude.rnf readOnly `Prelude.seq` Prelude.rnf requesterPays `Prelude.seq` Prelude.rnf squash `Prelude.seq` Prelude.rnf fileShareARN instance Data.ToHeaders UpdateNFSFileShare where toHeaders = Prelude.const ( Prelude.mconcat [ "X-Amz-Target" Data.=# ( "StorageGateway_20130630.UpdateNFSFileShare" :: Prelude.ByteString ), "Content-Type" Data.=# ( "application/x-amz-json-1.1" :: Prelude.ByteString ) ] ) instance Data.ToJSON UpdateNFSFileShare where toJSON UpdateNFSFileShare' {..} = Data.object ( Prelude.catMaybes [ ("AuditDestinationARN" Data..=) Prelude.<$> auditDestinationARN, ("CacheAttributes" Data..=) Prelude.<$> cacheAttributes, ("ClientList" Data..=) Prelude.<$> clientList, ("DefaultStorageClass" Data..=) Prelude.<$> defaultStorageClass, ("FileShareName" Data..=) Prelude.<$> fileShareName, ("GuessMIMETypeEnabled" Data..=) Prelude.<$> guessMIMETypeEnabled, ("KMSEncrypted" Data..=) Prelude.<$> kmsEncrypted, ("KMSKey" Data..=) Prelude.<$> kmsKey, ("NFSFileShareDefaults" Data..=) Prelude.<$> nFSFileShareDefaults, ("NotificationPolicy" Data..=) Prelude.<$> notificationPolicy, ("ObjectACL" Data..=) Prelude.<$> objectACL, ("ReadOnly" Data..=) Prelude.<$> readOnly, ("RequesterPays" Data..=) Prelude.<$> requesterPays, ("Squash" Data..=) Prelude.<$> squash, Prelude.Just ("FileShareARN" Data..= fileShareARN) ] ) instance Data.ToPath UpdateNFSFileShare where toPath = Prelude.const "/" instance Data.ToQuery UpdateNFSFileShare where toQuery = Prelude.const Prelude.mempty -- | UpdateNFSFileShareOutput -- -- /See:/ 'newUpdateNFSFileShareResponse' smart constructor. data UpdateNFSFileShareResponse = UpdateNFSFileShareResponse' { -- | The Amazon Resource Name (ARN) of the updated file share. fileShareARN :: Prelude.Maybe Prelude.Text, -- | The response's http status code. httpStatus :: Prelude.Int } deriving (Prelude.Eq, Prelude.Read, Prelude.Show, Prelude.Generic) -- | -- Create a value of 'UpdateNFSFileShareResponse' with all optional fields omitted. -- -- Use or to modify other optional fields. -- -- The following record fields are available, with the corresponding lenses provided -- for backwards compatibility: -- -- 'fileShareARN', 'updateNFSFileShareResponse_fileShareARN' - The Amazon Resource Name (ARN) of the updated file share. -- -- 'httpStatus', 'updateNFSFileShareResponse_httpStatus' - The response's http status code. newUpdateNFSFileShareResponse :: -- | 'httpStatus' Prelude.Int -> UpdateNFSFileShareResponse newUpdateNFSFileShareResponse pHttpStatus_ = UpdateNFSFileShareResponse' { fileShareARN = Prelude.Nothing, httpStatus = pHttpStatus_ } -- | The Amazon Resource Name (ARN) of the updated file share. updateNFSFileShareResponse_fileShareARN :: Lens.Lens' UpdateNFSFileShareResponse (Prelude.Maybe Prelude.Text) updateNFSFileShareResponse_fileShareARN = Lens.lens (\UpdateNFSFileShareResponse' {fileShareARN} -> fileShareARN) (\s@UpdateNFSFileShareResponse' {} a -> s {fileShareARN = a} :: UpdateNFSFileShareResponse) -- | The response's http status code. updateNFSFileShareResponse_httpStatus :: Lens.Lens' UpdateNFSFileShareResponse Prelude.Int updateNFSFileShareResponse_httpStatus = Lens.lens (\UpdateNFSFileShareResponse' {httpStatus} -> httpStatus) (\s@UpdateNFSFileShareResponse' {} a -> s {httpStatus = a} :: UpdateNFSFileShareResponse) instance Prelude.NFData UpdateNFSFileShareResponse where rnf UpdateNFSFileShareResponse' {..} = Prelude.rnf fileShareARN `Prelude.seq` Prelude.rnf httpStatus